Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Maximum record length more than 32752

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
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    Post subject: Maximum record length more than 32752
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    Post subject: Reply to: COBOL : How to write record length having more tha
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: 632
Location: Wisconsin

PostPosted: Mon Jun 09, 2008 6:37 pm    Post subject:
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    Post subject:
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: 632
Location: Wisconsin

PostPosted: Mon Jun 09, 2008 7:42 pm    Post subject:
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.

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2B660/12.37.2.1?SHELF=&DT=20050713232151&CASE=
http://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

Global Moderator


Joined: 14 Mar 2007
Posts: 10308
Location: italy

PostPosted: Mon Jun 09, 2008 8:25 pm    Post subject: Reply to: COBOL : How to write record length having more tha
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: 632
Location: Wisconsin

PostPosted: Mon Jun 09, 2008 8:28 pm    Post subject:
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: 8154
Location: East Dubuque, Illinois, USA

PostPosted: Mon Jun 09, 2008 8:50 pm    Post subject: Reply to: COBOL : How to write record length having more tha
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

Global Moderator


Joined: 14 Mar 2007
Posts: 10308
Location: italy

PostPosted: Mon Jun 09, 2008 9:23 pm    Post subject: Reply to: COBOL : How to write record length having more tha
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: 686
Location: Earth

PostPosted: Fri Jun 13, 2008 1:50 am    Post subject:
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: 686
Location: Earth

PostPosted: Fri Jun 13, 2008 2:00 am    Post subject:
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: 632
Location: Wisconsin

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

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

Site Director


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

PostPosted: Fri Jun 13, 2008 7:47 am    Post subject:
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    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Selecting two copybooks of different ... Vignesh Sid COBOL Programming 8 Tue Sep 05, 2017 7:28 pm
No new posts Updating the Trailer count in variabl... satheshbabur DFSORT/ICETOOL 6 Wed Aug 30, 2017 9:49 pm
No new posts Repeat part of record multiple times Learncoholic DFSORT/ICETOOL 4 Tue Aug 29, 2017 11:33 am
No new posts Can we limit length in concatenation ... balaji81_k DB2 7 Tue Aug 22, 2017 2:50 am
No new posts Read two inputs and write into output... murali.andaluri DFSORT/ICETOOL 6 Wed Jul 26, 2017 7:35 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us