.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
***
**********************************************************