LRECL—Query the Logical Record Length

The LRECL assignment statement returns the maximum space, in bytes, available for data, COBOL number fields, and sequence number fields.

Syntax


Assignment statement syntax

>>-ISREDIT--(varname)-- = --LRECL------------------------------><

varname: The name of a variable to contain the logical record length of the data being edited. The logical record length is a 3-digit value that is left-padded with zeros. If the variable is VDEFINEd in character format, it should be defined with a length of 5. The returned value is left padded with zeros. For compatibility with previous releases of ISPF/PDF, a length of 3 or 4 is allowed in cases where no data loss occurs.

Description

The value returned by the LRECL assignment statement includes the sequence number field and, for fixed-length records, the COBOL number field, if these number fields are used. For variable-length records, the value returned by LRECL does not include the 4-byte record descriptor word (RDW).

Use the DATA_WIDTH assignment statement to get the maximum space, in bytes, available for data.

Return codes

0: Normal completion
12: Invalid command format
20: Severe error

Examples

To check the logical record length of the data and process the data if the logical record length (LRECL) is 80:

ISREDIT (RECLEN) = LRECL
IF &RECLEN = 80 THEN -
   ...