[prev in list] [next in list] [prev in thread] [next in thread] 

List:       racf-l
Subject:    Re: GETMSG RC = 4
From:       Lizette Koehler <starsoul () MINDSPRING ! COM>
Date:       2014-12-20 11:41:09
Message-ID: 26559548.1419075669444.JavaMail.root () mswamui-andean ! atl ! sa ! earthlink ! net
[Download RAW message or body]

You might try asking this on the TSO-REXX or IBMMAIN Lists.

If you have not done so, you can join at:

For TSO-REXX
http://vm.marist.edu/htbin/wlvindex?TSO-REXX
Go to the bottom of the web page to join.


For IBM-MAIN subscribe / signoff / archive access instructions,
send email to listserv@listserv.ua.edu with the message: INFO IBM-MAIN
or this url
https://listserv.ua.edu/cgi-bin/wa?SUBED1=ibm-main&A=1


I did a quick internet search on GETMSG REXX and returned this entry.  It maybe \
helpful https://www-304.ibm.com/support/docview.wss?uid=isg1OA21329

There were other hits that you might explore as well.  Or check out the TSO REXX \
Archives for other interesting threads.

Lizette



-----Original Message-----
> From: Michael Nielsen 
> Sent: Dec 19, 2014 4:34 PM
> To: RACF-L@LISTSERV.UGA.EDU
> Subject: GETMSG RC = 4
> 
> I am running RACF TARGET command in REXX. It works except the GETMSG gets a RC=4. \
> Per the z/OS V1R13.0 TSO/E REXX Reference manual Chapter 4 TSO/E External Functions \
> a GETMSG RC of 4 means- 
> -No messages were available to be retrieved,
> -The messages did not match the search criteria you specified on the function call, \
>                 or
> -You specified the time argument and the time limit expired before the message was \
> available. 
> Based on the code, trace output, and syslog provided below I am stumped. There is a \
> message, there is no search criteria, and the message was printed within the time \
> limit. 
> I did a careful review of my code, reviewed the REXX manual, and searched other \
> RACF-L threads regarding REXX and CONSOLE commands. I also search for any previous \
> RACF-L threads containing GETMSG RC=4 which came up empty. Any one have a \
> suggestion as to what I'm missing? 
> Thanks,
> Michael Nielsen
> Consultant
> 
> REXX Code
> ++++++++++++++++++
> RRSFMSG. = ""
> TRACE R
> ADDRESS TSO "CONSOLE ACTIVATE NAME(RRSFTEST) CART(RRSF1111)"
> ADDRESS TSO "CONSPROF SOLDISP(NO)"
> ADDRESS TSO "CONSPROF UNSOLDISP(NO)"
> ADDRESS TSO "CONSOLE SYSCMD(RACF TARGET LIST) CART(RRSF1111)"
> SAY DATE("J") TIME("L")
> GETCODE = GETMSG('RRSFMSG.','EITHER','RRSF1111',,'5')
> ADDRESS TSO "CONSOLE DEACTIVATE"
> TRACE N
> 
> SAY "RRSFMSG.0 = "RRSFMSG.0
> DO CNT = "1" TO "10"
> SAY "RRSFMSG."CNT" = "RRSFMSG.CNT
> END
> ++++++++++++++++++
> 
> LOG
> ++++++++++++++++++
> 14353 18:04:50.70 TSU22282 00000201  IEA630I  OPERATOR RRSFTEST NOW ACTIVE,   \
> SYSTEM=        , LU=ISZ001 14353 18:04:50.73 RRSFTEST 00000210  RACF TARGET LIST
> 14353 18:04:50.74 STC20756 00000201  IRRM024I ((RACF)) RACF SUBSYSTEM TARGET \
> COMMAND HAS FOUND THAT NO 597 597 00000201                    NODES ARE CURRENTLY \
> DEFINED. 14353 18:04:55.77 TSU22282 00000201  IEA631I  OPERATOR RRSFTEST NOW \
> INACTIVE, SYSTEM=        , LU=ISZ001 ++++++++++++++++++
> 
> TRACE output
> ++++++++++++++++++
> 29 *-* ADDRESS TSO "CONSOLE ACTIVATE NAME(RRSFTEST) CART(RRSF1111)"
> > > > "CONSOLE ACTIVATE NAME(RRSFTEST) CART(RRSF1111)"
> 30 *-* ADDRESS TSO "CONSPROF SOLDISP(NO)"
> > > > "CONSPROF SOLDISP(NO)"
> 31 *-* ADDRESS TSO "CONSPROF UNSOLDISP(NO)"
> > > > "CONSPROF UNSOLDISP(NO)"
> 32 *-* ADDRESS TSO "CONSOLE SYSCMD(RACF TARGET LIST) CART(RRSF1111)"
> > > > "CONSOLE SYSCMD(RACF TARGET LIST) CART(RRSF1111)"
> 33 *-* SAY DATE("J") TIME("L")
> > > > "14353 18:04:50.732569"
> 14353 18:04:50.732569
> 34 *-* GETCODE = GETMSG('RRSFMSG.','EITHER','RRSF1111',,'5')
> > > > "4"
> 35 *-* ADDRESS TSO "CONSOLE DEACTIVATE"
> > > > "CONSOLE DEACTIVATE"
> 36 *-* TRACE N
> RRSFMSG.0 =
> RRSFMSG.1 =
> RRSFMSG.2 =
> RRSFMSG.3 =
> RRSFMSG.4 =
> RRSFMSG.5 =
> RRSFMSG.6 =
> RRSFMSG.7 =
> RRSFMSG.8 =
> RRSFMSG.9 =
> RRSFMSG.10 =
> ***
> ++++++++++++++++++


[prev in list] [next in list] [prev in thread] [next in thread]