Laserfiche WebLink
<br />c). Subprogram BLOCK prints out the starred block program <br />identification at the beginning of each new profile. <br />It is suggested that the date and time of execution <br />also be printed by this routine. Users are encouraged <br />to adopt the comment cards shown below to obtain and <br />print the execution date and time. <br /> <br />c <br />C <br />C <br />e <br />c <br />c <br />tblS <br /> <br />FnLLOwING OPTIO~AL LIN~S OF CODE ~AY BE ADAPTED TO YOUR COMPUTINI <br />SYSTEM TO GET THl CURRENT DATE AND TIME fOR OUTPUT <br />THROUGH YOUR SYSTEM ROUTINES <br />CALL DAfECIDATO <br />CALL HOURCITlME) <br />w~ITE(IO,tb15) IDATE,ITI~E <br />FnR~ATce5X,leHTHIS PUN ExECUTED ,Al0,2X,Al0) <br /> <br />d). An option on the J6 card allows the user to control <br />the manipulation of several print files (created by <br />subprogram SUMPO) by means of control cards, which <br />may result in a significant reduction in costs. The <br />files are written on one or more of the units 91, 92, <br />93, 94, and 96. If the option on the J6 card is not <br />used, these files will be' manipulated by means of--- <br />Fortran code in subprogram SUMPO. If the option on <br />the J6 card is used, by setting the input variable <br />ICOPY in the second field equal to one, the Fortran <br />code for manipulating the files will be bypassed. <br />System control cards must then be used to obtain <br />listings of the files at the end of the job. When <br />the J6 card option is used, multiple jobs which call <br />SUMPO should not be stacked together, and the files <br />should not be assigned directly as print files prior <br />to execution as they are used as scratch files by <br />other sections of the program. <br /> <br />Information provided in Sections 9 and 10 may be useful when <br /> <br />implementing this program on various machines. <br /> <br />The Hydrologic Engineering Center would like to be informed of <br /> <br />problems encountered by users when implementing this program on <br /> <br />various computer systems. <br /> <br />28 <br />