勤怠管理システム production 定版

2026-06-15 20:00:06 +08:00
parent 9813dd7772
commit c13e2407d7
9 changed files with 221 additions and 80 deletions
@@ -38,8 +38,11 @@

 ```
 1.制御処理（0000MAINSOR）
-  1-1.ABENDメッセージを表示する。
-    DISPLAY 'ABEND CODE=' E01ABDCOD.
-  1-2.異常終了する。
+  1-1.ABENDメッセージを編集する。
+    MOVE 'ABEND CODE=' TO WRK-ABEND-MSG.
+    MOVE E01ABDCOD TO WRK-ABEND-MSG(12:3).
+  1-2.メッセージを表示する。
+    DISPLAY WRK-ABEND-MSG.
+  1-3.異常終了する。
    STOP RUN.
 ```