01 EMPLOYEE-RECORD. 05 EMP-ID PIC 9(5). 05 EMP-NAME PIC X(20). 05 EMP-DEPT PIC X(4). 05 EMP-SALARY PIC 9(8). 05 EMP-STATUS PIC X(1). 05 EMP-DATE PIC 9(8). 05 FILLER PIC X(4).
Raw data
| Field | PIC | Offset | Len | Raw value | Parsed | |
|---|---|---|---|---|---|---|
| EMP-ID | 9(5) | 0 | 5 | 00001 | 00001 | |
| EMP-NAME | X(20) | 5 | 20 | SMITH, JOHN | SMITH, JOHN | |
| EMP-DEPT | X(4) | 25 | 4 | SALE | SALE | |
| EMP-SALARY | 9(8) | 29 | 8 | 00004500 | 00004500 | |
| EMP-STATUS | X(1) | 37 | 1 | A | A | |
| EMP-DATE | 9(8) | 38 | 8 | 20230115 | 20230115 | |
| FILLER | X(4) | 46 | 4 |