PC Direct 1996 August

home *** CD-ROM | disk | FTP | other *** search

/ PC Direct 1996 August / AAHRDEMO.ISO / software / docs / hdhdrftr.sm_ / hdhdrftr.bin

Wrap

INI File | 1996-05-14 | 15.6 KB | 891 lines

[ver] 4 [sty] [files] [charset] 82 ANSI (Windows, IBM CP 1252) [revisions] 0 [prn] HP LaserJet Series II [port] LPT1: [lang] 1 [desc] 822094219 10 760911380 15 2 0 0 0 0 1 [fopts] 0 1 0 0 [lnopts] 2 Body Text 1 [docopts] 5 2 [GramStyle] [tag] Body Text 2 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Body Text 0 0 [tag] Body Single 3 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Body Single 0 0 [tag] Bullet 4 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 288 288 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 <*0> 360 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Bullet 0 0 [tag] Bullet 1 5 [fnt] Times New Roman 240 0 49152 [algn] 1 1 288 288 288 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 <*5> 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Bullet 1 0 0 [tag] Number List 6 [fnt] Times New Roman 240 0 49152 [algn] 1 1 360 360 360 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 <*:>. 360 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Number List 0 0 [tag] Subhead 7 [fnt] Times New Roman 240 0 49155 [algn] 1 1 0 0 0 [spc] 33 273 1 72 72 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 2 0 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Subhead 0 0 [tag] Title 8 [fnt] Arial 360 0 16385 [algn] 4 1 0 0 0 [spc] 33 446 1 144 72 1 100 [brk] 16 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 1 0 1 1 0 0 0 0 [nfmt] 272 1 2 . , $ Title 0 0 [tag] Header 9 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Header 0 0 [tag] Footer 11 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 273 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 1 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Footer 0 0 [lay] Standard 513 [rght] 15840 12240 1 1440 1440 1 1440 1440 0 1 0 1 0 2 1 1440 10800 12 1 720 1 1440 1 2160 1 2880 1 3600 1 4320 1 5040 1 5760 1 6480 1 7200 1 7920 1 8640 [hrght] [lyfrm] 1 11200 0 0 12240 1440 0 1 3 1 0 0 0 0 0 0 0 0 1 [frmlay] 1440 12240 1 1440 72 1 792 1440 0 1 0 1 1 0 1 1440 10800 2 2 4680 3 9360 [txt] > [frght] [lyfrm] 1 13248 0 14400 12240 15840 0 1 3 1 0 0 0 0 0 0 0 0 2 [frmlay] 15840 12240 1 1440 792 1 14472 1440 0 1 0 1 1 0 1 1440 10800 2 2 4680 3 9360 [txt] > [elay] [l1] 0 [edoc] <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0>FUNCTION InsertHdrFtr(OrgFile,closeOrg) <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> DECLARE Echo(%1)<:f><:f240,QCourier,0,0,0> @Body Single@<:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:f240,QCourier,0,0,0> <:f240,QCourier,0,0,0>DEFINE GetPref() DllCall("hd3.dll,GetPref,CCC",%1,%2)<:f> <+@><:S+-1><:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:f240,QCourier,0,0,0> IF (GetPref(OrgFile,"(ALLOW FIELDS IN HDR AND FTR)<:>") <<<;> "YES") <+@><:S+-1><:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:f240,QCourier,0,0,0> <:f240,QCourier,0,0,0> EXIT FUNCTION <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> ENDIF <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> Echo(0)<:f> <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> SelectWindow(OrgFile) <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> Echo(0)<:f> <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> TYPE("<[>ESC]") <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> LayoutMode() <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> HeaderFooter(1) <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> TYPE("<[><:f><:f240,QCourier,0,0,0>SHIFTDown<:f><:f240,QCourier,0,0,0>]<:f><:f240,QCourier,0,0,0><[><:f><:f240,QCourier,0,0,0>SHIFTDown<:f><:f240,QCourier,0,0,0>]<:f><:f240,QCourier,0,0,0><[><:f><:f240,QCourier,0,0,0>SHIFTDown<:f><:f240,QCourier,0,0,0> ]<:f><:f240,QCourier,0,0,0>") <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> hfLen = <:f><:f240,QCourier,0,0,0>LEN(CurShade$()) <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> IF (hfLen<;>0) <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> <:f><:f240,QCourier,0,0,0> Copy()<:f> <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> NextWindow() <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> LayoutMode()<:f> <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> HeaderFooter(1) <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> Paste() <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> SelectWindow(OrgFile)<:f> <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> ENDIF <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> HeaderFooter(2) <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> TYPE("<:f><:f240,QCourier,0,0,0><[><:f><:f240,QCourier,0,0,0>SHIFTDown<:f><:f240,QCourier,0,0,0>]<:f><:f240,QCourier,0,0,0><[><:f><:f240,QCourier,0,0,0>SHIFTDown<:f><:f240,QCourier,0,0,0>]<:f><:f240,QCourier,0,0,0><[><:f><:f240,QCourier,0,0,0> SHIFTDown<:f><:f240,QCourier,0,0,0>]<:f><:f240,QCourier,0,0,0>") <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> hfLen = <:f><:f240,QCourier,0,0,0>LEN(CurShade$())<:f> <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> IF (hfLen<;>0) <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> <:f><:f240,QCourier,0,0,0> Copy()<:f> <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> ENDIF<:f> <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> IF (closeOrg = 1) <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> FileClose() <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> ELSE <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> TYPE("<[>ESC]<[>CTRLHome]")<:f> <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> DraftMode() <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> Echo(1) <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> NextWindow() <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> ENDIF <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> IF (hfLen <;> 0<:f><:f240,QCourier,0,0,0>) <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> LayoutMode() <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> HeaderFooter(2) <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> Paste() <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> ENDIF <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> DraftMode() <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> TYPE("<[>ESC]<[>CTRLHome]")<:f> <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> Echo(1) <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0>End Function <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> <+@><:S+-1><:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0>Function Echo(fOn) <:S+-1><:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> FocusHandle=DLLCall("user,GetFocus,I") <:S+-1><:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> DLLCall("user,SendMessage,IIIIJ",FocusHandle,11,fOn,0) <+@><:S+-1><:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> If (fOn=1) <+@><:S+-1><:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> DLLCall("user,InvalidateRect,IIJI",FocusHandle,0,1) <+@><:S+-1><:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> DLLCall("user,UpdateWindow,II",FocusHandle) <+@><:S+-1><:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> EndIf <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0>End Function<:><:f> <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#284,9360> <:R1,16,1,354,1,720,1,1066,1,1440,1,1818,1,2160,1,2530,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#240,9360><:f240,QCourier,0,0,0> > [Embedded] 00014982 > [macsum] 2 InsertHdrFtr 0 2 2 0 Echo 651 1 2 46 [macse] 14 InsertHdrFtr 0 284 "hd3.dll,GetPref,CCC" "{0}" "(ALLOW FIELDS IN HDR AND FTR)" 13 7 "YES" 18 1 11 00000128 6 2 15 9 16 Echo 0 0 796 "{0}" 16 Echo 0 0 6 "[27]" 2 210 1 2 377 1 1 0 6 "[4136][4136][4136]" 0 24 13 0 14 [X] 13 8 3 6 3 5 0 18 3 11 00000339 2 154 1 2 727 1 2 210 1 2 377 1 1 2 155 1 0 796 "{0}" 2 377 1 2 0 6 "[4136][4136][4136]" 0 24 13 0 14 [X] 13 8 3 6 3 5 0 18 3 11 00000443 2 154 1 6 1 5 1 18 0 11 00000494 2 147 1 10 00000542 0 6 "[27][16420]" 2 211 1 16 Echo 1 2 727 1 6 3 5 0 18 3 11 00000600 2 210 1 2 377 1 2 2 155 1 2 211 1 0 6 "[27][16420]" 16 Echo 1 6 2 15 9 14 Echo 0 284 "user,GetFocus,I" 13 8 2 0 284 "user,SendMessage,IIIIJ" "{2}" 11 "{0}" 0 6 0 5 1 18 0 11 00000201 0 284 "user,InvalidateRect,IIJI" "{2}" 0 1 0 284 "user,UpdateWindow,II" "{2}" 6 1 15 9 00015007