桐質問掲示板 [One Topic All View / Re[8]: 【追加質問】ヘッダを入れたい / Page: 0]

(現在過去ログ38 を表示中)

[ 最新記事及び返信フォームをトピックトップへ ]

■5897 / inTopicNo.1)

　レコード毎に別名でテキストの書き出し(NO2)

□投稿者/ 一太郎 -(2010/05/31(Mon) 18:56:53)

2010/05/31(Mon) 21:30:02 編集(投稿者)

下記は以前に、eo様からご教授頂いて解決しているのですが、一部改変を加えたい。
※eo様から作成して頂いたファイルを添付致します。
9行ずつ、別ファイル名をつけてテキストファイルを一括処理で作りたい。

ファイル名.TBL
項目名　番号　　　個数
　　　　　１　　　２
　　　　　２　　　２
　　　　　３　　　１　　　　　　　　　　　00001.TXT
　　　　　・　　　・
　　　　　・　　　・
　　　　　９　　　２
---------------------------------------
　　　　１０　　　１
　　　　１１　　　４　　　　　　　　　　　00002.TXT
　　　　１２　　　４
--------------------------------------------------------------------------

【今回の改変は以下となります。】

ファイル名.TBL
項目名　番号　個数　　　　　　　　　　　　　　　　　　　　　　　　アイテム名
　　　　　　１　　　２　　　　　　　　　　　　　　　　　　　　　　　　　トマト
　　　　　　２　　　２　　　　　　　　　　　　　　　　　　　　　　　　　キュウリ
　　　　　　３　　　１　　　　　　　　　　 00001.TXT　　　　　　　　　リンゴ　　　　　00002.TXT
　　　　　　・　　　・　　　　　　　　　　　　　　　　　　　　　　　　　　　・
　　　　　　・　　　・　　　　　　　　　　　　　　　　　　　　　　　　　　　・
　　　　　　９　　　２　　　　　　　　　　　　　　　　　　　　　　　　　ブドウ
---------------------------------------　　------------------------------------------------------------
　　　　　１０　　　１　　　　　　　　　　　　　　　　　　　　　　　キュウリ
　　　　　１１　　　４　　　　　　　　　　　00003.TXT　　　　　　　　トマト　　　　　00004.TXT
　　　　　１２　　　４　　　　　　　　　　　　　　　　　　　　　　　　にんじん
---------------------------------------　　　----------------------------------------------------------

TARO.zip/3KB

引用返信 [メール受信/OFF] 削除キー/

■5900 / inTopicNo.2)

　Re[1]: レコード毎に別名でテキストの書き出し(NO2)

▲▼■

□投稿者/ ひろ -(2010/06/01(Tue) 09:21:50)

一太郎さんこんにちは
> 9行ずつ、別ファイル名をつけてテキストファイルを一括処理で作りたい。
> 【今回の改変は以下となります。】
>
> ファイル名.TBL
> 項目名　番号　個数　　　　　　　　　　　　　　　　　　　　　　　　アイテム名
> 　　　　　　１　　　２　　　　　　　　　　　　　　　　　　　　　　　　　トマト
> 　　　　　　２　　　２　　　　　　　　　　　　　　　　　　　　　　　　　キュウリ
> 　　　　　　３　　　１　　　　　　　　　　 00001.TXT　　　　　　　　　リンゴ　　　　　00002.TXT
> 　　　　　　・　　　・　　　　　　　　　　　　　　　　　　　　　　　　　　　・
> 　　　　　　・　　　・　　　　　　　　　　　　　　　　　　　　　　　　　　　・
> 　　　　　　９　　　２　　　　　　　　　　　　　　　　　　　　　　　　　ブドウ
> ---------------------------------------　　------------------------------------------------------------
> 　　　　　１０　　　１　　　　　　　　　　　　　　　　　　　　　　　キュウリ
> 　　　　　１１　　　４　　　　　　　　　　　00003.TXT　　　　　　　　トマト　　　　　00004.TXT
> 　　　　　１２　　　４　　　　　　　　　　　　　　　　　　　　　　　　にんじん
> ---------------------------------------　　　----------------------------------------------------------

