"Clark Morris" <[EMAIL PROTECTED]> wrote in message news:<[EMAIL PROTECTED]>... > On 6 Jun 2005 20:52:17 -0700, in bit.listserv.ibm-main you wrote: > <snip> > The problem has nothing to do with z/OS vs. Unix. It is a simple > IDIOTIC check that can't be disabled. It may make sense for fixed > block. The whole issue should be revisited by the COBOL compiler > group. The 2002 COBOL standard might allow a graceful way for the > compiler group to make the appropriate changes. In one sense the > SHARE requirement might be to honor the Language Futures Task Force > report. This would also have some other interesting advantages such > as allowing COBOL programs to read or write either ESDS or QSAM files > without program modification. >
A couple of things to say about this. A) FS=39 (fixed file attribute conflict) WAS clarified in about 1988 to indicate that it is UP TO EACH VENDOR which "attributes" they do (and do not) check. If enough paying customers were able to convince IBM *not* to check a specific attribute, they could do so (either optionally or always). So far, although FS=39 was a migration inhibitor (about a decade-and-a-half ago), I do NOT hear it being a significant problem for most customers today. B) There is an existing SHARE requirement for IBM to provide "dynamic file attribute" format of the FD, e.g. Record Varying in Size from data-name-1 to data-name-2 Block contains data-name-3 Please email me off-list (wmklein <at> ix.netcom.com) if you would like the SHARE requirement number so that your installation could submit a site-specific "REQUEST" adding support (how much you would PAY) for this functionality. C) All recent and currently supported COBOL compilers allow one to pass a "DCB" to a subprogram that may be written in COBOL, Assembler, or any other language. If "playing" with the DCB is what you want, then this is what you should use. ---------------------------------------------------------------------- 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
