LXRPID88 システム日付取得変換（8桁）
|
サブルーチンID |
機能分類 |
サブルーチン名 |
テーブル名 |
|---|---|---|---|
|
LXRPID88 |
日付処理 |
LXRCID88 |
インタフェース
|
入力（区分：INPUT-PARM=I，CONSTANT=C） |
||||
|---|---|---|---|---|
|
レベル |
項目名 |
属性 |
説明および設定値 |
区分 |
|
− |
− |
− |
− |
− |
|
− |
− |
− |
− |
− |
|
− |
− |
− |
− |
− |
|
− |
− |
− |
− |
− |
|
− |
− |
− |
− |
− |
|
出力（区分：OUTPUT-PARM=O，RTN-CODE=R） |
||||
|---|---|---|---|---|
|
レベル |
項目名 |
属性 |
説明および設定値 |
区分 |
|
03 |
O-SYS-YMD |
− |
出力システム年月日（8桁） |
O |
|
05 |
O-SYS-YMD-YY |
9(4) |
出力システム年月日−年 |
O |
|
05 |
O-SYS-YMD-MM |
9(2) |
出力システム年月日−月 |
O |
|
05 |
O-SYS-YMD-DD |
9(2) |
出力システム年月日−日 |
O |
|
− |
− |
− |
− |
− |
処理基準
-
システム日付を取得する。
-
取得したシステム日付の「年」が92以上である場合，19を「年」の前方に付加し，O-SYS-YMD-YYに送る。
-
取得したシステム日付の「年」が92以上でない場合，20を「年」の前方に付加し，O-SYS-YMD-YYに送る。
-
システム日付の「月」，「日」をO-SYS-YMD-MM，O-SYS-YMD-DDにそれぞれ送る。
例1
ｼｽﾃﾑ日付 ：920101 ↓ O-SYS-YMD：19920101
例2
ｼｽﾃﾑ日付 ：010101 ↓ O-SYS-YMD：20010101
注意事項
-
本製品の01-07以降のバージョンでは，FUNCTION CURRENT-DATEを用いて直接8桁のシステム日付を取得する仕様の（システム日付取得変換（8桁）：LXRPID88）を別ライブラリで提供している。