I recently worked a long and involved SR over RC=4 from GETMSG. It's way worse than a 'warning'. RC=4 means
1. You got no data back in your stem variable. Nada. Nichts. Zip. 2. We're not going to tell you why. Dare you to guess. As for SOLDISP and UNSOLDISP, they control whether 'solicited' messages--responses to a command--will (YES) or will not (NO) display on your screen when you run a Rexx that does CONSOLE processing; likewise for 'unsolicited messages', those that happen to show up while your Rexx is running but not in response to your commands(s). If you want to capture messages in a Rexx variable, you need to set at least SOLDISP to NO, probably both variables. In my view, a Rexx should always set SOLDISP and UNSOLDISP according the needs of the current Rexx and not assume any previously set values. I would reveal the details and outcome of my SR, but then I'd have to find some other tidbit for Bit Bucket in Anaheim. ;-) . . JO.Skip Robinson Southern California Edison Company Electric Dragon Team Paddler SHARE MVS Program Co-Manager 626-302-7535 Office 323-715-0595 Mobile [email protected] From: Mark Zelden <[email protected]> To: [email protected], Date: 10/02/2013 01:06 PM Subject: Re: TSO REXX and GRS Commnad Output Sent by: IBM Mainframe Discussion List <[email protected]> On Wed, 2 Oct 2013 20:00:07 +0000, Hansen, Dave L - Eagan, MN <[email protected]> wrote: >THANK YOU! > > I added the CONSPROF and it works: > >"CONSPROF SOLDISPLAY(NO)" >"CONSPROF UNSOLDISPLAY(NO)" >address TSO 'CONSOLE ACTIVATE' >"CONSOLE SYSCMD(RO *ALL,D GRS,C)" >mrc = getmsg('CNSL.','SOL',,,3) >Do i = 1 to CNSL.0 > Say i CNSL.i > If i // 20 = 0 Then Do > Say "Press 'ENTER' to clear the screen" > Pull resp > clr > End >End >'CONSOLE DEACTIVATE' >"CONSPROF SOLDISPLAY(YES)" > > >Q). Should I set UNSOLIDISPLAY to "YES"? I guess I don't know what it was. A healthy dose of RTFM is prescribed here. :-) What I will tell you is that in my own code, I save the values and restore them at the end of the exec. For example: UNSDISP = SYSVAR("UNSDISP") SOLDISP = SYSVAR("SOLDISP") "CONSPROF UNSOLDISP(NO) SOLDISP(NO)" "CONSOLE ACTIVATE" (main code) "CONSPROF UNSOLDISP("UNSDISP") SOLDISP("SOLDISP")" "CONSOLE DEACTIVATE" Regards, Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS mailto:[email protected] ITIL v3 Foundation Certified Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://search390.techtarget.com/ateExperts/ ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
