Was this page helpful?
Your feedback about this content is important. Let us know what you think.
Additional feedback?
1500 characters remaining
Export (0) Print
Expand All

PDF Power to the People 

This article may contain URLs that were valid when originally published, but now link to sites or pages that no longer exist. To maintain the flow of the article, we've left these URLs in the text, but disabled the links.

PDF Power to the People

Lisa Slater Nicholls

PDF document output is one of the most often-requested enhancements to Visual FoxPro, but it's not available out-of-the-box. In this article, Lisa Slater Nicholls shows you how to generate PDFs in all versions of FoxPro, and showcases some VFP 9.0 techniques and print-related features that can make PDFs easier to create now than in any previous version. She also discusses the importance of "application transparency" and provides code to reliably install GhostScript, a Free Software Foundation component, on-the-fly.

When your output requirements include delivering exact electronic versions of printed documents, the PDF (Portable Document Format) is today's gold standard. The Microsoft Document Imaging (MDI) format, based on TIFF (Tagged Image File Format), is a viable alternative only if the recipient acquires the Microsoft Office Document Imaging reader or another program that can read TIFF and MDI files. The Adobe Reader for PDF is free, in widespread use, and available for every platform.

	VFP 9.0 ReportListeners can produce multi-page TIFF documents, and other page-image file formats, directly, but your users may still ask why your FoxPro applications can't produce PDF documents the way some of their other software tools do. In reality, FoxPro applications can produce PDFs–taking advantage of exactly the same resources that the other software tools use, as I'll show you in this article.

	These resources aren't delivered with Visual FoxPro or other Microsoft products. Their reliance on "Free Software Movement" and open source components indicates one potential explanation for the omission. The fact that PDF is a de facto standard developed by another major vendor suggests another possibility.

	Your users don't care about vendor strategy, so our speculation about such matters is useless. From the users' point of view, you are the vendor. So what are you waiting for?

What you want
Users just want PDFs. As a professional developer, you have additional requirements:

    •	No fee associated with adding this feature to your applications.

    •	Ability to work with any FoxPro reports.

    •	No user awareness of external programs and no user intervention in the process, even during installation. I'll refer to these characteristics as application transparency.

	Application transparency is a special kind of grace, and it's no joke. It might be defined as the set of characteristics that enable your component-based software solution to appear to users as if it were purpose-built by one mind (yours), just for them, from the ground up. When you build a FoxPro application, you add value to the components in countless ways, but sometimes application transparency can make the difference between users accepting your value-added proposition and disputing it.

	I live in Las Vegas, so I'll place a bet that you can fulfill your requirements, and I'll raise the stakes, too. With little adaptation, the same techniques should work for any output that obeys the instructions in a SET PRINTER TO command, not just any FRX or LBX results. They should also work in any version of FoxPro, even FoxPro for DOS and UNIX character-based reports or other printer output.

Consider your options
You can generate PDFs, as you can solve most programming problems, using either low-level or high-level techniques.

	In this instance, by "low-level" I mean you can take on the task of understanding the PDF format and describing report output using this format, one object at a time. In VFP 9.0, you can take this approach if you want. Simply intercept the rendering event using a ReportListener-derived class and generate the appropriate PDF code for each object as the report runs.

	If you're already an expert in the PDF format, you might come out with a reasonable facsimile of the original report this way, but you'll have to solve various issues differently for each type of rendered report object. When you see a product or utility that purports to generate PDF but indicates limits with certain types of output, such as images or shapes, or that produces only a cut-down rendition of its source, this is the approach it uses.

	By "high-level" I mean you can compose a PDF document from some readily available parts: a PostScript file and a PostScript interpreter. PostScript is the page description language underlying PDF format. A PostScript interpreter can tokenize the document, bundling all the necessary references into a single compressed PDF file, optionally embedding fonts as it does so.

	Capable and sophisticated PostScript printer drivers easily generate PostScript document files. These drivers are delivered in every version of Windows. I use the free software components of GhostScript to serve as the required interpreter, and supply the conversion to PDF.

	GhostScript is a stable, well-supported, and mature product. It scales well enough to be used in many production Web sites that offer PDF conversion services and generate other on-the-fly PDF output. When you see a full-featured commercial utility offering capable and complete PDF production, GhostScript is very often the underlying technology.

	I think you can see where I'm headed. No matter how much you enjoy getting your hands dirty in the internals of code, I recommend using high-level procedures: Leverage PostScript drivers to get high-quality PDF output.

	If you've tried this technique previously and couldn't get it to work, chances are you couldn't resolve some issues of application transparency. This article shows you how, and provides the relevant code encapsulated in a ReportListener-derived class for easy reference. If, by chance, you had additional FoxPro-specific concerns, additional code in the PDFListener class should resolve them as well. If you've been unsure about how to include open source or Free Software components in an application, keep in mind that different component providers set different arrangements, but consider this a fully-worked example.

