IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

DCB mismatch for FBA dataset in report pgm


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
morpheus007

New User


Joined: 27 Dec 2005
Posts: 58

PostPosted: Wed Jan 10, 2007 8:06 am
Reply with quote

I am working on a report program where in cobol the record structure is declared with length 132.In the JCL the DD is declared as:
LRECL=133,RECFM=FBA,BLKSIZE=1330

When this is moved to PROD it abends with a DCB mismatch and file status=39 with file open failing.

Kindly let me know what should be the fix for this.
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Wed Jan 10, 2007 9:06 am
Reply with quote

Hi Morph,

I assume you mean to say that the identical JCL/pgm code works in test.

If so, your test/prod compiler options may differ. You might want to give them a look.
Back to top
View user's profile Send private message
morpheus007

New User


Joined: 27 Dec 2005
Posts: 58

PostPosted: Wed Jan 10, 2007 9:13 am
Reply with quote

Are the allocations correct.

Should I be changing the JCL attributes to LRECL=132 FBA or should I be changing the cobol declaration to 133.

This looks more of a runtime fauilure to me.The dataset got allocated and when cobol tried to open the file it failed as the attributes did not match.Hence status code=39.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Wed Jan 10, 2007 9:25 am
Reply with quote

Hello,

As Jack asked, does the EXACT same JCL work in test? Might it be that in test you use "SYSOUT=" but in production a dataset name and dcb parameters are specified?

If it IS a sysout dataset in either/both environment, i'd suggest leaving out the dcb info.

If you need to create a "print file", modify your FD to be length 133 and add 1 byte of filler before the printable info and see if that corrects the abend.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts FINDREP - Only first record from give... DFSORT/ICETOOL 3
No new posts Map Vols and Problem Dataset All Other Mainframe Topics 2
No new posts Allocated cylinders of a dataset DB2 12
No new posts Sort First/last record of a subset th... DFSORT/ICETOOL 7
No new posts Reading dataset in Python - New Line ... All Other Mainframe Topics 22
Search our Forums:

Back to Top