結論から言うと無理です。
なぜなら添付されたファイルの中にアイテム名（トマト、キュウリ・・・・）などのデータがどこにもありません。

引用返信 [メール受信/OFF] 削除キー/

■5901 / inTopicNo.3)

　Re[2]: レコード毎に別名でテキストの書き出し(NO2)

▲▼■

□投稿者/ 一太郎 -(2010/06/01(Tue) 11:35:16)

ひろさん

申し訳御座いませんでした。
アイテムを追加致しました。

■No5900に返信(ひろさんの記事)
> 一太郎さんこんにちは
>>9行ずつ、別ファイル名をつけてテキストファイルを一括処理で作りたい。
>>【今回の改変は以下となります。】
>>
>>ファイル名.TBL
>>項目名　番号　個数　　　　　　　　　　　　　　　　　　　　　　　　アイテム名
>>　　　　　　１　　　２　　　　　　　　　　　　　　　　　　　　　　　　　トマト
>>　　　　　　２　　　２　　　　　　　　　　　　　　　　　　　　　　　　　キュウリ
>>　　　　　　３　　　１　　　　　　　　　　 00001.TXT　　　　　　　　　リンゴ　　　　　00002.TXT
>>　　　　　　・　　　・　　　　　　　　　　　　　　　　　　　　　　　　　　　・
>>　　　　　　・　　　・　　　　　　　　　　　　　　　　　　　　　　　　　　　・
>>　　　　　　９　　　２　　　　　　　　　　　　　　　　　　　　　　　　　ブドウ
>>---------------------------------------　　------------------------------------------------------------
>>　　　　　１０　　　１　　　　　　　　　　　　　　　　　　　　　　　キュウリ
>>　　　　　１１　　　４　　　　　　　　　　　00003.TXT　　　　　　　　トマト　　　　　00004.TXT
>>　　　　　１２　　　４　　　　　　　　　　　　　　　　　　　　　　　　にんじん
>>---------------------------------------　　　----------------------------------------------------------
>
> 結論から言うと無理です。
> なぜなら添付されたファイルの中にアイテム名（トマト、キュウリ・・・・）などのデータがどこにもありません。

TARO.lzh/7KB

引用返信 [メール受信/OFF] 削除キー/

■5902 / inTopicNo.4)

　Re[1]: レコード毎に別名でテキストの書き出し(NO2)

▲▼■

□投稿者/ eo -(2010/06/01(Tue) 15:37:03)

2010/06/01(Tue) 15:41:43 編集(投稿者)

前の一括処理は、恐ろしいくらい駄作ですね^^;
こんなんでどうでしょう。