How you get what you want
The following are the required steps for PDF generation in the "high-level" approach. These steps are all included in the ReportListener-derived class definition you'll find in PDFLISTENER.PRG, for convenience, although none of them require a ReportListener to work:

  • 	Determine if GhostScript is available in the environment. If necessary, install it silently.

  • 	Determine if your special printer setup is available. If necessary, install the driver in a hands-off manner, suitably branded to your application.

  • 	Instruct VFP to use the driver.

  • 	Generate your report, or reports, to a PostScript file or files, storing the resulting file names.

  • 	To maintain good form, restore VFP's printing environment.

  • 	Create a command text file, listing the PS file or files to be converted.

  • 	Invoke GhostScript with the command file, the desired output file name, and other suitable command-line arguments.

	Steps 1 and 2 can be done at any time, and typically should be done as part of your application's normal setup procedures. PDFListener includes them as part of the startup procedures for a report run, in the following method:

   PROCEDURE LoadPrinterInfo()
      IF NOT THIS.VerifyGSLibrary()
         RETURN .F.
      ENDIF   
      IF NOT THIS.VerifyPrinterSetup()
         RETURN .F.
      ENDIF
      IF NOT THIS.AdjustVFPPrinterSetups()
         RETURN .F.
      ENDIF
   ENDPROC

Setting up straight
The first two calls in this method are also public methods, which you can call separately in any setup procedures, to ensure availability of GhostScript and the PostScript driver. Presumably your setup application has the necessary rights to create a directory and install a printer setup.

	You can continue to call these methods at the beginning of every report processing run, as PDFListener does, on the off-chance that a user has uninstalled either of these external components. If the current user has the required rights, a missing component will reinstall. If the user doesn't have rights and a component is missing, the PDFListener.RunReports() method returns .F. Your application should provide reasonable error feedback to the user in such a case, just as it would if any other required files for the application, such as an editable FRX or a table, had been deleted.

	Some people like the idea of supplying code to impersonate a different user to resolve this issue without error feedback in the application. I think it's overkill, as well as a potential security risk to store administrative login credentials in an app just for this purpose.

Installing GhostScript on-the-fly
VerifyGSLibrary is the method that checks for GhostScript components, using an exposed member property of the class (GSLocation) to determine your proposed location. If you don't set the property explicitly, the class uses a method named GetDefaultGSLocation to derive a location. As written, the method attempts to find an appropriately named child directory below the running application, or below the location of the class library if you don't build it into an application. The goal is to determine a potential location guaranteed to be available, whether it currently contains the GhostScript files or not.

	Once it has determined the proposed location, and if the files aren't available, VerifyGSLibrary creates the subdirectory if necessary. It places the files on disk, using the absurdly simple, and time-honored, FoxPro method of dumping files out of memo fields. In a later section I'll explain how the correct files get into the INSTALL.DBF table.

	You don't need to use any Registry calls, and you don't need to run any external programs to install GhostScript. If your application knows the location of the files, you're all set. You may have thought otherwise, if you've used a typical GhostScript distribution for the Windows platform, but GhostScript is not "born" a Windows program. Neither its installation nor its use is dependent on fancy Windows tricks.

	Proper use of GhostScript is, however, dependent on fulfilling your responsibility to its terms of license. Although they're not onerous, you should take the time to acquaint yourself with these terms and your various options (see the sidebar "Using Free Software Responsibly").

