| 編集表 "取引管理.tbl"
絞り込み [投入年月]{=*&STR*}
if( .not&選択件数 )
確認 "該当するデータがありませんでした。"
解除 *
else
表 "予定.tbl"
読み込み 表 "取引管理.tbl", {[コード], [注文年月日], [配送年月], [会社名], [管理担当], [地区]}
編集表 "取引管理.tbl"
解除 *
&STR= #未定義
編集表 "予定.tbl"
並べ替え {[会社名]昇順,[種別]昇順}
転置集計 {[会社名]},[種別],[種別],集計種別=件数
/* 行集計 総計{[会社名]"合計", [件数]#合計} */ 行集計で求めてもいいかも
項目集計 [件数]
&時 = #table /* 転置集計表の表番号を取得する */
if( #表オープン状態( "当月予定集計.tbl" , 1 ) )
編集表 "当月予定集計.tbl"
行削除 * , 圧縮
読み込み 表 , &時
else
ウィンドウ作成 "予定.wfm" , 編集表=開く
行削除 *,圧縮
読み込み 表 , &時
end
書き出し 表 "当月予定集計.tbl" 確認 完了"
end
とつくりましたが ウィンドウ作成 "予定.wfm" , 編集表=開く
のところでエラーがでます
何回かいじってみたのですが わかりません
if文を抜かしてやると 当月予定集計.tblはすでにオープンしています と表示されます
どうしたらいいのでしょうか
予定.wfmは 実際絞り込む年月を入れて コマンドボタンをおして処理実行をするサブメニュー画面です
これでいいでしょうか?教えてください
|