Function at 0x41c2d10
Capabilities:
Reference sql statements

Disassembly:
push ebp
mov ebp, esp
push ecx
mov ecx, 0x52
push 0
push 0
dec ecx
jne 0x41c2d19
push ecx
xchg dword [ebp - 4], ecx
push ebx
push esi
push edi
mov dword [ebp - 0xc], ecx
mov dword [ebp - 8], edx
mov dword [ebp - 4], eax
mov eax, dword [ebp + 0xc]
call sub.rtl60.bpl__System__LStrAddRef_qqrpv
mov eax, dword [ebp + 8]
call sub.rtl60.bpl__System__LStrAddRef_qqrpv
mov esi, dword [0x41cfeac]
xor eax, eax
push ebp
push 0x41c4101
push dword fs:[eax]
mov dword fs:[eax], esp
mov ecx, dword [sym.imp.vcl60.bpl__Forms_Application]
mov ecx, dword [ecx]
mov dl, 1
mov eax, dword [sym.imp.adortl60.bpl__Adodb_TADOQuery_]
call sub.adortl60.bpl__Adodb_TADOQuery__bctr_qqrp18Classes_TComponent
mov ebx, eax
mov edx, dword [sym.imp.VEDatasets.bpl__Vedataset_defConnection]
mov edx, dword [edx]
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x268]
mov eax, dword [ebp + 0x18]
sub eax, 0x80
je 0x41c2d9b
dec eax
je 0x41c2e31
sub eax, 6
je 0x41c2ec7
jmp 0x41c2f58
lea eax, [ebp - 0x28]
push eax
mov eax, dword [ebp - 0xc]
mov dword [ebp - 0x60], eax
mov byte [ebp - 0x5c], 0
mov eax, dword [ebp - 8]
mov dword [ebp - 0x58], eax
mov byte [ebp - 0x54], 0
mov eax, dword [ebp + 0x20]
mov dword [ebp - 0x50], eax
mov byte [ebp - 0x4c], 0
mov eax, dword [ebp + 0x1c]
mov dword [ebp - 0x48], eax
mov byte [ebp - 0x44], 0
mov eax, dword [ebp + 0x24]
mov dword [ebp - 0x40], eax
mov byte [ebp - 0x3c], 0
push dword [ebp + 0x14]
push dword [ebp + 0x10]
lea edx, [ebp - 0x64]
mov eax, dword [0x41997b8]
call fcn.04199d20
mov eax, dword [ebp - 0x64]
mov dword [ebp - 0x38], eax
mov byte [ebp - 0x34], 0xb
lea eax, [ebp - 0x68]
push eax
or ecx, 0xffffffff
mov dl, 0x27
mov eax, dword [ebp + 8]
call sub.vegalib60.bpl__Strtools_QS_qqr17System_AnsiStringci
mov eax, dword [ebp - 0x68]
mov dword [ebp - 0x30], eax
mov byte [ebp - 0x2c], 0xb
lea edx, [ebp - 0x60]
mov ecx, 6
mov eax, 0x41c411c
call sub.rtl60.bpl__Sysutils_Format_qqrx17System_AnsiStringpx14System_TVarRecxi
mov eax, dword [ebp - 0x28]
push eax
mov eax, ebx
call sub.adortl60.bpl__Adodb_TADOQuery_GetSQL_qqrv
pop edx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
jmp 0x41c2f58
lea eax, [ebp - 0x6c]
push eax
mov eax, dword [ebp - 0xc]
mov dword [ebp - 0x60], eax
mov byte [ebp - 0x5c], 0
mov eax, dword [ebp - 8]
mov dword [ebp - 0x58], eax
mov byte [ebp - 0x54], 0
mov eax, dword [ebp + 0x20]
mov dword [ebp - 0x50], eax
mov byte [ebp - 0x4c], 0
mov eax, dword [ebp + 0x1c]
mov dword [ebp - 0x48], eax
mov byte [ebp - 0x44], 0
mov eax, dword [ebp + 0x24]
mov dword [ebp - 0x40], eax
mov byte [ebp - 0x3c], 0
push dword [ebp + 0x14]
push dword [ebp + 0x10]
lea edx, [ebp - 0x70]
mov eax, dword [0x41997b8]
call fcn.04199d20
mov eax, dword [ebp - 0x70]
mov dword [ebp - 0x38], eax
mov byte [ebp - 0x34], 0xb
lea eax, [ebp - 0x74]
push eax
or ecx, 0xffffffff
mov dl, 0x27
mov eax, dword [ebp + 8]
call sub.vegalib60.bpl__Strtools_QS_qqr17System_AnsiStringci
mov eax, dword [ebp - 0x74]
mov dword [ebp - 0x30], eax
mov byte [ebp - 0x2c], 0xb
lea edx, [ebp - 0x60]
mov ecx, 6
mov eax, 0x41c41f8
call sub.rtl60.bpl__Sysutils_Format_qqrx17System_AnsiStringpx14System_TVarRecxi
mov eax, dword [ebp - 0x6c]
push eax
mov eax, ebx
call sub.adortl60.bpl__Adodb_TADOQuery_GetSQL_qqrv
pop edx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
jmp 0x41c2f58
lea eax, [ebp - 0x78]
push eax
mov eax, dword [ebp - 0xc]
mov dword [ebp - 0x60], eax
mov byte [ebp - 0x5c], 0
mov eax, dword [ebp - 8]
mov dword [ebp - 0x58], eax
mov byte [ebp - 0x54], 0
mov eax, dword [ebp + 0x20]
mov dword [ebp - 0x50], eax
mov byte [ebp - 0x4c], 0
mov eax, dword [ebp + 0x1c]
mov dword [ebp - 0x48], eax
mov byte [ebp - 0x44], 0
mov eax, dword [ebp + 0x24]
mov dword [ebp - 0x40], eax
mov byte [ebp - 0x3c], 0
push dword [ebp + 0x14]
push dword [ebp + 0x10]
lea edx, [ebp - 0x7c]
mov eax, dword [0x41997b8]
call fcn.04199d20
mov eax, dword [ebp - 0x7c]
mov dword [ebp - 0x38], eax
mov byte [ebp - 0x34], 0xb
lea eax, [ebp - 0x80]
push eax
or ecx, 0xffffffff
mov dl, 0x27
mov eax, dword [ebp + 8]
call sub.vegalib60.bpl__Strtools_QS_qqr17System_AnsiStringci
mov eax, dword [ebp - 0x80]
mov dword [ebp - 0x30], eax
mov byte [ebp - 0x2c], 0xb
lea edx, [ebp - 0x60]
mov ecx, 6
mov eax, 0x41c42d8
call sub.rtl60.bpl__Sysutils_Format_qqrx17System_AnsiStringpx14System_TVarRecxi
mov eax, dword [ebp - 0x78]
push eax
mov eax, ebx
call sub.adortl60.bpl__Adodb_TADOQuery_GetSQL_qqrv
pop edx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov eax, ebx
call sub.dbrtl60.bpl__Db_TDataSet_Open_qqrv
lea eax, [ebp - 0x90]
push eax
mov eax, dword [sym.imp.VEDatasets.bpl__Vedataset_defDonemNo]
mov eax, dword [eax]
push eax
lea eax, [ebp - 0x94]
push eax
lea eax, [ebp - 0x9c]
push eax
or ecx, 0xffffffff
mov dl, 0x27
mov eax, dword [ebp + 0xc]
call sub.vegalib60.bpl__Strtools_QS_qqr17System_AnsiStringci
mov ecx, dword [ebp - 0x9c]
lea eax, [ebp - 0x98]
mov edx, 0x41c43b8
call sub.rtl60.bpl__System__LStrCat3_qqrv
mov edx, dword [ebp - 0x98]
mov ecx, dword [sym.imp.VEDatasets.bpl__Vedataset_defFirmaNo]
mov ecx, dword [ecx]
mov eax, dword [0x41997b8]
call fcn.0419aa5c
mov ecx, dword [ebp - 0x94]
mov edx, dword [sym.imp.VEDatasets.bpl__Vedataset_defConnection]
mov edx, dword [edx]
mov eax, dword [0x41997b8]
call fcn.0419a2ec
lea eax, [ebp - 0x90]
call sub.rtl60.bpl__System__VarToInt_qqrrx14System_Variant
mov dword [ebp - 0x10], eax
xor eax, eax
mov dword [ebp - 0x18], eax
mov dword [ebp - 0x14], eax
mov eax, ebx
call sub.dbrtl60.bpl__Db_TDataSet_First_qqrv
jmp 0x41c395b
mov edx, 0x41c43f0
mov eax, ebx
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fstp qword [ebp - 0xa4]
wait
mov edx, 0x41c4400
mov eax, ebx
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fmul qword [ebp - 0xa4]
fadd qword [ebp - 0x18]
fstp qword [ebp - 0x18]
wait
mov edx, 0x41c43f0
mov eax, ebx
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41c4400
mov eax, ebx
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
add esp, 0xfffffff8
fstp qword [esp]
wait
push 0
push 0
push 0
push 0
mov edx, 0x41c4414
mov eax, ebx
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x58]
push eax
mov edx, 0x41c4428
mov eax, ebx
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x58]
mov ecx, 1
mov edx, 0x41c4434
call fcn.041a6d98
lea edx, [ebp - 0xb0]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0xb0]
lea edx, [ebp - 0xac]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0xac]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0xb8]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0xb8]
lea edx, [ebp - 0xb4]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0xb4]
lea ecx, [ebp - 0xa8]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0xa8]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x44
push eax
mov edx, 0x41c4428
mov eax, ebx
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x58]
pop edx
mov dword [edx], eax
lea edx, [ebp - 0xc4]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0xc4]
lea edx, [ebp - 0xc0]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0xc0]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0xcc]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0xcc]
lea edx, [ebp - 0xc8]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0xc8]
lea ecx, [ebp - 0xbc]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0xbc]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x78
push eax
lea edx, [ebp - 0xd8]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0xd8]
lea edx, [ebp - 0xd4]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0xd4]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0xe0]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0xe0]
lea edx, [ebp - 0xdc]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0xdc]
lea ecx, [ebp - 0xd0]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0xd0]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x78
push eax
lea edx, [ebp - 0xec]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0xec]
lea edx, [ebp - 0xe8]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0xe8]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0xf4]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0xf4]
lea edx, [ebp - 0xf0]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0xf0]
lea ecx, [ebp - 0xe4]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0xe4]
mov edx, dword [eax]
call dword [edx + 0x1c]
fld qword [eax + 0x38]
pop eax
fmul qword [eax]
pop eax
fstp qword [eax]
wait
mov eax, dword [ebp + 0x18]
sub eax, 0x80
je 0x41c3272
dec eax
je 0x41c32e7
sub eax, 6
je 0x41c3359
jmp 0x41c33ce
lea edx, [ebp - 0x100]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x100]
lea edx, [ebp - 0xfc]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0xfc]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0x108]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x108]
lea edx, [ebp - 0x104]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x104]
lea ecx, [ebp - 0xf8]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0xf8]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov dword [eax + 0x90], 3
jmp 0x41c33ce
lea edx, [ebp - 0x114]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x114]
lea edx, [ebp - 0x110]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x110]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0x11c]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x11c]
lea edx, [ebp - 0x118]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x118]
lea ecx, [ebp - 0x10c]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0x10c]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov dword [eax + 0x90], 3
jmp 0x41c33ce
cmp dword [ebp - 0x10], 0
jle 0x41c33ce
lea edx, [ebp - 0x128]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x128]
lea edx, [ebp - 0x124]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x124]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0x130]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x130]
lea edx, [ebp - 0x12c]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x12c]
lea ecx, [ebp - 0x120]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0x120]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov edx, dword [ebp - 0x10]
mov dword [eax + 0x90], edx
lea edx, [ebp - 0x13c]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x13c]
lea edx, [ebp - 0x138]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x138]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0x144]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x144]
lea edx, [ebp - 0x140]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x140]
lea ecx, [ebp - 0x134]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0x134]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x94
push eax
mov edx, 0x41c444c
mov eax, ebx
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x58]
pop edx
mov dword [edx], eax
mov edx, dword [sym.imp.VEDatasets.bpl__Vedataset_defConnection]
mov edx, dword [edx]
mov ecx, 0x41c445c
mov eax, dword [0x41997b8]
call fcn.04199a7c
test al, al
je 0x41c3554
lea edx, [ebp - 0x150]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x150]
lea edx, [ebp - 0x14c]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x14c]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0x158]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x158]
lea edx, [ebp - 0x154]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x154]
lea ecx, [ebp - 0x148]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0x148]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x98
push eax
mov edx, 0x41c444c
mov eax, ebx
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x58]
mov dword [ebp - 0xa4], eax
mov byte [ebp - 0xa0], 0
lea eax, [ebp - 0xa4]
push eax
push 0
lea eax, [ebp - 0x168]
push eax
mov eax, dword [sym.imp.VEDatasets.bpl__Vedataset_defDonemNo]
mov eax, dword [eax]
push eax
lea eax, [ebp - 0x16c]
push eax
mov ecx, dword [sym.imp.VEDatasets.bpl__Vedataset_defFirmaNo]
mov ecx, dword [ecx]
mov edx, 0x41c4474
mov eax, dword [0x41997b8]
call fcn.0419aa5c
mov ecx, dword [ebp - 0x16c]
mov edx, dword [sym.imp.VEDatasets.bpl__Vedataset_defConnection]
mov edx, dword [edx]
mov eax, dword [0x41997b8]
call fcn.0419a254
lea eax, [ebp - 0x168]
call sub.rtl60.bpl__System__VarToReal_qqrrx14System_Variant
pop eax
fstp qword [eax]
wait
lea edx, [ebp - 0x178]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x178]
lea edx, [ebp - 0x174]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x174]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0x180]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x180]
lea edx, [ebp - 0x17c]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x17c]
lea ecx, [ebp - 0x170]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0x170]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0xe0
push eax
mov edx, 0x41c44ac
mov eax, ebx
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x184]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov edx, dword [ebp - 0x184]
pop eax
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
lea edx, [ebp - 0x190]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x190]
lea edx, [ebp - 0x18c]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x18c]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0x198]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x198]
lea edx, [ebp - 0x194]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x194]
lea ecx, [ebp - 0x188]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0x188]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp dword [eax + 0x24], 8
jne 0x41c36ba
lea edx, [ebp - 0x1a4]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x1a4]
lea edx, [ebp - 0x1a0]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x1a0]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0x1ac]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x1ac]
lea edx, [ebp - 0x1a8]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x1a8]
lea ecx, [ebp - 0x19c]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0x19c]
mov edx, dword [eax]
call dword [edx + 0x1c]
xor edx, edx
mov dword [eax + 0x24], edx
lea edx, [ebp - 0x1b8]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x1b8]
lea edx, [ebp - 0x1b4]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x1b4]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0x1c0]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x1c0]
lea edx, [ebp - 0x1bc]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x1bc]
lea ecx, [ebp - 0x1b0]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0x1b0]
mov edx, dword [eax]
call dword [edx + 0x1c]
cmp dword [eax + 0x24], 9
jne 0x41c3954
lea edx, [ebp - 0x1dc]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x1dc]
lea edx, [ebp - 0x1d8]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x1d8]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0x1e4]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x1e4]
lea edx, [ebp - 0x1e0]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x1e0]
lea ecx, [ebp - 0x1d4]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0x1d4]
mov edx, dword [eax]
call dword [edx + 0x1c]
fld qword [eax + 0x30]
lea eax, [ebp - 0x1d0]
call sub.rtl60.bpl__System__VarFromReal_qqrv
lea eax, [ebp - 0x1d0]
push eax
lea edx, [ebp - 0x200]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x200]
lea edx, [ebp - 0x1fc]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x1fc]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0x208]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x208]
lea edx, [ebp - 0x204]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x204]
lea ecx, [ebp - 0x1f8]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0x1f8]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov eax, dword [eax + 0x20]
mov dword [ebp - 0xa4], eax
mov byte [ebp - 0xa0], 0
lea eax, [ebp - 0xa4]
push eax
push 0
lea eax, [ebp - 0x1f4]
push eax
mov edx, dword [sym.imp.VEDatasets.bpl__Vedataset_defConnection]
mov edx, dword [edx]
mov ecx, 0x41c44bc
mov eax, dword [0x41997b8]
call fcn.0419a254
lea edx, [ebp - 0x1f4]
pop eax
call sub.rtl60.bpl__System__VarMul_qqrr14System_Variantrx14System_Variant
lea eax, [ebp - 0x1d0]
call sub.rtl60.bpl__System__VarToReal_qqrrx14System_Variant
fstp qword [ebp - 0x20]
wait
lea edx, [ebp - 0x214]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x214]
lea edx, [ebp - 0x210]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x210]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0x21c]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x21c]
lea edx, [ebp - 0x218]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x218]
lea ecx, [ebp - 0x20c]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov eax, dword [ebp - 0x20c]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov edx, dword [ebp - 0x20]
mov dword [eax + 0x118], edx
mov edx, dword [ebp - 0x1c]
mov dword [eax + 0x11c], edx
lea edx, [ebp - 0x224]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x224]
lea edx, [ebp - 0x220]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x220]
mov edx, dword [eax]
call dword [edx + 0x20]
dec eax
push eax
lea edx, [ebp - 0x22c]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x22c]
lea edx, [ebp - 0x228]
mov ecx, dword [eax]
call dword [ecx + 0x18]
mov eax, dword [ebp - 0x228]
lea ecx, [ebp - 0x24]
pop edx
mov edi, dword [eax]
call dword [edi + 0x24]
mov edx, 0x41c4400
mov eax, ebx
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
add esp, 0xfffffff8
fstp qword [esp]
wait
push 0
mov ecx, dword [ebp - 0x24]
xor edx, edx
mov eax, dword [ebp - 4]
call fcn.041ca864
mov eax, ebx
call sub.dbrtl60.bpl__Db_TDataSet_Next_qqrv
cmp byte [ebx + 0xa1], 0
je 0x41c2ff1
lea edx, [ebp - 0x234]
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x234]
lea edx, [ebp - 0x230]
mov ecx, dword [eax]
call dword [ecx + 0x10]
mov eax, dword [ebp - 0x230]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov byte [eax + 0x21], 0
push 0
push 0
mov edx, dword [esi]
mov eax, dword [ebp - 4]
call fcn.041cb5ec
mov ebx, eax
mov eax, dword [ebp + 0x18]
sub eax, 0x80
je 0x41c39c4
dec eax
je 0x41c3abd
sub eax, 6
je 0x41c3bb6
jmp 0x41c3caa
mov eax, dword [sym.imp.VEDatasets.bpl__Vedataset_defDonemNo]
mov eax, dword [eax]
push eax
mov dword [ebp - 0x278], ebx
mov byte [ebp - 0x274], 0
mov eax, dword [ebp - 0xc]
mov dword [ebp - 0x270], eax
mov byte [ebp - 0x26c], 0
mov eax, dword [ebp - 8]
mov dword [ebp - 0x268], eax
mov byte [ebp - 0x264], 0
mov eax, dword [ebp + 0x20]
mov dword [ebp - 0x260], eax
mov byte [ebp - 0x25c], 0
mov eax, dword [ebp + 0x1c]
mov dword [ebp - 0x258], eax
mov byte [ebp - 0x254], 0
mov eax, dword [ebp + 0x24]
mov dword [ebp - 0x250], eax
mov byte [ebp - 0x24c], 0
push dword [ebp + 0x14]
push dword [ebp + 0x10]
lea edx, [ebp - 0x27c]
mov eax, dword [0x41997b8]
call fcn.04199d20
mov eax, dword [ebp - 0x27c]
mov dword [ebp - 0x248], eax
mov byte [ebp - 0x244], 0xb
lea eax, [ebp - 0x280]
push eax
or ecx, 0xffffffff
mov dl, 0x27
mov eax, dword [ebp + 8]
call sub.vegalib60.bpl__Strtools_QS_qqr17System_AnsiStringci
mov eax, dword [ebp - 0x280]
mov dword [ebp - 0x240], eax
mov byte [ebp - 0x23c], 0xb
lea eax, [ebp - 0x278]
push eax
push 7
lea eax, [ebp - 0x238]
push eax
mov ecx, dword [sym.imp.VEDatasets.bpl__Vedataset_defFirmaNo]
mov ecx, dword [ecx]
mov edx, 0x41c450c
mov eax, dword [0x41997b8]
call fcn.0419a73c
mov ecx, dword [ebp - 0x238]
mov edx, dword [sym.imp.VEDatasets.bpl__Vedataset_defConnection]
mov edx, dword [edx]
mov eax, dword [0x41997b8]
call fcn.0419a178
jmp 0x41c3caa
mov eax, dword [sym.imp.VEDatasets.bpl__Vedataset_defDonemNo]
mov eax, dword [eax]
push eax
mov dword [ebp - 0x278], ebx
mov byte [ebp - 0x274], 0
mov eax, dword [ebp - 0xc]
mov dword [ebp - 0x270], eax
mov byte [ebp - 0x26c], 0
mov eax, dword [ebp - 8]
mov dword [ebp - 0x268], eax
mov byte [ebp - 0x264], 0
mov eax, dword [ebp + 0x20]
mov dword [ebp - 0x260], eax
mov byte [ebp - 0x25c], 0
mov eax, dword [ebp + 0x1c]
mov dword [ebp - 0x258], eax
mov byte [ebp - 0x254], 0
mov eax, dword [ebp + 0x24]
mov dword [ebp - 0x250], eax
mov byte [ebp - 0x24c], 0
push dword [ebp + 0x14]
push dword [ebp + 0x10]
lea edx, [ebp - 0x288]
mov eax, dword [0x41997b8]
call fcn.04199d20
mov eax, dword [ebp - 0x288]
mov dword [ebp - 0x248], eax
mov byte [ebp - 0x244], 0xb
lea eax, [ebp - 0x28c]
push eax
or ecx, 0xffffffff
mov dl, 0x27
mov eax, dword [ebp + 8]
call sub.vegalib60.bpl__Strtools_QS_qqr17System_AnsiStringci
mov eax, dword [ebp - 0x28c]
mov dword [ebp - 0x240], eax
mov byte [ebp - 0x23c], 0xb
lea eax, [ebp - 0x278]
push eax
push 7
lea eax, [ebp - 0x284]
push eax
mov ecx, dword [sym.imp.VEDatasets.bpl__Vedataset_defFirmaNo]
mov ecx, dword [ecx]
mov edx, 0x41c45f8
mov eax, dword [0x41997b8]
call fcn.0419a73c
mov ecx, dword [ebp - 0x284]
mov edx, dword [sym.imp.VEDatasets.bpl__Vedataset_defConnection]
mov edx, dword [edx]
mov eax, dword [0x41997b8]
call fcn.0419a178
jmp 0x41c3caa
mov eax, dword [sym.imp.VEDatasets.bpl__Vedataset_defDonemNo]
mov eax, dword [eax]
push eax
mov dword [ebp - 0x278], ebx
mov byte [ebp - 0x274], 0
mov eax, dword [ebp - 0xc]
mov dword [ebp - 0x270], eax
mov byte [ebp - 0x26c], 0
mov eax, dword [ebp - 8]
mov dword [ebp - 0x268], eax
mov byte [ebp - 0x264], 0
mov eax, dword [ebp + 0x20]
mov dword [ebp - 0x260], eax
mov byte [ebp - 0x25c], 0
mov eax, dword [ebp + 0x1c]
mov dword [ebp - 0x258], eax
mov byte [ebp - 0x254], 0
mov eax, dword [ebp + 0x24]
mov dword [ebp - 0x250], eax
mov byte [ebp - 0x24c], 0
push dword [ebp + 0x14]
push dword [ebp + 0x10]
lea edx, [ebp - 0x294]
mov eax, dword [0x41997b8]
call fcn.04199d20
mov eax, dword [ebp - 0x294]
mov dword [ebp - 0x248], eax
mov byte [ebp - 0x244], 0xb
lea eax, [ebp - 0x298]
push eax
or ecx, 0xffffffff
mov dl, 0x27
mov eax, dword [ebp + 8]
call sub.vegalib60.bpl__Strtools_QS_qqr17System_AnsiStringci
mov eax, dword [ebp - 0x298]
mov dword [ebp - 0x240], eax
mov byte [ebp - 0x23c], 0xb
lea eax, [ebp - 0x278]
push eax
push 7
lea eax, [ebp - 0x290]
push eax
mov ecx, dword [sym.imp.VEDatasets.bpl__Vedataset_defFirmaNo]
mov ecx, dword [ecx]
mov edx, 0x41c46e4
mov eax, dword [0x41997b8]
call fcn.0419a73c
mov ecx, dword [ebp - 0x290]
mov edx, dword [sym.imp.VEDatasets.bpl__Vedataset_defConnection]
mov edx, dword [edx]
mov eax, dword [0x41997b8]
call fcn.0419a178
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41c410b
lea eax, [ebp - 0x298]
mov edx, 8
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x238]
call sub.rtl60.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x234]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x230]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x22c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x228]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x224]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x220]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x21c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x218]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x214]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x210]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x20c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x208]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x204]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x200]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1fc]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1f8]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1f4]
call sub.rtl60.bpl__System__VarClr_qqrr14System_Variant
lea eax, [ebp - 0x1e4]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1e0]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1dc]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1d8]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1d4]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1d0]
call sub.rtl60.bpl__System__VarClr_qqrr14System_Variant
lea eax, [ebp - 0x1c0]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1bc]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1b8]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1b4]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1b0]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1ac]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1a8]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1a4]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x1a0]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x19c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x198]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x194]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x190]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x18c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x188]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x184]
call sub.rtl60.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x180]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x17c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x178]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x174]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x170]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x16c]
call sub.rtl60.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x168]
call sub.rtl60.bpl__System__VarClr_qqrr14System_Variant
lea eax, [ebp - 0x158]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x154]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x150]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x14c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x148]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x144]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x140]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x13c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x138]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x134]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x130]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x12c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x128]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x124]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x120]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x11c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x118]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x114]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x110]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x10c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x108]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x104]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x100]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xfc]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xf8]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xf4]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xf0]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xec]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xe8]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xe4]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xe0]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xdc]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xd8]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xd4]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xd0]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xcc]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xc8]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xc4]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xc0]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xbc]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xb8]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xb4]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xb0]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xac]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0xa8]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x9c]
mov edx, 3
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x90]
call sub.rtl60.bpl__System__VarClr_qqrr14System_Variant
lea eax, [ebp - 0x80]
mov edx, 8
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x28]
call sub.rtl60.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x24]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp + 8]
mov edx, 2
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
ret