ئhG!veC g .TStringList<*cdSysUtilsZkgIntToStrJ 7g EncodeDateceDataMod gDMM^ceMain gMainForm.|ceMathZkc*TServiceDetails@* .1f,% LOGPROGRESS .%LOGDEBUG . nCountfx nFactorf z frmProgressf(| nSupplierIDf~ sSupplierIDf qryTelstraf sRentCodeIDf  sCallCodeIDf  sOtherCodeIDf sDiscountCodeIDf sSupplierRentCodeIDf sSupplierCallCodeIDf sSupplierOtherCodeIDf! sSupplierDiscountCodeIDf% sAccountNumberf) sLastCallCodef1 sLastRentCodef5 sLastOtherCodef9 sLastCallTransactionTypeIDf= sLastRentTransactionTypeIDfA sLastOtherTransactionTypeIDfE sLastDiscountTransactionTypeIDfI sLastSupplierCallCodeIDfM sLastSupplierRentCodeIDfQ sLastSupplierOtherCodeIDfU LogTextFilefY lThisIsAPABXfe(StartNewLogFiled0!Value LogFilef"c( LogToFile0!Value LogFilef"cj'PROGRESS_MAX_CF*.22k(GetDetailFixedEBS6!#H0!FName!Df! nBatchNumber" lReturnCode& nFileSize lFirstDFf lFirstDEf sPartFileNamef sPartResultSetf EntryCodef nBackSlashAt TelstraFilef" CurrentFilef FileIterationf Tf SubStringf vSubStringf$q curValuef& nSoFar dBillingf dStartBillingPeriodf dEndBillingPeriodf nBatchIDf sBatchIDf sLastDetailCodef4 DBfromDatef DBtoDatef aResultSetf2 nResultSetf nMaxResultsfq nStartSearchAtfa lFoundf] dMinDatef1 nCommaPositionf! sListValuesf sListFieldsf FieldStringListf ValueStringListf qryStringListf slAddFieldNamesf slAddFieldValuesf qryDCf qryDSf nListValuesf nDummyf a sInputLineCodefQ lContinue lDataSavedfM lValueIsRealfI nDataCollectionIDf1 lNextAccountNumberf- sNextAccountNumberf nNextAccountNumberf nPosf .f6c(BillingInputFixedEBSeR1/0! stInFilesf!nBatchf lContinuef sPartFileNamef nBackSlashAt nPosc(TelstraInvoiceFixedEBSYa0!nBatchf! sDirectoryf!nProgramf lContinue stFilesf OpenDlg c( FinalizationX,Td! 0c(TelstraFixedEBS!0cMjX,Custno,ServCode, ServiceID,RentFrom,RentTill(,CallFrom8,CallTillHcD,A.?@E(!8K:*D@>B<>DD,>lTServiceDetails,4S4؋Ӌ[d.2,UQxjjIuMSVWU3UhAd0d ƅKD3@V,A}f^3EuUEƅS|xtpl h8Ah d8AdhLAQ4hpAQ4XMAXhQ4hAhU܋QXhATPEThAPPEPXX]ěuu]hhR@EEE3Efff]EE̋EEЋE>E~#LۅL-A=A3Y@3EU*UA؍EPE+ˍSEUAōXMAXhBuh(BXX3U荅ll3Uh@d2d"UllXPEX8BÄu$jf DB3ҸPBXPEXBÄu$jf DB3ҸBUCÄu!jf DB3Ҹ(COXPEXtCÄujf DB3ҸB:3ۍE܋ CTP ETXXUÄutUll ݝX݅X;~u9XEX(lu$jf DB3ҸC|9}EP EXPEXPXPEXPXPEXZY]̛3Uh?d2d"EXPEXTTC 6TC^ TPETXX/XP-EXC |R@xR@EDE DXP EXUE~*E Duh4Duh@DEXP-EXUELDuh4DXEXh@DEU`D<<~E<XPCEXLLEEPEE~;ElDuh4DXEXh@DEEPEE~*EDuh4Duh@DEXPEXUE~;EDuh4DXEXh@DEXP FEXUTETXXEE~*EDuh4Duh@DETP ETXXUE{EDuh4Duh@DEUU\UDP\D0E}tYDXQXXDXQXXapR@lR@DpQ4h4D5h4DXXlQ4EpQ4(ElQ48EpQ4(ElQ4LEpQ4lQ4hEpQ4lQ4|EpQ4ElQ4lpEDP\D0uhEhEEu5hC5hCE@uhEhEEu5hC5hCEXP EXUE~uEEUܸF~EF E FE,Fuh4DXEXh@DEXPYEXUE~;EHFuh4DXEXh@DEU|Q4UxQ4EEXP 8EXUEuEܺ`F$RERu Eܺ`FElFuuhCEXP EEXUEuEܺ`F$RERu Eܺ`FE |F<$}ԛEFmFuuuhFEuuhFEXP REXUEuEܺ`F$RERu Eܺ`FEFuuhCEXP EXUEFuh4DXEXh@DEEFuuhGEU|Q4UxQ4tR@GtQ4|RN|EغEE^[]dbPPdata SELECT idFROM tSupplier"WHERE SupplierName LIKE 'TELSTRA%'=TELSTRA not found in the tSupplier table. Processing stopped.id$SELECT tValidAccountNumber.AccountNoFROM tValidAccountNumberIINNER JOIN tBatch ON tValidAccountNumber.BatchTypeID = tBatch.BatchTypeIDWHERE tBatch.ID = IBatchType not found in the tValidAccountNumber table. Processing stopped. AccountNo qSELECT Code, CAST(TransactionTypeID AS VARCHAR(20)) AS TransactionType, CAST(ID AS VARCHAR(20)) AS SupplierCodeIDFROM tSupplierServiceCodeWHERE SupplierID = AND Active = 1AND Description LIKE 'RENT'NULLCodeSupplierCodeIDAND Description LIKE 'CALLS'AND Description LIKE 'Unknown%'$AND Description LIKE 'MISCELLANEOUS'\Reading  ...Batch ': Passed all tests for Critical Errors.3: Critical errors found. These must be resolved &before this invoice can be progressed.USV3ۉ]]MUEE3UhVd0d E3Uh,d0d FTlFXE~ UU3EUUFdFPƋR<؍UFpQUEQ,t*ERÄt}YUE3ZYYdh3E3ZYYdh]EE^[]6Telstra Billing file (*.dat)|*.DAT|All files (*.*)|*.*$Select The Telstra Account Data FileU3Uhd0d 3ZYYdh]Ã-m%:nnn~  ~    !!%B%0%4PL L L L L   %   % "%,%&% D %%2%2,=AJ,R0T 5,%%  % % $%  > %% >  @~ %( 2%  %% "<%  %% "%  %% "6%  %% "& % <"V*    $  $V& " %% "J2X4X4XR%& !2"Z% "% >"V:% H% % 2V% %%2V% %M%% D2, ,% %Q%,% %%2V% %U%2VU"Y% %%2"VU % %%  %% ,%  ,  %  ,      6% %  % ,% % % % %" %" % %8% ]     %%  % % %  %% % %  %2V% % % % % %U%2V% %U%H2V%  a"% % %2V%  a"% \ %e% % %%2V%  a"% % %2V% %Q%% %X%"@,  % >B% >% 6% H% % ,% %%,% %M%,U % %%  %% ,%  ,  %  ,      6% %  % ,% % % % %" %" % %8% ]     %%  % % %  %% % %  %2XP% %%2"V%2"V&% %U% %2%% H,%  a"% % %,%  a"% \ %e% % %%,%  a"% % %2V% %Q%,% %Q%% %X%f.% >V,! *2VXX4X4XR:VXX4X4XR:"VZ*(% >V,RV$"rV$V$"ОV$D% % 2V% %%$M% %%&U % %%  %% 8%   %        6% %  % ,% % % % %" %" % %8% ]     %%  % % %  %% % %  %2V% %U%% 8%2\ %e% 8%% %% % % 8%$% %4E%% %4E%% %2"Q%% % %d".% % % 2V% %%% %2"V"M%2V2"V%2"V%6V2"V% 2"V"i2"V% 2"V"i% %U%% 8%% 8%2\ %e% %% % % 8%% %2"Q%2VU % %%  %% ,%  ,  %  ,      6% %  % ,% % % % %" %" % %8% ]     %%  % % %  %  %  %  %% @%   %   % % %  %% % %d".% >"V"Z% % % 2V% %%% % 2V% %U%% 2V%Q%%"E%% 2V%Q%%"E%% 8%% 8%2\ %e% 8%% %% %    %  %  %% 8%   %  %% % %d".% >\ %e%DV%Q%2V %Q%% % 2V% %%% %2"V"M%2V% %U%2V% %Q%%Q%% 2V% %Q%%Q%% % 8%% 8%% 8%2\ %e% %% %    %  %  %% 8%   %  %% % %d"  $   VB"V BV 2L0    $  6V& R   4 %  "% P"% ,m% !  0   $$( "  P 4$$ P .( "&V      *     ""4$  :$   V V 2   V V 2    V 2   V V @ %   B  .  >  @4y%     q-P"P " Q!:!L !0 2! 4b4!  !RF! ! ==                                         = A A) j  &q@V $$$$$4 4 ,,T0"  * F$6 "Ff$  <X 4X4$ .X*0v< &0$&z 4, $ T,0N:N\&&~,\,:N\NZ:p :&B T^   b     " "  ,<4P4LN"\N\N,0N,<40N,0N\0 :P :P "2-,:,\,8 :&B T^   b     " "  ,<4P4LX0\l,,0,,<40,,0N\,\0 :P :P P ,N6$N&N& p D$D$"  ,N \R\B \R \B N:$:& :&B JT   b     " "  ,<4P4LN\hthhtx0 "  ,N:NrNrr\hhthN8 :&B T^   b     " "  ,<4V$6"BJJ4L0 "  ,N:N\N`bN`bhhth$6"B J60 " ,t$N2VNB`N:N\N\ZN\Zhhht$6"B J60 " &0$<BN"   < &0$: \4 . &@ T,$$$48 4$$$V*X$$  $$F$$8dd<8dd<88d<8dd22$6"Z$ N * t9^,0>,0t*:  ]*a8M 1@1j%pr)V1V1)9 9y QM Q U1E1qIqiqqqeqqq-)q5qUqqP0I!00r91-9111= A a