* SAS RETRIEVAL CODE TO READ AND PRINT THE 205 STATION MONTHLY PRECIPITATION FILE (FILE 16 ON THE MAGNETIC TAPE); DATA P205; INFILE IN; INPUT STANUM 2-6 YEAR 9-12 RFLAG $ 14 JAN 16-20 JANFL $ 22 FEB 24-28 FEBFL $ 30 MAR 32-36 MARFL $ 38 APR 40-44 APRFL $ 46 MAY 48-52 MAYFL $ 54 JUN 56-60 JUNFL $ 62 JUL 64-68 JULFL $ 70 AUG 72-76 AUGFL $ 78 SEP 80-84 SEPFL $ 86 OCT 88-92 OCTFL $ 94 NOV 96-100 NOVFL $ DEC 104-108 DECFL $ 110; FILE PRINT NOTITLE HEADER=NEWPAGE; PUT _INFILE_; RETURN; NEWPAGE: PUT @2 'STNUM YEAR FL JAN FEB MAR APR MAY' ' JUN JUL AUG SEP OCT NOV DEC'/; RETURN; RUN;