Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How to run a Crystal Report from VFP 6.0?
Message
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Miscellaneous
Thread ID:
00569698
Message ID:
00569811
Views:
21
This message has been marked as the solution to the initial question of the thread.
Steve: Here is some method code which I use. Warning! I'm using an old version of Crystal (5.0) so there may be more modern methods
WITH thisform.crCrystal
	.ReportFileName = Thisform.PrintType + "LIA.RPT"
	.Destination = 1 && crptToPrinter
	.SelectionFormula = "{FRGENDEC.GDQUE_ID}='" + curforms.pqid + "'"
	.DataFiles(0) =  "frgendec.dbf"
	.DataFiles(1) =  "frprpdec.dbf"
	.DataFiles(2) = ""
	pnReturnValue = .PrintReport
	IF pnReturnValue <> 0 
		=MessageBox ("Crystal Report FRLIA" + CR + ;
			"Generated Error: " + LTRIM(STR(pnReturnValue)))
	ENDIF
ENDWITH
Thisform.crCrystal is the Active X control for Crystal Reports

My version of cyrstal doesn't support VFP tables (I don't think later versions do either but could easily be wrong about that) so the two data files are FOX 2.6 I've created from my VFP 6.0 data tables (SELECT fields FROM etc. and then COPY TO frgendec TYPE FOX2x)

This may not be right for your situation, but I hope it helps.

........Rich


>I have a Crystal Report that fine runs on its own. It has two input parameters, month and year. All I want to do is pass the two input parameters from VFP to the Crystal Report, run the Crystal Report and have it print out or be displayed on the screen while while running a VFP EXE. I don't want the user to have to run Crystal as a separate program or be able to choose any other report parameters, options or settings. The report is more or less canned, so to speak. How can this be done?
>
>I find some possibilities in one of my Crystal Report books for VB, but there are so many ways to go between RDC, VB IDE, etc. I don't know what's simplest for what I am trying to do in VFP? Thanks for the guidance.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform