Page 1 of 1

REXX to XDC SYSOUT

PostPosted: Wed Jan 27, 2021 3:39 pm
by abhsha27

/*****************************REXX************************************/
/*TRACE ?R*/                                                          
ADDRESS TSO                                                            
"ALLOC F(ISFIN) TRACKS SPACE(1) REU" /* USED BY SDSF */                
"ALLOC F(TEMPPRT) DA('MVS004.MVS004.REXX.OUT(SYSLOG)')                
         OLD SPACE (50 50) CYL DIR(100)"
                             
JOBID = "STC*"                                                        
QUEUE "PRE SYSLOG" /* SDSF COMMANDS IN BATCH*/                        
QUEUE "ST"                                                            
QUEUE "FILTER JOBID" JOBID                                            
QUEUE "++S"                                                            
QUEUE "PRINT FILE TEMPPRT" /* PRINT TO TEMP DATASET */                
QUEUE "PRINT 1 999999"                                                
QUEUE "PRINT CLOSE"                                                    
QUEUE "END"                                                            
QUEUE "EXIT"                                                          
"EXECIO" QUEUED()" DISKW ISFIN (FINIS" /* INPUT TO SDSF BATCH */      
ADDRESS ISPEXEC "SELECT PGM(ISFAFD) PARM('++25,80')"/* INVOKE SDSF */
 



I get error IKJ56246I DATA SET MVS004.MVS004.REXX.OUT NOT ALLOCATED, FILE IN USE

Please let me know what is wrong.

Re: REXX to XDC SYSOUT

PostPosted: Wed Jan 27, 2021 6:48 pm
by NicC
Exactly what it says - the dataset is allocated elsewhere - you do not check the return code

Re: REXX to XDC SYSOUT

PostPosted: Wed Jan 27, 2021 6:53 pm
by abhsha27
Return code is 12

Re: REXX to XDC SYSOUT

PostPosted: Thu Jan 28, 2021 1:14 pm
by willy jensen
You should check the return code and then stop the program right then and there. But the underlying problem remains the same, the dataset is in use so you must find out who the current holder is and politely ask if s/he could free it. Or use another dataset.

Re: REXX to XDC SYSOUT

PostPosted: Thu Jan 28, 2021 1:16 pm
by willy jensen
And by the way, you really really should look at using the SDSF API, described in the SDSF Users's Guide.

Re: REXX to XDC SYSOUT

PostPosted: Sat Feb 06, 2021 4:56 am
by Pedro
Exactly what it says - the dataset is allocated elsewhere


Actually, it says "FILE IN USE". It could be a different data set allocated to the SYSOUT file name.