At 11:20 AM 6/23/2008, Bill Eyring wrote:
When I use the option RTF and insert it into a Word Doc, all
the formatting is lost.
When PRINTing the report as RTF, you need to use the following
additional parameters to achieve your goal:
OPTIMIZATION EASE_OF_EDITING
or
OPTIMIZATION POSITIONAL_ACCURACY
Resulting RTF document can be either optimized for positional
accuracy (meaning that the placement of the objects will be as
close as possible to a printed report), or for ease of editing
(meaning that everything is treated as simple text and it is
much easier to edit the file at the expense of aesthetics).
Here's how:
-- Example 01 (Typical Syntax)
PRINT reportname WHERE whereclause ORDER BY orderbyclause +
OPTION RTF +
|SHOW_CANCEL_DIALOG value +
|FILENAME filespec +
|TITLE value +
|SUBJECT value +
|AUTHOR value +
|KEYWORDS value +
|BACKGROUND_COLOR value +
|BACKGROUND_TYPE value +
|BACKGROUND_FILE filespec +
|IMAGE_FORMAT value +
|IMAGE_DPI value +
|INCLUDE_SHAPES value +
|INCLUDE_IMAGES value +
|INCLUDE_LINES value +
|INCLUDE_RICHTEXT value +
|JPEG_QUALITY value +
|OPTIMIZATION value +
|OPEN value
RETURN
-- Example 02 (Printing Report as RTF)
CONNECT RRBYW14
-- Verify the existence of RTF Sub-Directory
SET VAR vChkFile = (CHKFILE('RTF'))
IF vChkFile <> 1 THEN
MD RTF
ENDIF
PRINT Invoice WHERE TransID = 1068 +
OPTION RTF +
|FILENAME RTF\Invoice1068.RTF +
|SHOW_CANCEL_DIALOG ON +
|BACKGROUND_FILE NONE +
|BACKGROUND_TYPE CENTER +
|INCLUDE_LINES ON +
|INCLUDE_SHAPES ON +
|INCLUDE_RICHTEXT ON +
|INCLUDE_IMAGES ON +
|IMAGE_FORMAT JPG +
|JPEG_QUALITY 100 +
|IMAGE_DPI -1 +
|PIXELFORMAT 32 +
|GRAPHIC_DATA_IN_BINARY ON +
|OPTIMIZATION POSITIONAL_ACCURACY +
|TITLE Customer Invoice +
|SUBJECT Sales Order +
|AUTHOR R:BASE Turbo V-8 for Windows +
|KEYWORDS Invoice +
|OPEN ON
RETURN
That's all there is to it!
Very Best R:egards,
Razzak.
