Hi,
I've been asked to recreate a TSO REXX program in the AS400. I'm not too good with TSO commands so I don't know the AS400 commands that I need to use. I know not everything in TSO REXX applies to REXX400 like OUTTRAP.
I wanted to start slow and made a program that will check if the compiled object exists and display a message if there are any errors but I'm only seeing the "End of Terminal Session mesage" and not any error messages I coded. Below is the code I'm running.
/* REXX */
Arg progname
"CHKOBJ OBJ(mylib/"PROGNAME") OBJTYPE(*PGM)"
"MONMSG MSGID(CPF9801) EXEC(SNDPGMMSG MSG('NOT FOUND'))"
"MONMSG MSGID(CPF9810) EXEC(SNDPGMMSG MSG('MISSING'))"
***************************
mylib is the hardcoded library.
What am I doing wrong?
I've been asked to recreate a TSO REXX program in the AS400. I'm not too good with TSO commands so I don't know the AS400 commands that I need to use. I know not everything in TSO REXX applies to REXX400 like OUTTRAP.
I wanted to start slow and made a program that will check if the compiled object exists and display a message if there are any errors but I'm only seeing the "End of Terminal Session mesage" and not any error messages I coded. Below is the code I'm running.
/* REXX */
Arg progname
"CHKOBJ OBJ(mylib/"PROGNAME") OBJTYPE(*PGM)"
"MONMSG MSGID(CPF9801) EXEC(SNDPGMMSG MSG('NOT FOUND'))"
"MONMSG MSGID(CPF9810) EXEC(SNDPGMMSG MSG('MISSING'))"
***************************
mylib is the hardcoded library.
What am I doing wrong?