LXRPID38 年号コード変換（数字→英字）
|
サブルーチンID |
機能分類 |
サブルーチン名 |
テーブル名 |
|---|---|---|---|
|
LXRPID38 |
日付処理 |
LXRCID38 |
インタフェース
|
入力（区分：INPUT-PARM=I，CONSTANT=C） |
||||
|---|---|---|---|---|
|
レベル |
項目名 |
属性 |
説明および設定値 |
区分 |
|
03 |
I-YMDWA |
− |
年月日（和暦） |
I |
|
05 |
I-NNG |
X(1) |
年号 |
I |
|
− |
− |
− |
（1：明治，2：大正，3：昭和，4：平成） |
− |
|
05 |
I-YY |
9(2) |
年 |
I |
|
05 |
I-MM |
9(2) |
月 |
I |
|
05 |
I-DD |
9(2) |
日 |
I |
|
− |
− |
− |
− |
− |
|
出力（区分：OUTPUT-PARM=O，RTN-CODE=R） |
||||
|---|---|---|---|---|
|
レベル |
項目名 |
属性 |
説明および設定値 |
区分 |
|
03 |
O-YMDWA |
− |
年月日（和暦） |
O |
|
05 |
O-NNG |
X(1) |
年号 |
O |
|
− |
− |
− |
（M：明治，T：大正，S：昭和，H：平成） |
− |
|
05 |
O-YY |
9(2) |
年 |
O |
|
05 |
O-MM |
9(2) |
月 |
O |
|
05 |
O-DD |
9(2) |
日 |
O |
|
03 |
O-RTN-CD |
X(10) |
リターンコード |
R |
|
− |
− |
− |
SPACE：正常終了 |
− |
|
− |
− |
− |
LXRED014：年号コード範囲外 |
− |
処理基準
-
入力年号コード'1'，'2'，'3'，'4'に対し，'M'，'T'，'S'，'H'を出力する。
入力年号
出力年号
リターンコード
'1'
'2'
'3'
'4'
'M'
'T'
'S'
'H'
その他
'M'
'T'
'S'
'H'
'M'
'T'
'S'
'H'
'H'
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
SPACE
'LXRED014'
例1
I-YMDWA ：1150320 ↓ O-YMDWA ：M150320 O-RTN-CD：SPACE
例2
I-YMDWA ：0150320 ↓ O-YMDWA ：H150320 O-RTN-CD：'LXRED014'
注意事項
-
年号コードが'M'，'T'，'S'，'H'の場合はそのまま出力する。
-
年月日の妥当性は，チェックしない。
-
誤った年号コードが入力された場合，O-NNGには'H'，年月日はそのまま出力し，リターンコードに'LXRED014'を出力する。
-
年号情報を設定変更した場合の動作の変更点については，「3.4.22 LXRPID38 （年号コード変換（数字→英字））」を参照のこと。