変数宣言　固有,文字列{&txt1,&txt2},数値{&txt,&i}
ファイル削除　"*.txt"
表　"ファイル名.tbl"
&txt=1
繰り返し　(.not #EOF)
　繰り返し　&i=1,9
　　&txt1=#文字列(&txt,5)
　　印字開始　&txt1,追加
　　　印字　[番号]
　　　印字　[個数]
　　印字終了
　　&txt2=#文字列(&txt+1,5)
　　印字開始　&txt2,追加
　　　印字　[アイテム]
　　印字終了
　　ジャンプ　行番号 = 次行
　　条件　(#EOF)　繰り返し中止
　繰り返し終了
&txt=&txt+2
繰り返し終了

xtaro.zip/8KB

引用返信 [メール受信/OFF] 削除キー/

■5906 / inTopicNo.5)

　【追加質問】ヘッダを入れたい

▲▼■

□投稿者/ 一太郎 -(2010/06/02(Wed) 16:44:44)

eoさま
いつもお世話になっております。
今回も回答して頂きましてありがとう御座いました。
思い通りに行きました。
ありがとう御座いました。

●追加質問
　ヘッダを２行入れたいのですがどの様になるのでしょうか。
　よろしくお願い致します。

■No5902に返信(eoさんの記事)
> 2010/06/01(Tue) 15:41:43 編集(投稿者)
>
> 前の一括処理は、恐ろしいくらい駄作ですね^^;
> こんなんでどうでしょう。
>
> 変数宣言　固有,文字列{&txt1,&txt2},数値{&txt,&i}
> ファイル削除　"*.txt"
> 表　"ファイル名.tbl"
> &txt=1
> 繰り返し　(.not #EOF)
> 　繰り返し　&i=1,9
> 　　&txt1=#文字列(&txt,5)
> 　　印字開始　&txt1,追加
> 　　　印字　[番号]
> 　　　印字　[個数]
> 　　印字終了
> 　　&txt2=#文字列(&txt+1,5)
> 　　印字開始　&txt2,追加
> 　　　印字　[アイテム]
> 　　印字終了
> 　　ジャンプ　行番号 = 次行
> 　　条件　(#EOF)　繰り返し中止
> 　繰り返し終了
> &txt=&txt+2
> 繰り返し終了
>

引用返信 [メール受信/OFF] 削除キー/

■5907 / inTopicNo.6)

　Re[3]: 【追加質問】ヘッダを入れたい

▲▼■

□投稿者/ eo -(2010/06/02(Wed) 19:47:17)

> ●追加質問
> 　ヘッダを２行入れたいのですがどの様になるのでしょうか。
> 　よろしくお願い致します。

ん？単純に印字二つ挿入で終わりです。
※桐ヘルプの印字コマンド参照

　　印字開始　&txt1,追加
　　　印字　"ヘッダ一行目"
　　　印字　"ヘッダ二行目"
　　　印字　[番号]
　　　印字　[個数]
　　印字終了
　　&txt2=#文字列(&txt+1,5)
　　印字開始　&txt2,追加
　　　印字　"ヘッダ一行目"
　　　印字　"ヘッダ二行目"
　　　印字　[アイテム]
　　印字終了

引用返信 [メール受信/OFF] 削除キー/

■5908 / inTopicNo.7)

　Re[4]: 【追加質問】ヘッダを入れたい

▲▼■

□投稿者/ 一太郎 -(2010/06/02(Wed) 20:36:11)

eoさま

質問がわかりづらくて申し訳ございませんでした。
下記のように、それぞれのtxtの1行目と2行目のみにヘッダを入れたいと思っております。
どうぞ、よろしくお願いいたします。

0001.txt
--------------------------------------------------------
”ヘッダ”
”ヘッダ”
1
18
2
14
3
8
・
・

0002.txt
-------------------------------------------------------
”ヘッダ”
”ヘッダ”
トマト
キュウリ
リンゴ
・
・

> 　　印字開始　&txt1,追加
> 　　　印字　"ヘッダ一行目"
> 　　　印字　"ヘッダ二行目"
> 　　　印字　[番号]
> 　　　印字　[個数]
> 　　印字終了
> 　　&txt2=#文字列(&txt+1,5)
> 　　印字開始　&txt2,追加
> 　　　印字　"ヘッダ一行目"
> 　　　印字　"ヘッダ二行目"
> 　　　印字　[アイテム]
> 　　印字終了
>
>

引用返信 [メール受信/OFF] 削除キー/

■5910 / inTopicNo.8)

　Re[5]: 【追加質問】ヘッダを入れたい

▲▼■

□投稿者/ eo -(2010/06/03(Thu) 05:09:29)

> 質問がわかりづらくて申し訳ございませんでした。
> 下記のように、それぞれのtxtの1行目と2行目のみにヘッダを入れたいと思っております。

質問の意味は理解できていました。
ファイルを添付します^^;

xxtaro.zip/12KB

引用返信 [メール受信/OFF] 削除キー/

■5911 / inTopicNo.9)

　Re[6]: 【追加質問】ヘッダを入れたい

▲▼■

□投稿者/ 一太郎 -(2010/06/03(Thu) 08:32:23)

eoさま
何度も申し訳ございません。
頂いたファイルでは下記のようにペッダが行毎にはいりますが、txtファイル毎に最初の２行だけにヘッダを入れたいと悩んでおります。
よろしくご教授お願い致します。

●頂いたファイル
0001.txt
--------------------------------------------------------
”ヘッダ”
”ヘッダ”
1
18
”ヘッダ”
”ヘッダ”
2
14
”ヘッダ”
”ヘッダ”
3
8
・
・

