5. FILES › 5.3 VAX/VMS Monitor Information Area Files › 5.3.5 VMS MONITOR RMS File (DEMRMS) › 5.3.5.4 DEMRMS Retrieval Examples
5.3.5.4 DEMRMS Retrieval Examples
This section presents typical DEMRMS retrieval examples.
1. Print the average number of bytes transferred per read
I/O yesterday on node DEV1.
DATA;
SET &pDEMX..DEMRMS01 END=EOF;
IF DATEPART(ENDTS)=TODAY()-1;
IF SYSID='DEV1';
RETAIN BYTES READS 0;
BYTES+RMSRDBT;
READS+RMSREAD;
IF EOF THEN DO;
BYTESIO=BYTES/READS;
PUT BYTESIO;
END;
2. Print the total number of file opens yesterday on node
DEV1.
DATA;
SET &pDEMX..DEMRMS01 END=EOF;
IF DATEPART(ENDTS)=TODAY()-1;
IF SYSID='DEV1';
RETAIN OPENS 0;
OPENS+RMSOPEN;
IF EOF THEN DO;
PUT OPENS;
END;