| ■No10608に返信(一太郎さんの記事) こういう場合は印字コマンドを使うとシンプルにできます。
表 "住所a(変換前).TBX" 印字開始 "$$$.txt",制御文字展開=しない,終了状態=&実行リターン 繰り返し( .not #eof) 条件([項目A]="address") 印字 /*項目値が「address」なら手前で改行する→※*/ 印字 [項目A],"ζ", /*区切り文字「ζ」でテキスト出力、末尾に「,」なら改行しない*/ ジャンプ 行番号=次行 繰り返し終了 印字終了 終了 表 編集対象表 表 "住所b(変換後).TBX" /*項目は[項目A]〜[項目Z]まで随意*/ ジャンプ 行番号=終端 /*前回のデータがあれば末尾に読み込む*/ 読み込み テキスト, "$$$.txt", 区切り="ζ",終了状態=&実行リターン,* ****↓上記※で改行のみの空行を作ってしまったのでそれを削除する 絞り込み [項目A]="" /*とにかく先頭項目*/ 条件(&選択件数>0) 行削除 終了状態=&実行リターン 絞り込み解除 1
|