Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

How do I troubleshoot failure of "Alloc" Clist within Rexx exec?

Status
Not open for further replies.

IDC3044

Technical User
Apr 17, 2003
12
US
Mainframe Environment - z/OS R1.2

I have coded a Rexx exec to run as the last step of a batch job. This exec checks to see if the previous step wrote anything to the SYSMDUMP dataset. If it has been written to it is copied to a cartridge GDG for retention.
When I test this exec in a batch job under my ID and issue the TSO Clist Alloc I process as expected. When I try to run using the USERID assigned to the Production job I receive the following RC(12):

32 *-* "ALLOC FI(SYSUT2) DS('"GDGNUM"')SHR EXPDT(98000)"
>O>"ALLOC FI(SYSUT2) DS('IDMSR.DOCIDMSE.DUMPGDG.G0036V00') SHR EXPDATE(98000)"
+++ RC(12)

I cannot see any error messages in SYSLOG that might help clarify.

What method can I use to find out why the allocation fails?
 
There should be a message issued if RC(12). Did you check the SYSOUT for the JOB? If you can't find an error message, it could be that you have MSG turned off.
Code:
msgstate = MSG("ON") /* preserve current setting */
"ALLOC ...."
$z = MSG(msgstate)  /* restore msgstate */


Frank Clarke
Tampa Area REXX Programmers' Alliance
REXX Language Assn Listmaster
 
Update from Message Poster - I set MSGSTATE = MSG('ON') with no additional messages appearing.
 
(grumble grumble...) Does your profile say WTPMSG or NOWTPMSG? (grasping at straws...)



Frank Clarke
Tampa Area REXX Programmers' Alliance
REXX Language Assn Listmaster
 
As it turns out the problem was related to the fact that the ID I was attempting to use was not a valid TSO ID. It is a valid RACF ID, but is not ever used to logon. I changed my tack and got the desired results. Thanks for the help.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top