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

Additional NetView Pipeline Examples
360 Programming: Pipes
/* Uncomment the following section to display more detailed */
/* information on each job. */
/*******************************************************************/
/***********************************/
/* Display output (detailed) */
/***********************************/
/*
DOj=1TOjobline.0 /* Go thru matched job info.*/
jobnum = SUBSTR(jobline.j,4,5) /* Get job number. */
/* */
’PIPE NETV MVS $DJ’jobnum’,LONG’, /* Put JES display in pipe. */
’ | CORR 30’, /* Wait for JES response. */
’ | TAKE 1’, /* Terminate wait when */
, /* response received. */
’ | SEP’, /* Split up lines of MLWTO */
’ | DROP 1’, /* Discard first line only */
’ | TAKE 1’, /* Keep next line */
’ | SAFE cmdsafe APPEND’
END
/* Store for later display. */
’PIPE SAFE cmdsafe’, /* Display detailed output. */
’ | CONS ONLY’
*/
/* Do not automate or log. */
/***********************************/
/* 2nd Parm is CANCEL */
/***********************************/
IF SUBSTR(arg2,1,1) = ’C’ then
DO
DOj=1TOjobline.0 /* Go thru all matched jobs.*/
jobnum = SUBSTR(jobline.j,4,5) /* Get job number. */
’PIPE NETV MVS $CJ’jobnum’,P’, /* Cancel job, purge output */
’ | CORR 30’, /* Wait for JES response. */
’ | TAKE 1’, /* Terminate wait when */
, /* response received. */
’ | SAFE cmdsafe APPEND’ /* Store for later display. */
END
’PIPE SAFE cmdsafe’, /* Display output from JES */
’ | CONS ONLY’ /* cancel or display cmds. */
/* Do not automate or log. */
END
GETOUT: /* Exit. */
EXIT
Output from the JES2JOB display command list follows:
NCCF NETVIEW CNM01 OPER1 05/02/10 17:20:30 A
* CNM01 JES2JOB REOR* D
| CNM01
JOB00049 REORGE EXECUTING A PRIO 10 8609
JOB00055 REORGAA EXECUTING A PRIO 10 8609
JOB00056 REORGB EXECUTING A PRIO 10 8609
JOB00057 REORGC EXECUTING A PRIO 10 8609
JOB00050 REORGE AWAITING EXECUTION A PRIO 10 DUPLICATE ANY
JOB00051 REORGE AWAITING EXECUTION A PRIO 10 DUPLICATE ANY
JOB00054 REORGA AWAITING HARDCOPY PRIO 1 CANCEL ANY
Figure 31. JES2JOB Display Command Output Example
Output from the JES2JOB cancel command list follows: