PMDF System Manager's Guide

On a per channel basis, cover pages may be disabled with the channel option COVER_PAGES. This is done by setting up a second set of FAX channels and specifying COVER_PAGES=0 in the PS_TO_G3 option file for those channels.⁶ See Section 37.6.1 for details on setting up multiple sets of FAX channels.

A setup file may be used to pre-load PostScript code which, for instance, establishes letter head. Example 37-1 shows PostScript code which produces on the first page of a message a 2 inch vertical banner (e.g., letterhead). The text on that first page is vertically scaled so as to be a bit smaller.

Example 37-1 FAX Setup File to Produce Letterhead on First Page

% Part 1: Display graphics/text for the top portion of the first page. % save /BANNER (Process Software, LLC) def /TOP 10.0 72 mul def /MARGIN_LEFT 1.0 72 mul def /MARGIN_RIGHT 7.5 72 mul def /SIZE1 36 def /SIZE2 12 def /POS { dup stringwidth pop MARGIN_RIGHT exch sub currentpoint exch pop SIZE2 sub moveto show } def % Compute the required font size to have the banner fill % the interior space between the page margins. /Helvetica-Bold findfont SIZE1 scalefont setfont BANNER stringwidth pop MARGIN_RIGHT MARGIN_LEFT sub exch div SIZE1 mul /SIZE1 exch def % Display the banner /Helvetica-Bold findfont SIZE1 scalefont setfont MARGIN_LEFT TOP moveto BANNER false charpath stroke % Display some lines of text /Helvetica findfont SIZE2 scalefont setfont MARGIN_RIGHT TOP SIZE2 sub moveto (250 West First Street, #240) POS (Claremont, CA 91711 USA) POS (Telephone: +1 714 624 7907) POS (FAX: +1 714 621 5319) POS restore % Part 2: Rescale remainder of the first page so that first page % fits in the remaining, bottom portion of the page. % For printing on normal PostScript devices, the two lines % % << 0 .getdevice getdeviceprops >> /PageSize get % aload pop /@@PMDF_H@@ exch def cleartomark % % below can be replaced with % % /@@PMDF_H@@ 11 72 mul def % << 0 .getdevice getdeviceprops >> /PageSize get aload pop /@@PMDF_H@@ exch def cleartomark /@@PMDF_H@@ @@PMDF_H@@ 2.5 72 mul sub @@PMDF_H@@ div def 1 @@PMDF_H@@ scale /@@PMDF_FIRST@@ 1 def /restore { @@PMDF_FIRST@@ exch restore @@PMDF_FIRST@@ ne { 1 1 @@PMDF_H@@ div scale /@@PMDF_FIRST@@ 0 def} if } bind def /showpage { #copies true .outputpage erasepage initgraphics @@PMDF_FIRST@@ 1 eq {1 1 @@PMDF_H@@ div scale /@@PMDF_FIRST@@ 0 def} if } bind def