ئhG*\4Xg .TStringList<*gTStrings.SetCommaTextH*cdMessagesZkcdSysInitZkcdSystemZkfLongint|ofBooleanNcfString8f AnsiString8fInteger|ogTrue1ogFalse1og VarIsNullcg @LStrCat3X,Tdg @LStrCatNX,Tdg @VarToIntX,Tdg@LStrAsgX,Tdg @VarToLStr kg@VarClrX,Tdg @LStrArrayClrX,Tdg@HandleFinallyX,TdfVariantJh7g @LStrLAsgX,Tdg @VarFromLStrjg@LStrClrg@FinalizeArrayX,TdfTextFileFMfChargQfRealBYrPfCurrency,eigTObject.Create݋Rg AssignFileg@Assignf g SetTextBufg @SetTextBufX,TdgResetg @ResetText+UgStrg@Str2ExtX,TdgReadlng @ReadLStringX,Tdg@ReadLnX,TdgLengthg@LStrLen?gEofg@EofTextX,TdgIncgRoundg CloseFileg@CloseX,Tdg TObject.Free݋Rg@_IOTestX,Tdg@LStrFromString|g@LStrCatX,Tdg@LStrCmpX,Tdg@ROUNDX,TdgParamStrg @LStrAddRefX,TdceComCtrlsZkgTProgressBar.SetPositionceControlsZkgTControl.SetTextc_gTControl.SetVisiblee_ceFormsZkgTCustomForm.Createj-gTCustomForm.Showj-gTCustomForm.Closej-ceGenFnsXg AddToTabley)g CleanString~ g DeleteFromDC.gUpdateBatchStatusz3>ce MyMessageXce FileFunctionsXg GetFileSizece DateFunctionsXgFormattedDateString_tceProgressXf TProgressForm%g.TProgressForm<g TProgressForm.ProcessWinMessagesce TelstraTempXgTelsFormYceDataModXceMathZkc .1f$ nSupplierIDf. sSupplierIDf0 qryf2 sRentCodeIDf4 sRentFromf6 sRentTillf8 sLastTransactionTypeIDf: sLastRentCodef< slAddFieldNamesf > slAddFieldValuesf @( GetReferences!nBatch Result lSuccessfulc(GetTransactionID~ 1 ! sServiceCode#Resultf SubStringf vSubStringf lFoundcj'RECORD_BYTES_CF'PROGRESS_COUNTER_CF'PROGRESS_MAX_CF'QTY_C' PCMS_CODE_CF'TARRIF_C' AMTEXGST_CF' DESCRIPTION_CF' PROPTYPE_C' PROPERTY_CFk( GetTelsData-^('&!nBatch!FName" lReturnCodef nFileSize InputTextFilefq InputTextFileBufferf(q sCaptionf ReadStringf ConvertStringf nProgressCountedf Progressf" nCountf nSoFar nFactorf sServiceIDf SubStringf sBatchf sListFieldsf sListValuesf FieldStringListf ValueStringListf qryStringListf nListValues qryDCf curAmountChargedf sCodeIDf lFinishedfc( TelsInvoice%&!nBatch! sDirectoryf OpenDlg  lContinuef sFilef EmptyList c( FinalizationX,Td! &c(Tels!&cD$@L@*D$< iihi Q,<   l  )i ihY,<@i (Bihi i i i.Bihi i.Bihi  i  <||],<i iihi ihFi E I"I " $ Fi  ti r|rr t*L $ , . l0D0 l(2"<F"i  r| t  |   |  |  |  |  | t AJF,$$T6x6x$$$84$$F$d2.nXm H6H N  ,X "".@, . x <H  ":f4D0DXppD\0$<$<,  (@&  N,0>: ,~)D)iAq.02468 : <>@D!F%H-159=m=q=uAAUEYI]MaQeUiYm]qaueyy}qqd0pF %J%%%%%5%%%!%=  % )`X2-H-\==iLpRmqmyqyiyI%E(02NjU  a