  PLOT TEMPERATURE AND DISSOLVED OXYGEN                                 00000040
  VERSUS DATE, BY STATION.                                              00000050
                                                                        00000060
  USE LINE-PRINTER PLOT.                                                00000070
                                                                        00000080
  NOTE:                                                                 00000090
   LINES BELOW THIS POINT SHOULD BE SUBMITTED BY THE                    00000100
   "%SCAN" COMMAND, JUST AS A NON-SAS RETRIEVAL WOULD.                  00000110
                                                                        00000120
PGM=RET,PURP=208/STA,MORE=SAS,PRT=NO,                                   00000130
A=1110NET,S=230040,S=230041,P=10,P=300,BD=60,ED=62,                     00000140
HEAD=REF - STORET.HELP.MORE.SAS.EXAMPLE6,                               00000150
SASPARMS=BEGIN,                                                         00000160
OPTIONS S=72 LS=71;                                                     00000170
*  REF - STORET.HELP.MORE.SAS.EXAMPLE6  ;                               00000180
DATA ANYNAME;                                                           00000190
INFILE FCF LENGTH=L;                                                    00000200
INPUT @26 YY $2. @;                                                     00000210
IF YY='99' THEN DELETE; DROP YY;                                        00000220
FORMAT AGN_STA $24.;                                                    00000230
FORMAT DATE YYMMDD8.;                                                   00000240
INPUT @1   AGN        $8.                                               00000250
      @9   STN       $15.                                               00000260
      @26  DATE  YYMMDD6.                                               00000270
      @36  TEMP_C    RB4.                                               00000280
           DISS_OX   RB4.   ;                                           00000290
AGN_STA=AGN||' '||STN; DROP AGN STN;                                    00000300
PROC PLOT; BY AGN_STA;                                                  00000310
PLOT TEMP_C * DATE / VPOS=40 ;                                          00000320
PLOT DISS_OX * DATE / VPOS=40 ;                                         00000330
TITLE 'EXAMPLE 1';                                                      00000340
STOPSAS,                                                                00000350
./III      JOB (AAAASTORPUUU,MIII),STORET,NOTIFY=III,TIME=5,            00000360
./             MSGLEVEL=(1,1),PRTY=1                                    00000370
**ROUTE  PRINT HOLD                                                     00000380
**JOBPARM LINES=10                                                      00000390
                                                                        00000400
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -           00000410
  FANCY PLOT, SIMILAR TO ABOVE.                                         00000420
  USE STORET "INCLUDE" FACILITY TO                                      00000430
  READ FCF FROM SAS, VIA MACRO (FCFREAD).                               00000440
                                                                        00000450
  USER-SPECIFIED AXIS TICS AND GRID OVERLAY.                            00000460
                                                                        00000470
                                                                        00000480
PGM=RET,PURP=208/STA,MORE=SAS,PRT=NO,                                   00000490
A=1110NET,S=230040,S=230041,P=10,P=300,BD=60,ED=62,                     00000500
NOECHO,                                                                 00000510
SASPARMS=BEGIN,                                                         00000520
*  REF - STORET.HELP.MORE.SAS.EXAMPLE6  ;                               00000530
OPTIONS S=72 LS=71;                                                     00000540
DATA ANYNAME;                                                           00000550
*                                                                       00000560
INCLUDE (FCFREAD)                                                       00000570
RENAME   P1=TEMP_C   P2=DISS_OX;                                        00000580
PROC PLOT; BY STATION;                                                  00000590
PLOT TEMP_C * DATE / VPOS=40                                            00000600
VAXIS=0 5 10 15 20 25 30 35 40                                          00000610
VREF=0 10 20 30 40                                                      00000620
HAXIS=0 181 366 546 731 911 1096                                        00000630
HREF=0 366 731 1096 ;                                                   00000640
PLOT DISS_OX * DATE / VPOS=40                                           00000650
VAXIS=0 5 10 15 20                                                      00000660
VREF=0 5 10 15 20                                                       00000670
HAXIS=0 181 366 546 731 911 1096                                        00000680
HREF=0 366 731 1096 ;                                                   00000690
PLOT DISS_OX*TEMP_C / VPOS=40                                           00000700
VAXIS=0 5 10 15 20                                                      00000710
VREF=0 5 10 15 20                                                       00000720
HAXIS=0 5 10 15 20 25 30 35 40                                          00000730
HREF=0 10 20 30 40 ;                                                    00000740
TITLE 'EXAMPLE 2';                                                      00000750
STOPSAS,                                                                00000760
./III      JOB (AAAASTORPUUU,MIII),STORET,NOTIFY=III,TIME=5,            00000770
./             MSGLEVEL=(1,1),PRTY=1                                    00000780
**ROUTE  PRINT HOLD                                                     00000790
**JOBPARM LINES=10                                                      00000800
