Function at 0x41c2ebc
Capabilities:
Reference sql statements

Disassembly:
push ebp
mov ebp, esp
mov ecx, 0x3f
push 0
push 0
dec ecx
jne 0x41c2ec4
push ebx
push esi
push edi
mov ebx, dword [ebp + 8]
add ebx, 0xffffffe0
mov esi, dword [ebp + 8]
add esi, 0xffffffe4
xor eax, eax
push ebp
push 0x41c33e3
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp + 8]
xor edx, edx
mov dword [eax - 4], edx
lea eax, [ebp - 0x10]
push eax
mov eax, dword [sym.imp.VEDatasets.bpl__Vedataset_defDonemNo]
mov eax, dword [eax]
push eax
lea eax, [ebp - 0x14]
push eax
mov eax, dword [ebp + 8]
mov eax, dword [eax - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov eax, dword [eax + 0x20]
lea edx, [ebp - 0x1c]
call sub.rtl60.bpl__Sysutils_IntToStr_qqri
mov ecx, dword [ebp - 0x1c]
lea eax, [ebp - 0x18]
mov edx, 0x41c33fc
call sub.rtl60.bpl__System__LStrCat3_qqrv
mov edx, dword [ebp - 0x18]
mov ecx, dword [sym.imp.VEDatasets.bpl__Vedataset_defFirmaNo]
mov ecx, dword [ecx]
mov eax, dword [0x4199678]
call fcn.0419a428
mov eax, dword [ebp - 0x14]
push eax
mov eax, dword [ebp + 8]
mov eax, dword [eax - 8]
call fcn.041c24f8
mov edx, eax
mov eax, dword [0x4199678]
pop ecx
call fcn.04199f80
lea eax, [ebp - 0x10]
call sub.rtl60.bpl__System__VarToReal_qqrrx14System_Variant
mov eax, dword [ebp + 8]
fstp qword [eax - 0x18]
wait
xor ecx, ecx
mov dl, 1
mov eax, dword [sym.imp.VEDatasets.bpl__Vedataset_TVEDataset_]
call sub.VEDatasets.bpl__Vedataset_TVEDataset__bctr_qqrp18Classes_TComponent
mov dword [esi], eax
mov eax, dword [ebp + 8]
mov eax, dword [eax - 8]
call fcn.041c24f8
mov edx, eax
mov eax, dword [esi]
mov ecx, dword [eax]
call dword [ecx + 0x268]
mov eax, dword [sym.imp.VEDatasets.bpl__Vedataset_defDonemNo]
mov eax, dword [eax]
push eax
lea eax, [ebp - 0x20]
push eax
mov eax, dword [ebp + 8]
mov eax, dword [eax - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov eax, dword [eax + 0x20]
lea edx, [ebp - 0x28]
call sub.rtl60.bpl__Sysutils_IntToStr_qqri
mov ecx, dword [ebp - 0x28]
lea eax, [ebp - 0x24]
mov edx, 0x41c3464
call sub.rtl60.bpl__System__LStrCat3_qqrv
mov edx, dword [ebp - 0x24]
mov ecx, dword [sym.imp.VEDatasets.bpl__Vedataset_defFirmaNo]
mov ecx, dword [ecx]
mov eax, dword [0x4199678]
call fcn.0419a428
mov edx, dword [ebp - 0x20]
mov eax, dword [esi]
mov eax, dword [eax + 0x2a8]
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov eax, dword [esi]
call sub.dbrtl60.bpl__Db_TDataSet_Open_qqrv
jmp 0x41c335c
mov eax, dword [ebp + 8]
inc dword [eax - 4]
lea edx, [ebp - 0x30]
mov eax, dword [ebp + 8]
mov eax, dword [eax - 8]
mov eax, dword [eax + 4]
mov ecx, dword [eax]
call dword [ecx + 0xc]
mov eax, dword [ebp - 0x30]
lea edx, [ebp - 0x2c]
mov ecx, dword [eax]
call dword [ecx + 0x1c]
mov edx, dword [ebp - 0x2c]
mov eax, ebx
call sub.rtl60.bpl__System__IntfCopy_qqrr45System__DelphiInterface_t17System_IInterface_x45System__DelphiInterface_t17System_IInter
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
push eax
lea eax, [ebp - 0x1d0]
push eax
mov eax, dword [ebp + 8]
mov ecx, dword [eax - 0x28]
mov eax, dword [ebp + 8]
mov edx, dword [eax - 0x24]
mov eax, dword [ebp + 8]
mov eax, dword [eax - 8]
call fcn.041c2758
lea edx, [ebp - 0x1d0]
pop eax
mov ecx, dword [0x419fea8]
call sub.rtl60.bpl__System__CopyRecord_qqrv
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov edx, dword [ebp + 8]
mov edx, dword [edx - 4]
mov dword [eax + 0x10], edx
mov eax, dword [esi]
mov edx, 0x41c35f4
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x58]
mov edi, eax
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov dword [eax + 0x20], edi
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x2c
push eax
mov eax, dword [esi]
mov edx, 0x41c3604
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x1d4]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov edx, dword [ebp - 0x1d4]
pop eax
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x28
push eax
mov eax, dword [esi]
mov edx, 0x41c3618
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x1d8]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov edx, dword [ebp - 0x1d8]
pop eax
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
mov eax, dword [esi]
mov edx, 0x41c362c
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x58]
mov edi, eax
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov dword [eax + 0x24], edi
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x30
push eax
mov eax, dword [esi]
mov edx, 0x41c3640
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fstp qword [ebp - 0x1e0]
wait
mov eax, dword [ebp + 8]
mov eax, dword [eax - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
fld qword [eax + 0x30]
fmul qword [ebp - 0x1e0]
pop eax
fstp qword [eax]
wait
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x38
push eax
mov eax, dword [esi]
mov edx, 0x41c3658
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
pop eax
fstp qword [eax]
wait
mov eax, dword [esi]
mov edx, 0x41c3668
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x58]
mov edi, eax
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov dword [eax + 0x44], edi
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x40
push eax
mov eax, dword [esi]
mov edx, 0x41c3674
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x1e4]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov edx, dword [ebp - 0x1e4]
pop eax
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
mov eax, dword [esi]
mov edx, 0x41c3688
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x58]
mov edi, eax
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
mov dword [eax + 0x48], edi
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x88
push eax
mov eax, dword [esi]
mov edx, 0x41c3694
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
pop eax
fstp qword [eax]
wait
mov eax, dword [ebp + 8]
fld qword [eax - 0x18]
fcomp dword [0x41c36a0]
fnstsw ax
sahf
jbe 0x41c3238
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x90
push eax
mov eax, dword [esi]
mov edx, 0x41c36ac
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fstp qword [ebp - 0x1e0]
wait
mov eax, dword [ebp + 8]
mov eax, dword [eax - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
fld qword [eax + 0x90]
mov eax, dword [ebp + 8]
fdiv qword [eax - 0x18]
fmul qword [ebp - 0x1e0]
pop eax
fstp qword [eax]
wait
jmp 0x41c324d
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
xor edx, edx
mov dword [eax + 0x90], edx
mov dword [eax + 0x94], edx
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x98
push eax
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x90
push eax
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
fld qword [eax + 0x30]
pop eax
fmul qword [eax]
pop eax
fstp qword [eax]
wait
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0xc8
push eax
mov eax, dword [esi]
mov edx, 0x41c3640
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fstp qword [ebp - 0x1e0]
wait
mov eax, dword [ebp + 8]
mov eax, dword [eax - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
fld qword [eax + 0x30]
fmul qword [ebp - 0x1e0]
fstp xword [ebp - 0x1f0]
wait
mov eax, dword [esi]
mov edx, 0x41c3658
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fld xword [ebp - 0x1f0]
fmulp st(1)
pop eax
fstp qword [eax]
wait
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0xf0
push eax
mov eax, dword [esi]
mov edx, 0x41c36c4
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x1f4]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov edx, dword [ebp - 0x1f4]
pop eax
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0xc0
push eax
mov eax, dword [esi]
mov edx, 0x41c3640
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x58]
mov dword [ebp - 0x1f8], eax
fild dword [ebp - 0x1f8]
pop eax
fstp qword [eax]
wait
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x58
push eax
mov eax, dword [ebp + 8]
mov eax, dword [eax - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
pop edx
mov ecx, dword [eax + 0x58]
mov dword [edx], ecx
mov ecx, dword [eax + 0x5c]
mov dword [edx + 4], ecx
mov eax, dword [esi]
call sub.dbrtl60.bpl__Db_TDataSet_Next_qqrv
mov eax, dword [esi]
cmp byte [eax + 0xa1], 0
je 0x41c2ff0
mov eax, dword [esi]
call sub.dbrtl60.bpl__Db_TDataSet_Close_qqrv
mov eax, dword [esi]
call sub.rtl60.bpl__System_TObject_Free_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41c33ea
lea eax, [ebp - 0x1f4]
call sub.rtl60.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x1e4]
call sub.rtl60.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x1d8]
mov edx, 2
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x1d0]
mov edx, dword [0x419fea8]
call sub.rtl60.bpl__System__FinalizeRecord_qqrpvt1
lea eax, [ebp - 0x30]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x2c]
call sub.rtl60.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
lea eax, [ebp - 0x28]
mov edx, 6
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x10]
call sub.rtl60.bpl__System__VarClr_qqrr14System_Variant
ret