こんにちは。
いつもこちらの掲示板を参考にさせていただいています。

さて、当方VB.net2003 + net2003付属CrystalReports(10?) で開発をしています。
以下のような帳票を作成したいのですが、わからない点があり、
御教授願いたい次第です。

＜質問＞
1.セクションエキスパートから詳細を挿入して、
合計があるフォーマットと合計がないフォーマットを作成して、
データのレコード件数によって、フォーマットを組み合わせて、
1ページとすることができるのでしょうか。

2.フォーマットを組み合わせる事ができない場合、
合計があるフォーマット1つで最終行の合計値と罫線の表示を
データ件数によって切り替える事により、
5行目のデータを表示することが可能なのでしょうか。

3.改ページする場合、合計値を次ページに渡す(表示する)方法があるのでしょうか。

--------ここから作成したい帳票-------------
図1のようにヘッダと３つの情報グループがあり、
各情報の合計を最終行に表示する帳票があります。
情報は4行単位で合計を表示します。
ただし、図2のように情報が5行以上あれば、
1段追加し、図2では、3段あるので15行目に合計を表示します。
合計は、各情報の一番最大行数に表示します。
3段毎に改ページを行います。
ヘッダ部は、改ページ毎に表示します。
合計の直前の罫線は、2縦線で表示し、
その他の罫線は、点線で表示します。
データを表示できるまで上記の処理を繰り返します。

図1
|_______________________________|
|ヘッダ|A情報 | B情報  | C情報  |⇒ヘッダ部
|      |A1|A2 |B1 |B2  |C1 |C2  |
|_______________________________|
|A_HEAD|_1____|_10_____|_100____|]
|      |_2____|_20_____|_200____|]
|      |_3____|_30_____|_300____|]⇒1段
|      |_4____|_40_____|_400____|]
|      |合計10|合計100 |合計1000|]
|_______________________________|

図2
|_______________________________|
|ヘッダ|A情報 | B情報  | C情報   |⇒ヘッダ部
|      |A1|A2 |B1 |B2  |C1 |C2  |
|_______________________________|
|A_HEAD|_4____|_40_____|_400____|]
|      |_3____|_30_____|_300____|]
|      |_2____|_20_____|_200____|]⇒1段
|      |_1____|_10_____|_100____|]
|      |合計10|合計100 |合計1000|]
|_______________________________|
|B_HEAD|_1____|_10_____|_100____|]
|      |_2____|_20_____|_200____|]
|      |_3____|_30_____|_300____|]⇒1段
|      |_4____|_40_____|_400____|]
|      |______|_50_____|_500____|]
|      |______|_60_____|_600____|}
|      |______|_70_____|_700____|}⇒2段
|      |______|_80_____|_800____|}
|      |______|_90_____|_900____|}
|      |______|________|_1000___|}
--*--*--*--*--*--*--*--*--*--*--*--←改ページ
|_______________________________|
|ヘッダ|A情報 | B情報  | C情報  |⇒ヘッダ部
|      |A1|A2 |B1 |B2  |C1 |C2  |
|_______________________________|
|      |______|________|_1100___|]
|      |______|________|________|]⇒3段
|      |______|________|________|]
|      |______|___ ____|________|]
|      |合計10|合計450 |合計6600|]
|_______________________________|

--------ここまで作成したい帳票-------------

Kimberly様

返信が遅くなり申し訳ありません。
製品版のＲＤＣを使う方向で再考します。

ありがとうございました。

はじめまして。
当方、VB6＋CR4.6（確か、VisualStudio6についてきたものだと思います）で
開発を行っております。２点程初歩的なご質問になるかと思いますが、
よろしくお願いいたします。

　Q1
　　総ページ数の出し方についてご教授願います。

　Q２
　　１ページ内の行数を、ｎ行（行指定）で改ページする方法についてご教授願います。

色々と試してはみたのですが、どうも、CR4.6では出来ない？のかなと。。。
もう少し調べるべきところではあるのですが、よろしければご教授願います。

ゆみ様

.NET では、PrintToPrinterを利用します。
ReportDocument.PrintToPrinter(1, True, 0, 0)

PrintOutメソッドは、RDCの開発手法です。

はじめまして。クリスタルレポートの初心者です。最近使い始めました。
VisualStudio2003付録版を使いc#でレポートビューアからレポートを読み込ませています。
ado.netを使いsqlサーバーにアクセスしています。