Designating your driver
PDFListener.VerifyPrinterSetup() is the method that checks for your required printer setup and installs it on demand. The class uses a public member property, PSDriverSetupName, for the name you want the user to see as the installed printer. When you assign this value, it checks your value against the printer driver it expects to use, using a new argument to the APRINTERS() function to get the driver name. You can use a name such as "ABC Company SuperDriver," as many of the PDF utilities do, branding the setup to your installation, and with no obvious association to PostScript:

PROCEDURE PSDriverSetupName_Assign(tcVal)
IF VARTYPE(tcVal) = "C" AND NOT EMPTY(tcVal)
   LOCAL laSetups[1], liIndex, ;
         llFoundAndNotAppropriate
   FOR liIndex = 1 TO APRINTERS(laSetups,1) 
     IF ( UPPER(laSetups[liIndex,1]) == ;
          UPPER(ALLTR(THIS.PSDriverSetupName)) );
         AND ;
        ( NOT (UPPER(laSetups[liIndex,3]) == ;
           UPPER(ALLTRIM(DRIVER_TO_USE)) ) )
           llFoundAndNotAppropriate = .T.
           EXIT
     ENDIF 
   ENDFOR
   IF NOT llFoundAndNotAppropriate
     THIS.PSDriverSetupName = ALLTRIM(tcVal)
   ENDIF
