The first two bytes specify the segment length. The next two bytes specify the segment number of the spanned record. The next 4 bytes are the standard RDW bytes for the record itself, especially if it is a variable length record.
Take a look at the COBOL file descriptor clause "RECORD TYPE IS S" which is for spanned records. I have not tried ESDS greater than 32K, sorry. On Tue, 19 Jun 2007 10:39:21 -0400, Arthur T. <[EMAIL PROTECTED]> wrote: >On 19 Jun 2007 06:11:21 -0700, in bit.listserv.ibm-main >(Message-ID:<[EMAIL PROTECTED]>) >[EMAIL PROTECTED] (Bill Klein) wrote: > >>(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." > > I believe the QSAM limit is 32,760. I never heard a >good explanation of why we can't use those other 7 bytes. > ---------------------------------------------------------------------- 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