いま、出荷商品明細リスト（ピッキングリスト）を作っているのですが
顧客をグループ化し、その顧客に発送する、商品区分、商品番号、商品名、数量、を出力するレポートです。

今回このレポートの最後に今回出荷する全商品の、商品毎の出荷数をサマリして出力したいのですが上手く行きません。
商品は、商品区分と商品番号で一意になっています。

Ａさん
　　商品区分　商品番号　商品名　数量　 　<-例えば　　1　 　1　　 おにぎりしゃけ    25個
　　　　・　 　　　　　　・　　 　　　・ 　　　・　　　<-例えば　　1　 　2　　 おにぎりおかか　 12個
　　　　・　　 　　　　　・　　　 　　・　 　　・　　　<-例えば　　1　 　3　　 おにぎり梅　　　      30個
Ｂさん
　　商品区分　商品番号　商品名　数量
　　　　・ 　　　　　　　・　　 　　　・　　 　・
　　　　・　 　　　　　　・　 　　　　・　　　 ・
レポートフッタ
　　商品区分　商品番号　商品名　数量サマリ　　<-例えば　　1　 　1　　 おにぎりしゃけ　 850個
　　商品区分　商品番号　商品名　数量サマリ　　<-例えば　　1　 　2　　 おにぎりおかか　700個

積算や合計を使ってみても数量フィールドを合計した数値しか出力することが出来ませんでした。

別の方法は？と、最初から商品毎にサマリしたレコードを持つ合計テーブルを作り、
明細テーブルと合計テーブルをレポートに取り込もうとしましたが、
互いのテーブルをリンクしなければいけない様で、この方法も上手く行きませんでした。

レポートの最後に、商品（区分＋番号）毎の出荷数量合計を出すことは難しいのでしょうか。

再三お世話になります。

クリスタルレポートの帳票定義を２つ作成したものを、
1つ目の帳票を出力した後に、２つ目の帳票のページを追加するような形で、
１つのViewerのみを使用して出力する、ということは
できるのでしょうか？
（ActiveReportでは、・・Pages.AddRange()・・・という風に書くとできたのですが。）

どなたかご存知の方、よろしくお願い致します。

ハッス様

質問内容を理解していないかもしれませんが、
【会社コード】でグループを挿入している場合、実現できません。
グループを特定のフィールドで挿入するとそのフィールドが最優先でソートが行われます。これを無効にすることはできません。

グループを動的に変更する方法は、式フィールドを利用してグループを挿入します。
WhileReadingRecords;
if {xxx.FLG}="1" then
{xxx.会社コード}
else
{xxx.受付者コード}
この結果、FLG="1"のレコードは、会社コードでグループ化されて、
それ以外は、受付コードでグループ化されます。
これが質問内容と一致していれば、実現できることになります。
グループに式フィールドを利用する場合、先頭に "WhileReadingRecords;" は必要です。"WhilePrintingRecords;" ではありませんので気をつけてください。

カウ様

式フィールドを利用している場合、以下のように記述することで改行できると思います。
WhilePrintingRecords;
"文字列" + Chr(13) + "文字列"

もちろん、「複数行に出力」はチェックしています。
Crystal Reports 10 では、上記の記述で半角文字列は改行されました。

返信ありがとうございました！

すみません！バージョンを書き忘れてました！
Crystal Reports Pro For Windows  ←バージョン情報にこう書かれていました。


WhilePrintingRecords;
{フィールド１} + Chr(13) + {フィールド２}

と記述したところ、文法エラーが発生してしまいました。
このバージョンでは、使えないてことですか？？
すみません！初心者な質問で！！

返信ありがとうございます！

EXEのバージョンは、4.5 となっていました。
なので、Chr関数は使えないという事ですねＴＴ

あと、連結の[&]は、半角でもエラーが発生したので、
これも、バージョンによってなのかな・・・？？

いろいろと勉強になりました！
ありがとうございました！
なんとか違う方法を見つけてみます！

あ、でも、もし良い方法がありましたら、
教えていただけると、うれしいです！

カウ様

