copybook · 21 lines · sha256 d7bde0e78ff60849 · guides at columns 7 and 72app/cpy/CVTRA05Y.cpy

1	*****************************************************************
2	* Data-structure for TRANsaction record (RECLN = 350)
3	*****************************************************************
4	01 TRAN-RECORD.
5	05 TRAN-ID PIC X(16).
6	05 TRAN-TYPE-CD PIC X(02).
7	05 TRAN-CAT-CD PIC 9(04).
8	05 TRAN-SOURCE PIC X(10).
9	05 TRAN-DESC PIC X(100).
10	05 TRAN-AMT PIC S9(09)V99.
11	05 TRAN-MERCHANT-ID PIC 9(09).
12	05 TRAN-MERCHANT-NAME PIC X(50).
13	05 TRAN-MERCHANT-CITY PIC X(50).
14	05 TRAN-MERCHANT-ZIP PIC X(10).
15	05 TRAN-CARD-NUM PIC X(16).
16	05 TRAN-ORIG-TS PIC X(26).
17	05 TRAN-PROC-TS PIC X(26).
18	05 FILLER PIC X(20).
19	*
20	* Ver: CardDemo_v1.0-15-g27d6c6f-68 Date: 2022-07-19 23:16:01 CDT
21	*