Neeraj Changes
This commit is contained in:
@ -17,7 +17,8 @@
|
||||
00017 10 T001-LENGTH PIC S9(04) COMP. DTSIT001
|
||||
00018 DTSIT001
|
||||
00019 10 T001-COMMON-AREA. DTSIT001
|
||||
00020 15 T001-REC-TYPE PIC X(03) VALUE '001'. DTSIT001
|
||||
00020 * 15 T001-REC-TYPE PIC X(03) VALUE '001'. DTSIT001
|
||||
RCODE 15 T001-REC-TYPE PIC X(03). DTSIT001
|
||||
00021 15 T001-EMP-NO PIC S9(07) COMP-3. DTSIT001
|
||||
00022 15 T001-ORIGIN PIC X(10). DTSIT001
|
||||
00023 15 FILLER REDEFINES T001-ORIGIN. DTSIT001
|
||||
|
||||
Reference in New Issue
Block a user