文字の連結に "&"（半角）又は、"+"（半角）の利用は、製品のバージョンによって違うようです。
というより、古いバージョンでは、"+"だけのようです。
今回の件で、VBバンドル版のCR4.6.1で試したけど、"&"ではエラーになりました。でも、"+"では、エラーにはなりませんでした。
アップグレードする毎に少しずつ改善されたのでしょう。

4.5やVBバンドル版4.6.1では、mihara様が言われたとおり、物理的にフィールドを分けるしか方法はないと思います。
あとは、製品のアップグレードを検討するとか・・

はじめまして
ゆみと申します。

VB5でVB 5バンドルの「CrystalReport4.6」を使用し、帳票を出力していたものを
今回VB.NETへ移行し、「CrystalReport」を「CrystalReport10」へのVerup作業を行っています。
レポートファイルは4.6で作成したものを10で開き保存しました。

VB5から帳票を出力した場合、レポートの詳細にある罫線は細線なのですが、
VB.NETから帳票を出力した場合、項目ブレーク毎に太くなります。

色々調べてはみたのですが、原因がわかりません。
どなたかこのような現象について、ご存知のかたがおられましたら
教えてください。
宜しくお願い致します。

環境　WindowsXP　CrystalReports10　.NETFrameWork1.1

ゆみです。

まだ解決できていないのですが、もう少し調べてみようと思います。
それでも解決できなかったら再度投稿させてくださいm(_ _)m

宜しくお願いします。

ぱむ。さん素早い返信ありがとうございます！
無事解決いたしました！

VB6+CR8で開発しています。
CRを８から１１にバージョンアップしたいのですが、
CR8が入っている環境にCR11をインストールしても
問題ないのでしょうか。

CR8の開発環境はそのまま残しておきたいのですが…

何か情報をお願いします。

あさやん様

1ヶ月後はどのような計算を想定しているのかわかりませんが、
その日付から30日を足す場合は、以下の式フィールドで可能と思います。
WhilePrintingRecords;
//30日後は、日曜日？
if DayOfWeek ({xxx.日付}+30) = 1 then
//金曜日の日付
　　{xxx.日付} + 30 - 2
//30日後は、土曜日？
else if DayOfWeek ({xxx.日付}+30) = 7 then
//金曜日の日付
　　{Orders.受注日} + 30 - 1
else
{Orders.受注日} + 30

なお、これは、レポートのデザイン時に式フィールドを挿入します。VBコードからではありません。

VB6 + CR11 で開発したプログラムを、VBのディストリビューションウィザードを使って配布したいのですが、配布先PCにてsetup.exeを実行するとCRAXDRT.DLLの配置が上手くいかないようなエラーが出ます。（そのエラーの直前にcslibu-2-0-0.dllのエラーが出力されます）

原因と対策をお教え頂きたく、ご存知の方いましたら、お願いいたします。

作成したプリンタを通常使うプリンタに設定すれば出力できました。
通常使うプリンタに設定したくないんです。。。
通常使うプリンタは違うプリンタに設定し、プリンタ名を指定した帳票は指定したプリンタの用紙設定を読み込みたいのですができるのでしょうか

お願いします。

雅美様

私のところはCrystal Report10を使っているので、Crystal Report9も同じかどうか
わかりませんが、PrintOptionsのPaperSizeにデフォルトプリンタとして
追加した用紙サイズ情報を設定すればいいはずです。用紙のサイズならDefaultPaperSizeというのがデフォルトプリンタのサイズになります。
参考にしてください。

Kimberly様

いつもお世話になっております。実行したのはVB６で作ったプログラムです。
Crystal  Reports 10のランタイムは存在していません。たぶんそれがエラーの
原因だろうなとは思ったのですが、ランタイムの作り方がわからなくて困って
いました。現在ランタイムヘルプをもとにランタイムの作成に取り組んでいます。
進展がありましたら書き込みします。

はじめまして、脱兎と申します。

クリスタルレポート４．５で作成されたレポートを元に、
クリスタルレポート１０で再作成して、
ａｃｃｅｓｓ2002から作表をしようとしています。

ａｃｃｅｓｓの通貨型データフィールドを表示しようとすると、
書式設定の「小数点以下の桁数」および「端数処理」で設定した小数位以下の部分は、
四捨五入されますよね。
これを、四捨五入ではなく、切り捨てにすることって、できませんでしょうか？

