MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Problem with DCB

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Job Control Language(JCL)
View previous topic :: View next topic  
Author Message
naveen
Beginner


Joined: 03 Dec 2002
Posts: 90
Topics: 31
PostPosted: Tue Jun 22, 2004 5:29 am    Post subject: Problem with DCB Reply with quote
One of my Jobs has following step:

Code:
//STEP     EXEC PGM=CYEZFRAT             
//FILEIN   DD  DSN=TSOID.FILEIN,DISP=SHR 
//FILEOT1  DD  DSN=TSOID.OFILE1,         
//             UNIT=SYSDA,               
//             SPACE=(CYL,(5,2),RLSE),   
//             DCB=*.FILEIN,             
//             DISP=(,CATLG,CATLG)       
//FILEOT2  DD  DSN=TSOID.OFILE2,         
//             UNIT=SYSDA,               
//             SPACE=(CYL,(5,2),RLSE),   
//             DCB=*.FILEIN,             
//             DISP=(,CATLG,DELETE)       
//FILEOT3  DD  DSN=TSOID.DP1SDP23,       
//             UNIT=SYSDA,               
//             SPACE=(CYL,(5,2),RLSE),   
//             DCB=*.FILEIN,             
//             DISP=(,CATLG,CATLG)       


FILEIN has following stats:

Code:
Organization  . . . : PS   
Record format . . . : VB   
Record length . . . : 1036
Block size  . . . . : 27998


Although FILEOT1 is having similar structure to FILEIN when it is created, but the other 2 output files viz. FILEOT2 & FILEOT3 are having different structure and show following information :

Code:
Record format . . . : ??????
Record length . . . : 0     
Block size  . . . . : 0     


Program used in the step is simple EZTrieve program to generate reports.

What is causing FILEOT2 and FILEOT3 to have different charact. than FILEIN when FILEOT1 is getting created in correct way with characterst. similar to FILEIN ?
Back to top
View user's profile Send private message Send e-mail
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12375
Topics: 75
Location: San Jose
PostPosted: Tue Jun 22, 2004 6:15 am    Post subject: Reply with quote
Naveen,

Did the job complete successfully ? If so the check the file declarations of the FILEOT2 and FILEOT3 in the pgm. You can also try using the LIKE parameter instead of the DCB parm

Code:

//FILEOT2  DD  DSN=TSOID.OFILE2,         
//             UNIT=SYSDA,               
//             SPACE=(CYL,(5,2),RLSE),   
//             LIKE=TSOID.FILEIN,
//             DISP=(,CATLG,DELETE)       
//FILEOT3  DD  DSN=TSOID.DP1SDP23,       
//             UNIT=SYSDA,               
//             SPACE=(CYL,(5,2),RLSE),   
//             LIKE=TSOID.FILEIN,
//             DISP=(,CATLG,CATLG)       


Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
souvik_225
Beginner


Joined: 15 May 2004
Posts: 17
Topics: 2
Location: Mumbai , India
PostPosted: Tue Jun 22, 2004 6:51 am    Post subject: Reply with quote
A wild guess ... I don't know which one overrides the other in some cases ... but could u please check what is the lrecl u have given in the program ??? ... is it same as FILEIN ? ... are u getting the same statistics as given in the program ??? ... if so then I suggest u have to correct the program ...
_________________
Thanks and Regards,
Souvik Upadhyay
Back to top
View user's profile Send private message Yahoo Messenger
naveen
Beginner


Joined: 03 Dec 2002
Posts: 90
Topics: 31
PostPosted: Tue Jun 22, 2004 10:16 am    Post subject: Reply with quote
No the job did not complete succesfully. Declarations in EZT program are like this :

Code:
*
FILE FILEIN VB (1036 1040)
*
FILE FILEOT1 VB (1036 1040)
*                           
FILE FILEOT2 VB (1036 1040) 
*                           
FILE FILEOT3 VB (1036 1040) 
Back to top
View user's profile Send private message Send e-mail
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12375
Topics: 75
Location: San Jose
PostPosted: Tue Jun 22, 2004 10:37 am    Post subject: Reply with quote
Naveen,

Quote:

No the job did not complete succesfully


That explains why the dcb parameters are off. Your pgm might have even opened the datasets and since the pgm ended in error , the datasets are having iinvalid dcb parameters

Naveen Since you are already specifying the File properties in the pgm , you don't have to code DCB parameters in the JCL

Also Change your DISP parameters to
Code:

DISP=(NEW,CATLG,DELETE)


OR
Code:

DISP=(NEW,CATLG,DELETE)


You have coded it as
Code:

DISP=(,CATLG,CATLG)


Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
cobcurious
Beginner


Joined: 04 Oct 2003
Posts: 68
Topics: 25
PostPosted: Thu Jul 01, 2004 5:27 am    Post subject: Reply with quote
Hi Kolusu,
Just of curiousity..I want to ask you one query.Is it no that the DCB parameters in the JCL override those in the program or is it vice-versa?
Thanks and Regards
Cobcurious
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12375
Topics: 75
Location: San Jose
PostPosted: Thu Jul 01, 2004 5:34 am    Post subject: Reply with quote
cobcurious,

Quote:

I want to ask you one query.Is it no that the DCB parameters in the JCL override those in the program or is it vice-versa?


In easytrieve, the only time, pgm looks for the DCB parameter from the JCL is when the output files are codes as follows.

Code:

FILE OUTPUT FB(0 0)


when you code

Code:

FILE OUTPUT FB(80 8000)


the pgm does not even bother looking at the DCB parameters coded in JCL

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Job Control Language(JCL) All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group