Files
cobol-tna-system/詳細設計書/詳細設計書_SUB02MSG.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

2.2 KiB
Raw Permalink Blame History

詳細設計書

基本情報

# 項目 内容
1 システム名 残業統計管理システム
2 プログラムID SUB02MSG
3 プログラム名 メッセージ編集出力サブ
4 PGMタイプ サブ
5 PGMパターン -
6 機能概要 メッセージ番号とパラメータを編集し、標準出力へ出力する。

※PGMタイプ:メイン、サブ ※PGMパターン:マッチング(1:1、1:N、N:1、M:N)、レイアウト編集のみ(GETPUT)、振り分け(IF文、EVALUATE文)、キーブレイク(集計、集約、集計・集約の以外)、DB更新

使用方法

  CALL 'SUB02MSG' USING  M00MHOPAR

入出力パラメータ

COPY句 ZANMSGAC
NO 入出力区分 名称 属性 桁数 説明
1 I M00MSGCOD 9(3) 3 メッセージ番号
2 I M00UMKDATS22-01 X(30) 30 パラメータ1
3 I M00UMKDATS22-02 X(30) 30 パラメータ2
4 I M00UMKDATS22-03 X(30) 30 パラメータ3
5 I M00UMKDATS22-04 X(30) 30 パラメータ4
6 I M00UMKDATS22-05 X(30) 30 パラメータ5
7 I M00UMKDATS22-06 X(30) 30 パラメータ6
8 I M00UMKDATS22-07 X(30) 30 パラメータ7
9 I M00UMKDATS22-08 X(30) 30 パラメータ8
10 I M00UMKDATS22-09 X(30) 30 パラメータ9
11 I M00UMKDATS22-10 X(30) 30 パラメータ10

リターンコード一覧

NO コード 説明
1 - 復帰コードなし(GOBACKで復帰)

処理詳細

1.制御処理(0000MAINSOR
  1-1.メッセージ行(WRK-MSG-LINE)を編集する。
    STRING 'MSG['
           M00MSGCOD
           '] P1='
           M00UMKDATS22-01
           ' P2='
           M00UMKDATS22-02
           ' P3='
           M00UMKDATS22-03
           ' P4='
           M00UMKDATS22-04
           ' P5='
           M00UMKDATS22-05
           INTO WRK-MSG-LINE
    END-STRING.
  1-2.標準出力へ出力する。
    DISPLAY WRK-MSG-LINE.
  1-3.復帰(GOBACK)。