1. In this program, parameters are read from the RUN command until the list is exhausted. DEV=CNN suppresses the normal DONE messages from SFCLIST and TAFRPT. This sends the standard output to the CRT, but does not send the error or debug output. Use RUN KMSN KMKE KCLE KBOS KDCA or RUN KMEM KORD for this example. A step-by-step practice session with this example follows.
3. In this example, the two character variables are read from the RUN statement. If they are identical, line 20 causes EQUAL to be displayed on the CRT and the program stops at line 100. If they are not equal, line 30 causes NOT EQUAL to be displayed, and lines 40 and 50 use the INDEX function to find out if one is a subset of the other. The semicolons between PRINT list items are omitted, as they are only required to prevent syntax ambiguities.
4. This program copies the current day's 0 or 12 UTC mandatory RAOB MD file data to a workstation MD file. If the current hour is between 0 and 11, the 0 UTC RAOB data is copied to the dataset position equal to the value of the current three-digit Julian day plus 1000. If the current hour is between 12 and 23, the 12 UTC RAOB data is copied to the dataset position equal to the value of the current three-digit Julian day plus 2000.
If this program is run from the command scheduler every 12 hours for an entire year, the 0 UTC data for days 1 through 365 are placed in positions 1001 through 1365, and the 12 UTC data is placed in positions 2001 through 2365.