過去の桐井戸端BBS (桐ver.9)
28003 封筒の宛名印刷をする一括処理で「未定義の項目名があります」というエラーが出る とまと 2004/10/21-14:28
とまとです。いつもお世話になっています。桐9-2004です。

封筒の宛名印刷で、宛名の氏名の横に同封する資料の記号を併記するためのプログラムで、実行中に次のエラーが出ます。
「未定義の項目名があります 詳細[グループ]」

長くなりますが、よろしくお願いします。
手続き定義開始 封筒宛名印刷()
 代入 &処理=0
 表 資料発送
   解除 *
   行削除 *
   表整理 余白割合=10
 編集表 資料請求発送今回
   解除 *
   並べ替え {[郵便番号]昇順,[住所]昇順,[生年月日]昇順,[事業番号]
      昇順}
   置換 終了状態=&終了,[グループ]=#グループ([住所],[氏名])
   書き出し 表,"資料発送work.tbl",終了状態=&終了,{[事業年度], 
        [事業番号],[グループ],[氏名],[個人識別作業]}
   絞り込み 単一化={[グループ]}
   書き出し 表,"資料発送work2.tbl",終了状態=&終了,{[郵便番号],
        [住所],[氏名],[グループ],[個人識別作業]}
    解除 *
 表 資料発送work
   解除 *
置換 終了状態=&終了,[事業年度]=#連番
   項目集計 [グループ]
   &回数=&最大値      /* 変数には値が入っている */
   繰り返し &グループ=1,&回数
     絞り込み [グループ]{&グループ}/* エラー 未定義の項目名
         があります */
     &個人識別作業=[個人識別作業]
     書き出し 転置,"資料発送work3.tbl",データ型=文字列,   
       {[事業年度],[事業番号]}
     絞り込み解除
    表 資料発送work3
項目名変更 [事業年度]="個人識別作業"
      置換 終了状態=&終了,[個人識別作業]=&個人識別作業
      終了 表 編集対象表
    編集表 資料発送
      ジャンプ 行番号=終端
      読み込み 表,"資料発送work3.tbl",編集表=しない,終了  
        状態=&終了, *
   繰り返し終了
   終了 表 編集対象表
  編集表 資料発送
   併合 "資料発送work2.tbl",置換,編集表=しない,{[個人識別作業]
       照合,[氏名]複写,[郵便番号]複写,[住所]複写} 
   レポート印刷 "封筒宛名.rpt" プレビュー=する
   終了 表 編集対象表
  代入 &処理=1
手続き定義終了

編集対象表には[グループ]はあります。どこが原因なのかわかりません。
拙いプログラムですが、よろしくお願いします。

28004 Re:未定義の項目名があります 悲しげ 2004/10/21-15:14
記事番号28003へのコメント
TTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTT
a 表 資料発送work
 解除 *
 置換 終了状態=&終了,[事業年度]=#連番
 項目集計 [グループ]
 &回数=&最大値      /* 変数には値が入っている */
 繰り返し &グループ=1,&回数
b  絞り込み [グループ]{&グループ}/* エラー 未定義の項目名・・・
  &個人識別作業=[個人識別作業]
  書き出し 転置,"資料発送work3.tbl",データ型=文字列,・・・
  絞り込み解除
  表 資料発送work3
  項目名変更 [事業年度]="個人識別作業"
  置換 終了状態=&終了,[個人識別作業]=&個人識別作業
  終了 表 編集対象表
c  編集表 資料発送
  ジャンプ 行番号=終端
  読み込み 表,"資料発送work3.tbl",編集表=しない,・・・
 繰り返し終了
LLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLLL

aの時点で編集表は「資料発送work.tbl」、これをbの時点まで引きずっていますから、
b時点の編集表も「資料発送work.tbl」です。
が、cの時点で編集表が「資料発送.tbl」に変わっており、
繰り返しループでbの時点に戻った時の編集表も「資料発送.tbl」と云うことになります。
もし「資料発送.tbl」に項目[グループ]が無いのだとすれば、
この繰り返し2回目でエラーが出るのは当然と云うことになります。
いずれにせよ、繰り返しの1回目と2回目以降で編集表が変わるのは正しくないので、
bの時点では、例えば次のように編集表を固定させる記述をするべきでしょう。

 繰り返し &グループ=1,&回数
  編集表 "資料発送work.tbl"
  絞り込み [グループ]{&グループ}
  &個人識別作業=[個人識別作業]
  ・・・・

28005 Re:未定義の項目名があります とまと 2004/10/21-20:52
記事番号28004へのコメント
悲しげさん、ありがとうございます。

>いずれにせよ、繰り返しの1回目と2回目以降で編集表が変わる
>のは正しくないので、bの時点では、例えば次のように編集表を
>固定させる記述をするべきでしょう。
>
> 繰り返し &グループ=1,&回数
>  編集表 "資料発送work.tbl"
>  絞り込み [グループ]{&グループ}
>  &個人識別作業=[個人識別作業]
>  ・・・・
>
お陰さまで「レポート印刷」まで辿り着くことができました。レポート印刷の結果、
別の不具合がみつかりましたが、それは自分で解決することができました。

今後ともよろしくお願いします。

戻る