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

Maximum record length more than 32752


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
dhamu_v

New User


Joined: 03 Aug 2006
Posts: 2
Location: Chennai

PostPosted: Mon Jun 09, 2008 6:05 pm
Reply with quote

Hi Can any one suggest an idea to write files having LRECL more than 32k ?
Back to top
View user's profile Send private message
yogeshwar_ade

Active User


Joined: 31 Aug 2006
Posts: 103
Location: INDIA

PostPosted: Mon Jun 09, 2008 6:25 pm
Reply with quote

I think we can't allocate any PS file having record length more than 32760.

So I don't think there is any way to write record having length more than 32760.

We can have file with record length ranging from 0 to 32760 Max.

Correct me If I am wrong.

Yogeshwar
Back to top
View user's profile Send private message
stodolas

Active Member


Joined: 13 Jun 2007
Posts: 631
Location: Wisconsin

PostPosted: Mon Jun 09, 2008 6:37 pm
Reply with quote

You can use a RECFM of U. This specifies a record length of undefined and gives the desired effect of having a LRECL > 32760. I think you specify LRECL=X when you specify RECFM=U. However, most tools have a difficult time working with these files and the only good way to work with them is through a program.
Back to top
View user's profile Send private message
dhamu_v

New User


Joined: 03 Aug 2006
Posts: 2
Location: Chennai

PostPosted: Mon Jun 09, 2008 7:31 pm
Reply with quote

But Iam getting., wen it exceeds 32k.,

IEF638I SPECIFIED NUMERIC EXCEEDS MAXIMUM ALLOWED IN THE LRECL SUBPARAMETER OF THE DCB FIELD

Is there any otherway
Back to top
View user's profile Send private message
stodolas

Active Member


Joined: 13 Jun 2007
Posts: 631
Location: Wisconsin

PostPosted: Mon Jun 09, 2008 7:42 pm
Reply with quote

Did you read what I said?

You may need to do RECFM=U,LRECL=X


You may also want to look at using VBS for spanned records.
Enjoy the nightmare of using either of these RECFMs though.

publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2B660/12.37.2.1?SHELF=&DT=20050713232151&CASE=
publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2B660/12.37.2?SHELF=&DT=20050713232151&CASE=
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10888
Location: italy

PostPosted: Mon Jun 09, 2008 8:25 pm
Reply with quote

usually when using advanced facilities,
like large record lengths for spanned record processing
a thorough analysis has already carried on and benchmarked/modeled

in order to provide all the people involved with code,jcl,utility snippets
tested for the new functions
Back to top
View user's profile Send private message
stodolas

Active Member


Joined: 13 Jun 2007
Posts: 631
Location: Wisconsin

PostPosted: Mon Jun 09, 2008 8:28 pm
Reply with quote

enrico - have you seen much use of the advanced facilities?
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8700
Location: Dubuque, Iowa, USA

PostPosted: Mon Jun 09, 2008 8:50 pm
Reply with quote

Record length > 32K is only supported for LBI files, which must reside on tape. Enterprise COBOL for z/OS version 3.4 Programming Guide appears to indicate that not coding BLOCK CONTAINS nor using BLKSIZE on the DD statement is the preferred way to use LBI.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10888
Location: italy

PostPosted: Mon Jun 09, 2008 9:23 pm
Reply with quote

Hi Steve!

Quote:
have you seen much use of the advanced facilities?

in these forums, or when working?

i doubt about the forums, but sometimes the questions make it look like icon_biggrin.gif

in my working life yes, but not in COBOL...
Back to top
View user's profile Send private message
agkshirsagar

Active Member


Joined: 27 Feb 2007
Posts: 691
Location: Earth

PostPosted: Fri Jun 13, 2008 1:50 am
Reply with quote

I interpreted the manual like this-
Quote:
LRECL=X
For QSAM only, specifies that the logical record length exceeds 32,760 bytes for variable-length spanned records. This option is not valid for ISO/ANSI/FIPS Version 3 variable-length records.

It says you can exceed 32760 which is < 32K.
It never said you can exceed beyond 32K.
I think it is justified by the fact that RDW is of 2 byte integer and 2 bytes cant hold a signed value more than +32K. icon_question.gif
@Robert Sample: For LBI files it depends on SMS release and the device you are using. If you are running on OS/390 2.10 or later BSAM, BPAM and QSAM support LBI on disk, tape, spooled, subsystem and dummy data sets. This is largely device dependent feature. In addition system programmer has to set BLKSZELIM value in SYS1.PARMLIB. (Impossible to do for an application programmer)
Got all this from GOOGLE icon_smile.gif

I must say this is an interesting thread after a long time.
Back to top
View user's profile Send private message
agkshirsagar

Active Member


Joined: 27 Feb 2007
Posts: 691
Location: Earth

PostPosted: Fri Jun 13, 2008 2:00 am
Reply with quote

I think it was very confusing what I posted above.
My conclusion: QSAM record size limit is 32767, even with all the jugglery mentioned above you can not exceed the limit.
Back to top
View user's profile Send private message
stodolas

Active Member


Joined: 13 Jun 2007
Posts: 631
Location: Wisconsin

PostPosted: Fri Jun 13, 2008 2:13 am
Reply with quote

What about spanned records???
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Fri Jun 13, 2008 7:47 am
Reply with quote

Hello,

IIRC spanned records (vbs) support a record with a length greater than blksize but i don't recall this extending the max record length for a qsam file.
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 -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Copy only TEXT or String from a record SYNCSORT 4
No new posts combine multiple unique records into ... DFSORT/ICETOOL 2
No new posts SORT on detail record, then repeat he... DFSORT/ICETOOL 3
No new posts how to complete the end of a record w... DFSORT/ICETOOL 2
No new posts Sort based on the record type DFSORT/ICETOOL 1
Search our Forums:

Back to Top