It contains an example STORET MEAN retrieval which will save, in a disk 00000003
or tape file (DDname OT), the transformation data (i.e. temperature     00000004
conversions, DO saturation, un-ionized ammonia, coliform strep count    00000005
ratio) generated by the MEAN software, as well as the raw data passed   00000006
from the retrieval software in the Further Computational File (FCF).    00000007
                                                                        00000010
For detailed descriptions of the OT and FCF file formats and contents   00000011
reference the STORET help dataset named 'STORET.HELP.FILE.FORMATS'.     00000012
                                                                        00000013
  00010  PGM=MEAN,PURP=104B6/STA,                                       00000014
  00020  A=112WRD,S=07289000,                                           00000020
  00030  OUT,DG=,                                                       00000030
  00040  P=60,P=940,LOAD,P=945,LOAD,P=31615,LOG,P=10,P=11,              00000040
  00050  ./III      JOB (AAAA,MIII),STORET,NOTIFY=III,TIME=5,           00000050
  00060  ./             MSGLEVEL=(1,1),PRTY=1                           00000060
  00070  **ROUTE  PRINT HOLD                                            00000070
  00080  **JOBPARM LINES=10                                             00000080
  00090  ./OT DD UNIT=DISK,DSN=IIIAAAA.dataset.name,                    00000090
  00100  ./ DISP=(,CATLG),SPACE=(TRK,(20,20),RLSE),                     00000100
  00110  ./ DCB=(RECFM=VB,LRECL=149,BLKSIZE=6184)                       00000110
                                                                        00000120
for tape output the following Job Control Language (JCL) should be      00000130
supplied:                                                               00000140
                                                                        00000150
  00090  **TAPE  BNUMBER,TAPENO                                         00000151
  00100  ./OT DD UNIT=TAPERND,VOL=SER=TAPENO,DSN=NAME,                  00000160
  00110  ./ DISP=(,KEEP),LABEL=(1,SL,EXPDT=98000),                      00000170
  00120  ./ DCB=(RECFM=VB,LRECL=149,BLKSIZE=6184)                       00000180