クリスタルレポート４．５ですと、「端数処理」を「しない」という設定ができ、
これにより、「小数点以下の桁数」で設定した小数位以下を切り捨てられたのですが、
クリスタルレポート１０ですと、そういう設定はできないようです。

できれば、式フィールドを使わずに、データベースフィールドのままでいきたいのですが。

どなたか、ご存知の方がいらっしゃいましたら、
ご教授くださいますよう、よろしくお願いします。

(CrystalReports9)
グループごとに罫線をひいています。詳細に罫線はありません。

例１のようにグループ内の数が少ない場合はよいのですが
例２のように１ページにおさまらず次のページまでつづく場合
最終行に線がなく見た目がすっきりしません。

例１
 ---------------
 l A                       l→ [グループヘッダー]
 l　 A-1                 l　
 l　 A-2                 l→ [詳細]
 l　 A-3                 l
 l--------------- → [グループフッター]
 l B                       l
 l 　B-1                 l                  
 l　 B-2                 l                  
 --------------- 　

例２
　---------------
 l A                　　  l      
 l　A-1                 l　
 l　A-2                 l                  
 l　A-3                 l 
 l　A-4                 l
 l　A-5                 l 


Q.最終行に線を引く方法はないでしょうか？

ちなみにACCESSのときは次のような計算式で対処していました。
CrystalReportsで、このような制御はできるのでしょうか・・・

If Me.Top < 10900 Then '最終ラインの高さ
  PageLine.Visible = False
  Else
  PageLine.Visible = True
End If

さかもと　さん、コメントありがとうございます。

 >VB側でDataSetをこね回して作成しやすい
確かに、埋め込み型の方はVB側で強力なオブジェクトが扱える利点がありますね。(実行時にサーバーをコードで切り替えたり) 

 それで、ワタクシいろいろ考えてみたのですが、この問題は「CR10製品版は単独では"直結"でしかデータをもって来れない。　しかし、アプリ開発環境は「非接続」の.NETになってしまった。」
　という問題だと思うのです。

　ですから、これからは、よく考えて開発しないと後から苦労するのではないかと思うのです。
　端的に言えば、たとえば、プロジェクトに"埋め込んだ"レポートがあるとします。しかし、そのレイアウトをちょっと直したいと思ったら、再ビルドしたEXEごと、各クライアントに配布しなければならなくなったわけです。
　非埋め込みの.rpt ファイルなら、常時使われているわけではないので、各PCにコピーしてしまえばOKですが、EXEの場合は業務中は制約がでてきます。

 　大局的な点に話を戻しますと、問題は、.NET技術が主流になりつつある現在、昔からある"クリスタルレポート"というモノを.NET(つまりVB.NET)開発に適用することから発生していると思います。CR自身が(非接続の).NETデータプロバイダに対応でもしていれば、また違ってくるかもしれませんが。
　結局、今の"クリスタルレポート"というモノはスタンドアロンか、"直結"(OLEDB)可能なネットワークの程度で使いなさい、それ以上の、多数のクライアントからの印刷要求に耐えられ(=DataSet=.NET)、"作成・TCO効率もよいものを望むのであれば、Crystal Enterprise(ただし高価)を使いなさい、ということなのでしょう。

 　ところで、MS の SQL Server Reporting Services は、よい傾向だと思います。表現能力が現在はいま一つですが、印刷できるオブジェクトをもっと増やして、印刷時にオブジェクトを制御できる機能(式)を充実させれば(いずれそうなると思います)、CRは不要になるような気がします。
　これからは、「データベースからデータを持ってきて並べる」だけのレポートツールは、金を出して買う時代は終わりつつあると思います。BI(ビジネスインテリジェンス)ツールでなければ将来性はないようですね。
　また、レポート印刷は、データベースに密着した「印刷サービス」という形態になってゆくように思われます。

 　さて、DataSetの件ですが、ワタクシは当座"非埋め込み型"で開発しようと思います。やっぱりEXEの中にrptがあるというのはヘンだという「カン」のようなものです。
　あと、せっかくレポート作成環境があるのに、データアクセスはVBプロジェクトを走らせ、操作してからでなければできない、というのも昔のCOBOLかBASICのやり方を連想してしまいます。プログラムを走らせなければ印刷もできなかった時代です。これでは、何のためにCR製品があるのか、ということになってしまうと感じます。

 (皆様も、よろしければコメントを。)

