# 詳細設計書 ## 基本情報 | # | 項目 | 内容 | |---|------|------| | 1 | システム名 | 残業統計管理システム | | 2 | プログラムID | SUB03END | | 3 | プログラム名 | ABEND処理サブ | | 4 | PGMタイプ | サブ | | 5 | PGMパターン | - | | 6 | 機能概要 | ABENDコードを表示し、異常終了する。 | ※PGMタイプ:メイン、サブ ※PGMパターン:マッチング(1:1、1:N、N:1、M:N)、レイアウト編集のみ(GETPUT)、振り分け(IF文、EVALUATE文)、キーブレイク(集計、集約、集計・集約の以外)、DB更新 ### 使用方法 ``` CALL 'SUB03END' USING E01ABDPAR ``` ### 入出力パラメータ | COPY句 | ZANENDAC | |------------|----------| | NO | 入出力区分 | 名称 | 属性 | 桁数 | 説明 | |----|-----------|------|------|------|------| | 1 | I | E01ABDCOD | 9(3) | 3 | ABENDコード | ### リターンコード一覧 | NO | コード | 説明 | |----|--------|------| | 1 | - | ABENDするため復帰コードなし(STOP RUN実行) | --- ## 処理詳細 ``` 1.制御処理(0000MAINSOR) 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. ```