Check here under DEFINE CLUSTER and the RECORDSIZE keyword:
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT1I201/3.13.1.2
?SHELF=DGT1BK24&DT=19940412074013&CASE=

It says: When you specify a record size that is larger than one control
       interval, you must also specify spanned records (SPANNED). The
formula
       for the maximum record size of spanned records as calculated by VSAM
       is as follows:

         MAXLRECL = CI/CA * (CISZ - 10)


Thus, if have a data cisize of 4096, and you have 180 CI's per CA, then your
maxlrecl is 180 * (4096 - 10).

Hope that helps.

 
 
Larry Crilley
Dino Software Corp.
Home of REORGadon: The world's first REORG While-OPEN tool for HSM
http://www.dino-software.com/
412.366.3566
 

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Bill Klein
Sent: Tuesday, June 19, 2007 9:11 AM
To: [email protected]
Subject: Simple (???) VSAM ESDS question

(I sent this to the Assembler list, but meant to ask "IBM-MAIN" - Sorry if
some see it  twice) 

A question came up in the COBOL newsgroup about records (not blocks, i.e.
LBI) > 32K.   I know that QSAM doesn't support this.  The current Enterprise
COBOL LRM at:


http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IGY3LR31/APPENDIX
1.2

        "RECORD CONTAINS integer   - 1,048,575( (Note 5))
                ...
       5.  Compiler limit shown, but QSAM limits it to 32,767 bytes."

Now, although it isn't common, COBOL can use ESDS (rather than QSAM) for
"sequential files".  I checked the DFSMS manuals and got a BIT confused.  It
talked about SPANNED records with records > CI/CA, but I couldn't tell if
this meant that you could or could not have an ESDS file with individual
(spanned) records > 32K.

As I say (in the subject) this is probably a "simple" question, that I just
didn't look at the right place for (or didn't understand the answer), but I
figured this group could tell me (point me to the correct manual).

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to