Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
IEC141I 013-34 in IDCAMS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> SMS & VSAM
Author Message
tarun_bhardwaj

New User


Joined: 18 Jul 2003
Posts: 30
Location: delhi

PostPosted: Fri Apr 11, 2008 12:20 pm    Post subject: IEC141I 013-34 in IDCAMS
Reply with quote

Hi All,

Iam facing this problem while execting a job:

Code:

//STEP1   EXEC PGM=IKJEFT01
//             COND=(4,LT)                           
//DUMMY     DD DUMMY                                 
//SYSEXEC   DD DSN=&PARMLIB,DISP=SHR,BUFNO=1         
//SYSTSIN   DD DUMMY                                 
//SYSTSPRT  DD SYSOUT=*                               
//SYSPRINT  DD SYSOUT=*                               
//OUT03     DD DSN=TAPE.FILE2(+1),
//             UNIT=(TAPE,,DEFER),LABEL=(1,SL,EXPDT=99000),
//             DISP=(NEW,CATLG,DELETE),                     
//             MGMTCLAS=STANDARD,STORCLAS=BASE,             
//             RECFM=VB,LRECL=996,AVGREC=K                 
//OUT08     DD DSN=DASD.FILE1(+1), 
//             DISP=(NEW,CATLG,DELETE),           
//             MGMTCLAS=STANDARD,STORCLAS=BASE,             
//             AVGREC=K,SPACE=(996,(10,20),RLSE),           
//             RECFM=VB,LRECL=996                           

//STEP2   EXEC PGM=IDCAMS,                                 
//             COND=(4,LT)                                 
//SYSPRINT  DD SYSOUT=*                                     
//SYSUT1    DD DSN=TAPE.FILE1(0),     
//               DISP=SHR                                     
//               DD DSN=DASD.FILE1(+1),
//               DISP=SHR                                     
//               DD DSN=DASD.FILE2(0),     
//               DISP=SHR                                     
//               DD DSN=DASD.FILE3(0),     
//               DISP=SHR                                     
//SYSUT2    DD DSN=TAPE.FILE2(+1),     
//             DISP=OLD                           


Here, TAPE.FILE1 is an existing file on the tape with the same allocation parameters as TAPE.FILE2. The files DASD.FILE1, DASD.FILE2 and DASD.FILE3 are files on the disk and DASD.FILE2 and DASD.FILE3 are pre-existing files with allocation parameters same as DASD.FILE1.
I get the following message:

Code:

IDCAMS  SYSTEM SERVICES                                           T
                                                                   
  REPRO  INFILE(SYSUT1) OUTFILE(SYSUT2)                           
IDC3300I  ERROR OPENING TAPE.FILE2         
IDC3321I ** OPEN/CLOSE/EOV ABEND EXIT TAKEN                       
IDC0005I NUMBER OF RECORDS PROCESSED WAS 0                         
IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12                 


Can someone pls advise me on how to fix this ?

Tarun.
Back to top
View user's profile Send private message
References
Moved: Fri Apr 11, 2008 1:16 pm by superk From JCL to SMS & VSAM
dick scherrer

Global Moderator


Joined: 23 Nov 2006
Posts: 9184
Location: 221 B Baker St

PostPosted: Fri Apr 11, 2008 1:23 pm    Post subject:
Reply with quote

Hello,

Your jcl is confusing to me. . .

In step1 you create a +1 for tape.file. In step2 you use the +1 as sysut2 (typically output) icon_confused.gif
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 3380
Location: Charlotte,NC USA

PostPosted: Fri Apr 11, 2008 1:35 pm    Post subject: Reply to: IEC141I 013-34 in IDCAMS
Reply with quote

Tarun, could you also please post the description of the IEC141I 013-34 abend message?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 3725
Location: Brussels once more ...

PostPosted: Fri Apr 11, 2008 2:44 pm    Post subject:
Reply with quote

Without too much information, I would guess that this a TMS intervention to prevent the same tape being over written

But as said before - not much info - not much chance of help
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 1218
Location: At my desk

PostPosted: Fri Apr 11, 2008 7:46 pm    Post subject:
Reply with quote

What is the input for STEP1 and STEP2?
Back to top
View user's profile Send private message
tarun_bhardwaj

New User


Joined: 18 Jul 2003
Posts: 30
Location: delhi

PostPosted: Fri Apr 11, 2008 10:00 pm    Post subject: Reply to: IEC141I 013-34 in IDCAMS
Reply with quote

Hi,

I got this job working by allocating the tape file in the SYSUT2 step of IDCAMS instead of pre-allocating it. It worked, though i still have no logical reason as to why it shouldn't have worked in the earlier scenario.

Thanks for your inputs.
Back to top
View user's profile Send private message
dick scherrer

Global Moderator


Joined: 23 Nov 2006
Posts: 9184
Location: 221 B Baker St

PostPosted: Fri Apr 11, 2008 10:15 pm    Post subject:
Reply with quote

Hello,

Are you saying that the file was not written to in the first step, but merely allocated? If so, i believe that may be what caused the 013-34. . .

Quote:
i still have no logical reason as to why it shouldn't have worked in the earlier scenario
If the above belief is correct, the logical reason if did not work is that while the jcl had no syntax error, the process created an invalid condition with that file.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> SMS & VSAM All times are GMT + 6 Hours
Page 1 of 1