IBM Tivoli NetView for z/OS Programming: Pipes - IBM notice

*******************************************************************/
/* Issue a LIST DSIGDS command. Select the first returned message */
/* which contains activity status information. Store the message */
/* in both a safe named GDSSAFE and a variable named STATMSG. */
’PIPE NETV LIST DSIGDS’,
’| TAKE 1’,
’| SAFE GDSSAFE’,
’| VAR STATMSG’
/* Parse the variable STATMSG so that the variable named ACTSTAT */
/* will contain either the word ’ACTIVE’ or the word ’NOT’ */
/* reflecting the status of the task. */
PARSE VAR STATMSG . ’STATUS:’ ACTSTAT .
IF ACTSTAT ¬= ’NOT’ THEN
DO;
END;
/* Status = ACTIVE */
/* Issue the DIS DSIGDS command and allow sufficient time for */
/* asynchronous messages to return from VTAM. Break the */
/* resulting MLWTO into single-line messages. Locate the */
/* message containing IST271 which will identify the NetView */
/* proc that has the use of the DSIGDS VTAM APPL. Append */
/* the message to the contents of the safe. */
’PIPE NETV DIS DSIGDS’,
’ | CORR 2’,
’ | SEP’,
’ | LOC 1.7 \IST271\’,
’ | SAFE GDSSAFE APPEND’
/* Issue the DSRBS DSIDGS command and break the resulting */
/* MLWTO into single-line messages. Discard the first 2 */
/* messages. Keep other messages up to and including the */
/* message containing the word ’TOTAL’. Append the messages */
/* to the contents of the safe. */
’PIPE NETV DSRBS DSIGDS’,
’ | SEP’,
’ | DROP 2’,
’ | TOS 8.13 \TOTAL\’,
’ | SAFE GDSSAFE APPEND’
/* Issue the TASKUTIL command to show the storage, cpu and */
/* buffer queue for DSIGDS. Break the resulting MLWTO into */
/* single-line messages. Discard the first message. Keep the */
/* next 3 messages in the pipeline while discarding any that */
/* follow. Add a blank line to the pipeline and finally, */
/* append the messages to the contents of the safe. */
’PIPE NETV TASKUTIL DSIGDS’,
’ | SEP’,
’ | DROP 1’,
’ | TAKE 3’,
’ | LIT \ \’,
’ | SAFE GDSSAFE APPEND’
Additional NetView Pipeline Examples
/* Read everything stored in GDSSAFE into the pipeline. */
/* Combine all output into a single MLWTO. Clear the screen and */
/* display to the user. Do not log or automate from the displayed */
/* output. */
Appendix. Additional NetView Pipeline Examples 357