What is wrong with this Rexx? (I spent about two hours debugging before I
solved it.) The problem is right here on this page: the answer is NOT
something in RACF or JES2. It's not something missing: it's a sin of
commission, not a sin of omission. The below will never work. That is, the
output will always be RC = 4 , Msgs = MYMSGS.0 , Msg.1 = MYMSGS.1. Why?
/* Rexx to test command/response */
MyCart = "MyCart01"
"CONSPROF SOLDISP(NO) SOLNUM(400)"
"CONSOLE ACTIVATE"
Address Console
"CART" MyCart
"$DQ"
RC = GETMSG('MYMSGS.','SOL',MyCart,,1)
Say "RC =" RC ", Msgs =" MYMSGS.0 ", Msg.1 =" MYMSGS.1
"CONSOLE DEACTIVATE"
Charles
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
