Nope, it is fine. Charles
-----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Richards, Robert B. Sent: Friday, May 22, 2020 8:19 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Friday Follies/Why won't this work?/TSO Rant #387 Address Console in wrong location? -----Original Message----- From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of Charles Mills Sent: Friday, May 22, 2020 10:02 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Friday Follies/Why won't this work?/TSO Rant #387 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 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
