Hitachi

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


LXRPID70 年(西暦)チェック

サブルーチンID

機能分類

サブルーチン名

テーブル名

LXRPID70

日付処理

年(西暦)チェック

LXRCID70

〈このページの構成〉

インタフェース

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

レベル

項目名

属性

説明および設定値

区分

03

I-YY

9(4)

年(西暦)

I

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

レベル

項目名

属性

説明および設定値

区分

03

O-RTN-CD

X(10)

リターンコード

R

処理基準

  1. 年(西暦)のチェックを次のように行う。

    No.

    チェック

    リターンコード

    1

    2

    年が数字だけである

    年≠ZERO

    LXRED017

    LXRED001

例1

 I-YY    :QQQQ
 ↓
 O-RTN-CD:'LXRED017'

例2

 I-YY    :0000
 ↓
 O-RTN-CD:'LXRED001'

例3

 I-YY    :1999
 ↓
 O-RTN-CD:SPACE

注意事項

なし。