| >何らかの方法で実現できそうです。
Quinoさんこんにちは計算項目での住所の分割の例です。
#計算(#代入(&置換式,#trim([住所],3)),
#代入(&比較式,#sstr(&置換式,1,4)),
#代入(&STR,#S(#S(#S(#S(#cond(
#文字位置(&比較式,"諸県")>1,&比較式,
#文字位置(&比較式,"県")>2,#sstr(&比較式,#文字位置(&置換式,"県")+1),
1,&比較式)
,"東京都",""),"北海道",""),"京都府",""),"大阪府","")
+#sstr(&置換式,5)),
#代入(&比較式,#S(&置換式,&STR,"")),
#代入(&時刻,#cond(
#sstr(&STR,1,4)="大和郡山" .or
#sstr(&STR,1,4)="八日市場" .or
#sstr(&STR,1,4)="小笠原諸",
#sstr(&STR,1,5),
#文字位置(&STR,"日市市")>0,
#sstr(&STR,1,4),
#sstr(&STR,1,3)="蒲郡市" .or
#sstr(&STR,1,3)="今市市" .or
#sstr(&STR,1,3)="小郡市" .or
#sstr(&STR,1,3)="余市郡" .or
#sstr(&STR,1,3)="高市郡" .or
#sstr(&STR,1,3)="青ケ島" .or
#sstr(&STR,1,3)="八丈島" .or
#sstr(&STR,1,3)="御蔵島" .or
#sstr(&STR,1,3)="三宅島" .or
#sstr(&STR,1,3)="神津島", #sstr(&STR,1,3),
#sstr(&STR,1,2)="新島" .or
#sstr(&STR,1,2)="利島" .or
#sstr(&STR,1,3)="大島大",
#sstr(&STR,1,2),
1,
#SSTR(&STR,1,#小(
#文字位置(#sstr(&STR,2)+"区市郡","区"),
#文字位置(#sstr(&STR,2)+"区市郡","市"),
#文字位置(#sstr(&STR,2)+"区市郡","郡"))+1))),
#代入(&STR,
#sstr(&STR,#nvl(#L(&時刻),0)+1)),
#代入(&年月日,#cond(
#last(&時刻,1)="区","",
&時刻="札幌市" .or
&時刻="仙台市" .or
&時刻="さいたま市" .or
&時刻="千葉市" .or
&時刻="川崎市" .or
&時刻="横浜市" .or
&時刻="静岡市" .or
&時刻="名古屋市" .or
&時刻="大阪市" .or
&時刻="京都市" .or
&時刻="神戸市" .or
&時刻="広島市" .or
&時刻="北九州市" .or
&時刻="福岡市",
#SSTR(&STR,1,#文字位置(&STR,"区")),
#last(&時刻,1)="市","",
.not (
#last(&時刻,1)="島" .or
#last(&時刻,1)="郡"),
"区市間違",
#sstr(&STR,1,3)="玉村町" .or
#sstr(&STR,1,3)="岩村町" .or
#sstr(&STR,1,3)="野村町" .or
#sstr(&STR,1,3)="羽村町" .or
#sstr(&STR,1,3)="大町町",
#sstr(&STR,1,3),
1,
#SSTR(&STR,1,#小(
#文字位置(#sstr(&STR,2)+"町村","町"),
#文字位置(#sstr(&STR,2)+"町村","村"))+1))),
#代入(&STR,#cond(
&年月日="区市間違",&置換式,
(#last(&時刻,1)="島"
.or #last(&時刻,1)="郡")
.and #大(#文字位置(&年月日,"村")
,#文字位置(&年月日,"町"))<1,&置換式,
#L(&年月日)>0,#sstr(&STR,#L(&年月日)+1),
1,&STR)),
/*上記の変数&STRを表定義ですぐ次の項目の
項目計算式に設定すると住所が分割できます*/
#cond(&年月日="区市間違","区市間違",
(#last(&時刻,1)="島" .or
#last(&時刻,1)="郡") .and
#大(#文字位置(&年月日,"村"),
#文字位置(&年月日,"町"))<1,
"島や郡には町か村が必要",
&時刻="" .and &年月日<>"",
"市区郡島が抜けています",
1,
&比較式/*県名*/
+&時刻/*区市郡島*/
+&年月日/*町村*/
))
|