Function at 0x46a1d4
Capabilities:
Reference sql statements

Disassembly:
push ebp
mov ebp, esp
mov ecx, 0x28
push 0
push 0
dec ecx
jne 0x46a1dc
push esi
mov esi, eax
xor eax, eax
push ebp
push 0x46ae15
push dword fs:[eax]
mov dword fs:[eax], esp
lea edx, [ebp - 0x10]
mov eax, dword [esi + 0x11c]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0x10]
lea edx, [ebp - 0xc]
call sub.RtlVcl160.bpl__System_Sysutils_Trim_qqrx20System_UnicodeString
cmp dword [ebp - 0xc], 0
je 0x46ad4a
lea edx, [ebp - 0x18]
mov eax, dword [esi + 0x120]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0x18]
lea edx, [ebp - 0x14]
call sub.RtlVcl160.bpl__System_Sysutils_Trim_qqrx20System_UnicodeString
cmp dword [ebp - 0x14], 0
je 0x46ad4a
lea edx, [ebp - 0x1c]
mov eax, dword [esi + 0x118]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0x1c]
mov edx, 0x46ae30
call sub.RtlVcl160.bpl__System__UStrEqual_qqrv
jne 0x46a790
xor eax, eax
call fcn.00414c90
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x46a789
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_Close_qqrv
push 0x46ae40
lea edx, [ebp - 0x2c]
mov eax, dword [esi + 0xcc]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0x2c]
lea edx, [ebp - 0x28]
call sub.RtlVcl160.bpl__System_Sysutils_QuotedStr_qqrx20System_UnicodeString
push dword [ebp - 0x28]
push 0x46afc4
lea edx, [ebp - 0x34]
mov eax, dword [esi + 0xe4]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0x34]
lea edx, [ebp - 0x30]
call sub.RtlVcl160.bpl__System_Sysutils_QuotedStr_qqrx20System_UnicodeString
push dword [ebp - 0x30]
push 0x46afe8
push 0x46b00c
push 0x46b01c
push 0x46b00c
push 0x46b02c
push 0x46b00c
push 0x46b050
push 0x46b00c
push 0x46b060
push 0x46b00c
push 0x46b050
push 0x46b00c
push 0x46b084
push 0x46b00c
push 0x46b050
push 0x46b00c
push 0x46b0a8
lea edx, [ebp - 0x3c]
mov eax, dword [esi + 0xd0]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0x3c]
lea edx, [ebp - 0x38]
call sub.RtlVcl160.bpl__System_Sysutils_QuotedStr_qqrx20System_UnicodeString
push dword [ebp - 0x38]
push 0x46b0cc
push 0x46b00c
push 0x46b0f0
push 0x46b00c
push 0x46b104
lea edx, [ebp - 0x44]
mov eax, dword [esi + 0x11c]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0x44]
lea edx, [ebp - 0x40]
call sub.RtlVcl160.bpl__System_Sysutils_QuotedStr_qqrx20System_UnicodeString
push dword [ebp - 0x40]
push 0x46b128
lea edx, [ebp - 0x4c]
mov eax, dword [esi + 0x120]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0x4c]
lea edx, [ebp - 0x48]
call sub.RtlVcl160.bpl__System_Sysutils_QuotedStr_qqrx20System_UnicodeString
push dword [ebp - 0x48]
lea eax, [ebp - 0x24]
mov edx, 0x1e
call sub.RtlVcl160.bpl__System__UStrCatN_qqrv
mov edx, dword [ebp - 0x24]
lea eax, [ebp - 0x20]
call sub.RtlVcl160.bpl__System__WStrFromUStr_qqrr17System_WideStringx20System_UnicodeString
mov edx, dword [ebp - 0x20]
mov eax, dword [ebp - 4]
mov ecx, dword [eax]
call dword [ecx + 0x328]
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_Open_qqrv
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_IsEmpty_qqrv
test al, al
je 0x46a3fb
lea ecx, [ebp - 0x50]
mov eax, dword [esi + 0x80]
mov edx, 0x46b14c
call sub.PublicPkg160.bpl__Suputransdatamod_TSpCustomTransDataMod_TMsg_qqrx20System_UnicodeString
mov eax, dword [ebp - 0x50]
call fcn.00410198
call sub.RtlVcl160.bpl__System_Sysutils_Abort_qqrv
jmp 0x46a773
mov eax, dword [esi + 0x104]
mov edx, 0x46b168
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
or edx, 0xffffffff
mov ecx, dword [eax]
call dword [ecx + 0xe0]
mov edx, 0x46b180
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x54]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0x54]
push eax
mov eax, dword [esi + 0x104]
mov edx, 0x46b198
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0xf0]
mov edx, 0x46b1b0
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b1c8
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0xd8]
mov edx, 0x46b1e0
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
fchs
fstp xword [ebp - 0x60]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b168
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x70]
mov dword [ebp - 0x64], eax
fild dword [ebp - 0x64]
fld xword [ebp - 0x60]
fmulp st(1)
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [0x5ac730]
movzx eax, byte [eax]
mov edx, eax
neg eax
call fcn.0041081c
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b1f8
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0xd8]
mov edx, 0x46b1e0
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
fstp qword [ebp - 0x6c]
wait
mov edx, 0x46b210
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
fsubr qword [ebp - 0x6c]
fchs
fstp xword [ebp - 0x60]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b168
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x70]
mov dword [ebp - 0x64], eax
fild dword [ebp - 0x64]
fld xword [ebp - 0x60]
fmulp st(1)
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [0x5ac730]
movzx eax, byte [eax]
mov edx, eax
neg eax
call fcn.0041081c
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b228
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0xd8]
mov edx, 0x46b1e0
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
fstp qword [ebp - 0x6c]
wait
mov edx, 0x46b210
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
fsubr qword [ebp - 0x6c]
fchs
fstp xword [ebp - 0x60]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b168
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x70]
mov dword [ebp - 0x64], eax
fild dword [ebp - 0x64]
fld xword [ebp - 0x60]
fmulp st(1)
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [0x5ac730]
movzx eax, byte [eax]
mov edx, eax
neg eax
call fcn.0041081c
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b240
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0xd8]
mov edx, 0x46b1e0
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
fstp qword [ebp - 0x6c]
wait
mov edx, 0x46b210
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
fsubr qword [ebp - 0x6c]
fchs
fstp xword [ebp - 0x60]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b168
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x70]
mov dword [ebp - 0x64], eax
fild dword [ebp - 0x64]
fld xword [ebp - 0x60]
fmulp st(1)
fstp xword [ebp - 0x78]
wait
mov edx, 0x46b1b0
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
fld xword [ebp - 0x78]
fmulp st(1)
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [0x5ac730]
movzx eax, byte [eax]
mov edx, eax
neg eax
call fcn.0041081c
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b258
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0xd8]
lea eax, [ebp - 0x8c]
push eax
mov edx, 0x46b270
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xa0]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov edx, dword [ebp - 0xa0]
lea eax, [ebp - 0x9c]
call sub.RtlVcl160.bpl__System_Variants__VarFromUStr_qqrr8TVarDatax20System_UnicodeString
lea eax, [ebp - 0x9c]
push eax
mov edx, 0x46b288
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xb4]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov edx, dword [ebp - 0xb4]
lea eax, [ebp - 0xb0]
call sub.RtlVcl160.bpl__System_Variants__VarFromUStr_qqrr8TVarDatax20System_UnicodeString
lea eax, [ebp - 0xb0]
push eax
mov edx, 0x46b288
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xbc]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0xbc]
lea edx, [ebp - 0xb8]
call sub.RtlVcl160.bpl__System_Sysutils_Trim_qqrx20System_UnicodeString
cmp dword [ebp - 0xb8], 0
setne al
pop edx
pop ecx
call fcn.00410858
lea edx, [ebp - 0x8c]
lea eax, [ebp - 0x7c]
call sub.RtlVcl160.bpl__System_Variants__VarToUStr_qqrr20System_UnicodeStringrx8TVarData
mov eax, dword [ebp - 0x7c]
push eax
mov eax, dword [esi + 0x104]
mov edx, 0x46b2a0
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0xf0]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x46ad4a
mov eax, dword [ebp - 4]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_Close_qqrv
ret
lea edx, [ebp - 0xc0]
mov eax, dword [esi + 0x118]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0xc0]
mov edx, 0x46b2b8
call sub.RtlVcl160.bpl__System__UStrEqual_qqrv
jne 0x46ad4a
xor eax, eax
call fcn.00414c90
mov dword [ebp - 8], eax
xor eax, eax
push ebp
push 0x46ad43
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_Close_qqrv
push 0x46b2c8
lea edx, [ebp - 0xcc]
mov eax, dword [esi + 0xcc]
mov ecx, dword [eax]
call dword [ecx + 0x80]
push dword [ebp - 0xcc]
push 0x46b00c
push 0x46afc4
push 0x46b00c
lea edx, [ebp - 0xd0]
mov eax, dword [esi + 0xe4]
mov ecx, dword [eax]
call dword [ecx + 0x80]
push dword [ebp - 0xd0]
push 0x46b00c
push 0x46afe8
push 0x46b00c
push 0x46b01c
push 0x46b00c
push 0x46b02c
push 0x46b00c
push 0x46b050
push 0x46b00c
push 0x46b060
push 0x46b00c
push 0x46b050
push 0x46b00c
push 0x46b084
push 0x46b00c
push 0x46b050
push 0x46b00c
push 0x46b0a8
push 0x46b00c
lea edx, [ebp - 0xd4]
mov eax, dword [esi + 0xd0]
mov ecx, dword [eax]
call dword [ecx + 0x80]
push dword [ebp - 0xd4]
push 0x46b00c
push 0x46b4c8
push 0x46b00c
push 0x46b4f0
push 0x46b00c
push 0x46b504
push 0x46b00c
push 0x46b52c
push 0x46b00c
push 0x46b540
push 0x46b104
lea edx, [ebp - 0xdc]
mov eax, dword [esi + 0x11c]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0xdc]
lea edx, [ebp - 0xd8]
call sub.RtlVcl160.bpl__System_Sysutils_QuotedStr_qqrx20System_UnicodeString
push dword [ebp - 0xd8]
push 0x46b128
lea edx, [ebp - 0xe4]
mov eax, dword [esi + 0x120]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0xe4]
lea edx, [ebp - 0xe0]
call sub.RtlVcl160.bpl__System_Sysutils_QuotedStr_qqrx20System_UnicodeString
push dword [ebp - 0xe0]
lea eax, [ebp - 0xc8]
mov edx, 0x28
call sub.RtlVcl160.bpl__System__UStrCatN_qqrv
mov edx, dword [ebp - 0xc8]
lea eax, [ebp - 0xc4]
call sub.RtlVcl160.bpl__System__WStrFromUStr_qqrr17System_WideStringx20System_UnicodeString
mov edx, dword [ebp - 0xc4]
mov eax, dword [ebp - 8]
mov ecx, dword [eax]
call dword [ecx + 0x328]
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_Open_qqrv
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_IsEmpty_qqrv
test al, al
je 0x46a99e
lea ecx, [ebp - 0xe8]
mov eax, dword [esi + 0x80]
mov edx, 0x46b14c
call sub.PublicPkg160.bpl__Suputransdatamod_TSpCustomTransDataMod_TMsg_qqrx20System_UnicodeString
mov eax, dword [ebp - 0xe8]
call fcn.00410198
call sub.RtlVcl160.bpl__System_Sysutils_Abort_qqrv
jmp 0x46ad2d
mov eax, dword [esi + 0x104]
mov edx, 0x46b168
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, 1
mov ecx, dword [eax]
call dword [ecx + 0xe0]
lea eax, [ebp - 0xfc]
push eax
mov edx, 0x46b270
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x110]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov edx, dword [ebp - 0x110]
lea eax, [ebp - 0x10c]
call sub.RtlVcl160.bpl__System_Variants__VarFromUStr_qqrr8TVarDatax20System_UnicodeString
lea eax, [ebp - 0x10c]
push eax
mov edx, 0x46b288
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x124]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov edx, dword [ebp - 0x124]
lea eax, [ebp - 0x120]
call sub.RtlVcl160.bpl__System_Variants__VarFromUStr_qqrr8TVarDatax20System_UnicodeString
lea eax, [ebp - 0x120]
push eax
mov edx, 0x46b288
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x12c]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0x12c]
lea edx, [ebp - 0x128]
call sub.RtlVcl160.bpl__System_Sysutils_Trim_qqrx20System_UnicodeString
cmp dword [ebp - 0x128], 0
setne al
pop edx
pop ecx
call fcn.00410858
lea edx, [ebp - 0xfc]
lea eax, [ebp - 0xec]
call sub.RtlVcl160.bpl__System_Variants__VarToUStr_qqrr20System_UnicodeStringrx8TVarData
mov eax, dword [ebp - 0xec]
push eax
mov eax, dword [esi + 0x104]
mov edx, 0x46b2a0
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0xf0]
mov edx, 0x46b554
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x130]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0x130]
push eax
mov eax, dword [esi + 0x104]
mov edx, 0x46b56c
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0xf0]
mov edx, 0x46b180
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x134]
mov ecx, dword [eax]
call dword [ecx + 0x80]
mov eax, dword [ebp - 0x134]
push eax
mov eax, dword [esi + 0x104]
mov edx, 0x46b198
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0xf0]
mov edx, 0x46b1b0
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b1c8
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0xd8]
mov eax, dword [esi + 0x104]
mov edx, 0x46b168
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x70]
mov dword [ebp - 0x64], eax
fild dword [ebp - 0x64]
fstp xword [ebp - 0x60]
wait
mov edx, 0x46b1e0
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
fld xword [ebp - 0x60]
fmulp st(1)
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [0x5ac730]
movzx eax, byte [eax]
mov edx, eax
neg eax
call fcn.0041081c
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b1f8
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0xd8]
mov edx, 0x46b1e0
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
fstp qword [ebp - 0x6c]
wait
mov edx, 0x46b210
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
fsubr qword [ebp - 0x6c]
fstp xword [ebp - 0x60]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b168
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x70]
mov dword [ebp - 0x64], eax
fild dword [ebp - 0x64]
fld xword [ebp - 0x60]
fmulp st(1)
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [0x5ac730]
movzx eax, byte [eax]
mov edx, eax
neg eax
call fcn.0041081c
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b228
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0xd8]
mov edx, 0x46b1e0
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
fstp qword [ebp - 0x6c]
wait
mov edx, 0x46b210
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x68]
fsubr qword [ebp - 0x6c]
fstp xword [ebp - 0x60]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b168
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x70]
mov dword [ebp - 0x64], eax
fild dword [ebp - 0x64]
fld xword [ebp - 0x60]
fmulp st(1)
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [0x5ac730]
movzx eax, byte [eax]
mov edx, eax
neg eax
call fcn.0041081c
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [esi + 0x104]
mov edx, 0x46b240
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0xd8]
mov edx, 0x46b584
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x13c]
mov ecx, dword [eax]
call dword [ecx + 0x80]
push dword [ebp - 0x13c]
push 0x46b59c
mov edx, 0x46b5ac
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x140]
mov ecx, dword [eax]
call dword [ecx + 0x80]
push dword [ebp - 0x140]
lea eax, [ebp - 0x138]
mov edx, 3
call sub.RtlVcl160.bpl__System__UStrCatN_qqrv
mov eax, dword [ebp - 0x138]
push eax
mov eax, dword [esi + 0x104]
mov edx, 0x46b5c4
call sub.PublicPkg160.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0xf0]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x46ad4a
mov eax, dword [ebp - 8]
call sub.PublicPkg160.bpl__Data_Db_TDataSet_Close_qqrv
ret
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x46ae1f
lea eax, [ebp - 0x140]
mov edx, 8
call sub.RtlVcl160.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x120]
call sub.RtlVcl160.bpl__System_Variants__VarClr_qqrr8TVarData
lea eax, [ebp - 0x110]
call sub.RtlVcl160.bpl__System__UStrClr_qqrpv
lea eax, [ebp - 0x10c]
mov edx, dword [sym.imp.RtlVcl160.bpl___xp_14System_Variant]
mov ecx, 2
call sub.RtlVcl160.bpl__System__FinalizeArray_qqrpvt1ui
lea eax, [ebp - 0xec]
mov edx, 0xa
call sub.RtlVcl160.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0xc4]
call sub.RtlVcl160.bpl__System__WStrClr_qqrpv
lea eax, [ebp - 0xc0]
mov edx, 4
call sub.RtlVcl160.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0xb0]
call sub.RtlVcl160.bpl__System_Variants__VarClr_qqrr8TVarData
lea eax, [ebp - 0xa0]
call sub.RtlVcl160.bpl__System__UStrClr_qqrpv
lea eax, [ebp - 0x9c]
mov edx, dword [sym.imp.RtlVcl160.bpl___xp_14System_Variant]
mov ecx, 2
call sub.RtlVcl160.bpl__System__FinalizeArray_qqrpvt1ui
lea eax, [ebp - 0x7c]
call sub.RtlVcl160.bpl__System__UStrClr_qqrpv
lea eax, [ebp - 0x54]
mov edx, 0xd
call sub.RtlVcl160.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x20]
call sub.RtlVcl160.bpl__System__WStrClr_qqrpv
lea eax, [ebp - 0x1c]
mov edx, 5
call sub.RtlVcl160.bpl__System__UStrArrayClr_qqrpvi
ret