過去の桐井戸端BBS (桐ver.8)
3729 段組印刷時に左側と右側の頁番号を順番にわけたい Rockey 1999/12/13-16:23
桐V8sp2の一覧表レポートの件でお尋ねします。

たとえば、B4の横2段の段組印刷定義で
テキストオブジェクトに#頁番号と指定すると
左右とも同じ頁番号が振られますが、
これを1枚目の左が1頁、右が2頁
2枚目の左が3頁、右が4頁.......というように
できないものでしょうか

真中で切ればB52枚になるような感じです。

過去の記事 NO.3030と関連するかと思いますが
レポートの定義では不可能でしょうか?

無理であれば、イベントか一括で再挑戦します。

3732 Re:段組印刷時の頁番号 悲しげ 1999/12/13-18:03
記事番号3729へのコメント
どもっ、Rockeyさん、多分できないと思います。そう一生懸命
探した訳でもありませんが。(^^;)

もし複数部数が必要なものなら、私はよくやるんですが、B5で
印刷させたものをふたつくっつけてB4用紙にコピーするとか。

あるいは、どうしてもと云うのなら、左半分用のレポート定義
を作り、印刷時に奇数頁のみ印刷させ、次に右半分用に定義し
たレポートで同じ紙を今度は偶数頁のみ印刷させるとか。

3733 Re:段組印刷時の頁番号 Rockey 1999/12/13-21:03
記事番号3732へのコメント
早速のご返答ありがとうございます。
やはりできないのかもしれませんね。

そこで、イベントでこうしたらできました。
1ページ43行とします。
印刷表に[頁]項目を追加します。

手続き定義開始 データ印刷()
method @フォーム.更新モード設定(0)
確認 "データ一覧表を印刷します。",&YN
if(&YN=0)
return
end
並べ替え {[商品コード]}
置換 [頁]=""
&P1=#切り上げ(#総件数/43,0)
繰り返し &SET=1,&P1,1
   cond ( #絞り込み状態 >= 1 ) 絞り込み解除 *
   絞り込み [頁]=""
   cond(.not #eof) 絞り込み 行数=43
置換 [頁]=&SET
繰り返し終了
   cond ( #絞り込み状態 >= 1 ) 絞り込み解除 *
レポート印刷 "データ一覧.RPT"
手続き定義終了

フッターに#頁番号ではなく[頁]項目を指定します。
しかしながら、このBBSの回答の速さは
すごいですね。
またお世話になります。

3735 Re:段組印刷時の頁番号 悲しげ 1999/12/13-21:44
記事番号3733へのコメント
どもっ、Rockeyさん、
また来てしまいました。(^^;)

>しかしながら、このBBSの回答の速さはすごいですね。

と云われましたので、また書きます。(^^;)
なるほど、#頁番号ではなく[頁]項目を指定すると云うのは
鋭い発想ですね。パチパチ・・・
ただ、気になったところを2点ほど。

>cond ( #絞り込み状態 >= 1 ) 絞り込み解除 *

「絞り込み解除 *」は全解除を意味しますから、もしかする
と並べ替え状態も解除されてしまうかもしれません。私の苦
い経験では、単に「絞り込み解除」とした時に、並べ替えも
解除されてしまって泣いたことがあります。この場合、並べ
替え状態も基本状態も同じ並びであったなら問題はないのか
もしれませんが、この点ちょっと再確認してみて下さい。

2点目。繰り返しと絞り込みを使わずに
  置換 [頁]=#ceil(#行番号/43)
だけでは駄目でしょうか?
※ #ceil(〜)は#切り上げ(〜,0)と同じです、便利ですよ。

3737 Re:段組印刷時の頁番号 悲しげ 1999/12/13-21:52
記事番号3735へのコメント
すいません、補足です。
一覧表レポートの場合、あふれ改行が発生することがあり
ますから、1レコード1行に固定しとかないと、頁数がず
れます。この点は留意しておく必要がありますね。

3739 Re:段組印刷時の頁番号 佐田 守弘 1999/12/14-00:50
記事番号3729へのコメント
Rockeyさん
段組印刷とは、1ページに複数段印刷する組み方ですから、何段あっても全体
で1ページの扱いになります。袋とじの場合には、左右がそれぞれ1ページず
つになります。

さて、2段組の左右にページをふる方法として、次の様な考え方もできます。
● #ページ番号を2倍して印刷する
左側には、#頁番号*2-1を、右側には、#頁番号*2を設定します。
この方法はためしておりませんので、もし、だめな場合には、次の様にしてみ
て下さい。
左側:#計算(#SET(秒,#頁番号),&秒*2-1)
右側:&秒*2

佐田守弘(KS-00119)

3742 Re:段組印刷時の頁番号 Rockey 1999/12/14-10:51
記事番号3739へのコメント
ありがとうございました。
左側 #頁番号*2-1 右側 #頁番号*2 でできました。
なるほどという感じです。

佐田さんの著書の 入門桐V5関数活用編を数年前
購入し、活用させていただいています。
#計算などいまだに分からない部分はありますので
この機会にまた勉強したいと思います。

今回感じたのは、工夫次第で幅が広がる
ということですね。

また、お世話になります。

3745 Re:段組印刷時の頁番号 悲しげ 1999/12/14-13:05
記事番号3742へのコメント
あっ、そうか。レポート定義において「白紙」から「複合」を指定
すればよかったんですね。できないと思ったのは、「一覧表」を指
定してしまった私のとんだ勘違いでした。と云う訳で、Rockeyさん、
失礼しました。(^^;)

管理人より
#3739佐田さんの回答で可能ですが、ページ番号をふるオブジェクトはマスターページを作ってそちらにはりつけるのが
コツです。明細ページではうまく印刷されません。

戻る