Files
cobol-tna-system/詳細設計書/詳細設計書_SUB03END.md
qiuqiuqiu b3e800e601 feat: サブシステムB 残業統計管理 初回production反映
- 全6プログラム(ZAN01CHK~ZAN06UPD)ソース・実行ファイル
- 5サブプログラム(SUB01DAT~SUB05TIM)ソース・DLL
- 10 COPY書式ファイル
- 詳細設計書12ファイル
- サブシステムB全体設計書
- bin/配下の実行ファイル资産
2026-06-17 23:20:53 +08:00

52 lines
1.3 KiB
Markdown
Raw Permalink Blame History

This file contains ambiguous Unicode characters
This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
# 詳細設計書
## 基本情報
| # | 項目 | 内容 |
|---|------|------|
| 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.
```