The RECORD CONTAINS clause is not required in either V4 or V5. It (if not present) is determined from the smallest and largest 01 level fields in the FD.Both V4 and V5 give a compiler error if there is a RECORD CONTAINS clause that does not match what would have been assumed had it not been present. I cannot figure out how to create a situation where COBOL V4 returns status '00' when there is a size mismatch. I always get '04'. Frank From: Bernd Oppolzer <[email protected]> To: [email protected] Sent: Wednesday, April 1, 2015 4:21 PM Subject: Re: migrating compiler versions Hello Frank,
cited from earlier post: Whereas in previous versions of ECOBOL a minimum and maximum record length did not have to be specified when defining a variable file, v5.1 will return a file status of '04' if any record is less than or greater than the minimum / maximum specified. so I think: in the FILE SECTION in the FD entry for the file, you define the file as variable (RECORDING MODE IS V) but you omit the RECORD CONTAINS CLAUSE, which was IMO possible with V4, but which is no more possible with V5, and with V5 the length of the records read is checked against the limits specified in the RECORD CONTAINS clause (two integers, lower and upper limit). If the length is beyond those limits, a file status '04' is shown. Thats how I read the description. Kind regards Bernd Am 01.04.2015 um 23:37 schrieb Frank Swarbrick: > I am trying to create a test case that gets the '00' when compiled with V4 > and gets the '04' when compiled with V5 and VLR(STANDARD). I can't for the > life of me figure out what this case is. I can get '04' under V4, but I > can't figure out the actual situation that this is addressing. (I'm looking > for examples, not words, as obviously I am failing to understand the words.) ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
