ئhG(veC g .TStringList<*gTStrings.GetValueF*cdSysUtilsZkgIntToHex*gStrToIntg ChangeFileExtwWgExtractFileName~ cdMessagesZkcdWindowsZkcdSysInitZkcdSystemZkfTObject.fString8f AnsiString8fBooleanNcgTObject.Dispatch݋RgTObject.DefaultHandler݋RgTObject.NewInstance݋RgTObject.FreeInstance݋RfInteger|ogLengthg@LStrLen?gOrdgChrg@LStrClrg @LStrFromCharnwg@LStrCatX,Tdg @LStrLAsgX,Tdg @LStrArrayClrX,Tdg@HandleFinallyX,Tdg @LStrCat3X,TdgCopyg @LStrCopyX,TdgIncgTObject.Create݋RgParamStrgTrue1ogFalse1og TObject.Free݋RceMain ceLoginFrm gGetLoginParamsd!ceConstantValues gINIFILEDIRECTORYf<c&.TDM(*TDM??E DMM^: .2f(TDM.StringCode73#m !Self! CodedWordb#Resultf CodedWordLength CodedWordCharNumber AsciiValue DecodedWordfc(TDM.EncodeString43# !Self! ClientCode#Result CryptBuff HexBuff HexCharf ic(TDM.DecodeString53# !Self !Key#Resultf Buff ic( TDM.EncryptIt83#a !Self! TheString #Resultf% SIMPLE_KEY P~1m2D3b4C5o6N7s8U9l0T1i2N3g4~ i Keyf Jumblefc(TDM.DBSaccLogin23#A!Self!Database! LoginParams KeyStringfc(TDM.OpenMainServerDB93#!Self NewPPIniFile IniFileNamef LoginParamsf sDSNf sUserNamef sPasswordfc(TDM.SetDatabaseSet63#!Self!TestSetb NewPPIniFile IniFileNamef LoginParamsf sDSNf sUserNamef sPasswordf lTestf sDBConnectionfc( TDM.DMCreate33# !Self!Sender c( FinalizationX,Td\! c(DataMod!cG]F:Q ,dbPPdata!, dbQuetzal1,dbQuoteA- DBSaccLogin-DMCreate=- EncodeString- DecodeString-SetDatabaseSet- StringCode- EncryptIt-OpenMainServerDBcD@l}TL| THdbPPdataL dbQuetzalPdbQuote DBSaccLoginDMCreate EncodeString DecodeStringSetDatabaseSetTDMTDMLDataModUSVW3ۉ]]MU3Uhd0d E؍E~*E3ۊ\8EUEGNuۋEU3ZYYdhE_^[]UjjjSVW3Uhd0d M֋E؅~DMED0EHuEMEUFKuNjU3ZYYdhE_^[]0UjjjjjSVWM3Uhd0d BEPӋMEEЍEUE;|MU3ZYYdhE_^[]$UjjjjSVWM3Uhd0d EE؋;|ދ~)ETML2UECNu܋EU3ZYYdhE_^[]~1m2D3b4C5o6N7s8U9l0T1i2N3g4~UjjSV3Uh{d0d EMUUEM3ZYYdhE^[YY]ibmsysUSERNAMEPASSWORDU3QQQQQQQSVW3Uhd0d EU3EUEM躘MEMjEPƋ8jEPƋ8UMjEP Ƌ8UMEtEtEEu UCHEPMM0EMDEE~EPƋ8WE~"MUEPƋ8WE~"MUEP Ƌ8WE~uE~iEMXUEQ4EMlUEQ4CHt 3ҋCHUCHUCHCH@)CH@DCHEEEjEPƋ8jEPƋ8UMjEPƋ8UMEtEtEEu UCLEPMM0EMDEE~EPƋ8WE~"MUEPƋ8WE~"MUEPƋ8WE~}E~qER@EMXUEQ4EMlUEQ4CLt 3ҋCLUCLUCLCL@)CLEEEjEPƋ8jEPƋ8UMjEPƋ8UMEtEtEEu UCPEPMM0EMDEE~EPƋ8WE~"MUEPƋ8WE~"MUEPƋ8WE~}E~qER@EMXUEQ4EMlUEQ4CPt 3ҋCPUCPUCPCP@)CPEƋRL3ZYYdhEE_^[].ini'C:\Docume~1\alluse~1\applic~1\ppsystem\PPDSN DBconnectionurpd PreProcessor USER NAMEPASSWORD USER NAME= PASSWORD= QuetzalDSNurqpdq QuetzalSCQuoteDSNurspds Quote SystemUjjIuSVWU3Uh2d0d EEEU3E܍UE؍MܺHM܍EXM؀}tEຈ EຘjEPUË8U܍MjEPUË8U܍MjEPUË8U܍MEtEt Eu]EuUFH}t EEPMMEMEE~5EP,Ë8WM܋UEPUË8WE~BM܋UEPD,Ë8WM܋UEPUË8WE~BM܋UEPP,Ë8WM܋UEPUË8WjEP\UË8U܍MjEPhUË8U܍MjEPtUË8U܍MEtEt Eu]EuUFL}t EEPMMEMEE~5EP,Ë8WM܋UEP\UË8WE~BM܋UEP,Ë8WM܋UEPhUË8WE~BM܋UEP,Ë8WM܋UEPtUË8WjEPUË8U܍MjEPUË8U܍MjEPUË8U܍MEtEt Eu]EuUFP}t EEPMMEMEE~5EP,Ë8WM܋UEPUË8WE~BM܋UEP,Ë8WM܋UEPUË8WE~BM܋UEP,Ë8WM܋UEPUË8WEËRL3ZYYdh9EغEE_^[].ini'C:\Docume~1\alluse~1\applic~1\ppsystem\TestCfgMainCfgid1id2id3_TESTDB PreProcessor USER NAMEPASSWORDPPDSN DBconnectionurpdid4id5id6 QuetzalDSNurqpdqid7id8id9QuoteDSNurspdsU3Uh%d0d 3ZYYdh,]Ã-m! $H02prtv.J&L<>(@*BDF, j$=&&2" 6|B ,$|@X|  86> Z|" 4.  |||@ l"   NN *R ^ \   " & &||| | TT| |" |" || , &$  " & &||| | TT| |" |" ||. , &" " & &||| | TT| |" |" ||. , &" 6&R ^ \     ,,,||||  TT| ($|" ($|" (*,,,||||  TT| ($|" ($|" (*,,,||||  TT| ($|" ($|" (" = III M M%\J*Z@&* X ,J~^(F*$@Z `6"0b>j",FFP.&  *DD066, ,FFP.&  *DD066,,FFP.&  *DD066,bJ j" BBBH&&  *@D@D @BBBH&&  *@D@D @BBBH&&  *@D@D@|  ^5eQ5u5u= "$*,.t p^  p@@@ XX~ȩҀ(pJJ Xԡ` pF `066 `8p>`PpJ=@AA I M a