Previous Topic: 5.2.1.3 DEAPRC Usage Considerations

Next Topic: 5.2.2 VMS ACCOUNTING Image Termination File (DEAIMG)

5.2.1.4 DEAPRC Retrieval Examples


This section presents typical DEAPRC retrieval examples.

1.  Print a list of all users and all jobnames for node DEV1
    yesterday.

    DATA;
    SET &pDEMX..DEAPRC01;
    IF DATEPART(ENDTS)=TODAY()-1;
    IF SYSID='DEV1';
    PROC PRINT;
     VAR DEXUSER DEXJOB;

2.  Print the total CPU time used by user FRED on node DEV1
    yesterday.

    DATA;
    SET &pDEMX..DEAPRC01 END=EOF;
    IF DATEPART(ENDTS)=TODAY()-1;
    IF SYSID='DEV1';
    IF DEXUSER='FRED';
    RETAIN CPUTM 0;
    FORMAT CPUTM TIME.;
    CPUTM+PRCCPUTM;
    IF EOF THEN DO;
      PUT PRCCPUTM;
      END;