LXRPIF15 氏名(漢字)分離編集(含外字)
サブルーチンID |
機能分類 |
サブルーチン名 |
テーブル名 |
---|---|---|---|
LXRPIF15 |
項目処理 |
LXRCIF15 |
インタフェース
入力(区分: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:正常 |
− |
− |
− |
− |
LXREB006:全角文字(含外字)コード以外あり |
− |
− |
− |
− |
LXREF001:スペースが間にない |
− |
− |
− |
− |
LXREF002:スペースが2か所以上ある |
− |
− |
− |
− |
LXREF005:すべてがスペースである |
− |
− |
− |
− |
− |
− |
処理基準
-
I-SHMKJを(氏名(漢字)チェック(含外字):LXRPIF14)を呼び出しチェックする。
-
リターンコードがスペースのとき,氏名(漢字)の分離編集をする。
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),(氏名(漢字)チェック(含外字):LXRPIF14)を呼び出す。
-
エラーの場合はリターンコードをそのまま返し,氏(漢字),名(漢字)にはスペースを返す。