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