//CR5MEAN  JOB ,'MASRIQUI',MSGCLASS=S,
//          CLASS=H,NOTIFY=COINEWM,TIME=4
/*JOBPARM SHIFT=D,LINES=900
/*ROUTE PRINT IOROOM
//*
//STEP1 EXEC SAS6,TIME=4
//RAWDATA DD DSN=COINEWM.CRUISE5.MIDAS,DISP=SHR
//SYSIN DD *
********************************************************************;
* THIS PROGRAM READS MIDAS DATA FROM : SEQUENTIAL DATA SET,        *;
* COINEWM.CRUISE5.MIDAS                                            *;
* THIS PROGRAM CALCULATES AND PRINTS MEAN OF SOME VARIABLES        *;
*                                                                  *;
*                                                                  *;
* BY  : H.S.MASHRIQUI.                                             *;
*                                                                  *;
********************************************************************;
DATA A ;
   INFILE RAWDATA;
   INPUT TDDATEM 1-2 TDDATED 4-5 TDDATEY 7-10
         TDTIMEH 12-13 TDTIMEM 15-16 TDTIMES 18-19
         NDLATD 21-22 NDLATM 25-26 NDLATH 28-29
         NDLONGD 34-36 NDLONGM 39-40 NDLONGH 42-43
         H2OTEMP 259-265 CONDUCT 267-273 SALIN 275-281
         CHLFLUVT 283-289 AUXFLUVT 291-297 FLOSWTCH 299-301
         LITTRAN 303-308 FLORATE 310-314 WNDSPD 316-320
         RWNDSPD 322-326 CWNDSPD 328-332 MWDIR 334-336
         DEVWDIR 338-340 CMWDIR 342-344 AIRTEMP 346-351
         BAROPRES 353-357 SOLRAD 359-365 ;
PROC MEANS DATA = A ;
     VAR   H2OTEMP CONDUCT SALIN CHLFLUVT AUXFLUVT LITTRAN FLORATE
     CWNDSPD CMWDIR AIRTEMP BAROPRES SOLRAD ;
//
