NetView for z/OS, Version 5.4
Figure 44 shows the use of &WAIT to wait for one message. The command list is named ACTONE, and it issues a VTAM® command to activate a logical unit. The command list traps the messages responding to the activate command, reformats the messages, and writes them to the operator screen.
&CONTROL ERR * ACTONE COMMAND LIST * THIS COMMAND LIST ISSUES A VTAM "V NET,ACT" COMMAND, TRAPS ITS * MESSAGES AND REFORMATS THEM. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * IF THERE IS NO INPUT PARAMETER, ASK FOR ONE &IF &1 = '' &THEN &GOTO -BADIN * SAVE THE INPUT PARAMETER &LU = &1 * END THE WAIT WITH THE FIRST MESSAGE AND DO NOT DISPLAY THE * INPUT MESSAGE ON THE SCREEN &WAIT ENDWAIT SUPPRESS * ISSUE WAIT WITH THE COMMAND &WAIT 'V NET,ACT,ID=&LU',IST093I=-REFORM,*ERROR=-FAIL,+ IST105I=-FAIL,*ENDWAIT=-GOIN -REFORM * REFORMAT MESSAGE IST093I (SUCCESSFUL) AND WRITE TO THE SCREEN * &1 IN THE FOLLOWING LINE IS NOT THE ORIGINAL &1 &ACTIV = &1 &WRITE VTAM MESSAGE IST093I WAS RECEIVED -REFORM &WRITE &ACTIV IS NOW ACTIVE &GOTO -ENDALL -FAIL * REFORMAT MESSAGE IST105I (UNSUCCESSFUL) AND WRITE TO THE SCREEN &WRITE &LU COULD NOT BE ACTIVATED &GOTO -ENDALL -GOIN * IF "GO" ISSUED, INDICATE THAT MESSAGES HAVE NOT BEEN RECEIVED &WRITE "GO" INPUT COMMAND LIST ACTONE -- &LU IS NOT ACTIVE NOW &GOTO -ENDALL -BADIN &WRITE RE-CALL COMMAND LIST ACTONE WITH PARAMETER OF LU TO BE ACTIVATED -ENDALL &WRITE COMMAND LIST ACTONE COMPLETE &EXIT
The ACTONE command list waits for one of the following messages:
IST093I modename ACTIVE IST105I modename NODE NOW INACTIVE
Activate the command list by entering ACTONE and operand NODE1. The operand is the name of the logical unit to be activated. This operand supplies the value for parameter variable &1. Receipt of a message indicating success (IST093I) or failure (IST105I) causes the wait to end because ENDWAIT was specified. Processing continues at the specified label (-REFORM for IST093I, -FAIL for IST105I). The awaited messages are not displayed because SUPPRESS was specified, but any other messages are displayed.
Upon successful activation of NODE1, the message text shown in Figure 45 is displayed on the operator terminal:
ACTONE NODE1 IST097I VARY ACCEPTED VTAM MESSAGE IST093I WAS RECEIVED NODE1 IS NOW ACTIVE COMMAND LIST ACTONE COMPLETE
[ Top of Page | Previous Page | Next Page | Contents ]