copybook · 11 lines · sha256 ffc6079e09b28739 · guides at columns 7 and 72app/cpy/CVACT03Y.cpy
| 1 | ***************************************************************** |
| 2 | * Data-structure for card xref (RECLN 50) |
| 3 | ***************************************************************** |
| 4 | 01 CARD-XREF-RECORD. |
| 5 | 05 XREF-CARD-NUM PIC X(16). |
| 6 | 05 XREF-CUST-ID PIC 9(09). |
| 7 | 05 XREF-ACCT-ID PIC 9(11). |
| 8 | 05 FILLER PIC X(14). |
| 9 | * |
| 10 | * Ver: CardDemo_v1.0-15-g27d6c6f-68 Date: 2022-07-19 23:16:00 CDT |
| 11 | * |