.LIT
*************************************************************
***
***
***		ONTARIO HYDRO - MISCELLANEOUS SUBROUTINES
***
***		THIS UIC [310,133] CONTAINS A POTPOURRI
***		OF ROUTINES.
***
***		A ROUGH GROUPING FOLLOWS:
***
***			1) DATA BASE HANDLER
***				DBHTRF  - MAIN LINE FOR DBHXXX
***				DBIDBH  - INTERFACE ROUTINE IN DBIXXX
***				DBITST	- MAINLINE FOR DBIXXX
***				COMMMON - SGAXXX DEFINITION
***				DBHQIO  - I/O ROUTINE FOR DBHXXX
***				MOVE    - ROUTINE TO COPY FROM ANOTHER TASK 
***				GENHSH  - GENERALIZED HASHING FUNCTION
***
***			2) FORTRAN POINTER ROUTINES
***				IGETAD - STORE ADDRESS OF VARIABLE
***				INDGET - GET VALUE STORED AT AN ADDRESS
***				INDPUT - STORE A VALUE AT AN ADDRESS
***				MOVDPI - MOVE TWO CONSECUTIVE WORDS
***				ICALL  - CALL A SUBROUTINE WITH AN ADDRESS
***			3) MISC.
***				TINUM - RETURNS TI#,TASKNAME,UIC
***				TIMOUT- WAITS "N" SECONDS THEN CONTINUES
***				ERRMSG- FORTRAN INTERFACE TO MO....
***				BLOCK - FORTRAN CALLABLE DISK BLOCK READ ROUTINE
***				TRACE - AUTO RESTART ON TASK FAILURE
***
**********************************************************