FileMaker で郵便番号の処理

登録作業をしている最中、数字のみ7桁、ハイフン入り8桁などが混在している場合の処理方法。ハイフンもいろいろな書体があるため単品で置換していくのは大変なので数字を拾って一括処理

スクリプト
Let ( $No = Right ( "000" & GetAsNumber ( Self );7) ;

Left( $No ; 3 ) & "-" & Right ( $No ; 4 )
)

解説

GetAsNumber ( Self )で数字のみ引き出し

頭に000をつけることにより数字化した際に先頭の0が消えるのを防ぐ。

Rightで右から7文字をひろうと先ほどつけた消えた0も拾える。000で始まる郵便番号はないので00でも可能だが念のため。

Let関数にしてあとの文字の省略化をする

作った7桁に対してLeftで左から3文字、ハイフン、Rightで右から4文字拾ってハイフン入り8桁の郵便番号が完成。

ハイフン無しの場合はLet変数の内部だけ使えば7桁表記の郵便番号になる。