Example 3 Code in Dev. Guide Doesn't Print Word Document

• Microsoft FoxPro for Windows, versions 2.5, 2.5a

SUMMARY

The Example 3 code shown on page D13-22 in the "Developer's Guide" does not print the embedded Microsoft Word for Windows document as stated.

To print the embedded Word for Windows document, make the following changes to the code:

   SELECT oletable
   LOCATE FOR oletype = "MSWord"
   @ 0,0 SAY object VERB 0 NOWAIT     && NOWAIT clause is undocumented *
   ichan = DDEInitiate("WinWord", "System")
   =DDEExecute(ichan, "[FilePrint]")  && print the embedded document
   =DDEExecute(ichan, "[FileClose]")  && closes the document **
   =DDEExecute(ichan, "[FileExit]")   && exits Word for Windows
   =DDETerminate(ichan)

Notes

 * There is a NOWAIT clause on the @ ... SAY-BMPs and OLE Objects command
   that is not documented in the "Language Reference" manual or the Help
   file in FoxPro 2.5 for Windows. (It is documented in the Help file for
   FoxPro 2.5a for Windows.) The purpose of the NOWAIT clause is to prevent
   FoxPro from waiting for Word to finish printing.

MORE INFORMATION

To test the incorrect code, create a table called OLETABLE and add two fields, the first having a field type of character and the second having a field type of general; that is, OLETYPE c(10) and OBJECT g(10). Add one record in OLETABLE, store "MSWord" in OLETYPE, and embed a WinWord document in OBJECT. Then execute the example 3 code. FoxPro seems to hang after running the code and Word for Windows does not print the embedded document stored in the general field.