If DDNAME is being opened for input, can you get away with overriding
the LRECL? That is, explicitly coding 

//DDNAME DD LRECL=mmm+4, ... 

Even though the DSCB LRECL is greater than that - although presumably
the maximum length of any record in the file, or any record that you are
actually going to read, is no greater than mmm+4.

If not, perhaps a little background would help. Is this an input or an
output file? Why would you want to do this? COBOL seems like it is
trying to keep you out of trouble.

Charles



-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Andy Robertson
Sent: Monday, June 06, 2005 9:39 AM
To: [email protected]
Subject: COBOL short variable length files????


I seem to remember a discussion here about a PTF, trick or Compiler
option that would allow the latest flavours of COBOL programs to
tolerate short Variable Length files.


I mean the case where the FILE SECTION is

  RECORD VARYING FROM nnn TO mmm

And your JCL is

  //DDNAME DD LRECL=qqq,RECFM=VB, . . .


Now, it seems that qqq must equal mmm+4 or we get

IGZ0201W  A file attribute mismatch was detected. File DDNAME in program
xxxxxxx had a record length of mmm+4 and the file specified in the
ASSIGN clause had a record length of qqq.

----------------------------------------------------------------------
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