The LRECL in the JCL includes the RDW.  The "RECORD VARYING IN SIZE" does
*not* include the RDW.  Therefore, it is quite true that the LRECL (in JCL)
should be 4-bytes larger than the minimum RECORD VARING FROM value.

see (among other places),
 
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/igy3lr20/6.2.1.1 

"With variable-format records, the Record Definition Word (RDW) is removed
from the beginning of the input record. Only the actual input data is
transferred to identifier-1."

 
"Andy Robertson" <[EMAIL PROTECTED]> wrote in message
news:<[EMAIL PROTECTED]>...
> 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.
> 
> We would really like it to tolerate the case where qqq > mmm+4

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