v3: gstack-code-gen 生成

2026-05-24 12:36:44 +08:00
commit 818e81269c
50 changed files with 1343 additions and 0 deletions
@@ -0,0 +1,13 @@
+       IDENTIFICATION DIVISION.
+       PROGRAM-ID. SIMPLE.
+       DATA DIVISION.
+       WORKING-STORAGE SECTION.
+       01 BILL-RECORD.
+          05 BR-AMT    PIC S9(7)V99 COMP-3.
+          05 BR-STATUS PIC X.
+          05 BR-DATE   PIC 9(8).
+       PROCEDURE DIVISION.
+           DISPLAY BR-AMT.
+           DISPLAY BR-STATUS.
+           DISPLAY BR-DATE.
+           STOP RUN.