>端的に言えば、たとえば、プロジェクトに"埋め込んだ"レポートがあるとします。しかし、そのレイアウトをちょっと直したいと思ったら、再ビルドしたEXEごと、各クライアントに配布しなければならなくなったわけです。
>非埋め込みの.rpt ファイルなら、常時使われているわけではないので、各PCにコピーしてしまえばOKですが、EXEの場合は業務中は制約がでてきます。

これはCrystal Reportsの問題というより、MS製以外のファイルをどのように配布し管理するかという問題ですよね。
アプリケーション、開発プロジェクト、Excel ファイル等、大規模環境になればなるほど、配布や共有の方法は一言では片付けられなくなります。

>　結局、今の"クリスタルレポート"というモノはスタンドアロンか、"直結"(OLEDB)可能なネットワークの程度で使いなさい、それ以上の、多数のクライアントからの印刷要求に耐えられ(=DataSet=.NET)、"作成・TCO効率もよいものを望むのであれば、Crystal Enterprise(ただし高価)を使いなさい、ということなのでしょう。

DataSetはCrystal Reportsで使えますよ。MSDNに説明が出てます。
あと、Crystal Reportsを購入すれば、ライセンス数は限定されてるようですがCrystal Enterpriseを追加費用無しで利用できますよ。
ちょっとだけ、遊びで使ったことありますが、VS.NET環境からレポートファイルを取ってきたりすることが出来ました。

sat です。どうも。
皆様のコメント、大変参考になります。ありがとうございます。
Magy さん、
>私は現在、「非埋め込み式＋DataSet」方式で開発を行っています。
>(中略)かといって、データベースにアクセスはしたくないので
　いや〜、そうでしたか。DBに自由にアクセスできる案件ばかりとは限りませんよね。
ワタクシは、No.694で言及しましたとおり、非埋め込み式で .rpt を完全に分離して扱う方式で現在開発中です。LANで台数が少ないのと、DBの権限が得られているためです。　ケチな話ですが、ADOでデザイン済みのrptを、データソースの保存場所の設定だけ変えたものをもう一つ作り、ローカルマシン用とサーバ(実機)用とし、双方にDB(SQL Server)を整備した上で使い分けています。　クライアント、サーバそれぞれの.rptやDBの中身の管理(同期)の問題はもちろんありますが、なかなか小回りがききますよ。
　ちなみに、ちょっとした資料を見つけました。(ご存知かも)　ただし英語です。
http://businessobjects.com/products/dev_zone/net/resources.asp?ref=devzone_netzone_nav
同ページの、右欄のちょっと下のほうに"Other Resources"とあり、下に"Crystal Reports .NET SDK - Additional conceptual documentation and tutorials"とあるリンクから、ZIP ファイルをダウンロードできます。　中に、"CRNET_Additional.chm"　ヘルプ (HTML版もあり) が入っています。ヘルプ中の、"Which Object Model Should I Use?"および"Summary of Recommended Scenarios"という節に、まさに埋め込み型、非埋め込み型それぞれの長所(pros)短所(cons)[賛/否]が、CR10 .NETのヘルプより詳しく説明されています。英語ですが、技術タームですから。参考まで。
だら さん。
>私は現在非埋め込み型を利用していて、埋め込み型の利用方法を知りません。
もし、まだでしたら次のサイトをご覧ください。役立つ資料がありますよ。
http://japan.businessobjects.com/products/crnet/
同ページの下に"帳票作成にCrystal Reportsを活用しよう"というボタンがあります。これは翔泳社の旧dotNETMagazine2005/3月号の大沢氏の記事をPDFにして公開してあります。まあ、一通りのことは書いてあるようです。参考になると思いますよ。　(ただ、個人的にプログラミングするならこれでもいいのですが、業務として開発するものにとっては、肝心なことが書いていないんです。データプロバイダ、ログオン情報の管理、rptの置き方、出来上がったアプリケーションの配布、これらをどうするか。ですから、まあ、"雑誌の記事"ということです。)

またしても質問があります

グループに３つの項目があります

項目１ 項目２ 項目３
----------------------
aaaaa  bbbbb  ccccc

ここで、以前と同じような質問ですが、どれか１つでも変わったら、
グループフッターに線を描いて

また次の行から

