Page 1 of 2

EXECIO abend code 213, reason code 00000048.

PostPosted: Fri Dec 12, 2014 2:19 pm
by pratiksha88
I am executing the REXXX to append the date to file names, when it ran for the first time , it executed fine. On the second and third run it failed with below error and it worked fine on 4th run. The rex was not modified thruout all the 4 runs.

REXX :
 /* REXX */                                                             
                                                                         
 /* POPULATE FTP SERVER USERID AND PASSWORD  */                         
                                                                         
 ext_ftp.1 = "pwdsn=" || '"' || "XXXXXXXXXXXXXXXXXXXXXXXXX" || '"'     
 ext_ftp.2 = "user=XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"                                           
 ext_ftp.3 = "host=XXXXXXXXXXXXXXXXXXXXXXXXXXX"                           
 ext_ftp.4 = ". $script_dir/sftp_connect.sh << EOB"                     
 ext_ftp.5 = "lzopts mode=binary"                                       
                                                                         
 /* POPULATE DATE                            */                         
                                                                         
 X=DATE(S)                                                               
 INP1=BPR.RNAD16.RNAAUNZ.ZIP                                             
 OUT1="rnabu"                                                           
                                                                         
 ext_ftp.6 = "cd /applsend/rnabu/outbox"                                 
 ext_ftp.7 = "put " || "//" || inp1 || "  " || out1 || X || ".zip"       
 ext_ftp.8 = "EOB"                                                       
 ext_ftp.0 = 8                                                           
                                                                         
 /* BUILD THE CONTROL CARD DATASET NAME      */                         
                                                                         
 NORMAL_CARD = 'NDVR.PROD.PRD.CTL(RNASFTP1)'                             
                                                                         
 ADDRESS "TSO"                                                           
 "ALLOC FI(OUTFILE1) DA ('"normal_card"') SHR REU"                       
 "EXECIO * DISKW OUTFILE1 (STEM ext_ftp. FINIS"                         
 "FREE FI (OUTFILE1)"     


======================================================                                               
ERROR :


READY                                                                     
 EX 'NDVR.PROD.PRD.CTL(RNAFTP02)'                                         
IRX0250E System abend code 213, reason code 00000048.                     
IRX0255E Abend in host command EXECIO or address environment routine TSO. 
IRX0670E EXECIO error while trying to GET or PUT a record.                 
READY                                                                     
END



Please help me find the reason behind this behaviour.

coded

Re: EXECIO abend code 213, reason code 00000048.

PostPosted: Fri Dec 12, 2014 3:26 pm
by prino
Add

trace ?r

as the second line of your code and show the trace!

Re: EXECIO abend code 213, reason code 00000048.

PostPosted: Fri Dec 12, 2014 6:34 pm
by NicC
How do you know if your ALLOC worked ok?
What did you glean from the messages and codes manual for a S213-48?

And please use the code tags when posting code - like Prino did.

Re: EXECIO abend code 213, reason code 00000048.

PostPosted: Fri Dec 12, 2014 7:00 pm
by vern
A 213-48 is
48 OPEN detected a bad return from the extended cache attribute facility.

No I've no idea what that means

Re: EXECIO abend code 213, reason code 00000048.

PostPosted: Fri Dec 12, 2014 8:08 pm
by steve-myers
Like Vern, I too, looked up the S213-48. I, too, have no idea what it means.

Is NDVR.PROD.PRD.CTL a PDS? What are its DCB attributes?

Re: EXECIO abend code 213, reason code 00000048.

PostPosted: Fri Dec 12, 2014 9:40 pm
by pratiksha88
NDVR.PROD.PRD.CTL is a library and RNAFTP02 is control card that contains REXX menntioned in first post.

Re: EXECIO abend code 213, reason code 00000048.

PostPosted: Fri Dec 12, 2014 9:46 pm
by steve-myers
You were asked 2 questions. What is the answer to both questions?

Re: EXECIO abend code 213, reason code 00000048.

PostPosted: Tue Dec 16, 2014 2:50 am
by Pedro
NDVR.PROD.PRD.CTL

Something to do with 'production'... perhaps a somewhat important data set... it might be performance sensitive. Perhaps it -is- being cached. Check your COFVLFxx definitions in SYS1.PARMLIB. I do not have experience in this area, but there might be a trick to actually update such a data set.

Re: EXECIO abend code 213, reason code 00000048.

PostPosted: Tue Dec 16, 2014 12:24 pm
by pratiksha88
Hi Steve ,

Sorry for delayed response.

NDVR.PROD.PRD.CTL is a PDS and the attributes are :

Management class . . : MCNOMIG
Storage class . . . : SCAVPLIB
Volume serial . . . : AVPC16
Device type . . . . : 3390
Data class . . . . . : **None**
Organization . . . : PO
Record format . . . : FB
Record length . . . : 80
Block size . . . . : 3120
1st extent cylinders: 300
Secondary cylinders : 30
Data set name type : PDS

Re: EXECIO abend code 213, reason code 00000048.

PostPosted: Tue Dec 16, 2014 12:28 pm
by pratiksha88
Hi Prino,

I can not add TRACE as the files are in production. When i run the same in test environment it is running fine. Even in production it works fine at times and it fails some times.