qiuqiuqiu
b3e800e601
- 全6プログラム（ZAN01CHK～ZAN06UPD）ソース・実行ファイル - 5サブプログラム（SUB01DAT～SUB05TIM）ソース・DLL - 10 COPY書式ファイル - 詳細設計書12ファイル - サブシステムB全体設計書 - bin/配下の実行ファイル资産
53 lines
1.4 KiB
Markdown
53 lines
1.4 KiB
Markdown
# 詳細設計書
|
||
|
||
## 基本情報
|
||
|
||
| # | 項目 | 内容 |
|
||
|---|------|------|
|
||
| 1 | システム名 | 残業統計管理システム |
|
||
| 2 | プログラムID | SUB01DAT |
|
||
| 3 | プログラム名 | 運用日付取得サブ |
|
||
| 4 | PGMタイプ | サブ |
|
||
| 5 | PGMパターン | - |
|
||
| 6 | 機能概要 | 現在日付を取得し、運用日付(YYYYMMDD)として返す |
|
||
|
||
※PGMタイプ：メイン、サブ
|
||
※PGMパターン：マッチング(1:1、1:N、N:1、M:N)、レイアウト編集のみ(GETPUT)、振り分け(IF文、EVALUATE文)、キーブレイク(集計、集約、集計・集約の以外)、DB更新
|
||
|
||
### 使用方法
|
||
|
||
```
|
||
CALL 'SUB01DAT' USING D01UBSPAR
|
||
```
|
||
|
||
### 入出力パラメータ
|
||
|
||
| ＣＯＰＹ句 | ZANDATAC |
|
||
|------------|----------|
|
||
|
||
| NO | 入出力区分 | 名称 | 属性 | 桁数 | 説明 |
|
||
|----|-----------|------|------|------|------|
|
||
| 1 | O | D01FKICOD | S9(4) COMP | 4 | 復帰コード(0000:正常) |
|
||
| 2 | O | D01UBSUDATE | 9(8) | 8 | 運用日付(YYYYMMDD) |
|
||
|
||
### リターンコード一覧
|
||
|
||
| NO | コード | 説明 |
|
||
|----|--------|------|
|
||
| 1 | 0000 | 正常終了 |
|
||
|
||
---
|
||
|
||
## 処理詳細
|
||
|
||
```
|
||
1.制御処理（0000MAINSOR）
|
||
1-1.現在日時を取得する。
|
||
MOVE FUNCTION CURRENT-DATE TO WRK-SYS-DATE.
|
||
1-2.YYYYMMDD部分を抽出する。
|
||
MOVE WRK-SYS-DATE(1:8) TO D01UBSUDATE.
|
||
1-3.正常終了
|
||
MOVE ZERO TO D01FKICOD.
|
||
1-4.復帰(GOBACK)。
|
||
```
|