0002.txt
-------------------------------------------------------
”ヘッダ”
”ヘッダ”
トマト
”ヘッダ”
”ヘッダ”
キュウリ
”ヘッダ”
”ヘッダ”
リンゴ
・
・

●以下のようにしたい。
0001.txt
--------------------------------------------------------
”ヘッダ”
”ヘッダ”
1
18
2
14
3
8
・
・

0002.txt
-------------------------------------------------------
”ヘッダ”
”ヘッダ”
トマト
キュウリ
リンゴ
・
・

引用返信 [メール受信/OFF] 削除キー/

■5914 / inTopicNo.10)

　Re[7]: 【追加質問】ヘッダを入れたい

▲▼■

□投稿者/ eo -(2010/06/03(Thu) 12:06:20)

失礼いたしました^^;

変数宣言　固有,文字列{&txt1,&txt2},数値{&txt,&i}
ファイル削除　"*.txt"
表　"ファイル名.tbl"
&txt=1
繰り返し　(.not #EOF)
　繰り返し　&i=1,9
　　&txt1=#文字列(&txt,5)
　　ケース開始
　　　ケース　(&i=1)
　　　　印字開始　&txt1,追加
　　　　　印字
　　　　　印字
　　　　　印字　[番号]
　　　　　印字　[個数]
　　　　印字終了
　　　　&txt2=#文字列(&txt+1,5)
　　　　印字開始　&txt2,追加
　　　　　印字
　　　　　印字
　　　　　印字　[アイテム]
　　　　印字終了
　　　ケース　(&i>1)
　　　　印字開始　&txt1,追加
　　　　　印字　[番号]
　　　　　印字　[個数]
　　　　印字終了
　　　　&txt2=#文字列(&txt+1,5)
　　　　印字開始　&txt2,追加
　　　　　印字　[アイテム]
　　　　印字終了
　　ケース終了
　　ジャンプ　行番号 = 次行
　　条件　(#EOF)　繰り返し中止
　繰り返し終了
&txt=&txt+2
繰り返し終了

xxxtaro.zip/8KB

引用返信 [メール受信/OFF] 削除キー/

■5916 / inTopicNo.11)

　Re[8]: 【追加質問】ヘッダを入れたい

▲▼■

□投稿者/ 一太郎 -(2010/06/03(Thu) 13:57:42)

eoさま

ご教授ありがとう御座いました。
お陰様でシステムの構築に目処が付きました。
感謝しております。

> 変数宣言　固有,文字列{&txt1,&txt2},数値{&txt,&i}
> ファイル削除　"*.txt"
> 表　"ファイル名.tbl"
> &txt=1
> 繰り返し　(.not #EOF)
> 　繰り返し　&i=1,9
> 　　&txt1=#文字列(&txt,5)
> 　　ケース開始
> 　　　ケース　(&i=1)
> 　　　　印字開始　&txt1,追加
> 　　　　　印字
> 　　　　　印字
> 　　　　　印字　[番号]
> 　　　　　印字　[個数]
> 　　　　印字終了
> 　　　　&txt2=#文字列(&txt+1,5)
> 　　　　印字開始　&txt2,追加
> 　　　　　印字
> 　　　　　印字
> 　　　　　印字　[アイテム]
> 　　　　印字終了
> 　　　ケース　(&i>1)
> 　　　　印字開始　&txt1,追加
> 　　　　　印字　[番号]
> 　　　　　印字　[個数]
> 　　　　印字終了
> 　　　　&txt2=#文字列(&txt+1,5)
> 　　　　印字開始　&txt2,追加
> 　　　　　印字　[アイテム]
> 　　　　印字終了
> 　　ケース終了
> 　　ジャンプ　行番号 = 次行
> 　　条件　(#EOF)　繰り返し中止
> 　繰り返し終了
> &txt=&txt+2
> 繰り返し終了
>

解決済み!

引用返信 [メール受信/OFF] 削除キー/

トピック内ページ移動 / << 0 >>

このトピックに書きこむ

過去ログには書き込み不可

HOME HELP 新規作成新着記事トピック表示ファイル一覧検索過去ログ

- Child Tree -
- Antispam Version -