After the layout member is resolved, the ordinary COBOL or PL/I record layout is formatted, showing the individual field definitions within the layout.
To view record layout screens
The Record Layout screen opens.
The Record Layout screen opens.
----- Record Layout 'CUSTREC' of 'CUSTOMER.PROJECT.COPYLIB'------- Row 1 of 31 COMMAND ===> SCROLL ===> CSR Field Name Pos Format Len 01 CUST-RECORD 1 163 163 05 CUST-CUSTOMER-NUM 1 N 1 1 05 CUST-CUSTOMER-TYPE-CODE 2 C 10 10 05 CUST-ACCT-OPENED-DATE 12 N 8 8 05 CUST-DOB 20 N 8 8 05 CUST-1ST-TRANSACTION-DATE 28 6 6 10 CUST-1ST-TRANSACTION-MM 28 N 2 2 10 CUST-1ST-TRANSACTION-DD 30 N 2 2 10 CUST-1ST-TRANSACTION-YY 32 N 30 2 05 CUST-CURRENT-BAL 34 P 4.2 4 05 CUST-ORIG-BAL 38 P 4.2 4 05 CUST-PAYMENT-AMT 44 P 4.2 4 05 CUST-PAYMENT-PERIOD 48 N 2 2 05 CUST-NAME 50 C 25 25 05 CUST-ADDR-1 75 C 30 30 05 CUST-ADDR-2 105 C 30 30 05 CUST-PYMT-HISTORY 135 18 18 10 CUST-PYMT-ENTRY 135 9 9 Occurs 12 15 CUST-XYZ 135 C 5 5 Redefined 15 CUST-XYZ-REDEFINED 135 N 5 5 Redefinition 15 CUST-PYMT-RECEIVED 140 PS 5.2 4
This screen displays the following fields:
Identifies the field level number and field name with indentation to indicate the hierarchy of the fields.
The indentation rules for this column are as follows:
Identifies the field's starting position.
Identifies the data-type indicator followed by either the number of digits or characters allowed for the field as defined by the field definition.
Valid data-type indicators are:
B—Binary C—Alphanumeric F—Floating point
N—Any numeric field P— Packed S— Signed
Identifies the length of the field in bytes.
Note: For packed or binary numeric fields, this value is not equal to the number of digits.
|
Copyright © 2013 CA.
All rights reserved.
|
|