過去の桐井戸端ＢＢＳ　（桐ver.９）
23214 タックシール印刷で１枚目を請求書(控)、２枚目を請求書にしたい 田中 2003/11/06-09:34
桐Ver9を使用しています。
納品・売上伝票とは別に、１ヶ月に１回、得意先に合計請求書を発行します。
Ａ４に縦３分割のタックシールで、繰り返し印刷数２として、印刷します。
繰り返し印刷のタイトルを
　　　　１枚目はを請求書(控)
　　　　２枚目は請求書
としたいのですが、タックシール印刷で、できるものなのかどうかも含めてわかりません。
よろしくお願いします。

23215 Re:タックシール印刷で１枚目を請求書(控)、２枚目を請求書にしたい 幅田 2003/11/06-11:30
記事番号23214へのコメント
田中さん
こんにちは。

>Ａ４に縦３分割のタックシールで、繰り返し印刷数２として、印刷します。
>繰り返し印刷のタイトルを
>　　　　１枚目はを請求書(控)
>　　　　２枚目は請求書
>としたい

いまいちよくわからないところがあるのですが、
繰り返し印刷数２はタイルオブジェクトの「タイル」タブで設定しておられるのですよね。
（印刷ダイアログの中ではありませんよね）

>　　　　１枚目はを請求書(控)
>　　　　２枚目は請求書
これは、Ａ４の用紙の１枚目、２枚目という意味ではなく、
タックシールの１枚目、２枚目という意味ですよね。

であれば、縦３分割だとすると、
Ａ４の１枚目には、
１レコード目の請求書
１レコード目の請求書（控）
２レコード目の請求書

Ａ４の２枚目には、
２レコード目の請求書（控）
３レコード目の請求書
３レコード目の請求書（控）

と印字されることになりますが、これであっているでしょうか。

ということであれば、次のようにすれば実現可能かと思います。


ある、テキストオブジェクトに

＃代入（&合計値,＆合計値+1）

というものを設定し、文字色を「白」にして、印字されないようにする。

印字するタイトル部分に、テキストオブジェクトで

＃条件選択（#MOD(＆合計値,2)=1,"請求書",1,"請求書（控）"）

と設定します。

印刷するときは、メニューバーのツール→変数管理で
＆合計値の値を　０　にしてから始めて下さい。

（別に０にしなくても、最初が奇数の場合は、請求書と控が、逆の
順番で印字されるだけです。）

＃頁番号などの関数では、繰り返しを設定しても、同じ数値になるので
１枚目、２枚目などの判断には使えないので、

シールを１枚印刷するたびに＆合計値という変数に、１を加えていって、
その＆合計値が、奇数の時は「請求書」、偶数の時は「控え」を
印刷するというわけです。

なお、組み込み変数の＆合計値を使いましたが、数値系の関数であれば、
別にほかのものでもかまいません。

23216 Re:タックシール印刷で１枚目を請求書(控)、２枚目を請求書にしたい アックン 2003/11/06-11:37
記事番号23214へのコメント
田中さん、こんにちは。
>繰り返し印刷のタイトルを
この「タイトル」の意味がわからないのですが、タイルに配置したテキストオブジェクトの文字と仮定して、
こんなふうに印刷したいのでしょうか(？)。

（タックシール１頁目）
請求書(控)
(株)○○様

請求書
(株)○○様

請求書(控)
(株)△△様

（タックシール２頁目）
請求書
(株)△△様

請求書(控)
(株)□□様

請求書
(株)□□様

これでよければ、下の式をひとつにつないで、テキストオブジェクトのソースにしてください。

#progn( #cond(#明細連番=1 .and&STR="請求書" , #set(秒,0) ) ,
#cond( &秒=0 , #progn( #set(秒,&秒+1) , #set(STR,"請求書(控)") ) ,
&秒=1 , #progn( #set(秒,0) , #set(STR,"請求書") ) ) )

冗長な式ですが、もし一括処理かイベントを使える場面なら、
タックシール印刷のコマンドを発行する直前に、
　　&秒 = 0　　としておけば、以下のように少し短くでき、かつ処理が確実になります。
#progn(#cond( &秒=0 , #progn( #set(秒,&秒+1) , #set(STR,"請求書(控)") ) ,
&秒=1 , #progn( #set(秒,0) , #set(STR,"請求書") ) ) )


23217 Re:タックシール印刷で１枚目を請求書(控)、２枚目を請求書にしたい アックン 2003/11/06-11:48
記事番号23216へのコメント
先ほどの
#progn( #cond(#明細連番=1 .and&STR="請求書" , #set(秒,0) ) ,
ここは
#progn( #cond(#明細連番=1 .and.not&STR="請求書(控)" ,#set(秒,0) ) ,
とした方がいいようです。
ここはいったいなにやってるのかと言いますと、最初に組み込み変数 &秒 の値を 0 にしているだけです。
ですから、幅田さんの回答にあるように、変数管理であらかじめ設定しておくか、
あるいは一括かイベントで &秒 = 0 とするのと同じです。
23218 Re:タックシール印刷で１枚目を請求書(控)、２枚目を請求書にしたい うにん 2003/11/06-11:51
記事番号23216へのコメント

>　　&秒 = 0　　としておけば、以下のように少し短くでき、かつ処理が確実に
>なります。
>#progn(
>#cond( &秒=0 , #progn( #set(秒,&秒+1) , #set(STR,"請求書(控)") ) ,
>&秒=1 , #progn( #set(秒,0) , #set(STR,"請求書") ) ) )

#cond( &秒=0 , #progn( #set(秒,1) , "請求書(控)") ,
&秒=1 , #progn( #set(秒,0) , "請求書") )

でいいんじゃないでしょうか。

23219 Re:タックシール印刷で１枚目を請求書(控)、２枚目を請求書にしたい アックン 2003/11/06-12:00
記事番号23218へのコメント
うにんさん、フォローどうも。
>でいいんじゃないでしょうか。
そのとおりでごじゃります〜。(^^;
あれこれ書いていたら、複雑になってしまって、そのまんま不要な箇所が残っておりました。
最後に &STR を置いたり、&秒 の値を 1,2 にしたりした名残です。
たしかに冗長なはずだわ。(^^;だはは...
23242 ありがとうございました 田中 2003/11/07-10:48
記事番号23214へのコメント
幅田さん、アックン、うにんさん、ありがとうございました。

私のわかりにくい質問の意味を理解して、回答いただきましてありがとうございます。
いずれの方法でも、うまくいきました。

戻る