DATA_WIDTH—Query Data Width

The DATA_WIDTH assignment statement retrieves the current logical data width and places it in a variable.

Syntax


Assignment statement syntax

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

varname: The name of a variable to contain the logical data width. The logical data width 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, a length of 3 or 4 is allowed in cases where no data loss occurs.

Description

The logical data width is the maximum space, in bytes, that is available for data only. It does not include any COBOL or sequence number fields or, for variable-length records, the 4-byte record descriptor word (RDW).

The value returned by the DATA_WIDTH assignment statement depends on the record format (fixed or variable) and the setting of number mode, as shown in Table 1. See NUMBER—Generate Sequence Numbers if you need more information about number mode.

Table 1. Data width return value
Number mode setting	Logical data width for fixed-length records	Logical data width for variable-length records
OFF	LRECL	LRECL - 4
ON STD	LRECL - 8	LRECL - 12
ON COB	LRECL - 6	N/A 1
ON STD COB	LRECL - 14	N/A 1
Note: COBOL numbering is invalid for variable-length records.

Use the LRECL assignment statement to get the maximum space, in bytes, that is available for data, COBOL number fields, and sequence number fields.

Return codes

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

Examples

To put the data width in variable &MAXCOL and override the boundary setting for SEEK:

ISREDIT (MAXCOL) = DATA_WIDTH
ISREDIT SEEK 1 &MAXCOL &ARGSTR