Function at 0x41ae98
Capabilities:
Reference sql statements

Disassembly:
push ebp
mov ebp, esp
mov ecx, 0x4e
push 0
push 0
dec ecx
jne 0x41aea0
push ebx
push esi
push edi
mov dword [ebp - 8], edx
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x41b7fc
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 0x41b6d9
xor eax, eax
push ebp
push 0x41b6ac
push dword fs:[eax]
mov dword fs:[eax], esp
xor eax, eax
push ebp
push 0x41b0ba
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, 0x41b818
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, 0x41b86c
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, 0x41b878
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, 0x41b884
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, 0x41b894
call sub.Vclbde50.bpl__Dbtables_TQuery_ParamByName_qqrx17System_AnsiString
pop edx
call sub.Vcldb50.bpl__Db_TParam_SetAsString_qqrx17System_AnsiString
mov edx, 0x41b8a4
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, 0x41b8b4
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 0x41b06c
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x84]
mov edx, 0x41b8c4
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x10]
mov ecx, dword [eax]
call dword [ecx + 0x58]
jmp 0x41b09d
mov eax, dword [ebp - 4]
add eax, 0xd0
mov edx, 0x41b8d4
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 0x41b6e9
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 0x41b105
xor eax, eax
push ebp
push 0x41b674
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x30]
push eax
mov edx, 0x41b914
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x128]
mov ecx, dword [eax]
call dword [ecx + 0x58]
mov edx, dword [ebp - 0x128]
lea eax, [ebp - 0x124]
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x124]
lea edi, [ebp - 0x114]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x138]
mov edx, dword [ebp - 0x10]
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x138]
lea edi, [ebp - 0x104]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov al, 0x35
mov byte [ebp - 0x14b], al
mov byte [ebp - 0x14c], 1
lea eax, [ebp - 0x148]
lea edx, [ebp - 0x14c]
call sub.Vcl50.bpl__System__VarFromPStr_qqrr14System_Variantrx28System__SmallString_iuc_255_
lea esi, [ebp - 0x148]
lea edi, [ebp - 0xf4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x15c]
xor edx, edx
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x15c]
lea edi, [ebp - 0xe4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x16c]
xor edx, edx
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x16c]
lea edi, [ebp - 0xd4]
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 - 0xc4]
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 - 0xb4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov edx, 0x41b924
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x1a0]
mov ecx, dword [eax]
call dword [ecx + 0x58]
mov edx, dword [ebp - 0x1a0]
lea eax, [ebp - 0x19c]
call sub.Vcl50.bpl__System__VarFromLStr_qqrr14System_Variantx17System_AnsiString
lea esi, [ebp - 0x19c]
lea edi, [ebp - 0xa4]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov al, 0x59
mov byte [ebp - 0x1b3], al
mov byte [ebp - 0x1b4], 1
lea eax, [ebp - 0x1b0]
lea edx, [ebp - 0x1b4]
call sub.Vcl50.bpl__System__VarFromPStr_qqrr14System_Variantrx28System__SmallString_iuc_255_
lea esi, [ebp - 0x1b0]
lea edi, [ebp - 0x94]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
mov al, 0x4e
mov byte [ebp - 0x1c7], al
mov byte [ebp - 0x1c8], 1
lea eax, [ebp - 0x1c4]
lea edx, [ebp - 0x1c8]
call sub.Vcl50.bpl__System__VarFromPStr_qqrr14System_Variantrx28System__SmallString_iuc_255_
lea esi, [ebp - 0x1c4]
lea edi, [ebp - 0x84]
mov ecx, 4
rep movsd dword es:[edi], dword [esi]
lea eax, [ebp - 0x114]
lea ecx, [ebp - 0x74]
mov edx, 9
call sub.Vcl50.bpl__System_VarArrayOf_qqrpx14System_Variantxi
lea ecx, [ebp - 0x74]
mov edx, 0x41b934
mov eax, dword [ebp - 4]
call fcn.004094d8
push 0
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x1d8]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x1d8]
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 0x41b333
lea eax, [ebp - 0x14]
mov edx, 0x41b948
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
jmp 0x41b387
push 0
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x1e8]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x1e8]
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 0x41b37a
lea eax, [ebp - 0x14]
mov edx, 0x41b954
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
jmp 0x41b387
lea eax, [ebp - 0x14]
mov edx, 0x41b960
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_Edit_qqrv
mov edx, 0x41b96c
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, 0x41b924
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x1ec]
mov ecx, dword [eax]
call dword [ecx + 0x58]
cmp dword [ebp - 0x1ec], 0
je 0x41b40a
push 1
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x1fc]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x1fc]
call sub.Vcl50.bpl__System__VarToReal_qqrv
fabs
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41b978
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x98]
jmp 0x41b423
push 0
push 0
mov edx, 0x41b978
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 - 0x20c]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x20c]
call sub.Vcl50.bpl__System__VarToReal_qqrv
fabs
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41b988
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 - 0x21c]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x21c]
push eax
mov edx, 0x41b998
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 - 0x22c]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x22c]
pop eax
call sub.Vcl50.bpl__System__VarAdd_qqrv
lea eax, [ebp - 0x21c]
push eax
mov edx, 0x41b9a8
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 - 0x23c]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x23c]
pop eax
call sub.Vcl50.bpl__System__VarSub_qqrv
lea eax, [ebp - 0x21c]
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 0x41b511
lea eax, [ebp - 0x14]
mov edx, 0x41b948
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
jmp 0x41b546
fld qword [ebp - 0x20]
add esp, 0xfffffff4
fstp xword [esp]
wait
push 0
push 0
push 0
call fcn.00403790
test eax, eax
jge 0x41b539
lea eax, [ebp - 0x14]
mov edx, 0x41b954
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
jmp 0x41b546
lea eax, [ebp - 0x14]
mov edx, 0x41b960
call sub.Vcl50.bpl__System__LStrLAsg_qqrv
mov edx, 0x41b9b8
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, 0x41b924
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x240]
mov ecx, dword [eax]
call dword [ecx + 0x58]
cmp dword [ebp - 0x240], 0
je 0x41b625
push 1
push 1
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x250]
push eax
call sub.Vcl50.bpl__System__VarArrayGet_qr14System_Variantii
add esp, 0x10
lea eax, [ebp - 0x250]
push eax
mov edx, 0x41b9c4
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 - 0x260]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x260]
pop eax
call sub.Vcl50.bpl__System__VarAdd_qqrv
lea eax, [ebp - 0x250]
push eax
mov edx, 0x41b9d4
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 - 0x270]
call sub.Vcl50.bpl__System__VarFromReal_qqrv
lea edx, [ebp - 0x270]
pop eax
call sub.Vcl50.bpl__System__VarSub_qqrv
lea eax, [ebp - 0x250]
call sub.Vcl50.bpl__System__VarToReal_qqrv
fabs
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41b9e4
mov eax, dword [ebp - 8]
call sub.Vcldb50.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x98]
jmp 0x41b63e
push 0
push 0
mov edx, 0x41b9e4
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, 0x41b9f4
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 0x41b69a
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 0x41b6d9
mov eax, dword [ebp - 8]
cmp byte [eax + 0x91], 0
je 0x41aed8
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41b806
lea eax, [ebp - 0x270]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 3
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x240]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x23c]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 5
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x1ec]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x1e8]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 2
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x1c4]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x1b0]
call sub.Vcl50.bpl__System__VarClr_qqrv
lea eax, [ebp - 0x1a0]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x19c]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 5
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x148]
mov edx, dword [sym.imp.Vcl50.bpl___xp_14System_Variant]
mov ecx, 2
call sub.Vcl50.bpl__System__FinalizeArray_qqrv
lea eax, [ebp - 0x128]
call sub.Vcl50.bpl__System__LStrClr_qqrr17System_AnsiString
lea eax, [ebp - 0x124]
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