K#   '  >0@-_        _    ,Arial-8 \L,Times New Roman8 \L!@!@!@!@!@!@!@ #P$- #P #P$- #P$- #P` #P>- #P #P - #P - # P- # P - # P> # P  # P  #P  #P ? #P - #P  #P` #P #P  #P  #P  #P - #P #P> #P ? #P - #P - #P - #P- # P - #!P- #"P  #$P - #)P - #-P #.P - #/P> #1P ? #2P  #3P> #4P  #5P ? #6P  #7P? #8P #9P #:P  #;P #P - #?P- #AP #BP #CP #DP #EP  #FP>  `P `P*v _Wv2?@  -& &KK RS03@ %D_13@44 %D_23@55 %D_33@66 %F_13@** %I_R13@  %I_R23@  %I_R43@% %R_53@// %SA_13@:: %SA_103@CC %SA_113@DD %SA_123@EE %SA_133@FF %SA_143@GG %SA_153@HH %SA_163@II %SA_173@JJ %SA_183@KK %SA_23@;; %SA_33@<< %SA_43@== %SA_53@>> %SA_63@?? %SA_73@@@ %SA_83@AA %SA_93@BB %SHEET_COUNT@ %S_1T_COUNT@## %S_2T_COUNT@$$ %S_3T_COUNT@%% %S_4T_COUNT@&& I_10_COUNT@ I_10_COUNT@   I_11_COUNT@ I_12_COUNT@ I_13_COUNT@ I_14_COUNT@ I_15_COUNT@ I_16_COUNT@ I_17_COUNT@ I_18_COUNT@ I_19_COUNT@ I_2_COUNT@ I_20_COUNT@ I_21_COUNT@ I_22_COUNT@ I_23_COUNT@ I_24_COUNT@ I_25_COUNT@ I_26_COUNT@ I_27_COUNT@ I_3_COUNT@ I_4_COUNT@ I_5_COUNT@ I_6_COUNT@   I_7_COUNT@   I_8_COUNT@   I_9_COUNT@  #6Purchase Order# 6WorkArea# 6Strings(H v Purchase Order(X v osUse the sheet icon at the far right to create your own copy of this sheet. Do not make changes to this sheet.( v :My Company Name( v ; Address( v <City, State Zip( v  PURCHASE ORDER NO.( v DPurchase Order No.(  v  Phone:(  v = (617) 555-5000( 0 v   ORDER DATE( @E( < v  Fax:( D v > (617) 555-5000( T v   TERMS ( \ v  E-mail:( d v ? me@company.com( t v  F.O.B. (  v  URL:(  v @ http://www.mycompany.com(  v   SHIPPED VIA( v  SOLD TO:( v  SHIPPED TO:( v A Customer( v F Same( v B Address( v CCity, State Zip( v  QUANTITY( v  UNIT( v DESCRIPTION( v UNIT PRICE( v  AMOUNT(-( v ;(-0 v ;(-8 v ;(-@ v ;(-H v ;(P v  SUBTOTAL(2\ v PP;(d v TAX(l v  FREIGHT(t v  TOTAL(2| v ?P?P;( v Send Correspondence To:( v +/Questions concerning this purchase order? ( v G Name(  v H Company Name(! v I !Address (" v J "State(# v K #Phone(& v &APPROVED BY(& v  &DATE'Variables( v /%Sheet_Count' ': version counter4'Bold items are referenced to duplicate strings"'Purchase Order Sheet Strings'RangeNames 'Strings 'I_1 'Phone: 'I_2 'Fax: 'I_3 'E-mail: 'I_4 'URL: 'I_5'SOLD TO: 'I_6 'SHIPPED TO: 'I_7 'PURCHASE ORDER NO. 'I_8 'ORDER DATE 'I_9 'TERMS  'I_10 'SHIPPED VIA 'I_11'Purchase Order 'I_12'F.O.B.  'I_13'QUANTITY 'I_14 'UNIT 'I_15'DESCRIPTION 'I_16'UNIT PRICE 'I_17 'AMOUNT 'I_18'SUBTOTAL 'I_19 'TAX 'I_20 'FREIGHT 'I_21'Send Correspondence To: 'I_220'Questions concerning this purchase order?  'I_23'APPROVED BY 'I_24 'TOTAL 'I_25 'DATE 'I_26t'Use the sheet icon at the far right to create your own copy of this sheet. Do not make changes to this sheet. 'I_27'Order No." 'Sheet names must be in order!'Sheet Strings"'RangeNames "'Strings #'%S_1#'Purchase Order $'%S_2$'WorkArea %'%S_3 %'Strings &'%S_4 &'Scripts('Function Strings)'RangeNames )'Strings *'%F_1*'screen-width-'Range Strings.'RangeNames .'Strings /'%R_5/'%Sheet_Count2'FileInfo Strings3'RangeNames 3'Strings 4'%D_14'SmartMasters 5'%D_25'Generate a Purchase Order 6'%D_346'Use this SmartMaster to track outgoing orders.8'Sample Data strings9'RangeNames 9'Strings :'%Sa_1:'My Company Name ;'%Sa_2 ;'Address <'%Sa_3<'City, State Zip ='%Sa_4='(617) 555-5000 >'%Sa_5>'(617) 555-5000 ?'%Sa_6?'me@company.com @'%Sa_7@'http://www.mycompany.com A'%Sa_8A'Customer B'%Sa_9 B'Address C'%Sa_10C'City, State Zip D'%Sa_11D'Purchase Order No. E'%Sa_12%E! F'%Sa_13 F'Same G'%Sa_14 G'Name H'%Sa_15H'Company Name I'%Sa_16I'Address  J'%Sa_17 J'State K'%Sa_18 K'PhoneB@  B@  B@ $  88P5 ``??~P8 4~P8@ 4~P8@ 4  666 66o6666'  4k   o 4k PAP  P>P PPP P P PPPPPPPPPEPFPPPP PPPP PBP PEPFP PP PPPP PBP P P/PP/P1PP"PP PBP P2P3P3PP3P1PP"PP4P PPP PP5PPPPDP PP6PP3PP P3P7P8PCP8PP-P P9PP:P ;PP'P P!P?P!PPP!P?P!PP!PPPPP!P$P P)PP.PP P)PP P)PP P)PP P)PP)PPP PP)PP.PP.PP.PPP.PPPP  '++LotusScript Development Environment:2:5:(Options):0:66 Option Public '++LotusScript Development Environment:2:5:(Forward):0:1 Declare Sub Init Declare Sub SM1 Declare Sub SM3 Declare Sub SM2 Declare Sub Sm4 Declare Sub formatter '++LotusScript Development Environment:2:5:(Declarations):0:2 '++LotusScript Development Environment:2:2:Init:1:8 Sub Init [].Maximize End Sub '++LotusScript Development Environment:2:2:SM1:1:8 Sub SM1 [A5].Select .ShowAutomaticPageBreaks=False .CurrentPrintSettings.PrintWhat = $CurrentSheet .CurrentPrintSettings.FooterCenter = "" .CurrentPrintSettings.Orientation = $Portrait .CurrentPrintSettings.FitToPage = $FitRowsAndColumns .CurrentPrintSettings.LeftMargin = 1080 .CurrentPrintSettings.TopMargin = 1080 .CurrentPrintSettings.RightMargin = 1080 .CurrentPrintSettings.BottomMargin = 1080 [].ShowDrawLayer = False [].ShowVersionBorders = False CurrentApplication.Print [].ShowDrawLayer = True [].ShowVersionBorders = True End Sub '++LotusScript Development Environ ment:2:2:SM3:1:8 Sub SM3 [A5].Select Dim HRV As Integer HRV = Shell("WINHLP32.EXE -I H_WORKING_WITH_SMARTMASTER_TEMPLATES_OVER SS1N70EN.HLP", 1) End Sub '++LotusScript Development Environment:2:2:SM2:1:8 Sub SM2 [A5].Select [].ShowDrawLayer = False [].ShowVersionBorders = False [].SelectAll .CopyToClipboard $BitMapFormat [A5].Select [].SendMail , , "Purchase Order", , , , $Clipboard [].ShowDrawLayer = True [].ShowVersionBorders = True End Sub '++LotusScript Development Environment:2:2:Sm4:1:8 Sub Sm4 CurrentApplication.UpdateSheetDisplay = False [A5].Select [].NewSheet $After,1,True [%Sheet_Count].Contents = [%Sheet_Count].CellValue + 1 [].SheetName = [I_27].CellValue + " " + Cstr([%Sheet_Count].CellValue) [].GroupSheets 0,1,0 [Picture 4].IsLocked = 0 [Picture 4].Visible = 0 [A:A1..A:K60].QuickCopy [B:A1] [Picture 4].Visible = 1 [Picture 4].IsLocked = 1 [].UnGroupSheets [B:B3].DeleteRows $Full [B:B5].Select [].HorizontalTitle = 1 CurrentApplication.UpdateSheetDisplay = True End  Sub '++LotusScript Development Environment:2:2:formatter:1:8 Sub formatter If .CountryCode <> 1 Then If [].Revs = 0 Then .macroruntext "/{r}~~{r 2}~2~a:h25..a:g21~" .macroruntext "/{r}~~{r 2}~2~a:h26..a:h29~" End If End If End Sub$  LSOBEN2 Xd$8T4<<<<ddddLotus ProductV0.0   *2820150lNEWDELETE@ INITIALIZE TERMINATE OBJECTXINITMAXIMIZExSM1A5SELECTSHOWAUTOMATICPAGEBREAKSCURRENTPRINTSETTINGS PRINTWHAT FOOTERCENTER ORIENTATIONh FITTOPAGE< LEFTMARGIN TOPMARGIN RIGHTMARGIN BOTTOMMARGIN SHOWDRAWLAYER<SHOWVERSIONBORDERSCURRENTAPPLICATION APPLICATION LSCRIPT.dllSEDefaultClassControlPRINT@SM3$HRVGWINHLP32.EXE -I H_WORKING_WITH_SMARTMASTER_TEMPLATES_OVER SS1N70EN.HLPlSM2 SELECTALLCOPYTOCLIPBOARDSENDMAILHPurchase OrdertSM4 UPDATESHEETDISPLAYNEWSHEET %Sheet_CountCONTENTS CELLVALUE( SHEETNAMEI_27 X GROUPSHEETS0 Picture 4ISLOCKEDVISIBLE A:A1..A:K60 QUICKCOPYB:A1H UNGROUPSHEETS B:B3 DELETEROWSB:B5HORIZONTALTITLE FORMATTERd COUNTRYCODEtREVS MACRORUNTEXT/{r}~~{r 2}~2~a:h25..a:g21~/{r}~~{r 2}~2~a:h26..a:h29~  C3t4   l dX f \ \q).i]).i]gX(" 4@ s4 F: #*Dd\|Dz`i# Ғ@R\\ @dX( d`m\6Lt,x:+=} hD>\ fXL8h{xQ(,?@WXIp  ȄTd'Tp'Q|OQ~0OQ}OQ~HOQ~`OQ8OQ8OQ8OQ8 ȄQ!ȄQ"{<, ##ȄQ$ȄQ%(Tp'*b}(1+.Tp'/ȄQ0ȄQ1ȄT8'2TD~x'3Tp'4ȄTP}~'5ȄQ6ȄQ7:{<.\!;Tp'<ȄT~'=ȐQȐP>ȄQP}ȐP?ȄT'@,QA,QBpTɤ'C,QD,QEȄT'FT~'GTp'HȄQI{<.\!JMP8+NȄP8OT}'PT}'QRS L OpenedL L'++LotusScript Development Environment:2:5:(Options):0:66 '++LotusScript Development Environment:2:5:(Forward):0:1 Declare Sub Opened(Source As Document) '++LotusScript Development Environment:2:5:(Declarations):0:2 '++LotusScript Development Environment:2:2:BindEvents:1:129 Private Sub BindEvents(Byval Objectname_ As String) Static Source As DOCUMENT Set Source = Bind(Objectname_) On Event Opened From Source Call Opened End Sub '++LotusScript Development Environment:2:2:Opened:1:12 Sub Opened(Source As Document) init formatter End Sub$:  LSOBEN 6$8llltttLotus ProductV0.06  T*48C03AClNEWDELETEh INITIALIZE TERMINATEOBJECT (GLOBALS) (Globals)SOURCE BINDEVENTS OBJECTNAME_DOCUMENT8 LSCRIPT.dll|SEDefaultClassControlOPENEDINIT FORMATTER  &QTl\\\\ ).i]).i]h<d" l$ !@t!@l$| : :Ҥ [\I G\˄|l )#)t#     >  N @ d    Purchase Order_, B@  B@  """"""""""""""""" PAm??VxX"" B SelectedB B'++LotusScript Development Environment:2:5:(Options):0:66 '++LotusScript Development Environment:2:5:(Forward):0:1 Declare Sub Selected(Source As Picture) '++LotusScript Development Environment:2:5:(Declarations):0:2 '++LotusScript Development Environment:2:2:BindEvents:1:129 Private Sub BindEvents(Byval Objectname_ As String) Static Source As PICTURE Set Source = Bind(Objectname_) On Event Selected From Source Call Selected End Sub '++LotusScript Development Environment:2:2:Selected:1:12 Sub Selected(Source As Picture) SM1 End Sub"~o@ Picture 1??V@ "& H.  '(.C '('((('ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___www𼼼񐑑󊊊쑐쐐캑쐐  󺺼 mmmmmmmm𼼼" BW  SelectedB B'++LotusScript Development Environment:2:5:(Options):0:66 '++LotusScript Development Environment:2:5:(Forward):0:1 Declare Sub Selected(Source As Picture) '++LotusScript Development Environment:2:5:(Declarations):0:2 '++LotusScript Development Environment:2:2:BindEvents:1:129 Private Sub BindEvents(Byval Objectname_ As String) Static Source As PICTURE Set Source = Bind(Objectname_) On Event Selected From Source Call Selected End Sub '++LotusScript Development Environment:2:2:Selected:1:12 Sub Selected(Source As Picture) SM3 End Sub$3  LSOBEN /$TllLotus ProductV0.0/  8*2820CE4lNEWDELETE INITIALIZE TERMINATEdOBJECT (GLOBALS) (Globals)SOURCE BINDEVENTS OBJECTNAME_PICTURE4 LSCRIPT.dllSEDefaultClassControl|SELECTEDSM3  %PGhll\\\\).i]).i]gp8(+" h$ !@h$N 3 3Ҥ [\I G\ˀNl )# "~o@ Picture 3??x,@| "5&% 4  &(C &(&(((&ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___www𼼼gfm텅QQQ𵅅QXQX^^Q𧅡^񵡡񡡡ϡ7777󡡡󵡡7^7ϡ^^^7^^^7^^^y^^^y^^^y^^^ |^^^y^^^7^^^7Р^^^^^7^^^à^^^^^" B SelectedB B'++LotusScript Development Environment:2:5:(Options):0:66 '++LotusScript Development Environment:2:5:(Forward):0:1 Declare Sub Selected(Source As Picture) '++LotusScript Development Environment:2:5:(Declarations):0:2 '++LotusScript Development Environment:2:2:BindEvents:1:129 Private Sub BindEvents(Byval Objectname_ As String) Static Source As PICTURE Set Source = Bind(Objectname_) On Event Selected From Source Call Selected End Sub '++LotusScript Development Environment:2:2:Selected:1:12 Sub Selected(Source As Picture) SM4 End Sub"~o@ Picture 4??X"@ ""& \B  ((BC (((((((@ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___www𼼼mmmm                               " B SelectedB B'++LotusScript Development Environment:2:5:(Options):0:66 '++LotusScript Development Environment:2:5:(Forward):0:1 Declare Sub Selected(Source As Picture) '++LotusScript Development Environment:2:5:(Declarations):0:2 '++LotusScript Development Environment:2:2:BindEvents:1:129 Private Sub BindEvents(Byval Objectname_ As String) Static Source As PICTURE Set Source = Bind(Objectname_) On Event Selected From Source Call Selected End Sub '++LotusScript Development Environment:2:2:Selected:1:12 Sub Selected(Source As Picture) SM2 End Sub"~o@ Picture 2?Ӹ ?i-i7@T "&     %(C %(%(((%ʦ """)))UUUMMMBBB999|PP3f3333f333ff3fffff3f3f̙f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙33333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffff3fffffff3f̙ffff3ff333f3ff33fff33f3ff̙3f3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3ffffffffff!___www𼼼              T    "     WorkArea_, B@  B@      Strings_,  B@  !B@  """""""""""""" "PAm??" W .Use this SmartMaster to track outgoing orders.Generate a Purchase Order SmartMasters123123 PropertyDoc Info CommentsDoc Info KeywordsDoc Info ObjectDoc Info RevisionsDoc Info Revisions CountDoc Info SubjectDoc Info Title  tD  t9t&z ~   2 c  RCMHdrt