unit U_CWZK_CX; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls type TfrmCWZK_CX=class(TForm) ToolBar1: TToolBar; TBRafresh: TToolButton; TBClose: TToolButton; ADOQueryTemp: TADOQuery; ADOQueryCmd: TADOQuery; Panel1: TPanel; ToolButton2: TToolButton; ADOQueryMain: TADOQuery; ToolButton1: TToolButton; RM1: TRMGridReport; RMDB_Main: TRMDBDataSet; cxGrid2: TcxGrid; Tv2: TcxGridDBTableView; cxGridLevel1: TcxGridLevel; Label2: TLabel; Label6: TLabel; begdate: TDateTimePicker; Enddate: TDateTimePicker; cxGridPopupMenu2: TcxGridPopupMenu; DS_HZ: TDataSource; CDS_HZ: TClientDataSet; v2YSMoney: TcxGridDBColumn; v2YFMoney: TcxGridDBColumn; v2DQLIRun: TcxGridDBColumn; v2FKMoney: TcxGridDBColumn; Label1: TLabel; ComTaiTou: TEdit; Label4: TLabel; FHAddress: TEdit; Label5: TLabel; FHdq: TEdit; v2SKMoney: TcxGridDBColumn; v2WSKMoney: TcxGridDBColumn; v2WFKMoney: TcxGridDBColumn; v2SXMoney: TcxGridDBColumn; v2TSMoney: TcxGridDBColumn; v2FYZCMoney: TcxGridDBColumn; procedure FormDestroy(Sender : TObject); procedure FormClose(Sender : TObject); procedure TBCloseClick(Sender : TObject); procedure FormShow(Sender : TObject); procedure TBRafreshClick(Sender : TObject); procedure ToolButton2Click(Sender : TObject); procedure FactoryNameChange(Sender : TObject); procedure ToolButton1Click(Sender : TObject); procedure _PROC_00880FB1(Sender : TObject); procedure _PROC_00880FE0(Sender : TObject); procedure _PROC_00880FE8(Sender : TObject); procedure _PROC_0088104E(Sender : TObject); private { Private declarations } public { Public declarations } end ; var frmCWZK_CX: TfrmCWZK_CX; {This file is generated by DeDe Ver 3.50.02 Copyright (c) 1999-2002 DaFixer} implementation {$R *.DFM} procedure TfrmCWZK_CX.FormDestroy(Sender : TObject); begin (* 00880CD0 33C0 xor eax, eax * Reference to GlobalVar_00895AD4 | 00880CD2 A3D45A8900 mov dword ptr [$00895AD4], eax 00880CD7 C3 ret *) end; procedure TfrmCWZK_CX.FormClose(Sender : TObject); begin (* 00880CD8 C60102 mov byte ptr [ecx], $02 00880CDB C3 ret *) end; procedure TfrmCWZK_CX.TBCloseClick(Sender : TObject); begin (* 00880CDC 53 push ebx 00880CDD 8BD8 mov ebx, eax * Possible String Reference to: '²ÆÎñ¹ÜÀí' | 00880CDF B9080D8800 mov ecx, $00880D08 * Reference to control TfrmCWZK_CX.Tv2 : TcxGridDBTableView | 00880CE4 8B9328030000 mov edx, [ebx+$0328] * Possible String Reference to: 'Ó¦ÊÕÊÕ¿îͳ¼Æ45' | 00880CEA B81C0D8800 mov eax, $00880D1C | 00880CEF E8AC6EF3FF call 007B7BA0 00880CF4 8BC3 mov eax, ebx * Reference to: Forms.TCustomForm.Close(TCustomForm); | 00880CF6 E89D52C2FF call 004A5F98 00880CFB 5B pop ebx 00880CFC C3 ret *) end; procedure TfrmCWZK_CX.FormShow(Sender : TObject); begin (* 00880D2C 55 push ebp 00880D2D 8BEC mov ebp, esp 00880D2F 6A00 push $00 00880D31 6A00 push $00 00880D33 6A00 push $00 00880D35 53 push ebx 00880D36 8BD8 mov ebx, eax 00880D38 33C0 xor eax, eax 00880D3A 55 push ebp * Possible String Reference to: 'éü<¸ÿëë[‹å]Ã' | 00880D3B 68F30D8800 push $00880DF3 ***** TRY | 00880D40 64FF30 push dword ptr fs:[eax] 00880D43 648920 mov fs:[eax], esp * Possible String Reference to: '²ÆÎñ¹ÜÀí' | 00880D46 B9080E8800 mov ecx, $00880E08 * Reference to control TfrmCWZK_CX.Tv2 : TcxGridDBTableView | 00880D4B 8B9328030000 mov edx, [ebx+$0328] * Possible String Reference to: 'Ó¦ÊÕÊÕ¿îͳ¼Æ45' | 00880D51 B81C0E8800 mov eax, $00880E1C | 00880D56 E8496CF3FF call 007B79A4 * Reference to control TfrmCWZK_CX.ADOQueryTemp : TADOQuery | 00880D5B 8B8304030000 mov eax, [ebx+$0304] | 00880D61 E8223CF3FF call 007B4988 00880D66 83C4F8 add esp, -$08 00880D69 DD1C24 fstp qword ptr [esp] 00880D6C 9B wait * Reference to control TfrmCWZK_CX.Enddate : TDateTimePicker | 00880D6D 8B833C030000 mov eax, [ebx+$033C] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 00880D73 E8B414BFFF call 0047222C * Reference to control TfrmCWZK_CX.Enddate : TDateTimePicker | 00880D78 8B833C030000 mov eax, [ebx+$033C] 00880D7E FFB014020000 push dword ptr [eax+$0214] 00880D84 FFB010020000 push dword ptr [eax+$0210] 00880D8A 8D55F4 lea edx, [ebp-$0C] * Possible String Reference to: 'YYYY' | 00880D8D B8340E8800 mov eax, $00880E34 | 00880D92 E825DEB8FF call 0040EBBC 00880D97 FF75F4 push dword ptr [ebp-$0C] * Possible String Reference to: '-01' | 00880D9A 68440E8800 push $00880E44 * Possible String Reference to: '-01' | 00880D9F 68440E8800 push $00880E44 00880DA4 8D45F8 lea eax, [ebp-$08] 00880DA7 BA03000000 mov edx, $00000003 * Reference to: System.@LStrCatN; | 00880DAC E80349B8FF call 004056B4 00880DB1 8B45F8 mov eax, [ebp-$08] * Reference to: SysUtils.StrToDate(AnsiString):TDateTime;overload; | or: SysUtils.StrToTime(AnsiString):TDateTime;overload; | or: SysUtils.StrToDateTime(AnsiString):TDateTime;overload; | 00880DB4 E80FE6B8FF call 0040F3C8 00880DB9 83C4F8 add esp, -$08 00880DBC DD1C24 fstp qword ptr [esp] 00880DBF 9B wait * Reference to control TfrmCWZK_CX.begdate : TDateTimePicker | 00880DC0 8B8338030000 mov eax, [ebx+$0338] * Reference to: ComCtrls.TCommonCalendar.SetDateTime(TCommonCalendar;TDateTime); | 00880DC6 E86114BFFF call 0047222C 00880DCB 8D45FC lea eax, [ebp-$04] * Possible String Reference to: 'select distinct (A.FactoryName) nam | e from YF_Money_CR A where A.CRType | ='Ó¦ÊÕ¿îµÇ¼Ç' ' | 00880DCE BA500E8800 mov edx, $00880E50 * Reference to: System.@LStrLAsg(void;void;void;void); | 00880DD3 E8E445B8FF call 004053BC 00880DD8 33C0 xor eax, eax 00880DDA 5A pop edx 00880DDB 59 pop ecx 00880DDC 59 pop ecx 00880DDD 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[‹å]Ã' | 00880DE0 68FA0D8800 push $00880DFA 00880DE5 8D45F4 lea eax, [ebp-$0C] 00880DE8 BA03000000 mov edx, $00000003 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00880DED E85645B8FF call 00405348 00880DF2 C3 ret * Reference to: System.@HandleFinally; | 00880DF3 E9FC3CB8FF jmp 00404AF4 00880DF8 EBEB jmp 00880DE5 ****** END | 00880DFA 5B pop ebx 00880DFB 8BE5 mov esp, ebp 00880DFD 5D pop ebp 00880DFE C3 ret *) end; procedure TfrmCWZK_CX.TBRafreshClick(Sender : TObject); begin (* | 00880EA8 E8E3FBFFFF call 00880A90 00880EAD C3 ret *) end; procedure TfrmCWZK_CX.ToolButton2Click(Sender : TObject); begin (* 00880EB0 55 push ebp 00880EB1 8BEC mov ebp, esp 00880EB3 6A00 push $00 00880EB5 6A00 push $00 00880EB7 53 push ebx 00880EB8 8BD8 mov ebx, eax 00880EBA 33C0 xor eax, eax 00880EBC 55 push ebp 00880EBD 68460F8800 push $00880F46 ***** TRY | 00880EC2 64FF30 push dword ptr fs:[eax] 00880EC5 648920 mov fs:[eax], esp * Reference to control TfrmCWZK_CX.ADOQueryMain : TADOQuery | 00880EC8 8B8314030000 mov eax, [ebx+$0314] * Reference to: DB.TDataSet.GetActive(TDataSet):Boolean; | 00880ECE E8414BC4FF call 004C5A14 00880ED3 84C0 test al, al 00880ED5 7454 jz 00880F2B 00880ED7 8D45F8 lea eax, [ebp-$08] 00880EDA 50 push eax 00880EDB B902000000 mov ecx, $00000002 00880EE0 BA01000000 mov edx, $00000001 * Reference to control TfrmCWZK_CX.Panel1 : TPanel | 00880EE5 8B830C030000 mov eax, [ebx+$030C] | 00880EEB E8C051F3FF call 007B60B0 00880EF0 8B45F8 mov eax, [ebp-$08] 00880EF3 8D55FC lea edx, [ebp-$04] * Reference to: SysUtils.Trim(AnsiString):AnsiString;overload; | 00880EF6 E8F199B8FF call 0040A8EC 00880EFB 8B55FC mov edx, [ebp-$04] * Reference to control TfrmCWZK_CX.ADOQueryMain : TADOQuery | 00880EFE 8B8314030000 mov eax, [ebx+$0314] | 00880F04 E8BF5DF3FF call 007B6CC8 * Reference to control TfrmCWZK_CX.CDS_HZ : TClientDataSet | 00880F09 8B9348030000 mov edx, [ebx+$0348] * Reference to control TfrmCWZK_CX.ADOQueryMain : TADOQuery | 00880F0F 8B8314030000 mov eax, [ebx+$0314] | 00880F15 E8765FF3FF call 007B6E90 * Reference to control TfrmCWZK_CX.CDS_HZ : TClientDataSet | 00880F1A 8B9348030000 mov edx, [ebx+$0348] * Reference to control TfrmCWZK_CX.ADOQueryMain : TADOQuery | 00880F20 8B8314030000 mov eax, [ebx+$0314] | 00880F26 E8ED60F3FF call 007B7018 00880F2B 33C0 xor eax, eax 00880F2D 5A pop edx 00880F2E 59 pop ecx 00880F2F 59 pop ecx 00880F30 648910 mov fs:[eax], edx ****** FINALLY | 00880F33 684D0F8800 push $00880F4D 00880F38 8D45F8 lea eax, [ebp-$08] 00880F3B BA02000000 mov edx, $00000002 * Reference to: System.@LStrArrayClr(void;void;Integer); | 00880F40 E80344B8FF call 00405348 00880F45 C3 ret * Reference to: System.@HandleFinally; | 00880F46 E9A93BB8FF jmp 00404AF4 00880F4B EBEB jmp 00880F38 ****** END | 00880F4D 5B pop ebx 00880F4E 59 pop ecx 00880F4F 59 pop ecx 00880F50 5D pop ebp 00880F51 C3 ret *) end; procedure TfrmCWZK_CX.FactoryNameChange(Sender : TObject); begin (* 00880F54 56 push esi * Reference to control TfrmCWZK_CX.ToolButton2 : TToolButton | 00880F55 8B8010030000 mov eax, [eax+$0310] 00880F5B 66BEEBFF mov si, $FFEB * Reference to: System.@CallDynaInst; | 00880F5F E8F035B8FF call 00404554 00880F64 5E pop esi 00880F65 C3 ret *) end; procedure TfrmCWZK_CX.ToolButton1Click(Sender : TObject); begin (* 00880F68 53 push ebx 00880F69 8BD8 mov ebx, eax * Reference to control TfrmCWZK_CX.ADOQueryMain : TADOQuery | 00880F6B 8B8314030000 mov eax, [ebx+$0314] * Reference to: DB.TDataSet.IsEmpty(TDataSet):Boolean; | 00880F71 E84A6FC4FF call 004C7EC0 00880F76 84C0 test al, al 00880F78 7516 jnz 00880F90 * Possible String Reference to: 'Ó¦ÊÕÊÕ¿îͳ¼ÆÁбí' | 00880F7A B99C0F8800 mov ecx, $00880F9C * Reference to control TfrmCWZK_CX.ADOQueryMain : TADOQuery | 00880F7F 8B9314030000 mov edx, [ebx+$0314] * Reference to control TfrmCWZK_CX.Tv2 : TcxGridDBTableView | 00880F85 8B8328030000 mov eax, [ebx+$0328] | 00880F8B E8A072F3FF call 007B8230 00880F90 5B pop ebx 00880F91 C3 ret *) end; procedure TfrmCWZK_CX._PROC_00880FB1(Sender : TObject); begin (* 00880FB1 8BEC mov ebp, esp 00880FB3 33C0 xor eax, eax 00880FB5 55 push ebp 00880FB6 68D50F8800 push $00880FD5 ***** TRY | 00880FBB 64FF30 push dword ptr fs:[eax] 00880FBE 648920 mov fs:[eax], esp 00880FC1 FF05D85A8900 inc dword ptr [$00895AD8] 00880FC7 33C0 xor eax, eax 00880FC9 5A pop edx 00880FCA 59 pop ecx 00880FCB 59 pop ecx 00880FCC 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: ']ËÀƒ-ØZ‰' | 00880FCF 68DC0F8800 push $00880FDC 00880FD4 C3 ret * Reference to: System.@HandleFinally; | 00880FD5 E91A3BB8FF jmp 00404AF4 00880FDA EBF8 jmp 00880FD4 ****** END | 00880FDC 5D pop ebp 00880FDD C3 ret *) end; procedure TfrmCWZK_CX._PROC_00880FE0(Sender : TObject); begin (* 00880FE0 832DD85A890001 sub dword ptr [$00895AD8], +$01 00880FE7 C3 ret *) end; procedure TfrmCWZK_CX._PROC_00880FE8(Sender : TObject); begin (* 00880FE8 3410 xor al, $10 00880FEA 8800 mov [eax], al 00880FEC 0000 add [eax], al *) end; procedure TfrmCWZK_CX._PROC_0088104E(Sender : TObject); begin (* 0088104E 48 dec eax 0088104F 0050D4 add [eax-$2C], dl 00881052 42 inc edx 00881053 0008 add [eax], cl 00881055 2D4A007CD0 sub eax, $D07C004A 0088105A 42 inc edx 0088105B 00F4 add ah, dh 0088105D 6B4A00D0 imul ecx, [edx+$00], $D0 00881061 1D4A0030F6 sbb eax, $F630004A 00881066 48 dec eax 00881067 004CFB48 add [ebx+edi*8+$48], cl 0088106B 0098FA48000C add [eax+$C0048FA], bl 00881071 7948 jns 008810BB 00881073 00ACF04800E829 add [eax+esi*8+$29E80048], ch 0088107A 4A dec edx 0088107B 00E4 add ah, ah 0088107D ED in eax, dx 0088107E 48 dec eax 0088107F 00547848 add [eax+edi*2+$48], dl 00881083 005878 add [eax+$78], bl 00881086 48 dec eax 00881087 00DC add ah, bl 00881089 2A4A00 sub cl, byte ptr [edx+$00] 0088108C 3CA9 cmp al, $A9 0088108E 48 dec eax 0088108F 00C0 add al, al 00881091 834800D0 or dword ptr [eax+$00], -$30 00881095 7948 jns 008810DF 00881097 004C8548 add [ebp+eax*4+$48], cl 0088109B 00D0 add al, dl 0088109D 2C4A sub al, $4A 0088109F 009C2B4A008486 add [ebx+ebp+$8684004A], bl 008810A6 48 dec eax 008810A7 00482D add [eax+$2D], cl 008810AA 4A dec edx 008810AB 00C0 add al, al 008810AD A9480038EE test eax, $EE380048 008810B2 48 dec eax 008810B3 00F4 add ah, dh 008810B5 EE out dx, al 008810B6 48 dec eax 008810B7 00F0 add al, dh 008810B9 E94800D8EE jmp EF601106 008810BE 48 dec eax 008810BF 00D8 add al, bl 008810C1 1B4A00 sbb ecx, [edx+$00] 008810C4 EC in al, dx 008810C5 334A00 xor ecx, [edx+$00] 008810C8 20C4 and ah, al 008810CA 48 dec eax 008810CB 00B0404A0010 add [eax+$10004A40], dh 008810D1 44 inc esp 008810D2 4A dec edx 008810D3 00CC add ah, cl 008810D5 42 inc edx 008810D6 4A dec edx 008810D7 00B8C44800BC add [eax+$BC0048C4], bh 008810DD C44800 les ecx, [eax+$00] 008810E0 48 dec eax 008810E1 45 inc ebp 008810E2 4A dec edx 008810E3 001CC3 add [ebx+eax*8], bl 008810E6 48 dec eax 008810E7 0018 add [eax], bl 008810E9 F0 lock 008810EA 48 dec eax 008810EB 00444C4A add [esp+ecx*2+$4A], al 008810EF 000C02 add [edx+eax], cl 008810F2 49 dec ecx 008810F3 0094EC48009C64 add [esp+ebp*8+$649C0048], dl 008810FA 4A dec edx 008810FB 008C154A003C18 add [ebp+edx+$183C004A], cl 00881102 4A dec edx 00881103 0038 add [eax], bh 00881105 52 push edx 00881106 4A dec edx 00881107 005C224A add [edx+$4A], bl 0088110B 00D8 add al, bl 0088110D 224A00 and cl, byte ptr [edx+$00] 00881110 7C68 jl 0088117A 00881112 4A dec edx 00881113 00941F4A003C60 add [edi+ebx+$603C004A], dl 0088111A 4A dec edx 0088111B 001447 add [edi+eax*2], dl 0088111E 4A dec edx 0088111F 0034654A00CC2C add [$2CCC004A], dh 00881126 4A dec edx 00881127 000E add [esi], cl 00881129 0000 add [eax], al 0088112B 0000 add [eax], al 0088112D 0003 add [ebx], al 0088112F 0000 add [eax], al 00881131 0020 add [eax], ah 00881133 114000 adc [eax+$00], eax 00881136 D003 rol byte ptr [ebx], 1 00881138 0000 add [eax], al 0088113A 2011 and [ecx], dl 0088113C 40 inc eax 0088113D 00D4 add ah, dl 0088113F 0300 add eax, [eax] 00881141 0020 add [eax], ah 00881143 114000 adc [eax+$00], eax 00881146 D803 fadd dword ptr [ebx] 00881148 0000 add [eax], al 0088114A 3500B91588 xor eax, $8815B900 0088114F 00F8 add al, bh 00881151 0200 add al, byte ptr [eax] 00881153 0000 add [eax], al 00881155 0008 add [eax], cl 00881157 54 push esp 00881158 6F outsd 00881159 6F outsd 0088115A 6C insb 0088115B 42 inc edx 0088115C 61 popa 0088115D 7231 jb 00881190 0088115F FC cld 00881160 0200 add al, byte ptr [eax] 00881162 0001 add [ecx], al 00881164 0009 add [ecx], cl 00881166 54 push esp 00881167 42 inc edx 00881168 52 push edx 00881169 61 popa 0088116A 667265 jb 008811D2 0088116D 7368 jnb 008811D7 0088116F 0003 add [ebx], al 00881171 0000 add [eax], al 00881173 0100 add [eax], eax 00881175 07 pop es 00881176 54 push esp 00881177 42 inc edx 00881178 43 inc ebx 00881179 6C insb 0088117A 6F outsd 0088117B 7365 jnb 008811E2 0088117D 0403 add al, +$03 0088117F 0000 add [eax], al 00881181 0200 add al, byte ptr [eax] 00881183 0C41 or al, $41 00881185 44 inc esp 00881186 4F dec edi 00881187 51 push ecx 00881188 7565 jnz 008811EF 0088118A 7279 jb 00881205 0088118C 54 push esp 0088118D 656D insd 0088118F 7008 jo 00881199 00881191 0300 add eax, [eax] 00881193 0002 add [edx], al 00881195 000B add [ebx], cl 00881197 41 inc ecx 00881198 44 inc esp 00881199 4F dec edi 0088119A 51 push ecx 0088119B 7565 jnz 00881202 0088119D 7279 jb 00881218 0088119F 43 inc ebx 008811A0 6D insd 008811A1 640C03 or al, $03 008811A4 0000 add [eax], al 008811A6 0300 add eax, [eax] 008811A8 06 push es 008811A9 50 push eax 008811AA 61 popa 008811AB 6E outsb 008811AC 656C insb 008811AE 3110 xor [eax], edx 008811B0 0300 add eax, [eax] 008811B2 0001 add [ecx], al 008811B4 000B add [ebx], cl 008811B6 54 push esp 008811B7 6F outsd 008811B8 6F outsd 008811B9 6C insb 008811BA 42 inc edx 008811BB 7574 jnz 00881231 008811BD 746F jz 0088122E 008811BF 6E outsb 008811C0 321403 xor dl, byte ptr [ebx+eax] 008811C3 0000 add [eax], al 008811C5 0200 add al, byte ptr [eax] 008811C7 0C41 or al, $41 008811C9 44 inc esp 008811CA 4F dec edi 008811CB 51 push ecx 008811CC 7565 jnz 00881233 008811CE 7279 jb 00881249 008811D0 4D dec ebp 008811D1 61 popa 008811D2 696E1803000001 imul ebp, [esi+$18], $01000003 008811D9 000B add [ebx], cl 008811DB 54 push esp 008811DC 6F outsd 008811DD 6F outsd 008811DE 6C insb 008811DF 42 inc edx 008811E0 7574 jnz 00881256 008811E2 746F jz 00881253 008811E4 6E outsb 008811E5 311C03 xor [ebx+eax], ebx 008811E8 0000 add [eax], al 008811EA 0400 add al, +$00 008811EC 03524D add edx, [edx+$4D] 008811EF 3120 xor [eax], esp 008811F1 0300 add eax, [eax] 008811F3 00050009524D add [$4D520900], al 008811F9 44 inc esp 008811FA 42 inc edx 008811FB 5F pop edi 008811FC 4D dec ebp 008811FD 61 popa 008811FE 696E2403000006 imul ebp, [esi+$24], $06000003 00881205 0006 add [esi], al 00881207 4C dec esp 00881208 61 popa 00881209 62656C bound esp, qword ptr [ebp+$6C] 0088120C 3328 xor ebp, [eax] 0088120E 0300 add eax, [eax] 00881210 0007 add [edi], al 00881212 000D546F4661 add [$61466F54], cl 00881218 63746F72 arpl [edi+ebp*2+$72], si 0088121C 794E jns 0088126C 0088121E 61 popa 0088121F 6D insd 00881220 652C03 sub al, $03 00881223 0000 add [eax], al 00881225 0800 or [eax], al 00881227 07 pop es 00881228 637847 arpl [eax+$47], di 0088122B 7269 jb 00881296 0088122D 643230 xor dh, byte ptr fs:[eax] 00881230 0300 add eax, [eax] 00881232 0009 add [ecx], cl 00881234 0003 add [ebx], al 00881236 54 push esp 00881237 7632 jbe 0088126B 00881239 3403 xor al, $03 0088123B 0000 add [eax], al 0088123D 0A00 or al, byte ptr [eax] 0088123F 0C63 or al, $63 00881241 7847 js 0088128A 00881243 7269 jb 008812AE 00881245 644C dec esp 00881247 657665 jbe 008812AF 0088124A 6C insb 0088124B 3138 xor [eax], edi 0088124D 0300 add eax, [eax] 0088124F 0006 add [esi], al 00881251 0006 add [esi], al 00881253 4C dec esp 00881254 61 popa 00881255 62656C bound esp, qword ptr [ebp+$6C] 00881258 323C03 xor bh, byte ptr [ebx+eax] 0088125B 0000 add [eax], al 0088125D 06 push es 0088125E 0006 add [esi], al 00881260 4C dec esp 00881261 61 popa 00881262 62656C bound esp, qword ptr [ebp+$6C] 00881265 3640 inc eax 00881267 0300 add eax, [eax] 00881269 000B add [ebx], cl 0088126B 0007 add [edi], al 0088126D 626567 bound esp, qword ptr [ebp+$67] 00881270 6461 popa 00881272 7465 jz 008812D9 00881274 44 inc esp 00881275 0300 add eax, [eax] 00881277 000B add [ebx], cl 00881279 0007 add [edi], al 0088127B 45 inc ebp 0088127C 6E outsb 0088127D 646461 popa 00881280 7465 jz 008812E7 00881282 48 dec eax 00881283 0300 add eax, [eax] 00881285 000C00 add [eax+eax], cl 00881288 106378 adc [ebx+$78], ah 0088128B 47 inc edi 0088128C 7269 jb 008812F7 0088128E 6450 push eax 00881290 6F outsd 00881291 7075 jo 00881308 00881293 704D jo 008812E2 00881295 656E outsb 00881297 7532 jnz 008812CB 00881299 4C dec esp 0088129A 0300 add eax, [eax] 0088129C 000D00054453 add [$53440500], cl 008812A2 5F pop edi 008812A3 48 dec eax 008812A4 5A pop edx 008812A5 50 push eax 008812A6 0300 add eax, [eax] 008812A8 000E add [esi], cl 008812AA 0006 add [esi], al 008812AC 43 inc ebx 008812AD 44 inc esp 008812AE 53 push ebx 008812AF 5F pop edi 008812B0 48 dec eax 008812B1 5A pop edx 008812B2 54 push esp 008812B3 0300 add eax, [eax] 008812B5 000F add [edi], cl 008812B7 0008 add [eax], cl 008812B9 56 push esi 008812BA 42 inc edx 008812BB 42 inc edx 008812BC 4D dec ebp 008812BD 6F outsd 008812BE 6E outsb 008812BF 657958 jns 0088131A 008812C2 0300 add eax, [eax] 008812C4 000F add [edi], cl 008812C6 0009 add [ecx], cl 008812C8 7632 jbe 008812FC 008812CA 46 inc esi 008812CB 50 push eax 008812CC 4D dec ebp 008812CD 6F outsd 008812CE 6E outsb 008812CF 65795C jns 0088132E 008812D2 0300 add eax, [eax] 008812D4 000F add [edi], cl 008812D6 000A add [edx], cl 008812D8 7632 jbe 0088130C 008812DA 57 push edi 008812DB 46 inc esi 008812DC 50 push eax 008812DD 4D dec ebp 008812DE 6F outsd 008812DF 6E outsb 008812E0 657960 jns 00881343 008812E3 0300 add eax, [eax] 008812E5 0010 add [eax], dl 008812E7 0012 add [edx], dl 008812E9 637853 arpl [eax+$53], di 008812EC 7479 jz 00881367 008812EE 6C insb 008812EF 6552 push edx 008812F1 65706F jo 00881363 008812F4 7369 jnb 0088135F 008812F6 746F jz 00881367 008812F8 7279 jb 00881373 008812FA 31640300 xor [ebx+eax+$00], esp 008812FE 0011 add [ecx], dl 00881300 0008 add [eax], cl 00881302 637853 arpl [eax+$53], di 00881305 7479 jz 00881380 00881307 6C insb 00881308 65316803 xor gs:[eax+$03], ebp 0088130C 0000 add [eax], al 0088130E 1100 adc [eax], eax 00881310 086378 or [ebx+$78], ah 00881313 53 push ebx 00881314 7479 jz 0088138F 00881316 6C insb 00881317 65326C0300 xor ch, byte ptr gs:[ebx+eax+$00] 0088131C 0011 add [ecx], dl 0088131E 000F add [edi], cl 00881320 637853 arpl [eax+$53], di 00881323 7479 jz 0088139E 00881325 6C insb 00881326 655F pop edi 00881328 677269 jb 00881394 0088132B 6452 push edx 0088132D 6F outsd 0088132E 7770 jnbe 008813A0 00881330 0300 add eax, [eax] 00881332 0011 add [ecx], dl 00881334 0010 add [eax], dl 00881336 637853 arpl [eax+$53], di 00881339 7479 jz 008813B4 0088133B 6C insb 0088133C 655F pop edi 0088133E 677269 jb 008813AA 00881341 6446 inc esi 00881343 6F outsd 00881344 6F outsd 00881345 7474 jz 008813BB 00881347 0300 add eax, [eax] 00881349 0011 add [ecx], dl 0088134B 0010 add [eax], dl 0088134D 637853 arpl [eax+$53], di 00881350 7479 jz 008813CB 00881352 6C insb 00881353 655F pop edi 00881355 677269 jb 008813C1 00881358 6448 dec eax 0088135A 6561 popa 0088135C 647803 js 00881362 0088135F 0000 add [eax], al 00881361 1100 adc [eax], eax 00881363 1463 adc al, $63 00881365 7853 js 008813BA 00881367 7479 jz 008813E2 00881369 6C insb 0088136A 655F pop edi 0088136C 677269 jb 008813D8 0088136F 6447 inc edi 00881371 726F jb 008813E2 00881373 7570 jnz 008813E5 00881375 42 inc edx 00881376 6F outsd 00881377 787C js 008813F5 00881379 0300 add eax, [eax] 0088137B 0011 add [ecx], dl 0088137D 000E add [esi], cl 0088137F 637853 arpl [eax+$53], di 00881382 7479 jz 008813FD 00881384 6C insb 00881385 655F pop edi 00881387 7965 jns 008813EE 00881389 6C insb 0088138A 6C insb 0088138B 6F outsd 0088138C 7780 jnbe 0088130E 0088138E 0300 add eax, [eax] 00881390 0011 add [ecx], dl 00881392 000B add [ebx], cl 00881394 637853 arpl [eax+$53], di 00881397 7479 jz 00881412 00881399 6C insb 0088139A 655F pop edi 0088139C 52 push edx 0088139D 65648403 test fs:[ebx], al 008813A1 0000 add [eax], al 008813A3 1100 adc [eax], eax 008813A5 116378 adc [ebx+$78], esp 008813A8 53 push ebx 008813A9 7479 jz 00881424 008813AB 6C insb 008813AC 655F pop edi 008813AE 666F outsw 008813B0 6E outsb 008813B1 7442 jz 008813F5 008813B3 6C insb 008813B4 61 popa 008813B5 636B88 arpl [ebx-$78], bp 008813B8 0300 add eax, [eax] 008813BA 0011 add [ecx], dl 008813BC 001563785374 add [$74537863], dl 008813C2 796C jns 00881430 008813C4 655F pop edi 008813C6 666F outsw 008813C8 6E outsb 008813C9 7463 jz 0088142E 008813CB 6C insb 008813CC 46 inc esi 008813CD 7563 jnz 00881432 008813CF 687369618C push $8C616973 008813D4 0300 add eax, [eax] 008813D6 0011 add [ecx], dl 008813D8 001463 add [ebx], dl 008813DB 7853 js 00881430 008813DD 7479 jz 00881458 008813DF 6C insb 008813E0 655F pop edi 008813E2 666F outsw 008813E4 6E outsb 008813E5 7463 jz 0088144A 008813E7 6C insb 008813E8 50 push eax 008813E9 7572 jnz 0088145D 008813EB 706C jo 00881459 008813ED 6590 nop 008813EF 0300 add eax, [eax] 008813F1 0011 add [ecx], dl 008813F3 0013 add [ebx], dl 008813F5 637853 arpl [eax+$53], di 008813F8 7479 jz 00881473 008813FA 6C insb 008813FB 655F pop edi 008813FD 666F outsw 008813FF 6E outsb 00881400 7463 jz 00881465 00881402 6C insb 00881403 47 inc edi 00881404 7265 jb 0088146B 00881406 656E outsb 00881408 94 xchg eax, esp 00881409 0300 add eax, [eax] 0088140B 0011 add [ecx], dl 0088140D 0012 add [edx], dl 0088140F 637853 arpl [eax+$53], di 00881412 7479 jz 0088148D 00881414 6C insb 00881415 655F pop edi 00881417 666F outsw 00881419 6E outsb 0088141A 7463 jz 0088147F 0088141C 6C insb 0088141D 42 inc edx 0088141E 6C insb 0088141F 7565 jnz 00881486 00881421 98 cwde 00881422 0300 add eax, [eax] 00881424 0011 add [ecx], dl 00881426 0012 add [edx], dl 00881428 637853 arpl [eax+$53], di 0088142B 7479 jz 008814A6 0088142D 6C insb 0088142E 655F pop edi 00881430 666F outsw 00881432 6E outsb 00881433 7463 jz 00881498 00881435 6C insb 00881436 54 push esp 00881437 6561 popa 00881439 6C insb 0088143A 9C pushf 0088143B 0300 add eax, [eax] 0088143D 0011 add [ecx], dl 0088143F 0013 add [ebx], dl 00881441 637853 arpl [eax+$53], di 00881444 7479 jz 008814BF 00881446 6C insb 00881447 655F pop edi 00881449 666F outsw 0088144B 6E outsb 0088144C 7463 jz 008814B1 0088144E 6C insb 0088144F 4F dec edi 00881450 6C insb 00881451 697665A0030000 imul esi, [esi+$65], $000003A0 00881458 06 push es 00881459 0006 add [esi], al 0088145B 4C dec esp 0088145C 61 popa 0088145D 62656C bound esp, qword ptr [ebp+$6C] 00881460 35A4030000 xor eax, $000003A4 00881465 07 pop es 00881466 0007 add [edi], al 00881468 42 inc edx 00881469 42 inc edx 0088146A 4D dec ebp 0088146B 6F outsd 0088146C 6E outsb 0088146D 6579A8 jns 00881418 00881470 0300 add eax, [eax] 00881472 0006 add [esi], al 00881474 0006 add [esi], al 00881476 4C dec esp 00881477 61 popa 00881478 62656C bound esp, qword ptr [ebp+$6C] 0088147B 37 aaa 0088147C AC lodsb 0088147D 0300 add eax, [eax] 0088147F 000F add [edi], cl 00881481 000D76324661 add [$61463276], cl 00881487 63746F72 arpl [edi+ebp*2+$72], si 0088148B 794E jns 008814DB 0088148D 61 popa 0088148E 6D insd 0088148F 65B003 mov al, $03 00881492 0000 add [eax], al 00881494 07 pop es 00881495 000B add [ebx], cl 00881497 46 inc esi 00881498 61 popa 00881499 63746F72 arpl [edi+ebp*2+$72], si 0088149D 794E jns 008814ED 0088149F 61 popa 008814A0 6D insd 008814A1 65B403 mov ah, $03 008814A4 0000 add [eax], al 008814A6 07 pop es 008814A7 000D46616374 add [$74636146], cl 008814AD 6F outsd 008814AE 7279 jb 00881529 008814B0 4E dec esi 008814B1 61 popa 008814B2 6D insd 008814B3 6554 push esp 008814B5 4A dec edx 008814B6 B803000006 mov eax, $06000003 008814BB 0006 add [esi], al 008814BD 4C dec esp 008814BE 61 popa 008814BF 62656C bound esp, qword ptr [ebp+$6C] 008814C2 31BC0300000600 xor [ebx+eax+$60000], edi 008814C9 06 push es 008814CA 4C dec esp 008814CB 61 popa 008814CC 62656C bound esp, qword ptr [ebp+$6C] 008814CF 34C0 xor al, $C0 008814D1 0300 add eax, [eax] 008814D3 0007 add [edi], al 008814D5 000F add [edi], cl 008814D7 54 push esp 008814D8 6F outsd 008814D9 46 inc esi 008814DA 61 popa 008814DB 63746F72 arpl [edi+ebp*2+$72], si 008814DF 794E jns 0088152F 008814E1 61 popa 008814E2 6D insd 008814E3 6554 push esp 008814E5 4A dec edx 008814E6 C403 les eax, [ebx] 008814E8 0000 add [eax], al 008814EA 0F0009 str word ptr [ecx] 008814ED 7632 jbe 00881521 008814EF 43 inc ebx 008814F0 6F outsd 008814F1 6C insb 008814F2 756D jnz 00881561 008814F4 6E outsb 008814F5 33C8 xor ecx, eax 008814F7 0300 add eax, [eax] 008814F9 0006 add [esi], al 008814FB 0006 add [esi], al 008814FD 4C dec esp 008814FE 61 popa 008814FF 62656C bound esp, qword ptr [ebp+$6C] 00881502 3808 cmp [eax], cl 00881504 0012 add [edx], dl 00881506 003417 add [edi+edx], dh 00881509 8800 mov [eax], al 0088150B 0B466F or eax, [esi+$6F] 0088150E 726D jb 0088157D 00881510 44 inc esp 00881511 657374 jnb 00881588 00881514 726F jb 00881585 00881516 7910 jns 00881528 00881518 003C17 add [edi+edx], bh 0088151B 8800 mov [eax], al 0088151D 09466F or [esi+$6F], eax 00881520 726D jb 0088158F 00881522 43 inc ebx 00881523 6C insb 00881524 6F outsd 00881525 7365 jnb 0088158C 00881527 1300 adc eax, [eax] 00881529 40 inc eax 0088152A 17 pop ss 0088152B 8800 mov [eax], al 0088152D 0C54 or al, $54 0088152F 42 inc edx 00881530 43 inc ebx 00881531 6C insb 00881532 6F outsd 00881533 7365 jnb 0088159A 00881535 43 inc ebx 00881536 6C insb 00881537 69636B0F00B017 imul esp, [ebx+$6B], $17B0000F 0088153E 8800 mov [eax], al 00881540 08466F or [esi+$6F], al 00881543 726D jb 008815B2 00881545 53 push ebx 00881546 686F771500 push $0015776F 0088154B 2018 and [eax], bl 0088154D 8800 mov [eax], al 0088154F 0E push cs 00881550 54 push esp 00881551 42 inc edx 00881552 52 push edx 00881553 61 popa 00881554 667265 jb 008815BC 00881557 7368 jnb 008815C1 00881559 43 inc ebx 0088155A 6C insb 0088155B 69636B17002818 imul esp, [ebx+$6B], $18280017 00881562 8800 mov [eax], al 00881564 10546F6F adc [edi+ebp*2+$6F], dl 00881568 6C insb 00881569 42 inc edx 0088156A 7574 jnz 008815E0 0088156C 746F jz 008815DD 0088156E 6E outsb 0088156F 32436C xor al, byte ptr [ebx+$6C] 00881572 69636B1A00B818 imul esp, [ebx+$6B], $18B8001A 00881579 8800 mov [eax], al 0088157B 13546F46 adc edx, [edi+ebp*2+$46] 0088157F 61 popa 00881580 63746F72 arpl [edi+ebp*2+$72], si 00881584 794E jns 008815D4 00881586 61 popa 00881587 6D insd 00881588 6543 inc ebx 0088158A 68616E6765 push $65676E61 0088158F 17 pop ss 00881590 00CC add ah, cl 00881592 18880010546F sbb [eax+$6F541000], cl 00881598 6F outsd 00881599 6C insb 0088159A 42 inc edx 0088159B 7574 jnz 00881611 0088159D 746F jz 0088160E 0088159F 6E outsb 008815A0 31436C xor [ebx+$6C], eax 008815A3 69636B12546672 imul esp, [ebx+$6B], $72665412 008815AA 6D insd 008815AB 58 pop eax 008815AC 58 pop eax 008815AD 46 inc esi 008815AE 50 push eax 008815AF 49 dec ecx 008815B0 6E outsb 008815B1 766F jbe 00881622 008815B3 6963655F544A12 imul esp, [ebx+$65], $124A545F 008815BA 0028 add [eax], ch 008815BC 94 xchg eax, esp 008815BD 45 inc ebp 008815BE 00648A45 add [edx+ecx*4+$45], ah 008815C2 00B8124D0020 add [eax+$20004D12], bh 008815C8 42 inc edx 008815C9 44 inc esp 008815CA 0064D378 add [ebx+edx*8+$78], ah 008815CE 00A80A78001C add [eax+$1C00780A], ch 008815D4 5F pop edi 008815D5 47 inc edi 008815D6 00B867470000 add [eax+$4767], bh 008815DC 16 push ss 008815DD 6300 arpl [eax], ax 008815DF F4 hlt 008815E0 B466 mov ah, $66 008815E2 00A40E6400E0A5 add [esi+ecx+$A5E00064], ah 008815E9 45 inc ebp 008815EA 005876 add [eax+$76], bl 008815ED 7C00 jl 008815EF 008815EF 087F4B or [edi+$4B], bh 008815F2 0088996A0034 add [eax+$34006A99], cl 008815F8 B166 mov cl, $66 008815FA 009C6D4F005070 add [ebp+ebp*2+$7050004F], bl 00881601 4F dec edi 00881602 009008168800 add [eax+$881608], dl 00881608 07 pop es 00881609 12546672 adc dl, byte ptr [esi+$72] 0088160D 6D insd 0088160E 58 pop eax 0088160F 58 pop eax 00881610 46 inc esi 00881611 50 push eax 00881612 49 dec ecx 00881613 6E outsb 00881614 766F jbe 00881685 00881616 6963655F544A34 imul esp, [ebx+$65], $344A545F 0088161D 108800D0F249 adc [eax+$49F2D000], cl 00881623 005E00 add [esi+$00], bl 00881626 10555F adc [ebp+$5F], dl 00881629 58 pop eax 0088162A 58 pop eax 0088162B 46 inc esi 0088162C 50 push eax 0088162D 49 dec ecx 0088162E 4E dec esi 0088162F 56 push esi 00881630 4F dec edi 00881631 49 dec ecx 00881632 43 inc ebx 00881633 45 inc ebp 00881634 5F pop edi 00881635 54 push esp 00881636 4A dec edx 00881637 0000 add [eax], al 00881639 8D4000 lea eax, [eax+$00] 0088163C 55 push ebp 0088163D 8BEC mov ebp, esp 0088163F 51 push ecx 00881640 53 push ebx 00881641 8945FC mov [ebp-$04], eax 00881644 33C0 xor eax, eax 00881646 55 push ebp 00881647 68EF168800 push $008816EF ***** TRY | 0088164C 64FF30 push dword ptr fs:[eax] 0088164F 648920 mov fs:[eax], esp 00881652 8B45FC mov eax, [ebp-$04] * Reference to control DlyDate : N.A. | 00881655 8B8014030000 mov eax, [eax+$0314] * Reference to: DB.TDataSet.DisableControls(TDataSet); | 0088165B E8F45EC4FF call 004C7554 00881660 8B45FC mov eax, [ebp-$04] * Reference to control DlyDate : N.A. | 00881663 8B9814030000 mov ebx, [eax+$0314] 00881669 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Close(TDataSet); | 0088166B E86442C4FF call 004C58D4 00881670 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 00881672 E835C9C5FF call 004DDFAC 00881677 8B10 mov edx, [eax] * Possible reference to virtual method TN.A..OFFS_44 | 00881679 FF5244 call dword ptr [edx+$44] 0088167C 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 0088167E E829C9C5FF call 004DDFAC * Possible String Reference to: 'exec P_get_invoice ' | 00881683 BA04178800 mov edx, $00881704 00881688 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 0088168A FF5138 call dword ptr [ecx+$38] 0088168D 8BC3 mov eax, ebx * Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings; | or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList; | or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList; | or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer; | or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass; | or: DB.TObjectField.GetFields(TObjectField):TFields; | 0088168F E818C9C5FF call 004DDFAC * Possible String Reference to: '@InvoiceFlag='1'' | 00881694 BA20178800 mov edx, $00881720 00881699 8B08 mov ecx, [eax] * Possible reference to virtual method TN.A..OFFS_38 | 0088169B FF5138 call dword ptr [ecx+$38] 0088169E 8BC3 mov eax, ebx * Reference to: DB.TDataSet.Open(TDataSet); | 008816A0 E82342C4FF call 004C58C8 008816A5 8B45FC mov eax, [ebp-$04] * Reference to control v1PRTOrderQty : N.A. | 008816A8 8B9050030000 mov edx, [eax+$0350] 008816AE 8B45FC mov eax, [ebp-$04] * Reference to control DlyDate : N.A. | 008816B1 8B8014030000 mov eax, [eax+$0314] | 008816B7 E8DCADF4FF call 007CC498 008816BC 8B45FC mov eax, [ebp-$04] * Reference to control v1PRTOrderQty : N.A. | 008816BF 8B9050030000 mov edx, [eax+$0350] 008816C5 8B45FC mov eax, [ebp-$04] * Reference to control DlyDate : N.A. | 008816C8 8B8014030000 mov eax, [eax+$0314] | 008816CE E84DAFF4FF call 007CC620 008816D3 33C0 xor eax, eax 008816D5 5A pop edx 008816D6 59 pop ecx 008816D7 59 pop ecx 008816D8 648910 mov fs:[eax], edx ****** FINALLY | * Possible String Reference to: '[Y]Ã' | 008816DB 68F6168800 push $008816F6 008816E0 8B45FC mov eax, [ebp-$04] * Reference to control DlyDate : N.A. | 008816E3 8B8014030000 mov eax, [eax+$0314] * Reference to: DB.TDataSet.EnableControls(TDataSet); | 008816E9 E8865EC4FF call 004C7574 008816EE C3 ret *) end; end.