----------------------
aaaaa  ddddd  ccccc   ←bbbbbが変化した

継続してレコードを出力したいんです。

以前は、改ページだったのでいろいろご教授頂いて解決しましたが、
今回は横並びの項目なので、どう判断すれば良いかわかりません。

どうか、宜しくお願い致します。

それぞれのグループを設定、グループフッタに線を引けばいいのではないでしょうか？

まさ吉様

セクションエキスパートから詳細の「まとめて表示」をチェックしていれば、詳細部分はページに跨って表示されないと思います。

お世話になります。
以前、以下のような帳票を作成したいと質問しました。(管理番号:No.689)

―――――――――――  ――――――――――――         ―――――
｜項目名1 ｜ 項目名2 ｜ ｜項目名1´｜ 項目名2´｜        <<ヘッダ>>
―――――――――――  ――――――――――――         ―――――
｜A1      ｜ A2      ｜ ｜D1       ｜ D2       ｜            ↑
―――――――――――  ――――――――――――             ｜
｜B1      ｜ B2      ｜                                   <<明細>>
―――――――――――                                       ｜
｜C1      ｜ C2      ｜                                      ↓
―――――――――――                                   ―――――

Kimberly様よりご回答を頂き、実践したところイメージに近いものとなり、大変感謝しております。さらに、もう一つ分からないところがあります。ヘッダの罫線のその表示・非表示も行いたいのです。上図では項目名1´と項目名2´の上部の罫線及び横の罫線です。
罫線の非表示に条件式がないのですが、どのように記述すればよいのでしょうか？
よろしくお願いいたします。

(VB.NET 2003で開発しています)

かよ様

他の罫線との絡みがあるため、期待する結果になるかどうかわかりませんが・・
テキストオブジェクトの境界線を利用することで条件式は利用可能です。
例えば、項目名１'と項目名２'の上と横にそれぞれテキストオブジェクトを挿入します。境界線の線のスタイルから挿入した場所に応じて、上、下、右、左から選択し、シングル線を選びます。あとは、非表示の条件式に表示、非表示の条件を設定します。挿入する場所により、テキストオブジェクトのサイズの調整が必要です。

おはようございます。
早速実践したらできました!!
他の罫線と同じ表示になるように調整します。
ありがとうございました。

VB６や、.Netなどに付属しているクリレポは複数オブジェクトを選択してコピーできないみたいです。（って聞いたような・・・・。）
確かな情報ではありませんが・・・。

回答、ありがとうございました。
もしかしたら・・・・と一縷の望みがあったのですが、残念です。
やはりできないのですね、これで諦めもつきます（笑）

本当にありがとございました。

自己解決しましたので報告です。

\COMMON\Tools\VB\Japanese\CRYSREPTというフォルダに
日本語版Crystal Report 4.6が入っていました。

私がインストールした\COMMON\Tools\VB\CRYSREPTは
英語版だったようです。

お騒がせしました。m(_ _)m

はじめまして
質問があります。

以下のデータ

項目�@　項目�A　項目�B　項目�C　
aaaaa　　BBBB　　CCCC　　100
aaaaa     BBBB    CCCC     200
aaaaa     CCCC   DDDD      300
aaaaa     CCCC   DDDD      400

を選択式エディターで「{項目�C}>500」と設定したところ、
下記の印字がされます。※項目�@をグループ化
ヘッダー
aaaaa
詳細
<空白>


求めるものは、「明細印字項目が存在しない場合は、印字しない」です。
どなたかご教授頂けないでしょうか。　

グループヘッダーの所に項目�@を設定していませんか？

------グループヘッダー----------
------詳細--------------------
項目�@　項目�A　項目�B　項目�C
------グループフッター-----------

のようにすれば印字はされない気がします。
外れてたらスイマセン

複数行あるデータを横に出力する際、７件出力したら次の行に改行したいのですが方法がわかりません。
何か良い方法がありましたら教えてください。

イメージは以下のような感じです。
調査日      5/9     5/10    5/11    5/12     5/13     5/14     5/15
    9時
入場者数   100      200       50       125        90       700     1200

調査日    5/16     5/17    5/18     5/19     5/20     5/21     5/22
  10時
入場者数  110       190       45       120         90       950    1500

       ：         ：          ：         ：          ：           ：          ：         ：