郵便番号の変換            作成 2006.4.14

 郵政公社のWEBから郵便番号をダウンロードして独自のデータベース用に加工した郵便番号テーブルをつくります
web から郵便番号をダウンロードする
下記がwebアドレスです。  http://www.post.japanpost.jp/zipcode/dl/oogaki.html
 
エクセルで全国一括.csvを開く
    ↓
 そのままエクセル形式で保存する
    ↓ 
 エクセルでもここまでは充分できます。これ以降が桐の得意とするところです。
桐で 全国.xls を開く
  ↓
桐で整形する

・郵便番号に「−」を入れる
・同道府県、市町村、字名をつなぐ
・項目名を変更する
・不要な項目を削除する

・保存する

 全国郵便番号テーブルができあがります   

 左記をプログラムで書くと下記のようになります。三重県版を作成した時のプログラムです。

* 郵便番号帳作成プログラム
*作成 2006.04.13

エクセル "24MIE.xls","24MIE",変換範囲=(A1,O2460),項目名行=しない,表名="三重郵便DW.tbl",上書き=する
編集表 "三重郵便DW.tbl"


表 "三重郵便DW.TBL"
置換 [F4]=#連結(#部分列(#文字列([F3]),1,3),"-",#部分列(#文字列([F3]),4,4))
置換 [F7]=#連結([F7],[F8],[F9])
置換 [F8]=#未定義,[F9]=#未定義

項目名変更 [F4]="郵便番号",[F7]="新表示"
項目属性変更 削除,[F1],削除,[F2],削除,[F3],削除,[F5],削除,[F6],削除,[F8],削除,[F9]
項目属性変更 削除,[F10],削除,[F11],削除,[F12],削除,[F13],削除,[F14],削除,[F15]
終了
 PR−indexへ