Hitachi

SEWB+/標準サブルーチン ライブラリリファレンス


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:年号コード範囲外

処理基準

  1. 年号コード'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. 年号コードが'1','2','3','4'の場合はそのまま出力する。

  2. 年月日の妥当性は,チェックしない。

  3. 誤った年号コードが入力された場合,出力側の年号に'4',年月日はそのまま出力し,リターンコードに'LXRED014'を出力する。

  4. 年号情報を設定変更した場合の動作の変更点については,「3.4.21 LXRPID37 (年号コード変換(英字→数字))」を参照のこと。