5. FILES › 5.3 VMX Information Area Files › 5.3.7 VMX Device SEEKS Data File (VMXXDS) › 5.3.7.4 VMXXDS Retrieval Examples

5.3.7.4 VMXXDS Retrieval Examples

List the average seek distance and non-zero seek distance for
a subchannel 0374 for an interval from 9:00 am to 10:00 am.

   %VMCBRK(FILE=VMXXDS01,INTVL='00:01',
           START='09:00'T,END='10:00'T,PERIOD=5);
     IF VMXDVSID = 0374;
   RUN;
   DATA SEEK;
     SET VMXXDS; BY SYSID DATE TIME;
     IF FIRST.TIME THEN DO;
       ZSEEK  = 0;
       NZSEEK = 0;
       SEEKD  = 0;
     END;
     NZSEEK+ XDSNZSEK;         /* NON-ZERO DISTANCE SEEKS */
     ZSEEK + (NOT XDSNZSEK);   /* ZERO DISTANCE SEEKS     */
     SEEKD + XDSSEEKD;
     IF LAST.TIME THEN DO;
       SEEKS = SUM(NZSEEK,ZSEEK);
       IF NZSEEK THEN AVGNZ = SEEKD/NZSEEK;
       ELSE AVGNZ = 0;
       AVGSD = SEEKD/SEEKS;
       OUTPUT;
     END;
   RUN;
   PROC TIMEPLOT DATA=SEEK;
     BY SYSID DATE;
     ID TIME ;
     PLOT AVGNZ='>' AVGSD='+'
      / OVERLAY POS=0;
      LABEL AVGNZ='Average Non-Zero Seek Distance'
            AVGSD='Average Seek Distance';
   RUN;