LXRPIF03 氏名(漢字)分離編集
サブルーチンID |
機能分類 |
サブルーチン名 |
テーブル名 |
---|---|---|---|
LXRPIF03 |
項目処理 |
LXRCIF03 |
インタフェース
入力(区分:INPUT-PARM=I,CONSTANT=C) |
||||
---|---|---|---|---|
レベル |
項目名 |
属性 |
説明および設定値 |
区分 |
03 |
I-SHMKJ |
N(10) |
氏名(漢字) |
I |
03 |
I-SHR-KBN |
X(1) |
処理区分 |
C |
− |
− |
− |
'1':空白を全角空白にする |
− |
− |
− |
− |
その他:空白を半角空白にする |
− |
− |
− |
− |
− |
− |
出力(区分:OUTPUT-PARM=O,RTN-CODE=R) |
||||
---|---|---|---|---|
レベル |
項目名 |
属性 |
説明および設定値 |
区分 |
03 |
O-SHKJ |
N(10) |
氏(漢字) |
O |
03 |
O-NMKJ |
N(10) |
名(漢字) |
O |
03 |
O-RTN-CD |
X(10) |
リターンコード |
R |
− |
− |
− |
SPACE:正常 |
− |
− |
− |
− |
LXREB001:全角文字コード以外あり |
− |
− |
− |
− |
LXREF001:スペースが間にない |
− |
− |
− |
− |
LXREF002:スペースが2個所以上ある |
− |
− |
− |
− |
LXREF005:すべてがスペースである |
− |
処理基準
-
I-SHMKJを(氏名(漢字)チェック:LXRPIF01)を呼び,チェックする。
-
リターンコードがスペースのとき,氏名(漢字)の分離編集をする。
2.1 氏名(漢字)を氏(漢字)と名(漢字)に分離する。スペースで区切られた前半をO-SHKJ,後半
をO-NMKJに転記する。
注
・氏名(漢字)のスペースは全角1個,半角2個のどちらでも可。
・氏名(漢字)の左端のスペースは,左詰めする(氏と名の区切りとは見なさない)。
・氏(漢字),名(漢字)のスペースの種類は処理区分に従う。
例1
I-SHMKJ :'△山田△太郎 I-SHR-KBN:SPACE ↓ O-SHKJ :'山田' O-NMKJ :'太郎' O-RTN-CD :SPACE
注意事項
-
このサブルーチンから(全角空白→半角空白置換:LXRPIB13),(半角空白→全角空白置換:LXRPIB14),(氏名(漢字)チェック:LXRPIF01)を呼び出す。
-
サブルーチンでエラーとなった場合はリターンコードをそのまま返し,氏(漢字),名(漢字)にはスペースを返す。