ENDIF
ENDPROC

	As you can see, this assign method will allow you to assign any driver name you like, even if the printer setup doesn't exist, but it won't allow you to assign a name already in use for a printer setup that does exist and uses a different printer driver than you need. This condition handles the unlikely case that somebody has already used your exact brand for a non-PostScript driver.

	Using its internal default or your assigned printer setup name, PDFListener.VerifyPrinterSetup() executes a single call to PRINTUI.DLL, a Windows component located in the System32 directory. In one line of code, this call performs several tasks:

  • 	Installs the required base files.

  • 	Associates them with your named printer.

  • 	Makes this setup available with your brand.

  • 	Marks the printer setup shared, in case you're using this application on a dedicated print server box.

	Here's what the call looks like:

   THIS.DoStatus(INSTALLING_DRIVER_LOC)
   lcCmd =  ;
    [%windir%\\system32\\rundll32.exe ] + ;
    [printui.dll,PrintUIEntry /if /b ] + ;
    ["] + THIS.PSDriverSetupName + ["] + ;
    [ /f %windir%\\inf\\ntprint.inf /r ] + ;
    [ "lpt1:" /m "] + ;
    DRIVER_TO_USE + [" /Z]
   llReturn = THIS.oWinAPI.ProgExecute(lcCmd)
   THIS.ClearStatus()

	It looks scary, but you can run the following command at the DOS command line to find out what all of the options mean:

%windir%\\system32\\rundll32.exe printui.dll, _
   PrintUIEntry /?

	You'll notice that I'm assigning the port as LPT1. The initial port assignment is irrelevant, because you're always going to tell VFP to send the PostScript output to a file.

	The THIS.DoStatus() call above allows you to provide a custom message alerting the user to your activity, as the Windows call may take a moment to copy the driver files (see Figure 1). If you're not interested in user feedback, use the ReportListener.QuietMode switch to suppress the message. The result is a branded printer setup for your application (see Figure 2).

Figure 1

Figure 2

	What printer driver should you choose? PDFListener #defines the DRIVER_TO_USE as "Apple Color LaserWriter 12/600," but almost any PostScript printer will do, if it's recognized by the version of Windows on which you're installing your application. The system file NTPRINT.INF, used in the command string shown earlier, provides a wide variety of choices. Refer to www.cs.wisc.edu/~ghost/doc/printer.htm for a list of potential printer issues, but in most cases any PostScript printer that supports your desired resolution and page sizes, and color if you need it, is fine.

	Using PRINTUI.DLL to install a printer driver programmatically may not work in all versions of Windows; the version shown here works in XP and will work, with some alteration, in Windows 2000. (Refer to Microsoft KB article 189105 for details.) It's also not the only way to install a printer driver programmatically, if you can use Windows shell scripting. Check your Windows directory for files with the name skeleton PRN*.VBS and you'll find a host of scripting utilities for controlling printers.

    Remember I said that this method would work across versions of FoxPro? Before FoxPro programmers used Windows printer drivers, we used _GENPD to provide printer instructions for FoxPro character-based output. The default _GENPD application came supplied with a perfectly respectable PostScript mechanism, including a base set of PostScript font descriptions. You can SET PDSETUP TO <your PostScript setup>, SET PRINTER TO <filename> and voilà–with no special installation, your DOS applications are rolling in PostScript files every bit as good as the ones you get from Windows.

Configuring at runtime
Assuming you're using Visual FoxPro rather than DOS or UNIX, you're now up to Step 3, telling FoxPro to use your designated driver. You've already given PDFListener your printer setup's name, so it can easily issue a standard FoxPro command to tell VFP about it:

  SET PRINTER TO NAME (THIS.PSDriverSetupName)

&#9;Because PDFListener works in VFP 9.0, it adds some special magic to save and restore the printer setup more completely than previous versions allowed. Before SET PRINTER TO NAME, it uses SYS(1037,2) to save the current VFP printer environment to a cursor in the special FRX data session, in the PROTECTED method PrepareFRXPrintInfo. After the print processing run, it uses another PROTECTED method, UnloadPrinterInfo, and SYS(1037,3) to bring the user's full printer environment back. Using this technique preserves any non-default options, such as page size and orientation, that the user may have in his or her VFP environment.

&#9;PDFListener handles these tasks in the third method call you saw in the LoadPrinterInfo method: AdjustVFPPrinterSetups. I gave it that name to emphasize the fact that it doesn't touch the Windows environment, changing only your VFP printing behavior. Unlike the earlier setup method calls in LoadPrinterInfo, this one is PROTECTED, because you only want to call it as part of a defined output sequence. Its "push" mechanisms should always be matched with UnloadPrinterInfo() to "pop" the VFP printer environment back at the end of report processing. If you decide to add removal and restoration code for FRX and LBX printer environments, as I suggest in the next section, you can add it to these methods.

Ensuring use of your printing instructions in reports and labels
If you're using reports and labels for output, use this technique only with FRX and LBX files that don't have printer environments saved. Otherwise, the SET PRINTER TO NAME instructions won't affect the report system. (In VFP 9.0, new reports and labels don't store printer environment information, by default.) As delivered in your source code, PDFListener doesn't take care of this detail for you. Be sure to use the supplied TEST.PRG only with reports and labels that don't have their own printer setups. You can alter PDFListener to remove this data for later restoration, using a private cursor and a technique similar to the way it handles the outer VFP printing environment.

&#9;If you store a printer environment in a report and later remove it through VFP's native menu option, be aware that this option retains a COLOR switch in the header record Expr field. For PDF purposes, you should evaluate whether you want color or grayscale. If you want color, ensure that the Expr field contains COLOR=2 (indicating "on").

    If you're working in VFP 9.0, you can also leave the Expr field untouched, and add a user override setting of COLOR=2 in the Picture field of the header record. To learn more, read "Understanding and Extending Report Structure" in the Help file, and become friends with the FILESPEC\60FRX.DBF specification table.

Getting results
You're now at Step 4, generating the files and invoking GhostScript to convert them. This is really the easy part. PDFListener derives from _ReportListener in the FFC, so it maintains a collection of reports. It augments the _ReportListener.AddReport method to create temporary PostScript output file names for each report in your collection, and adds some intelligent parsing to your proposed REPORT FORM command clauses for each report, to make sure the REPORT FORM command contains the information necessary to generate file output. It also augments the _ReportListener.RunReports method with two post-processing actions: restoring the VFP printer environment using UnloadPrinterInfo() as described earlier (Step 5), and running its ProcessPDF method.

&#9;ProcessPDF first creates a GhostScript command text file, listing all the temporary PostScript files in your report run (Step 6):

#DEFINE GS_COMMAND_STRING_1  " -q -dNOPAUSE " + ;
              " -I./lib;./fonts " + ;
              "-sFONTPATH=./fonts " + ;
              "-sFONTMAP=./lib/FONTMAP.GS " + ;
              "-sDEVICE=pdfwrite -sOUTPUTFILE="
#DEFINE GS_COMMAND_STRING_2 " -dBATCH  "   

PROTECTED PROCEDURE MakeGSCommandFile()
LOCAL lcFile, lcContents, lcFileStr, liH
lcFile = FORCEPATH("C"+SYS(2015)+".TXT", ;
   THIS.GSLocation)
lcFileStr = THIS.GetQuotedFileString()
* GetQuotedFileString uses PDFListener's 
* collection of temporary file names 
* associated with each report in the run 
lcContents = GS_COMMAND_STRING_1 + ;
             ["]+THIS.TargetFileName+["]+ ;
                GS_COMMAND_STRING_2 + ;
                + lcFileStr   
* use forward slashes or doublebackslashes:
lcContents = STRTRAN(lcContents,"\","/")  
IF FILE(lcFile)
ERASE (lcFile)
ENDIF
liH = FCREATE(lcFile)
FPUTS(liH,lcContents)
FFLUSH(liH,.T.)
FCLOSE(liH)
RETURN lcFile 

&#9;This is another scary piece of code, because the line invoking GhostScript can have many options and is particularly exacting with respect to file paths. Most of the options I specify point the GhostScript executable to its libraries. If you change how you distribute the GhostScript libraries from the strategy I use in INSTALL.DBF, you'll change this section of the command.

&#9;When you read the code executing this command in the full PDFListener source, you'll notice that I temporarily change the current directory to the directory in which you've placed the GhostScript executable. My goal is to minimize any capitalization or directory-finding issues, which are standard hazards of working with code-not-born-in-Windows. FoxPro's somewhat cavalier treatment of file names, with regard to exact case, tends to increase the potential hazards. I restore the original default directory immediately after running GhostScript.

&#9;Upon investigating the ProcessPDF method, you'll find that, after MakeGSCommandFile() returns the full command, it uses a different method to execute the command line (THIS.oWinAPI.ProgExecuteX) than PDFListener used earlier to install the printer driver. I find that shelling out to Windows is best handled with different error-handling strategies and timeout strategies for different types of programs. You probably have your own approach. You might also prefer to avoid the whole question, by using DECLARE DLL calls to invoke functionality supported by GhostScript's supporting DLL libraries. GhostScript has a well-documented API, so you're not really required to execute the GSWIN32C.EXE file. However, I prefer the command-line interface because its command-line switches are equally well-developed, and its use emphasizes the fact that you can perform these tasks with any application that can RUN a batch file or invoke a shell script.

&#9;No matter how you decide to do it, invoking GhostScript brings you to Step 7. Upon completion, you now have a PDF incorporating all the reports you told PDFListener to run.

Evaluating the use of VFP 9.0 features
You might be wondering why, in VFP 8.0 or 9.0, I didn't choose to use NOPAGEEJECT on the REPORT FORM commands, to bind all the reports into a single PostScript file. It would have simplified PDFListener, because I wouldn't need to maintain a collection of multiple temporary files. I could also execute GhostScript without a command text file if I didn't have to worry about command-line length with multiple source files.

&#9;Using _ReportListener's report collection, or a similar mechanism, gives you several advantages over NOPAGEEJECT. The most important advantage is the ability to concatenate multiple reports with different page orientations and sizes. By contrast, NOPAGEEJECT opens a single connection to a printer for multiple reports, with a single page layout definition determined by the first one in the set.

&#9;Using GhostScript to append the files also permits you to mix PostScript source files from different output processing techniques, which may not all be REPORT FORM command results. They can even be PostScript files created by different applications or different instances of FoxPro. Once you have the code provided in PDFListener to create the command file, you can adapt it to these needs.

&#9;Appending output from different applications, or different instances, can be especially useful on a Web server. As you probably know, VFP 9.0 has been adjusted to make it easier to run report forms from a DLL (multi-threaded DLLs are still not allowed). PDFListener adds some awareness of OLEError-handling and _VFP.StartMode to help you here.

&#9;If you run this code in the context of a Web application, you'll probably want to run the setup procedures manually and make sure the appropriate user has rights to its features, including output directories and printer setup. In a server context, however, you're not going to be as worried about application transparency!

&#9;You'll notice that PDFListener exposes a member property, generateNewStyleOutput, which indicates whether you want a ReportListener object reference associated with your report run(s). Although _ReportListener runs the REPORT FORM commands, the commands themselves may be either old-style or new-style VFP output. PDFListener sets this property to .F. by default; the resulting PostScript files will be much smaller and the quality will be just as high. When you use the old report engine, the files contain text surrounded by PostScript instructions for your reporting data; in the new one, each full page is a graphical image.

&#9;Set generateNewStyleOutput .T. if you're using a ReportListener to provide dynamic effects, such as charts you render directly to the report using GDI+. _ReportListener's AddReport method gives you a chance to nominate ReportListener object references separately for each report in the collection, if you like.

Delivering and deploying the installation files
Your source code file includes a short routine, CREATEINSTALLDBF.PRG, which creates the installation table from whatever version of GhostScript I'm preparing to distribute. It asks for the source directories and creates records to store every file I'll distribute–including the Free Software Foundation-required license text file.

&#9;Please note that the resulting fileset isn't the full original GhostScript set, but rather the set that GhostScript needs at runtime. These include the executable and DLL libraries, GhostScript-specific configuration and command files, and font files.

&#9;As extruded from INSTALL.DBF by PDFListener, this fileset isn't placed in the original directory structure used by the GhostScript distribution. I use a streamlined arrangement (see Figure 3) that matches the directions I plan to give GhostScript to find its files at runtime. All of this may seem like extra trouble, but it guarantees that your program will use this version of GhostScript, and no other that happens to be registered on the machine, with all its proper components in place.

Figure 3

&#9;Even though it's not the full GhostScript distribution, INSTALL.DBF is a large file (about 8MB). Most of this bulk is font definition files; you can choose to omit some of them, if you like. Checking the GhostScript site, you'll see that different distributions come with different sets of fonts. You can add PostScript fonts to the set if necessary, as well as removing some, but the base set you'll find here, supplied with default font mappings in GNU GhostScript, will provide appropriate matches for most PostScript output.

&#9;You may choose to repurpose the GSLocation member property to indicate the location of INSTALL.DBF as well as the eventual location of the GhostScript files. In this scenario, PDFListener would always install the libraries in a specific relationship to the location of INSTALL.DBF.

&#9;You may prefer to use a completely different mechanism. For example, you could bind the contents of INSTALL.DBF, as individual files, into your SETUP.EXE, as support directories for your application. You could also create a separate VFPSTARTUP.EXE that will re-create these files on disk, as well as verifying your printer driver, on demand, storing the resulting names and locations to configuration files for your application to use for report runs. I like to create a CONFIG.XML file to handle this chore; it can be dragged and dropped as a single argument onto my EXE. Internally, my EXE knows that, if it was invoked with a command-line argument it can load as an XML file, it needs to read its configuration values from the file and do its setup work.

&#9;None of these decisions is critical to the main event, assuming you change the GhostScript command-line options to match the resulting locations of your files. That's why, as provided in your source code, PDFListener expects INSTALL.DBF to be available and makes no great effort to handle cases where it's not present.

It sounds like more work than it is
Your source code includes a TEST.PRG harness. This program contains some useful comments with advice on using PDFListener and its various non-essential features. It also allows you to test the process, end-to-end.

&#9;The test harness class asks you to provide the names of FRXs, adding them to PDFListener's report collection in a loop (don't forget to choose FRXs without printer environments saved!). It next executes PDFListener's RunReports method, during which PDFListener will check for its required external components, transparently install if necessary, run the reports to generate PostScript files, and finally post-process the PostScript report output into a PDF. TEST.PRG's test harness class then uses a call to ShellExecute to show you the resulting PDF document.

&#9;Check your system's printer setups before and after the process, and you should see the setup that PDFListener adds. Check your print dialogs, and you should see your default Windows printer and your own VFP print settings remain undisturbed. Check the directory under your copy of TEST.PRG and PDFLISTENER.PRG, and you'll see the GhostScript files. Check your watch and, assuming you didn't pick 100 FRXs with 1000 pages each in the loop, you'll see that not much time has elapsed. Check the output, and you'll see it was what you asked for.

&#9;Now go and give your users what they're asking for.

Sidebar: Why Not Use XSL:FO?

In addition to the low-level and high-level techniques commonly available to generate PDFs, in VFP 9.0 you have an additional option for reports and labels: Take the VFP XML output, which fully describes the output, and use an XSLT transformation to map the XML to XSL:FO, much as the HTML Listener uses an XSLT transformation to map the XML to HTML. XSL:FO is an XML dialect that provides a highly detailed page description language. The transform from VFP Report XML to XSL:FO might look something like this:

<xsl:template match="/Reports/VFP-Report">
<fo:root>
<fo:page-sequence 
  master-reference="default-page" format="1">
 <xsl:attribute name="fo:initial-page-number">
  <xsl:value-of select="./Data/PH[1]/@id"/>
 </xsl:attribute>
 <xsl:for-each select="./Data/PH"> 
 <fo:flow flow-name="xsl-region-body">
  <fo:block break-after="page" top="0in" 
   width="100%">
   <!-- contents of a page described here -->
  </fo:block>
 </fo:flow>
 </xsl:for-each>
</fo:page-sequence>
</fo:root>
</xsl:template>

&#9;If you ran the results of this transform through any processor that understands XSL:FO, it would produce PDF as a basic output type.

&#9;XSL:FO would be an ideal method, if Microsoft XML components included an XSL:FO-knowledgeable processor. Since they don't, you'd still need an external component, such as the Apache XML FOP Project (http://xml.apache.org/fop).

&#9;Each available XSL:FO processor imposes its own restrictions, its own installation and runtime processing burdens, and its own learning curve on Visual FoxPro developers. I've found no XSL:FO processor that imposes fewer burdens than GhostScript's minimal requirements. As a result, much as I like to encourage XSLT use, and much as I'd like to encourage alternative uses of VFP's Reporting XML format, I have (so far) assessed this option as a detour on the road to application transparency.

Sidebar: Using Free Software Responsibly

I use the GNU distribution of GhostScript, provided under the GPL License; an alternative Aladdin GhostScript distribution and a commercial distribution are also available. Refer to www.cs.wisc.edu/~ghost for details on the different distributions available and directions for obtaining them.

&#9;I accompany my distribution of GhostScript files with a copy of the full GPL license under which artofcode LLC, its copyright holder, distributes GNU GhostScript. Because I don't include the full source files for GhostScript in my INSTALL.DBF, I supply a written offer to provide full source for the GhostScript programs, for no fee except the distribution costs, if requested to do so. You'll find these items in a text file named LICENSE.TXT, copied to disk from INSTALL.DBF with all the GhostScript files.

&#9;Note that these license terms don't require me to surrender my application's source code upon request. In the GPL view, as defined by the Free Software Foundation (www.gnu.org), I am aggregating my application with GhostScript but I don't derive my application from GhostScript. I don't link my code modules with, or modify, GhostScript source. The acid tests:

  • &#9;An end user could call the GhostScript executable outside my application, and

  • &#9;if my application were removed but the GhostScript files remained, GhostScript would still work.

Sidebar: Some GhostScript Features I Ignore

If you're familiar with GhostScript, you may ask why I don't discuss RedMon, a port-redirection utility for GhostScript under Windows. RedMon theoretically offers "transparent PostScript printing," according to its host page (www.cs.wisc.edu/~ghost/redmon). Because it pipes output through GhostScript during a print run, RedMon could eliminate the need to invoke the GhostScript executable in a post-processing step.

&#9;Runtime processing might be transparent, but transparent application setup is out of the question. Setup and configuration of RedMon are difficult tasks, not practical or reliable in an unknown environment. Read the host page for known issues.

&#9;RedMon, like GhostScript's SETUP.EXE, is a Windows-specific add-on. By definition, neither is necessary to use GhostScript successfully. Contributors to GhostScript's cross-platform source base don't have Windows in mind when they write code.

Sidebar: Commercial Alternatives

I certainly don't recommend that you switch PDF-generating methods, if you already have one you like. There are a number of VFP add-on tools that do a great job of creating PDFs.

&#9;During the VFP 9.0 Beta, I worked with many of the third-party tool vendors, as they refactored their products to create PDFs better and faster in VFP 9.0, using the new Report System architecture. The results were very gratifying–in fact, these super-users gave us real validation of the approach we were working on. VFP 9.0 makes it easier and, I hope, even more interesting to invent creative reporting extensions for everyone, and to integrate them smoothly into applications. These folks stepped right up to the plate.

&#9;So why, you might wonder, wouldn't you choose a third-party product to generate PDFs in VFP?

&#9;I don't know. You might have a number of answers to that question, ranging from cost to implementation limits to licensing and distribution issues. If you do, this article gives you another option to consider.

Sidebar: Using VFP 9.0 Reporting Events

If you always use object-assisted reporting, and if you don't need to concatenate reports with different page sizes, consider the use of LoadReport and UnloadReport events for PDF output.

&#9;You can use LoadReport to examine any report's printer environment, and swap in a "clean" version, including a COLOR switch for PDF requirements. A sample RLSwap class in the VFP Help file's LoadReport Event topic will get you started. You can also handle printer setups and install GhostScript using LoadReport and UnloadReport, if you're careful to check CommandClauses for continuing report runs.

&#9;I use _ReportListener's .Run method to concatenate reports, so PDFListener's own LoadReport and UnloadReport events may happen once, several times, or never, depending on object references for individual reports. If I wanted to adjust FRXs or print setups, I would prefix and postfix PDFListener's .Run method.

&#9;There are many alternative strategies, but even the Brave New World of VFP 9.0 Reporting has limits. It might seem natural to use both a report collection and report events:

  • 1.&#9;Invoke the first REPORT FORM command with a PDFListener, having stored additional reports in its collection.

  • 2.&#9;In LoadReport, perform setup, and continue the initial report run.

  • 3.&#9;In UnloadReport, run the additional reports, and perform cleanup.

&#9;This sequence won't work. Neither old-style nor object-assisted REPORT FORM commands can be nested in a ReportListener event, including UnloadReport.

Download Click the Download button for the code (506NICHOLLS.ZIP)

To find out more about FoxTalk and Pinnacle Publishing, visit their Web site at http://www.pinpub.com/

Note: This is not a Microsoft Corporation Web site. Microsoft is not responsible for its content.

This article is reproduced from the June 2005 issue of FoxTalk. Copyright 2005, by Pinnacle Publishing, Inc., unless otherwise noted. All rights are reserved. FoxTalk is an independently produced publication of Pinnacle Publishing, Inc. No part of this article may be used or reproduced in any fashion (except in brief quotations used in critical articles and reviews) without prior consent of Pinnacle Publishing, Inc. To contact Pinnacle Publishing, Inc., please call 1-800-788-1900.

© Microsoft Corporation. All rights reserved.

Show:
© 2015 Microsoft