View previous topic :: View next topic
|
Author |
Message |
mambopras
New User
Joined: 11 Nov 2008 Posts: 52 Location: Hyderabad
|
|
|
|
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 |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
|
|
|
|
Someone, probably you, has the dataset under exclusive control. Make none of your split screens are referencing that dataset. |
|
Back to top |
|
|
steve-myers
Active Member
Joined: 30 Nov 2013 Posts: 917 Location: The Universe
|
|
|
|
You also need to insert a ) character after the list of data set names and before SHR REUS |
|
Back to top |
|
|
mambopras
New User
Joined: 11 Nov 2008 Posts: 52 Location: Hyderabad
|
|
|
|
@Steve - You are absolutely right...silly of me, couldn't notice a paranthesis missing. Thanks a lot!! |
|
Back to top |
|
|
steve-myers
Active Member
Joined: 30 Nov 2013 Posts: 917 Location: The Universe
|
|
|
|
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 |
|
|
|