| 大体こんな感じでどうでしょう？動かしてないから間違いがあるかも^^;
変数宣言 固有,文字列{&ファイル名,&検索ファイル},数値{&ファイル数=1}
＊ csvの保存フォルダはc:\csvとしました。
&検索ファイル="c:\csv\*.csv"
繰り返し
&ファイル名=#ファイル名(#ファイル検索(&検索ファイル,&ファイル数),2)
ケース開始
ケース (&ファイル名<>"")
表 "製造単価出力読込.tbl",モード=専有
書き出し条件登録 枠組み,条件名="","＊製造単価出力作業.tbl"
書き出し 枠組み,条件名=""
表 "＊製造単価出力作業.tbl",モード=専有
読み込み条件登録 ＣＳＶ,条件名="",&ファイル名,項目名=する,ファイル名変更=しない,{[工場],[品目手順ﾘﾋﾞｼﾞｮﾝ],[工程順序ID],[指数],[基準単価],[工場単価],[標準単価],[単価切替日],[切替基準単価],[品目番号],[単価設定区分],[工事番号],[工事名称],[管理番号],[区分3],[品名],[記号],[備考],[ﾜｰｸｾﾝﾀ],[ﾜｰｸｾﾝﾀ名称],[標準単価_21],[出荷分割NO],[出荷分割No名称],[重量],[体積],[面積],[製造単価出力区分],[処理対象日],[出力日],[出力担当者],[ｺﾝﾄﾛｰﾙｾﾝﾀ],[ｺﾝﾄﾛｰﾙｾﾝﾀ名称],[手順ｸﾞﾙｰﾌﾟ],[手順ｸﾞﾙｰﾌﾟ名称],[計量単位],[工程順序],[工程ｺｰﾄﾞ],[工程名称],[製造時間],[ST],[製造単価出力番号],[製造単価出力明細番号],[登録者],[登録日],[更新者],[更新日],[算出切替単価],[算出切替副資材],[算出切替消耗品],[算出切替小計],[改訂指数],[改訂備考],[フアイル名]}
読み込み ＣＳＶ,条件名=""
書き出し 表,&ファイル名,*
ケース (&ファイル名="")
繰り返し中止
ケース終了
代入 &ファイル数=&ファイル数+1
繰り返し終了
|
