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

PIPE EDIT
120 Programming: Pipes
/START TASK=/ is an input order. A single number can be either an input or output
order. Because /START TASK=/ is the input order, the number 1 following /START
TASK=/ must be an output order. So, START TASK= is written to the first position
of the output line.
WORD 5 is also an input order. WORD requires a value, which in this case is 5.
Because no global orders were specified for PARSE, parsing is done on blank
delimited words. In the example line, the fifth blank delimited word, A01A441, is
selected. The NEXT output order causes the selected word to be placed in the output
line without an intervening blank.
So, the resulting output of this edit script on the example message is:
START TASK=A01A441
If a NETVIEW stage follows the EDIT stage, this output is invoked as a command.
Note: Because status lines reported from LIST have a slightly variable format, it
might be better to find the target word by counting from the end of the line,
using a negative value for WORD, or by counting from a fixed word in the
text. See the descriptions of WORD and SKIPTO for more information.
Example: Sending an Alert to the NetView Alert Adapter
The following example shows how to create a name/value pair. This name/value
pair is bound with an automated alert and sent to the alert adapter. The command
runs as a result of an automation statement containing TECROUTE.
/* construct a value from MYVAR and a unique identifier */
/* (GMT value set when alert received). Note: convert GMT to */
/* displayable chars */
’PIPE (NAME TECBIND)’,
’| SAFE *’, /* copy complete automation alert into pipeline */
’| EDIT’, /* begin edit */
’COPY *’, /* copy complete automation alert to EDIT output*/
’/’myvar’/’ 1, /* start value one: variable value */
’IFRAUGMT C2X NEXTWORD’, /* add EBCDIC hex value */
’NAMEBIND /EVENTID/’, /*create output line for TEC slot */
’/’MSUSEG(’0000.31.30’,3)’/ 1’, /*start line with text vec */
’NAMEBIND /ALERT31/’, /* create another TEC slot */
’| PPI TECROUTE IHSATEC’ /* transfer event to TEC */
/* Note use of virgule (/) to create a delimited string from the*/
/* value of MSUSEG function assumes no virgule (and no stage sep*/
/* character) exists in the text. In actual practice, it would */
/* be wise to use non-printable characters for both delimiters. */