//* STORET.HELP.QUALMAP.TREND.EXAMPLE                                   00000010
//SCAN EXEC WQINTRDR                                                    00000020
//CARDFD DD DATA                                                        00000030
PGM MSP,QUALMAP,PURP 307/EPA,                                           00000040
LT=I,L=4130,L=8645,L=46,L=8645,L=46,L=8230,L=4130,L=8230,               00000050
SCALE=2000000,PRT NO,AGGR=CELL450X450,                                  00000060
EXTRACT=665,                                                            00000070
P=665,BD=720101,ED=751231,                                              00000080
MSPARMS=BEGIN,MODELL,%TILE85T A,GROUPSQ,NOLIST,                         00000090
PLOTC,LEFT1,TRNDNLY,                                                    00000100
PLOTC,LEFT1,SEG=0005-0009/,TRNDNLY,                                     00000110
TPLOT,EARLY=2L,LATE=1L,                                                 00000120
LABEL=TREND - PHOSPHORUS IN WATER#,                                     00000130
LABEL=1972-1975 VS. MAY-SEPT.#,                                         00000140
STOPMSP,TLAT 45,TLONG 90.5,CSIZE=0.05,NOBOX,NOPOLPLT,                   00000150
BACKGRND=REACHES,BACKGRND=STATES,                                       00000160
./III      JOB (AAAASTORP,MIII,),STORET,MSGCLASS=A,TIME=120,            00000170
./             MSGLEVEL=(1,1),PRTY=1                                    00000171
**JOBPARM LINES=50                                                      00000180
./INFL DD UNIT=SYSDA,SPACE=(TRK,(500,500)),                             00000190
./ DCB=(RECFM=FB,LRECL=60,BLKSIZE=3000)                                 00000200
./SINFL DD UNIT=SYSDA,SPACE=(TRK,(200,200)),DISP=(MOD,PASS),            00000210
./ DCB=(RECFM=FB,LRECL=60,BLKSIZE=3000)                                 00000220
