IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

ALLOCATE REXX PDS to SYSPROC failure


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
mambopras

New User


Joined: 11 Nov 2008
Posts: 52
Location: Hyderabad

PostPosted: Sat Apr 04, 2015 10:14 am
Reply with quote

Hi,

I have started to learn REXX language. As a starter, I have written an EXEC to allocate my REXX PDS to SYSPROC for enabling the implicit execution of REXX EXEC. But, I am receiving error that I am not able to understand.

Here is the EXEC: The 1st dataset name is my REXX PDS that needs to be allocated to SYSPROC and the rest of them are already allocated to SYSPROC and i am tying to change the order of the datasets by including mine at the top.

"ALLOC FILE(SYSPROC) DATASET('XXXX.REXX.LIBRAR',",
"'MVSPP.XXX.CLIST',",
"'SYS1.XX.XXXXXX.VB',",
"'SYS1.XX.XXXXXX.VB',",
"'SYSX.XXX.CLIST',",
"'SYSX.EXEC.VB', SHR REUSE"
IF RC = 0 THEN
SAY 'ALLOCATION SUCCESSFUL.'
ELSE
SAY 'ALLOCATION FAILED.'.

The EXEC itself has been stored in a different PDS and I have executed the TSO COMMAND from the ISPF MAIN MENU

TSO EXEC 'TEST.XXX.REXX.LIBRAR(ALC)' EXEC

Error I am getting :
IKJ56246I DATA SET XXXX.REXX.LIBRAR NOT ALLOCATED, FILE IN USE
IKJ56109I DATA SETS NOT CONCATENATED+
IKJ56109I FAILURE TO ALLOCATE DATA SET XXXX.REXX.LIBRAR
ALLOCATION TO SYSPROC FAILED.
***

Please help me with resolving this issue.

Regards,
Mambopras
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Sat Apr 04, 2015 2:25 pm
Reply with quote

Someone, probably you, has the dataset under exclusive control. Make none of your split screens are referencing that dataset.
Back to top
View user's profile Send private message
steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 917
Location: The Universe

PostPosted: Sat Apr 04, 2015 3:28 pm
Reply with quote

You also need to insert a ) character after the list of data set names and before SHR REUS
Back to top
View user's profile Send private message
mambopras

New User


Joined: 11 Nov 2008
Posts: 52
Location: Hyderabad

PostPosted: Sat Apr 04, 2015 9:45 pm
Reply with quote

@Steve - You are absolutely right...silly of me, couldn't notice a paranthesis missing. Thanks a lot!!
Back to top
View user's profile Send private message
steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 917
Location: The Universe

PostPosted: Sun Apr 05, 2015 6:29 pm
Reply with quote

I've made the same mistake all too often myself. I find it's safer to write something like

ALLOC F(SYSPROC) SHR REUS DA(DATASET DATASET ... DATASET

TSO will tolerate a missing ) at the end of a command.

Actually, I think Mr. Woodger's analysis of the problem was incorrect.

IKJ56246I DATA SET XXXX.REXX.LIBRAR NOT ALLOCATED, FILE IN USE

What happened here is TSO thought SHR and REUS were part of the data set list and started the allocation, only to find there was already a SYSPROC DD statement allocated to the session. If TSO finds the REUSE keyword specified it frees the allocation before it starts the new allocation. Since it thought REUS was a data set name, it did not free the existing SYSPROC allocation.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts Running REXX through JOB CLIST & REXX 13
No new posts Error to read log with rexx CLIST & REXX 11
No new posts isfline didnt work in rexx at z/OS ve... CLIST & REXX 7
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Execute secondary panel of sdsf with ... CLIST & REXX 1
Search our Forums:

Back to Top