On Fri, 15 May 2009 10:05:48 -0700, Gibney, Dave <[email protected]> wrote:
>>3) If Cobol says "BLOCK CONTAINS 12345" it works (!!!)
>
>I'll bet you 3) If Cobol says "BLOCK CONTAINS 9999" doesn't :)
Sorry, you lose that bet. That does work.
The only things that I've been able to determine simple do not work are if you
specify a block size that
1) for RECFM=VB is not either 0 or at least 8 bytes more than the maximum
record length, or
2) for RECFM=FB is not either 0 or a multiple of the record length.
If you violate item 1 you get this:
IGYGR1243-S FILE "MY-FILE" HAD A "RECORDING MODE" OF "V", BUT THE
BLOCK SIZE WAS LESS THAN 8 PLUS THE MAXIMUM RECORD SIZE OF 500.
THE FILE DEFINITION WAS DISCARDED.
If you violate item 2 you get this:
IGYGR1212-W THE MAXIMUM INTEGER IN THE "BLOCK CONTAINS" CLAUSE
WAS NOT A MULTIPLE OF THE CALCULATED RECORD SIZE. THE CLAUSE WAS
ACCEPTED.
If you ignore the warning for number 2 you get an IEC141I 013-20. For
number 1 we get RC > 4 so we don't even try to create the load module,
much less run it! :-)
Frank
----------------------------------------------------------------------
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
