home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Hall of Fame
/
HallofFameCDROM.cdr
/
3x400
/
chgjobl.lzh
/
CHGJOBL2.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1987-05-22
|
977b
|
24 lines
CHGJOBLOG2: CMD PROMPT('Chg Joblog (submitted module)')
PARM KWD(JOB) TYPE(L01) MIN(1) PROMPT('Job name or +
* for current job:')
PARM KWD(OUTQ) TYPE(L02) DFT(*SAME) +
SNGVAL((*SAME)) PROMPT('Output queue to +
move spl file:')
L01: QUAL TYPE(*NAME) MIN(1) EXPR(*YES) +
QUAL TYPE(*NAME) EXPR(*YES) +
PROMPT('User name:')
QUAL TYPE(*CHAR) LEN(6) FULL(*YES) +
EXPR(*YES) RANGE(000000 999999) +
L02: QUAL TYPE(*NAME) MIN(1) EXPR(*YES) +
QUAL TYPE(*NAME) EXPR(*YES) DFT(*LIBL) +
SPCVAL((*LIBL)) +
PROMPT('Library name:')