qiuqiuqiu
5 lines
197 B
COBOL
5 lines
197 B
COBOL
* SUB01DAT 運用日付取得用連絡領域
|
|
01 D01UBSPAR.
|
|
03 D01FKICOD PIC S9(004) COMP.
|
|
03 D01UBSUDATE PIC 9(008).
|