*> cobol-bank-statement-batch-job.cpy *> 72-byte transaction record for the bank-statement batch job. *> Comment lines start in column 7 so the copybook is legal in both *> fixed and free source format. *> Status: desk-checked against the GnuCOBOL 3.2 Programmer's Guide. 01 Txn-Record. 05 Txn-Account PIC 9(8). 05 Txn-Date PIC 9(8). 05 Txn-Type PIC X(1). 88 Txn-Debit VALUE "D". 88 Txn-Credit VALUE "C". 88 Txn-Type-Valid VALUE "D", "C". 05 Txn-Amount PIC 9(9)V99. 05 Txn-Desc PIC X(40). 05 FILLER PIC X(4).