Hi,
I have defined sub-fields with same name, in two different structures, I thought it should be allowed. Could someone please guide. My OS version is V5R3.
Getting compilation errors :
'ACCOUNT' previously defined in program, use cannot be determined. Default item assumed.
'ACCT-NAME' previously defined in program, use cannot be determined. Default item assumed.
'AMOUNT' previously defined in program, use cannot be determined. Default item assumed.
I have defined sub-fields with same name, in two different structures, I thought it should be allowed. Could someone please guide. My OS version is V5R3.
Getting compilation errors :
'ACCOUNT' previously defined in program, use cannot be determined. Default item assumed.
'ACCT-NAME' previously defined in program, use cannot be determined. Default item assumed.
'AMOUNT' previously defined in program, use cannot be determined. Default item assumed.
Code:
IDENTIFICATION DIVISION. PROGRAM-ID. RECCB. DATA DIVISION. WORKING-STORAGE SECTION. 01 DATA-RECORD. 03 ACCOUNT PIC 9(6) COMP. 03 ACCT-NAME PIC X(20). 03 AMOUNT PIC 9(8)V99. 01 DETAIL-LINE. 03 FILLER PIC XXX VALUE SPACE. 03 ACCOUNT PIC 99B/B9999 BLANK WHEN ZERO. 03 FILLER PIC XXX VALUE " | ". 03 ACCT-NAME PIC X(20). 03 FILLER PIC X(5) VALUE SPACE.
Comment