tOpS0!--;;KKKKKKKKKL!--;;KKKKKKKKKK f !;-L r.<Jz p EO-O0vl O-De60>4 gP-gP-O py ..o P-P-Container4  $ @s20Container 4:Container 4Aw4?Container4:PromptContainer4Container4Q-Container 4:l D0tainer4:Promptl < !@s20 ainer4:(@s20 ainer4:h(  .o P-4Q-Container3  $ @s20Container 3:Container 3Aw4?Container3:PromptContainer3Container3Q-Container 3:l D0tainer3:Promptl < !@s20 ainer3:(@s20 ainer3:h(  .o P-P-Container2  $ @s20Container 2:Container 2Aw4?Container2:PromptContainer2Container2Q-Container 2:l D0tainer2:Promptl < !@s20 ainer2:(@s20 ainer2:h(  .o P-*4-Container1  $ @s20Container 1:Container 1Aw4?Container1:PromptContainer1Container1Q-Container 1:l D0tainer1:Promptl < !@s20 ainer1:(@s20 ainer1:h(  . zP-zP-LastStringPosition  7 @n-14Last String Position:Last String PositionYwL?LastStringPosition:PromptLastStringPositionLastStringPositionh9=Last String Position::@tStringPosition:Promptt T !%@n-14-1StringPositioni $8%@n-14StringPositiong8 $ . zP-zP-SearchStringPosition  ; @n-14Search String Position:Search String PositionFwX?SearchStringPosition:PromptSearchStringPositionSearchStringPosition\-ASearch String Position: DrchStringPosition:Prompt \ !@n-14 chStringPosition $(<@n-14chStringPosition @ ,nge `2 kg rr] O- H0PrintInvoice*Clarion$Reports0t9 TINTOOLS$TTreportviewer%TINReportViewerBox%TINReportViewerTitle%Generate Invoicer gP-xP-4ReplaceString(STRING,STRING,STRING), STRINGgeClarion$Sources-jPxP-.. F90L90PRINTED::ACTDtl  1 @n3PRINTED :: ACTD tl:PRINTED :: ACTD tl,w, @( !l@n3@n3.2 's?PRINTED::ACTDtl:Prompt(mptPRINTED :: ACTD tl:PRINTED::ACTDtlPRINTED::ACTDtl. XA90F90PRINT::ACTDtl  - @n3PRINT :: ACTD tl:PRINT :: ACTD tl,w, @( !l@n3@n3 .2 's?PRINT::ACTDtl:Prompt:PPRINT :: ACTD tl:OLPRINT::ACTDtl:BPRINT::ACTDtl:B l. },90090data_actdtl % @s255data actdtl:data actdtl,w, @( !l@s255t@s255  'F?data_actdtl:Promptmptdata actdtl:data_actdtldata_actdtl #@s25525. b$N-'N-GLO:InvCust * @s10GLO : Inv Cust:GLO : Inv Cust,w, @( !l @s10pt@s10  'F?GLO:InvCust:PromptmptGLO : Inv Cust:GLO:InvCustGLO:InvCust@s20y.o P-P-Container6  $ @s20Container 6:Container 6Aw4?Container6:PromptContainer6Container6Q-Container 6:l D0tainer6:Promptl < !@s20 ainer6:(@s20 ainer6:h(  .o P-P-Container5  $ @s20Container 5:Container 5Aw4?Container5:PromptContainer5Container5Q-Container 5:l D0tainer5:Promptl < !@s20 ainer5:(@s20 ainer5:h(   e .. P-P-RecordsPerCycle  5 @n-14Records Per Cycle:Records Per Cycle0w0  @( !lF?RecordsPerCycle:PromptRecords Per Cycle:eRecordsPerCycle@n-14 &CRecordsPerCycle@n-14ed@n-14o?Clo. P-P-RecordsProcessed  5 @n-14Records Processed:Records Processed,w, @( !lA?RecordsProcessed:PromptindRecords Processed:RecordsProcessed @n-14 $&RecordsProcessed#@n-14o. P-P-RecordsToProcess  7 @n-14Records To Process:Records To Process,w, @( !lA?RecordsToProcess:PromptindRecords To Process:RecordsToProcess @n-14 $&RecordsToProcess#@n-14o. P-P-WindowOpened  ) @n-14Window Opened:Window Opened,w, @( !lB?WindowOpened:PromptileWindow Opened:eWindowOpenedgr@n-14 & WindowOpened @n-14#@n-14o. P-P-LocalResponse  + @n-14Local Response:Local Response,w, @( !lB?LocalResponse:PrompttLocal Response:LocalResponsegr@n-14 &LocalResponse3@n-14#@n-14o. P-P-LocalRequest  ) @n-14Local Request:Local Request,w, @( !lB?LocalRequest:PromptptLocal Request:sLocalRequestogr@n-14 &LocalRequestn3@n-14!@n-14o. P-P-RejectRecord  ) @n-14Reject Record:Reject Record,w, @( !lB?RejectRecord:PromptptReject Record:sRejectRecordogr@n-14 &RejectRecordn3@n-14#@n-14o.} O-u#N-GLO:RemarkStr / @s200GLO : Remark Str:GLO : Remark Striw,GLO : Remark Str:GLO:RemarkStrO:\tr?GLO:RemarkStr:PromptGLO:RemarkStrX)-$0: Pay Str:l0:PayStr:Promptg <4 !@s200 PayStrL(@s200 PayStrh  #=  ..v zP-zP-ReturnString  ) @s255Return String:Return String&w@?ReturnString:Prompt ReturnString ReturnStringtE%Return String:,urnString:Prompt < ! rnString  rnStringh0 . P-P-PRINTED::BolDtl  1 @n3PRINTED :: Bol Dtl:PRINTED :: Bol DtlMw@?PRINTED::BolDtl:PromptPRINTED::BolDtlPRINTED::BolDtltE5PRINTED :: Bol Dtl:4NTED::BolDtl:Prompt D !@n3TED::BolDtl 0@n3TED::BolDtlp0 0 . P-P-PRINT::BOLDtl  - @n3PRINT :: BOLD tl:PRINT :: BOLD tlMw@?PRINT::BOLDtl:PromptPRINT::BOLDtlPRINT::BOLDtltE5PRINT :: BOLD tl:04NT::BOLDtl:Prompt D !@n3T::BOLDtl 0@n3T::BOLDtl(p0 0 . P-P-PRINT::VGEDtl  - @n3PRINT :: VGED tl:PRINT :: VGED tlMw@?PRINT::VGEDtl:PromptPRINT::VGEDtlPRINT::VGEDtltE5PRINT :: VGED tl:04NT::VGEDtl:Prompt D !@n3T::VGEDtl 0@n3T::VGEDtl(p0 0 . P-P-FilesOpened  ' @n-14Files Opened:Files Opened,w, @( !l:?FilesOpened:PromptFiles Opened:onFilesOpened@n-14gr &"FilesOpened@n-14ns@n-14#@n-14o. P-P-RecordStatus  + @n3Record Status:Record Status,w, @( !l>?RecordStatus:PromptptRecord Status:sRecordStatusogr@n3 &!RecordStatusogr@n3ycle#@n-14o. P-P-PercentProgress  - @n3Percent Progress:Percent Progress,w, @( !lB?PercentProgress:PromptPercent Progress:ycPercentProgress@n3 &PercentProgress@n3ycle#@n-14o. P-P-RecordsThisCycle  7 @n-14Records This Cycle:Records This Cycle,w, @( !lA?RecordsThisCycle:PromptecoRecords This Cycle:RecordsThisCycle @n-14 $&RecordsThisCycle@n-14o/G Q  .. O-O-data_contdtl ' @s255data contdtl:data contdtl&w@?data_contdtl:Prompt data_contdtl data_contdtltE1data contdtl:,4a_contdtl:Prompt D !@s255ld_contdtl ,@s255p_contdtlp0 ,/eplaceString(CLIt.j O-O-data_bldtl # @s255data bldtl:data bldtlAw4?data_bldtl:Promptdata_bldtldata_bldtlQ)data bldtl:,a_bldtl:Prompto 8 !@s25525 _bldtlp $@s25525 _bldtlpd( | #{.q O-O-data_rcpdta % @s255data rcpdta:data rcpdtaAw4?data_rcpdta:Promptdata_rcpdtadata_rcpdtaQ data rcpdta:0a_rcpdta:Prompt < !@s255W _rcpdta(@s255 C _rcpdtah(  #rAdd. t O-t O-ForceRefresh  ) @n-14Force Refresh:Force Refresh,w, @( !lB?ForceRefresh:PromptompForce Refresh:iForceRefreshwIn@n-14ze &CForceRefreshind@n-14iad@n-14. t O-t O-WindowInitialized  3 @n-14Window Initialized:Window Initialized,w, @( !lN?WindowInitialized:PromptndWindow Initialized:WindowInitialized@n-14 $&7WindowInitialized@n-14. t O-t O-WindowOpened  ) @n-14Window Opened:Window Opened,w, @( !lB?WindowOpened:PromptileWindow Opened:eWindowOpenedqu@n-14 & WindowOpened@n-14-1. t O-t O-FilesOpened  ' @n-14Files Opened:Files Opened,w, @( !l:?FilesOpened:PromptFiles Opened:onFilesOpened@n-14qu &&FilesOpened@n-14ns@n-14-1. t O-t O-LocalResponse  + @n-14Local Response:Local Response,w, @( !lB?LocalResponse:PrompttLocal Response:LocalResponsequ@n-14-1 &LocalResponsequ@n-14-1. t O-t O-OriginalRequest  / @n-14Original Request:Original Request0w0  @( !lF?OriginalRequest:PromptOriginal Request:caOriginalRequest@n-14 &OriginalRequest@n-14GE. t O-t O-LocalRequest  ) @n-14Local Request:Local Request,w, @( !l?LocalRequest:PromptLocal Request:LocalRequest @n-14( & LocalRequest@n-14=y  .. O-O-GLO:ReprintFlag 2 @s10GLO : Reprint Flag:GLO : Reprint FlagMw@?GLO:ReprintFlag:PromptGLO:ReprintFlagGLO:ReprintFlagtE5GLO : Reprint Flag:8:ReprintFlag:Prompt H !@s10usTReprintFlag 0@s10tReprintFlagt0 (.v O-O-GLO:CusTot  + @n-18.2GLO : Cus Tot:GLO : Cus TotAw4?GLO:CusTot:PromptGLO:CusTotGLO:CusTotQ-GLO : Cus Tot:A0:CusTot:Prompte < !@n-18.2 CusTot5 ( @n-18.2 CusTot h(  . O-MN-GLO:CustomerAddress ; @s250GLO : Customer Address:GLO : Customer AddressYwL?GLO:CustomerAddress:PromptGLO:CustomerAddressGLO:CustomerAddressh9=GLO : Customer Address:@:CustomerAddress:Prompt T !@s250PCCustomerAddress $8@s250toCustomerAddress8 $' sultArr[. O->N-GLO:InvCustomer P 2 @s80GLO : Inv Customer:GLO : Inv CustomerawT?GLO:InvCustomer:PromptGLO:InvCustomerGLO:InvCustomerGLO : Inv Customer:`15,8: RCPC ustomer:8:RCPCustomer:Prompt H @!@s80cpURCPCustomer 0@s80erRCPCustomert0 (+ceString(CLI.v O-rN-GLO:InvUser  * @s50GLO : Inv User:GLO : Inv UserRwT?GLO:InvUser:PromptGLO:InvUserGLO:InvUserGLO : Inv User:@s50@s50`1-$(: Rcp User:0:RcpUser:Prompt < 4!25 RcpUserD RcpUserh( L }.s O-N-GLO:InvCur ( @s10GLO : Inv Cur:GLO : Inv CurQwD?GLO:InvCur:PromptGLO:InvCurGLO:InvCurGLO : Inv Cur:pA-$0: Rcp Cur:0:RcpCur:Prompt < 4!@s1025 RcpCur(@s10 RcpCurh(  .w O-GN-GLO:InvTime  + @n-14GLO : Inv Time:GLO : Inv TimeQwD?GLO:InvTime:PromptGLO:InvTimeGLO:InvTimeGLO : Inv Time:pA-$0: Rcp Time:0:RcpTime:Prompt < 4!@n-1425 RcpTime(@n-14 RcpTimeh(  .w O- N-GLO:InvDate  + @n-14GLO : Inv Date:GLO : Inv DateQwD?GLO:InvDate:PromptGLO:InvDateGLO:InvDateGLO : Inv Date:pA-$0: Rcp Date:0:RcpDate:Prompt < 4!@n-1425 RcpDate(@n-14 RcpDateh(  |.r O- N-GLO:Invnbr  ' @n-14GLO : Invnbr:GLO : InvnbrQwD?GLO:Invnbr:PromptGLO:InvnbrGLO:InvnbrGLO : Invnbr:pA-$0: Rcpnbr:,0:Rcpnbr:Prompt < 4!@n-1425 Rcpnbr(@n-14 Rcpnbrh(  {.q O-O-data_chgdtl % @s255data chgdtl:data chgdtlAw4?data_chgdtl:Promptdata_chgdtldata_chgdtlQ-data chgdtl:,0a_chgdtl:Prompt < !@s25525 _chgdtl(@s255 _chgdtlh(  0a_chgdtl:Prompt < !@s25525 _chgdtl(@s255 _chgdtlh(  N   EO-U0-+%DataSectionAfterWindow+*onumstar LONG StopPos LONG NewString STRING(1024) ResultArr STRING(200) DIM(11) y+%ProcedureInitialize+*data_rcpdta = 'C:\advantumreports\invdata.txt' data_bldtl = 'C:\advantumreports\bldtl.tps' data_contdtl= 'C:\advantumreports\contdtl.tps' data_chgdtl = 'C:\advantumreports\chgdtl.tps' data_actdtl = 'C:\advantumreports\actdtl.tps' +%BeforeWindowIniResize+*> DO ReadInvoiceData PrintInvoice() DO ProcedureReturn +%BeforeWindowClosing+*[ REMOVE(BLDetails) REMOVE(ChargesDetail) REMOVE(ContainerDetail) REMOVE(ACTDetails) 1 +%ProcedureRoutines+* ReadInvoiceData "ROUTINE SET(RcpData) LOOP NEXT(RcpData) IF ERRORCODE() THEN BREAK. #IF (SUB(RCPDAT:line,1,3)= 'HDR') numstar = 11 DO SplitLine 'GLO:Invnbr = DEFORMAT(ResultArr[2]) ,GLO:InvDate = DEFORMAT(ResultArr[3],@d12) +GLO:InvTime = DEFORMAT(ResultArr[4],@t4) #GLO:InvCur = CLIP(ResultArr[5]) #GLO:InvUser = CLIP(ResultArr[6]) #GLO:InvCust = CLIP(ResultArr[7]) 'GLO:InvCustomer = CLIP(ResultArr[8]) LGLO:CustomerAddress = ReplaceString(CLIP(ResultArr[9]),'&^#%','<13><10>') 'GLO:CusTot = DEFORMAT(ResultArr[10]) /GLO:ReprintFlag = UPPER(CLIP(ResultArr[11])) END "IF (SUB(RCPDAT:line,1,2)= 'BL') numstar = 8 DO SplitLine CLEAR(BLDTL:RECORD) *BLDTL:bilref = DEFORMAT(ResultArr[2]) BLDTL:bilno = CLIP(ResultArr[3]) &BLDTL:linename= CLIP(ResultArr[4]) &BLDTL:shipname = CLIP(ResultArr[5]) 0BLDTL:reportdate= DEFORMAT(ResultArr[6],@d12) 'BLDTL:voynum = CLIP(ResultArr[7]) 'BLDTL:consigname= CLIP(ResultArr[8]) ADD(BLDetails) END #IF (SUB(RCPDAT:line,1,3)= 'ACT') numstar = 9 DO SplitLine CLEAR(ACTDTL:RECORD) *ACTDTL:actid = DEFORMAT(ResultArr[2]) ACTDTL:jobno = DEFORMAT(ResultArr[3]) )ACTDTL:bilno = DEFORMAT(ResultArr[4]) &ACTDTL:actdesc= CLIP(ResultArr[5]) )ACTDTL:actstrdate = CLIP(ResultArr[6]) )ACTDTL:actstrtime = CLIP(ResultArr[7]) *ACTDTL:actenddate = CLIP(ResultArr[8]) )ACTDTL:actendtime = CLIP(ResultArr[9]) ADD(ACTDetails)  END #IF (SUB(RCPDAT:line,1,3)= 'CTN') numstar = 3 DO SplitLine CLEAR(CONDTL:Record) )CONDTL:bilref = DEFORMAT(ResultArr[2]) &CONDTL:contnbr = CLIP(ResultArr[3]) ADD(ContainerDetail) END #IF (SUB(RCPDAT:line,1,3)= 'DTL') numstar = 6 DO SplitLine CLEAR(CHGSDTL:RECORD) *CHGSDTL:bilref = DEFORMAT(ResultArr[2]) )CHGSDTL:chgdesc = CLIP(ResultArr[3]) +CHGSDTL:amount = DEFORMAT(ResultArr[4]) .CHGSDTL:amountdc = DEFORMAT(ResultArr[5]) )CHGSDTL:actid = DEFORMAT(ResultArr[6]) ADD(ChargesDetail)  END %IF (SUB(RCPDAT:line,1,5)= 'REMKS') numstar = 2 DO SplitLine %GLO:RemarkStr = CLIP(ResultArr[2]) END END SplitLine zROUTINE StopPos = 0 NewString = RCPDAT:line I# = 1 LOOP numstar TIMES IF INSTRING('*', NewString, 1, 1) MResultArr[I#] = SUB(NewString,1,INSTRING('*', NewString, 1, 1)-1) ELSE ResultArr[I#] =NewString NewString='' END I#+=1 StopPos = INSTRING('*', NewString, 1, 1) NewString = SUB(NewString,StopPos+1,len(NewString) - StopPos) END   O-U0/+%DataSectionAfterReport+*xtmpBilref LONG tmpactid 'LONG FilledContainer LONG SaveShip STRING(60) SaveDate LONG ?1@+%ProcedureSetup+*tmpBilref = 0 tmpactid = 0 SaveShip='' SaveDate = 0 PrintSkipDetails = FALSE PRINTED::BolDtl = FALSE PRINTED::ACTDtl =FALSE C6D+%BeforePrint+*PRINT::VGEDtl = FALSE PRINT::BOLDtl = FALSE PRINT::ACTDtl = FALSE IF ~(CHGSDTL:bilref = tmpBilref) CLEAR(BLDTL:record) BLDTL:bilref = CHGSDTL:bilref GET(BLDetails,BLDTL:byBilref) IF ~ERRORCODE() PRINT::BOLDtl = TRUE PRINTED::BolDtl = TRUE CIF ~(SaveShip=BLDTL:shipname) AND ~(SaveDate = BLDTL:reportdate) PRINT::VGEDtl = TRUE SaveShip=BLDTL:shipname SaveDate = BLDTL:reportdate END END tmpBilref =CHGSDTL:bilref END IF ~(CHGSDTL:actid = tmpactid) CLEAR(ACTDTL:record) ACTDTL:actid = CHGSDTL:actid GET(ACTDetails,ACTDTL:byActid) IF ~ERRORCODE() PRINT::ACTDtl = TRUE PRINTED::ACTDtl = TRUE END tmpactid =CHGSDTL:actid END OMIT('@@@END@@@') JN+%AfterPrint+*J!@@@END@@@ PrintSkipDetails = FALSE IF PRINT::VGEDtl THEN PRINT(RPT:VGEDtl) END IF PRINT::BOLDtl THEN PRINT(RPT:BOLDtl) END IF PRINT::ACTDtl THEN PRINT(RPT:ACTDtl) END IF FALSE THEN PrintSkipDetails = TRUE PRINT(RPT:EORUline) END IF ~PrintSkipDetails AND CHGSDTL:amount PRINT(RPT:detail) END OQ+%BeforeTurnQuickScanOff+* IF PRINTED::BolDtl SET(ContainerDetail) FilledContainer = 0 LOOP NEXT(ContainerDetail) IF ERRORCODE() THEN BREAK. FilledContainer += 1 CASE FilledContainer OF 1 Container1 = CONDTL:contnbr OF 2 Container2 = CONDTL:contnbr OF 3 Container3 = CONDTL:contnbr OF 4 Container4 = CONDTL:contnbr OF 5 Container5 = CONDTL:contnbr OF 6 Container6 = CONDTL:contnbr OF 7 PRINT(RPT:BOLContainer) FilledContainer = 1 Container1 = CONDTL:contnbr CLEAR(Container2) CLEAR(Container3) CLEAR(Container4) CLEAR(Container5) CLEAR(Container6) END END IF FilledContainer PRINT(RPT:BOLContainer) bEND END TX+%BeforeClosingReport+*!***TINTOOLS*** 2>\Q\ gP-U0+%ProcessedCode+*/ CLEAR(ReturnString) SearchStringPosition = 1 LastStringPosition = 1 LOOP SearchStringPosition = INSTRING(CLIP(strSearchString), strInputString, 1, LastStringPosition) IF SearchStringPosition ReturnString = CLIP(ReturnString) & SUB(strInputString, LastStringPosition, (SearchStringPosition-LastStringPosition)) & CLIP(strReplaceString) ILastStringPosition = SearchStringPosition + LEN(CLIP(strSearchString)) 4IF LastStringPosition > LEN(CLIP(strInputString)) BREAK END ELSE ReturnString = CLIP(ReturnString) & SUB(strInputString, LastStringPosition, (LEN(CLIP(strInputString))-LastStringPosition+1)) ;BREAK END END If SUB(ReturnString,1,2)= ' ' dReturnString = SUB(ReturnString,3,LEN(CLIP(ReturnString))-2) END RETURN(ReturnString) fjh  dd O-vU0W:\AdvantumLMS\Clarion Reports\LMSDict.dct  U0U0*B$*B$ ;Clarion$ToDoClarion TINTOOLS$TINTOOLSR%TINGLOBALVIEWER%TINGLOBALPRNPROP%TINGLOBALCALENDAR%TINGLOBALCALCULATOR%TINGLOBALTAPI"%TINGLOBALCASTLEWEBBROWSER%TINICONBUTONOFF%TINICONCHKVAR%%TINFLATBUTONOFF%TINFLATCHKVAR%%TINFLATBUTICONFILE%%TINDEFAULTICONFILE%%TINTIPSCHKONOFF%TINTIPSCHKVAR%ff~ O-vU0K-- Generator #noedit #system win32 #model clarion dll #set RELEASE = on #pragma debug(vid=>off) #compile "lmsin_RD.CLW" -- GENERATED #compile "lmsin_RU.CLW" -- GENERATED #compile "lmsin_SF.CLW" -- GENERATED #compile "Tintrptv.Clw" -- GENERATED #compile "lmsinvoicesjc.clw" /define(GENERATED=>on) -- GENERATED #compile "lmsin001.clw" /define(GENERATED=>on) -- GENERATED #pragma link("C5DOS%X%%L%.LIB") -- GENERATED #pragma link("C5ASC%X%%L%.LIB") -- GENERATED #pragma link("C5TPS%X%%L%.LIB") -- GENERATED #pragma link("WMFASX.LIB") -- GENERATED #link "lmsinvoicesjc.EXE" ijj_ O-7O-%GenerationCompleted%%Module lmsin001.clw1lmsinvoices.clw1lmsinvoicesjc.clw1 lmsre001.clw1lmsreceipts.clw1%LastTarget32%1%LastProgramExtension%EXE%LastApplicationDebug%$%LastApplicationLocalLibrary% E j; O-ܸU0!%ProgramAuthor%5%MessageDescription%GlobalExternal%GenerateEmbedComments%INIActive3%INIFile%Program Name.INI%ININame%%DefaultGenerate%DefaultCloseFile%Close the File%DefaultRILogout%WarnOnLogoutError%LockRecoverTime% %DefaultThreaded%Use File Setting%DefaultCreate%Use File Setting%DefaultExternal% None External%DefaultExternalSource%%DefaultExternalAPP%DefaultExport%DefaultOpenMode%Share%DefaultUserAccess% Read/Write%DefaultOtherAccess% Deny None%OverrideGenerate%File%OverrideCloseFile%%File Use Default ACTDetails Use Default BLDetails Use Default ChargesDetail Use DefaultContainerDetail Use DefaultRcpData Use Default%OverrideRILogout%%File Use Default ACTDetails Use Default BLDetails Use Default ChargesDetail Use DefaultContainerDetail Use DefaultRcpData Use Default%OverrideThreaded%%File Use Default ACTDetails Use Default BLDetails Use Default ChargesDetail Use DefaultContainerDetail Use DefaultRcpData Use Default%OverrideCreate%%File Use Default ACTDetails Use Default BLDetails Use Default ChargesDetail Use DefaultContainerDetail Use DefaultRcpData Use Default%OverrideExternal%%File Use Default ACTDetails Use Default BLDetails Use Default ChargesDetail Use DefaultContainerDetail Use DefaultRcpData Use Default%OverrideExternalSource%%File%OverrideExternalAPP%File%OverrideExport%File%OverrideOpenMode%%File Use Default ACTDetails Use Default BLDetails Use Default ChargesDetail Use DefaultContainerDetail Use DefaultRcpData Use Default%OverrideUserAccess%%File Use Default ACTDetails Use Default BLDetails Use Default ChargesDetail Use DefaultContainerDetail Use DefaultRcpData Use Default%OverrideOtherAccess%%File Use Default ACTDetails Use Default BLDetails Use Default ChargesDetail Use DefaultContainerDetail Use DefaultRcpData Use Defaultj t O-U0 %Parameters%|%ReturnValue"%WindowOperationMode%Use WINDOW setting%INISaveWindow%ButtonAction%%ControlNo Special Action%ButtonRunName%%Control%ButtonRunParameters%%Control%ButtonProcedure %Control%ButtonThread%Control%ButtonThreadStack%%ControlHa%ButtonParameters%%Control%ButtonRequest%%ControlNone%PreLookupKey#%Control%PreLookupField$%Control%PreLookupProcedure %Control%PostLookupKey#%Control%PostLookupField$%Control%PostLookupProcedure %Control%PostLookupDuringValidate%Control%ForceWindowRefresh%Control%CheckedAssigns%Control%CheckedAssignVariable"%CheckedAssigns%CheckedAssignValue%%CheckedAssigns%CheckedHides%Control%CheckedControl%%CheckedHides%CheckedControlAction%%CheckedHides%UncheckedAssigns%Control%UncheckedAssignVariable"%UncheckedAssigns%UncheckedAssignValue%%UncheckedAssigns%UnCheckedHides%Control%UnCheckedControl%%UnCheckedHides%UnCheckedControlAction%%UnCheckedHides j O-U0;%RangeLimitType% Current Value%Parameters%(%ReturnValue"%WindowMessage%N%EnablePrintPreview%EnableQuickScan%RecordFilter%%ApproxRecordCount%%RangeField$%RangeLimit"%RangeLow"%RangeHigh"%RangeFile!%HotFields%HotField"%HotFields%HotFieldBound%HotFields%DetailFilter%%ReportControl%DetailFilterExclusive%ReportControljx bhP-U0T%Parameters%11(strInputString,strSearchString,strReplaceString);j1 >P->P- j1 YP-YP-pp O-O-#Clarion$ClarionO-Pypo EO- H0:Clarion$GENERATED H0rr EO-#@0Main M7Clarion$Windows0O#@04%7%   O- O-wxD?p\ (8Receipt GenerationWindowt YesL-\$R$ s90s90!$w$(K el(P@a.L4!|RPTreport        t  Arial\  (F (VGEDtl?VGEInfo @s20BLDTL:voynum Times New RomanVoyage#:DATE?String31  *Times New Roman?String31 |?Line13?Line13Phhp CUSTOMER?String23 *Times New Roman?String23\x  d X@s10GLO:InvCustT 2Times New RomanCLIENT:clientCodeHe<( 4H `@s50$EDGLO:InvUser .Times New RomanGLO:CreatedByl\ h@s10GLO:ReprintFlag GLO:ReprintFlag @48P?Line9?Line9i<( ek , p@P< ?PGLO:Invnbr$ ArialINVOICE:invID ?:?Line14?Line14d| x@D8GLO:InvDate .Times New RomanINVOICE:invDate}xJDebit Note?String29h Times New Roman?String29 ,PD\  @s80 geGLO:InvCustomer 2Times New RomanCLIENT:clientName&x(  |OFFICER?String32efl *Times New Roman?String3264Tg L` ?Line12?Line12\D GLO:CustomerAddress4 6Times New RomanCLIENT:clientAddress3 ( e  (&$  IbLC @s10 GLO:InvCur 6Times New RomanFOREIGNXCHANGE:fexCoderp w( L  b@d  Amount Times New Roman4  s #Item DescriptionAll$ Times New Roman t    Pp$ t hBOLDtl?BOLInfox @s25BLDTL:bilno JTimes New Roman?Line7?Line7SHIPREPORT:shrptVoyNoArrata | " ?String43 O| *Times New Roman?String43 L d  Gp   @s60e oBLDTL:shipnamer .Times New RomanVESSEL:vesName     Reported:at?String21ri *Times New Roman?String21u( D h , 3\ t   #@D17ldsBLDTL:reportdatenti 2Times New RomanSHIPREPORT:shrptADA  }   Vessel:?String202 *Times New Roman?String20P p  h |  p   ACTDtl?ACTInfohAct #.:?String33X FTimes New Roman?String33BILLOFLADING:bolNumber #  H SL<BOL#:?String25, *Times New Roman?String25 b      detailx @s100?Line11 @I 8L Act Descr.:?String34 *Times New Roman?String34Dh \t  Job ID:?String37 *Times New Roman?String37   @N10ACTDTL:jobno| !Times New RomanACTDTL:jobno  @` Xp @s60utpACTDTL:actdesca .Times New RomanACTDTL:actdesc5  @N10fixACTDTL:actidds  .Times New RomanACTDTL:actidHh `x ?Line7:2?Line7ft4LhStart Date:?String35X *Times New Roman?String35TS@ 4L Start Time:?String36ns *Times New Roman?String36R l !@s20ACTDTL:actendtime\ 2Times New RomanACTDTL:actendtime<q4P @s30 ACTDTL:bilno- !Times New RomanACTDTL:bilno btBL#:?String40-d *Times New Roman?String40IT ,LSDX  !@s20yACTDTL:actenddate 2Times New RomanACTDTL:actenddateaqEnd Date:?String38p *Times New Roman?String38ld 4X$LdEnd Time:ai?String39 d *Times New Roman?String39(  !@s20ACTDTL:actstrtimet 2Times New RomanACTDTL:actstrtime$4TVqLh @s20eshACTDTL:actstrdate 2Times New RomanACTDTL:actstrdatecr q| ?Line7:3s w?Line7:2genLd4LpTt  BOLContainer?BOLContainer%LS L@s20@s20CHGSDTL:chgdesch >Times New RomanRECEIPTDETAIL:recdtlDescription,L \  @N-15.2BCHGSDTL:amount :Times New RomanRECEIPTDETAIL:recdtlAmount [} $  EORUline?Uline?Line8 ?Line8$SL?String11:2@ Container10 *Times New RomanContainer1.s<$ Container2  *Times New RomanContainer2h<t_D0 @s20Container3  *Times New RomanContainer3sV  @s20eciContainer4֜ *Times New RomanContainer44dM|( @s20Container5o *Times New RomanContainer5D  @s202Container6 *Times New Romancontainer6\|:t$ ?Line10!SLp| h ArialDP\[      A,"H?Line6?Line64 < @n15.2GLO:CusTot 6Times New RomanINVOICE:invTotalAmountH h 4 "GLO:RemarkStrt $ 2Times New RomanINVADDDETL:Comments   s e \   -PLEASE PAY WITHIN 7 DAYSpda?String41cr *Times New Roman?String41\!t / X  P!TOTAL DUE:?String11 T@! *Times New Roman?String1180!!(!!4! ! $"@s10!GLO:InvCur,,?GLO:InvCur:2""! .Times New RomanFOREIGNXCHANGE:fexCodel!!!! ! !Free&ze -T" L"!A&ttributes~ADM3_ATTRIBUTES&+."""&Case '$/ U-"-#7NormalPerforms no conversion on the items entered#  # "IWord CapitalizeConverts the first letter of each word to upper case# ( f# V#/UppercaseConverts each letter to upper case 2 # #T&