Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Report Header
Message
From
05/04/2001 15:49:08
 
 
To
04/04/2001 14:05:19
General information
Forum:
Visual FoxPro
Category:
Stonefield
Title:
Miscellaneous
Thread ID:
00492010
Message ID:
00492491
Views:
11
Hi Jeff.

>I would like to print the current company name at the top of all reports. What is the best way to do this?

Here's how I do it: in the Finish method of an SFRWizard-based form, I have the following code:
lparameters tlPreview
local lcHeader, ;
    lcCompany, ;
    llReturn
with This
    lcHeader = .cHeader
    lcCompany = oApp.GetCurrentCompany()
    .cHeader  = lcCompany + chr(13) + .cHeader
    llReturn = dodefault(tlPreview)
    store lcHeader to .cHeader, .oReportEngine.cHeader, ;
        .oReportEngine.oReport.cHeader
    if llReturn
        .oReportEngine.SaveReportProperties()
    endif llReturn
endwith
return llReturn
Doug
Previous
Reply
Map
View

Click here to load this message in the networking platform