Initial commit: COBOL+JCL credit card billing system with COMP-3, OCCURS, COPY REPLACING, INSPECT, and JCL runner

2026-05-25 12:27:00 +08:00
commit 8e551c35d9
17 changed files with 2080 additions and 0 deletions
@@ -0,0 +1,6 @@
+        01 RATE-RECORD.
+            05 RATE-TYPE         PIC X.
+                88 RATE-CASH        VALUE 'C'.
+                88 RATE-OVERDUE     VALUE 'O'.
+            05 RATE-PCT          PIC 9(1)V9(4) COMP-3.
+            05 RATE-EFF-DATE     PIC 9(8).