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

18 Programming: Pipes
WISHCMD is processing
/*REXX WISHCMD */
/* This procedure uses three PIPE commands
- The first writes a message to a cleared screen
- The second writes a message to a REXX variable.
- The third read the variable and display the result.
------------------------------------------------------------------*/
ADDRESS NETVASIS /* Prevent literals from being upper cased */
’PIPE (NAME WISHCMD1)’, /* Simple message to operator */
’| LITERAL /WISHCMD is processing/’,
’| CONSOLE CLEAR’
/*---------------------------------------------------------
Choose a vacation destination using the PIPE command to
read records from a disk file into the pipeline,
manipulate them and store one resulting message in the
variable named VACVAR.
------------------------------------------------------------------*/
’PIPE (NAME WISHread)’,
’| < WISHLIST’,
’| LOCATE /RIVER/ /PARK/’,
’| NLOCATE /AFRICA/ /ASIA/ /AUSTRALIA/’,
’| TAKE FIRST 1’,
’| VAR VacVar’
/*---------------------------------------------------------
Read variable named VACVAR into the pipeline and add
’vacation choice’ text ahead of it, then display.
------------------------------------------------------------------*/
’PIPE (NAME WISHOUT)’,
’| VAR VACVAR’,
’| LITERAL /Vacation Choice/’,
’| COLLECT’,
’| CONSOLE’
EXIT 0
/*------------------------* End of WISHCMD *-----------------------*/
Figure 13. Pipeline Output from WISHCLST Command Procedure. Created by the pipeline in
Figure 12 on page 17.