ئhGF g .TStringList<*cdSysUtilsZkgIntToStrJ 7g EncodeDateceDataMod gDMM^ceMain gMainForm.|ceMathZkc*TServiceDetails@**TCallHeaderType,uch, .1f. nCountf nFactorf  frmProgressf( nSupplierIDf sSupplierIDf! qryTelstraf% sRentCodeIDf) sCallCodeIDf- sOtherCodeIDf1 sDiscountCodeIDf5 sSupplierRentCodeIDf9 sSupplierCallCodeIDf= sSupplierOtherCodeIDfA sSupplierDiscountCodeIDfE sAccountNumberfI sLastCallCodefQ sLastRentCodefU sLastOtherCodefY sLastCallTransactionTypeIDf] sLastRentTransactionTypeIDfa sLastOtherTransactionTypeIDfe sLastDiscountTransactionTypeIDfi sLastSupplierCallCodeIDfm sLastSupplierRentCodeIDfq sLastSupplierOtherCodeIDfuj'PROGRESS_MAX_CF*.20k(GetDetailFixedOrigEBS6!C_2!FName!Df! nBatchNumber" lReturnCode& nFileSize lFirstDFf lFirstDEf sPartFileNamef sPartResultSetf EntryCodef nBackSlashAt TelstraFilef"! CurrentFilef FileIterationf Tf SubStringf vSubStringf$ curValuef& nSoFar dBillingf dStartBillingPeriodf dEndBillingPeriodf nBatch LastEntryIs_1f SaveLastEntry_1f CallHeaderf, sLastDetailCodef4 DBfromDatef DBtoDatef aResultSetf0 nResultSetf nMaxResultsf nStartSearchAtfq lFoundfm dMinDatefA nCommaPositionf1 sListValuesf! sListFieldsf FieldStringListf ValueStringListf qryStringListf slAddFieldNamesf slAddFieldValuesf qryDCf nListValuesf nDummyf sInputLineCodefq lContinue lDataSavedfm nDataCollectionIDfQ .6c(BillingInputFixedOrigEBSeR1/2! stInFilesf!nBatchf lContinuef sPartFileNamef nBackSlashAt nPosc(TelstraInvoiceFixedOrigEBS%!2!nBatchf! sDirectoryf lContinue stFilesf OpenDlg c( FinalizationX,Td! 2c(TelstraFixedOrigEBS!2cMjXI,Custno,ServCode, ServiceID,RentFrom,RentTill(,CallFrom8,CallTillHcMM, SequenceNo8, ServiceID:,TxnDate<4,TxnTime>F,Origin@R,DurationB|,CallCodeD!,RateDescriptionF-, DialledNumberH}, ServiceNotesJ, AmountExGSTL , GSTAmountNA, AmountIncGSTPy,ToDateRcD.E(T@KVXE2KZXK$\XK^XK `XK*bXKdXKfXKQhXK$jXKElXKnXKpXKrXKtXLv*Dx>BX>Dx>Dx>Dx>Dx>Dx>Dx >Dx>DxS>Dx>DxP>Dx >Dx >Dx >Dx>DD.>lkTServiceDetails,d.2,UQjjIuMSVWU3UhDd0d VD}f^3Eƅ[E|xtp lDllDQ4lEQ488<$E38P E8<<ÄutU ݝ`݅`;~u9Eغ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ɉMMUEE3UhEd0d E3Uhd0d FT\FXE~ UU3EUUFdFPƋR<؍UFpQUEQ,tERÄt UE3ZYYdh"E3ZYYdhLEE^[]6Telstra Billing file (*.dat)|*.DAT|All files (*.*)|*.*$Select The Telstra Account Data FileU3Uhd0d 3ZYYdh]Ã-m}II:lllIB4L ~L ~L ~L ~L ~A   ",$P" D 22,Z,R0T , YY YU  "P" ] >  ]> ] ]@ ( 2 D ]  " ]  "6 ]  "P"V *  U U Y$ ] ]$V& 6]  "62X4X4XR&A] 2"Z " D  J"V"\ ( X  .V6V .V6V 2, .V0 .V0 .V6V .V6V" .V6V     i, i ,   i ,  q    6    ,    " "e  8 ! i  i   i      q   .V6V     2"V .V6V4  2"V"  2"V" B.V6V .V6V^ %  .V6V .V6V   PR"h, 2,&2,&2,&2&&2",&2,&2,&2"2","V,&2,&2,&2,&2,&2,&2"V,& (@J, 2,&2,&2,&2,&2",&2,&2,&2"2",,&2&&V:"V ,&D,&2,&2,&2,&D,   >V, *2VXX4X4XR:VXX4X4XR:"VZ( >V,RV$"rV$V$"V$D  2V $ &     i8 i   i   m   } 6    ,    " "e  8 ! i  i   i      m  } 2V  82^ % 8    8$ 4  4  2"  P d".   2V  2"V"2V2"V2"V6V2"V 2"V")2"V 2"V")  8 82^ %    8 2"2V     i, i ,   i ,  u    6    ,    " "e  8 ! i  i   i     u   u u   i@ i   i        P d". >"V"Z   2V   2V  2V"  2V"  8 82^ % 8    u   u u   i8 i      P d". >^ %DV2V   2V  2"V"2V 2V  2V   8 8 82^ %    u   y y   i8 i      P d"U U Y$ ] ]B VB"V B"V *  U U Y$ ] ]$V& 4& B"Z >"2",V  $  6 :"Z @ D   " P" ,-   0iA   $$( " aa Pe 4$$ P .( "&V      *     ""4$e  :$ m  Vm V} 2 q  Vq V 2 u  u V 2 y  Vy V @ A  ] ]B ] .  ]> ] ]@49 ]  ] A 1P"P " Q4L ~A0 2 4`4  R@   Q                            }  y  u  q  m  e  Q - iV $$$$4 ,,t0"  * F$6 "ff$  <VX4$ .X*|< &0$(z 4, $T ,8,H BN: BN\~ B,\ B,: BN\ BNZ: BN8 :&B T^   b     " "  ,<4P4L BN"` `: BN & \ BN0 BN<40 BN0 BN\P 4J :P "(~NL &x ~yNL:,N6$N&N& p,, ,N \R\B \R \B N:$:& :&B JT   b     " "  ,<4P4LN\hthhtxP " ,N:NrNrr\hhthN8 :&B T^   b     " "  ,<4V$6"BJJ4LP " ,N:N\N`bN`bhhth$6"B J6P " ,t$N2VNB`N:N\N\ZN\Zhhht$6"B J6P "  &0$ <B|< &0$,zd D VD4 . &@y T,$$$484$$$V*X$$ $$F$$8dd<8dd<88d<8dd22$6 "Z$ N * t9X,0>,0tu *2,Fii,)0,)5 0*9 i i iiii ii2iUpprVV Y  iE   M     ]S      P0I(0r!  a