Function at 0x41e000
Capabilities:
Reference sql statements

Disassembly:
push ebp
mov ebp, esp
mov ecx, 0x57
push 0
push 0
dec ecx
jne 0x41e008
push ebx
push esi
push edi
mov dword [ebp - 8], edx
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x41ea08
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
add eax, 0xd0
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_First_qqrv
jmp 0x41e8b9
xor eax, eax
push ebp
push 0x41e88c
push dword fs:[eax]
mov dword fs:[eax], esp
xor eax, eax
push ebp
push 0x41e222
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
xor edx, edx
mov ecx, dword [eax]
call dword [ecx + 0x178]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov eax, dword [eax + 0x238]
mov edx, dword [eax]
call dword [edx + 0x40]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov eax, dword [eax + 0x238]
mov edx, 0x41ea24
mov ecx, dword [eax]
call dword [ecx + 0x34]
push 1
lea eax, [ebp - 0x34]
push eax
lea edx, [ebp - 0x38]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov eax, dword [eax + 0x238]
mov ecx, dword [eax]
call dword [ecx + 0x1c]
mov eax, dword [ebp - 0x38]
push eax
push 5
push 1
mov eax, dword [ebp - 4]
add eax, 0xa8
push eax
lea eax, [ebp - 0x4c]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x4c]
push eax
lea eax, [ebp - 0x5c]
mov edx, 0x41ea78
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea edx, [ebp - 0x5c]
pop eax
call sub.Vcl50.bpl__System__VarAdd_qqrv
lea edx, [ebp - 0x4c]
lea eax, [ebp - 0x3c]
call sub.Vcl50.bpl__System__VarToLStr_qqrr17System_AnsiStringrx14System_Variant
mov ecx, dword [ebp - 0x3c]
mov edx, 0x41ea84
pop eax
call fcn.004035c4
mov edx, dword [ebp - 0x34]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov eax, dword [eax + 0x238]
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov edx, 0x41ea90
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x60]
mov ecx, dword [eax]
call dword [ecx + 0x58]
mov eax, dword [ebp - 0x60]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov edx, 0x41eaa0
call sub.Vclbde50.bpl__Dbtables_TQuery_ParamByName_qqrx17System_AnsiString
pop edx
call sub.Vcldb50.bpl__Db_TParam_SetAsString_qqrx17System_AnsiString
mov edx, 0x41eab0
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x64]
mov ecx, dword [eax]
call dword [ecx + 0x58]
mov eax, dword [ebp - 0x64]
push eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov edx, 0x41eac0
call sub.Vclbde50.bpl__Dbtables_TQuery_ParamByName_qqrx17System_AnsiString
pop edx
call sub.Vcldb50.bpl__Db_TParam_SetAsString_qqrx17System_AnsiString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov dl, 1
mov ecx, dword [eax]
call dword [ecx + 0x178]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
call sub.Vcldb50.bpl__Db_TDataSet_First_qqrv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
cmp byte [eax + 0x91], 0
jne 0x41e1d4
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov edx, 0x41ead0
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x10]
mov ecx, dword [eax]
call dword [ecx + 0x58]
jmp 0x41e205
mov eax, dword [ebp - 4]
add eax, 0xd0
mov edx, 0x41eae0
call sub.Vcl50.bpl__System__LStrAsg_qqrv
mov eax, dword [ebp - 4]
mov byte [eax + 0xec], 1
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x41e8c9
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
xor edx, edx
mov ecx, dword [eax]
call dword [ecx + 0x178]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x41e26d
xor eax, eax
push ebp
push 0x41e854
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x30]
push eax
mov edx, 0x41eb20
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x148]
mov ecx, dword [eax]
call dword [ecx + 0x58]
mov edx, dword [ebp - 0x148]
lea eax, [ebp - 0x144]
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x144]
lea edi, [ebp - 0x134]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x158]
mov edx, dword [ebp - 0x10]
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x158]
lea edi, [ebp - 0x124]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov al, 0x38
mov byte [ebp - 0x16b], al
mov byte [ebp - 0x16c], 1
lea eax, [ebp - 0x168]
lea edx, [ebp - 0x16c]
call sub.Vcl50.bpl__System__VarFromPStr_qqrr14System_Variantrx28System__SmallString_iuc_255_
lea esi, [ebp - 0x168]
lea edi, [ebp - 0x114]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x17c]
xor edx, edx
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x17c]
lea edi, [ebp - 0x104]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x18c]
xor edx, edx
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x18c]
lea edi, [ebp - 0xf4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x19c]
xor edx, edx
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x19c]
lea edi, [ebp - 0xe4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x1ac]
xor edx, edx
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x1ac]
lea edi, [ebp - 0xd4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov edx, 0x41eb30
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x1c0]
mov ecx, dword [eax]
call dword [ecx + 0x58]
mov edx, dword [ebp - 0x1c0]
lea eax, [ebp - 0x1bc]
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x1bc]
lea edi, [ebp - 0xc4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov al, 0x59
mov byte [ebp - 0x1d3], al
mov byte [ebp - 0x1d4], 1
lea eax, [ebp - 0x1d0]
lea edx, [ebp - 0x1d4]
call sub.Vcl50.bpl__System__VarFromPStr_qqrr14System_Variantrx28System__SmallString_iuc_255_
lea esi, [ebp - 0x1d0]
lea edi, [ebp - 0xb4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov al, 0x4e
mov byte [ebp - 0x1e7], al
mov byte [ebp - 0x1e8], 1
lea eax, [ebp - 0x1e4]
lea edx, [ebp - 0x1e8]
call sub.Vcl50.bpl__System__VarFromPStr_qqrr14System_Variantrx28System__SmallString_iuc_255_
lea esi, [ebp - 0x1e4]
lea edi, [ebp - 0xa4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov edx, 0x41eb40
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x1fc]
mov ecx, dword [eax]
call dword [ecx + 0x58]
mov edx, dword [ebp - 0x1fc]
lea eax, [ebp - 0x1f8]
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x1f8]
lea edi, [ebp - 0x94]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov edx, 0x41eb50
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x210]
mov ecx, dword [eax]
call dword [ecx + 0x58]
mov edx, dword [ebp - 0x210]
lea eax, [ebp - 0x20c]
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x20c]
lea edi, [ebp - 0x84]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x134]
lea ecx, [ebp - 0x74]
mov edx, 0xb
call sub.Vcl50.bpl__System_VarArrayOf_qqrpx14System_Variantxi
lea ecx, [ebp - 0x74]
mov edx, 0x41eb60
mov eax, dword [ebp - 4]
call fcn.004094d8
push 0
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x220]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x220]
call sub.Vcl50.bpl__System__VarToReal_qqrv
add esp, 0xfffffff4
fstp xword [esp]
wait
push 0
push 0
push 0
call fcn.00403790
test eax, eax
jle 0x41e513
lea eax, [ebp - 0x14]
mov edx, 0x41eb74
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
jmp 0x41e567
push 0
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x230]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x230]
call sub.Vcl50.bpl__System__VarToReal_qqrv
add esp, 0xfffffff4
fstp xword [esp]
wait
push 0
push 0
push 0
call fcn.00403790
test eax, eax
jge 0x41e55a
lea eax, [ebp - 0x14]
mov edx, 0x41eb80
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
jmp 0x41e567
lea eax, [ebp - 0x14]
mov edx, 0x41eb8c
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_Edit_qqrv
mov edx, 0x41eb98
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [ebp - 0x14]
mov ecx, dword [eax]
call dword [ecx + 0xa0]
mov edx, 0x41eb30
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x234]
mov ecx, dword [eax]
call dword [ecx + 0x58]
cmp dword [ebp - 0x234], 0
je 0x41e5ea
push 1
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x244]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x244]
call sub.Vcl50.bpl__System__VarToReal_qqrv
fabs
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41eba4
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x98]
jmp 0x41e603
push 0
push 0
mov edx, 0x41eba4
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x98]
push 0
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x254]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x254]
call sub.Vcl50.bpl__System__VarToReal_qqrv
fabs
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41ebb4
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x98]
push 0
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x264]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x264]
push eax
mov edx, 0x41ebc4
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x50]
lea eax, [ebp - 0x274]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x274]
pop eax
call sub.Vcl50.bpl__System__VarAdd_qqrv
lea eax, [ebp - 0x264]
push eax
mov edx, 0x41ebd4
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x50]
lea eax, [ebp - 0x284]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x284]
pop eax
call sub.Vcl50.bpl__System__VarSub_qqrv
lea eax, [ebp - 0x264]
call sub.Vcl50.bpl__System__VarToReal_qqrv
fstp qword [ebp - 0x20]
wait
fld qword [ebp - 0x20]
add esp, 0xfffffff4
fstp xword [esp]
wait
push 0
push 0
push 0
call fcn.00403790
test eax, eax
jle 0x41e6f1
lea eax, [ebp - 0x14]
mov edx, 0x41eb74
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
jmp 0x41e726
fld qword [ebp - 0x20]
add esp, 0xfffffff4
fstp xword [esp]
wait
push 0
push 0
push 0
call fcn.00403790
test eax, eax
jge 0x41e719
lea eax, [ebp - 0x14]
mov edx, 0x41eb80
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
jmp 0x41e726
lea eax, [ebp - 0x14]
mov edx, 0x41eb8c
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
mov edx, 0x41ebe4
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [ebp - 0x14]
mov ecx, dword [eax]
call dword [ecx + 0xa0]
mov edx, 0x41eb30
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x288]
mov ecx, dword [eax]
call dword [ecx + 0x58]
cmp dword [ebp - 0x288], 0
je 0x41e805
push 1
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x298]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x298]
push eax
mov edx, 0x41ebf0
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x50]
lea eax, [ebp - 0x2a8]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x2a8]
pop eax
call sub.Vcl50.bpl__System__VarAdd_qqrv
lea eax, [ebp - 0x298]
push eax
mov edx, 0x41ec00
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x50]
lea eax, [ebp - 0x2b8]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x2b8]
pop eax
call sub.Vcl50.bpl__System__VarSub_qqrv
lea eax, [ebp - 0x298]
call sub.Vcl50.bpl__System__VarToReal_qqrv
fabs
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41ec10
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x98]
jmp 0x41e81e
push 0
push 0
mov edx, 0x41ec10
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x98]
fld qword [ebp - 0x20]
fabs
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41ec20
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x98]
mov eax, dword [ebp - 8]
mov edx, dword [eax]
call dword [edx + 0x240]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x41e87a
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_Next_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x41e8b9
mov eax, dword [ebp - 8]
cmp byte [eax + 0x91], 0
je 0x41e040
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41ea12
lea eax, [ebp - 0x2b8]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 3
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x288]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x284]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 5
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x234]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x230]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 2
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x210]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x20c]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x1fc]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x1f8]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x1e4]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x1d0]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x1c0]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x1bc]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 5
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x168]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 2
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x148]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x144]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x74]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x64]
mov edx, 2
call sub.Vcl50.bpl__System__LStrArrayClr_qqrv
lea eax, [ebp - 0x5c]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 2
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x3c]
mov edx, 3
call sub.Vcl50.bpl__System__LStrArrayClr_qqrv
lea eax, [ebp - 0x30]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x14]
mov edx, 2
call sub.Vcl50.bpl__System__LStrArrayClr_qqrv
ret