WAITLIST
This command returns the IDs of EXECs in WAIT mode to the LOCAL pool in variables EXEC1 through EXEC xxx.
The following table shows the contents of the variables depending on whether IMFEXEC or AOEXEC WAIT was issued. The WAITLIST command processes only WAIT commands that are issued by the IMFEXEC WAIT or AOEXEC WAIT commands. The WAITLIST command does not process EXECs that are scheduled with WAIT(YES).
Variable | IMFEXEC WAIT | AOEXEC WAIT |
|---|---|---|
EXEC1 - EXECnnn | Numeric EXEC ID | 'AOEXEC' |
NAME1-NAMEnnn | Name of EXEC that issued WAIT | 'WAIT' |
DATE1-DATEnnn | Date EXEC started executing (yy.ddd) | Date WAIT issued (yy.ddd) |
TIME1-TIMEnnn | Time EXEC started executing (hhmmsshh) | Time WAIT issued (hhmmsshh) |
LINE1-LINEnnn | Resource Name | Resource Name |
JOBN1-JOBNnnn | Null | Name of job that issued WAIT |
Command | Parameters |
|---|---|
WAITLIST | Pattern |
The following table describes the parameters:
Parameter | Function | Notes |
|---|---|---|
Pattern | Is the resource name that is being waited on This parameter is not optional. You can use wildcard characters (such as * or +) where an asterisk represents one or more characters and a plus sign represents a single character. | 1-32 alphanumeric characters LINE1 through LINE xxx and EXEC1 through EXEC xxx are LOCAL pool variables and IMFNOL is a TSO variable. IMFNOL is valid only if the return code is 0. The variables NAME1 through NAME xxx contain the names of EXECs. The variables DATE1 through DATE xxx contain the date when an EXEC started. The variables TIME1 through TIME xxx contain the time the EXEC or EXECs were started. |
Condition codes are listed in the following table:
Value | Description |
|---|---|
0 | The names of one or more waiting EXECs and associated resources were returned. |
4 | No waiting EXECs were returned. |
8 | The parameter was not specified. |
12 | Syntax error occurred. |
Example
This example issues the WAITLIST command to display the names of the EXECs that are awaiting an IMFEXEC POST. The names of the EXECs, dates and times are displayed in the BBI-SS PAS Journal.
'IMFEXEC SELECT EXEC(WAIT MOO)WAIT(NO)'
'IMFEXEC SELECT EXEC(WAIT GAV)WAIT(NO)'
'IMFEXEC SELECT EXEC(WAIT MEW)WAIT(NO)'
'IMFEXEC SELECT EXEC(WAIT KWA)WAIT(NO)'
'IMFEXEC WAIT 3'
'IMFEXEC WAITLIST *'
'IMFEXEC MSG 'WTEST.''
'IMFEXEC MSG 'WTEST.DATE:' date() ' TIME:' time()'''
'IMFEXEC MSG 'WTEST.IMFCC = 'IMFCC '''
'IMFEXEC MSG 'WTEST.IMFRC = 'IMFRC '''
'IMFEXEC MSG 'WTEST.IMFNOL =' imfnol '''
'IMFEXEC MSG 'WTEST.RESOURCE',
' EXEC ID NAME DATE TIME STARTED''
do n = 1 to imfnol
'IMFEXEC VGET LINE'n 'LOCAL'
'IMFEXEC VGET EXEC'n 'LOCAL'
'IMFEXEC VGET NAME'n 'LOCAL'
'IMFEXEC VGET DATE'n 'LOCAL'
'IMFEXEC VGET TIME'n 'LOCAL'
r1 = value('LINE'n);r = left(r1,10)
r1 = value('EXEC'n);r = r left(r1,9)
r1 = value('NAME'n);r = r left(r1,9)
r1 = value('DATE'n);r = r left(r1,9)
r1 = value('TIME'n);r = r left(r1,9)
'IMFEXEC MSG 'WTEST.'r'''
end
'IMFEXEC POST 'MOO''
'IMFEXEC POST 'GAV''
'IMFEXEC POST 'MEW''
'IMFEXEC POST 'KWA''
'IMFEXEC MSG 'WTEST.''
return
CLIST example:
IMFEXEC SELECT EXEC(WAITC GAV)WAIT(NO)IMFEXEC SELECT EXEC(WAITC MEW)WAIT(NO)IMFEXEC SELECT EXEC(WAITC KWA)WAIT(NO)IMFEXEC WAIT 3
IMFEXEC WAITLIST *
IMFEXEC MSG 'WTEST.'
IMFEXEC MSG 'WTEST.IMFNOL = &imfnol '
SET R = WTEST.RESOURCE EXEC ID NAME DATE TIME STARTED
IMFEXEC MSG '&R'
SET A = &STR( )
DO &N = 1 TO &IMFNOL
IMFEXEC VGET LINE&N LOCAL
IMFEXEC VGET EXEC&N LOCAL
IMFEXEC VGET NAME&N LOCAL
IMFEXEC VGET DATE&N LOCAL
IMFEXEC VGET TIME&N LOCAL
SET R = WTEST. &&LINE&N &A &&EXEC&N &A &&NAME&N +
&A &&DATE&N &A &&TIME&N
IMFEXEC MSG '&R'
END
IMFEXEC POST 'MOO'
IMFEXEC POST 'GAV'
IMFEXEC POST 'MEW'
IMFEXEC POST 'KWA'
IMFEXEC MSG 'WTEST.'
Related topic