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

IF RC ¬= 0 THEN
SAY ’RC=’RC ’ FROM PIPE ’
IF RC = 0 THEN
SAY ’TRANSFER SENT SUCCESSFULLY’
EXIT
The results displayed on the terminal of OPER3, the sender, follows:
NCCF NETVIEW CNM19 OPER3 02/01/10 10:43
* CNM19 EXECSEND
C CNM19 TRANSFER SENT SUCCESSFULLY
Figure 27. Transfer Send Results Screen
At OPER6, EXECRECV, which also contains a PIPE command, runs. The PIPE
command reads the command procedure message queue to the pipeline using the
SAFE stage. Then the VAR stage writes the pipeline contents to the variable named
OP6VAR. Lastly, the CONSOLE stage displays the pipeline contents to the
terminal.
The command list that is invoked at OPER6's task is:
/* SAMPLE REXX COMMAND LIST NAMED EXECSEND */
ADDRESS NETVASIS
/********************************************************************/
/* USE PIPE TO READ THE CURRENT MESSAGE INTO THE PIPELINE, STORE */
/* IT INTO A VARIABLE NAMED OP6VAR, AND DISPLAY TO TERMINAL */
/*******************************************************************/
’PIPE SAFE *’,
’| VAR OP6VAR’,
’| CONSOLE’
IF RC ¬= 0 THEN
SAY ’RC=’RC’ FROM PIPE ’
IF RC = 0 THEN
SAY ’TRANSFER RECEIVED SUCCESSFULLY’
EXIT
The results displayed on the terminal of OPER6, the receiver, are:
CCF NETVIEW CNM19 OPER6 08/02/10 10:43
CNM19 LOOK AT THIS LONG MESSAGE THAT I CREATED. IT IS WELL OVER 256
CHARACTERS. AAAAAAAAAAAAAAA BBBBBBBBBBBBBBB CCCCCCCCCCCCCCC
DDDDDDDDDDDDDDD EEEEEEEEEEEEEEE FFFFFFFFFFFFFFF GGGGGGGGGGGGGGG
HHHHHHHHHHHHHHH IIIIIIIIIIIIIII JJJJJJJJJJJJJJJ KKKKKKKKKKKKKKK
LLLLLLLLLLLLLLL MMMMMMMMMMMMMMM NNNNNNNNNNNNNNN OOOOOOOOOOOOOOO
PPPPPPPPPPPPPPP QQQQQQQQQQQQQQQ
CNM19 TRANSFER RECEIVED SUCCESSFULLY
Figure 28. Tranfer Received Results Screen
Additional NetView Pipeline Examples
Note: The data can also be sent to a task in a remote NetView system. See “PIPE
CORRCMD ” on page 50.
Appendix. Additional NetView Pipeline Examples 355