Hitachi

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


LXRPID24 年月日出力編集(和暦)

サブルーチンID

機能分類

サブルーチン名

テーブル名

LXRPID24

日付処理

年月日出力編集(和暦)

LXRCID24

〈このページの構成〉

インタフェース

入力(区分:INPUT-PARM=I,CONSTANT=C)

レベル

項目名

属性

説明および設定値

区分

03

I-YMDWA

年月日(和暦)

I

05

I-NNG

X(1)

年号

I

(1:明治,2:大正,3:昭和,4:平成)or

(M:明治,T:大正,S:昭和,H:平成)

05

I-YY

9(2)

I

05

I-MM

9(2)

I

05

I-DD

9(2)

I

03

I-FORMAT

X(100)

出力形式指定のフォーマット

C

出力(区分:OUTPUT-PARM=O,RTN-CODE=R)

レベル

項目名

属性

説明および設定値

区分

03

O-YMDWA

X(100)

出力年月日(和暦)

O

(M:明治,T:大正,S:昭和,H:平成)

03

O-RTN-CD

X(10)

リターンコード

R

処理基準

  1. 入力年月日のチェックを(実在日チェック(和暦):LXRPID02)を用いて行い,エラーの場合はリターンコードを返す。

  2. リターンコードがスペースのとき,I-FORMATに対して次の順で置換処理を行う。

    No.

    置換規則

    1

    2

    3

    4

    5

    6

    7

    8

    9

    10

    11

    12

    13

    14

    15

    NN

    YY

    ZY

    MM

    ZM

    DD

    ZD

    N

    YY

    ZY

    MM

    ZM

    DD

    ZD

    I-NNGを全角変換

    I-NNG上一桁を全角変換

    I-YYを全角変換

    I-YYをZ9編集,全角変換

    I-MMを全角変換

    I-MMをZ9編集,全角変換

    I-DDを全角変換

    I-DDをZ9編集,全角変換

    I-NNG

    I-YY

    I-YYをZ9編集

    I-MM

    I-MMをZ9編集

    I-DD

    I-DDをZ9編集

例1

 I-YMDWA :4040401
 I-FORMAT:'NNYY年MM月DD日'
 ↓
 O-YMDWA :'平成04年04月01日'

例2

 I-YMDWA :4040401
 I-FORMAT:'NYY.MM.DD'
 ↓
 O-YMDWA :'H04.04.01'

注意事項

  1. このサブルーチンから(実在日チェック(和暦):LXRPID02),(年号コードチェック/編集:LXRPID36),(半角→全角変換:LXRPIC01),(年号コード変換(数字→英字):LXRPID38)を呼び出す。

  2. 実在日チェックでエラーのときは,リターンコードをそのまま返し,I-FORMATをO-YMDWAに転送する。

  3. 年号情報を設定変更した場合の動作の変更点については,「3.4.14 LXRPID24 (年月日出力編集(和暦))」を参照のこと。