Function at 0x41c29c0
Capabilities:
Reference sql statements

Disassembly:
push ebp
mov ebp, esp
mov ecx, 0x35
push 0
push 0
dec ecx
jne 0x41c29c8
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 0x41c2ee5
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, 0x41c2efc
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 [0x4199d68]
call fcn.0419ab18
mov eax, dword [ebp - 0x14]
push eax
mov eax, dword [ebp + 8]
mov eax, dword [eax - 8]
call fcn.041c2000
mov edx, eax
mov eax, dword [0x4199d68]
pop ecx
call fcn.0419a670
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.041c2000
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, 0x41c2f64
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 [0x4199d68]
call fcn.0419ab18
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 0x41c2e5e
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 - 0x180]
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.041c2260
lea edx, [ebp - 0x180]
pop eax
mov ecx, dword [0x419facc]
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, 0x41c30f4
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, 0x41c3104
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
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x28
push eax
mov eax, dword [esi]
mov edx, 0x41c3118
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x188]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov edx, dword [ebp - 0x188]
pop eax
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
mov eax, dword [esi]
mov edx, 0x41c312c
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, 0x41c3140
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fstp qword [ebp - 0x190]
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 - 0x190]
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, 0x41c3158
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, 0x41c3168
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, 0x41c3174
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x194]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov edx, dword [ebp - 0x194]
pop eax
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
mov eax, dword [esi]
mov edx, 0x41c3188
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, 0x78
push eax
mov eax, dword [esi]
mov edx, 0x41c3194
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 [0x41c31a0]
fnstsw ax
sahf
jbe 0x41c2d3a
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x80
push eax
mov eax, dword [esi]
mov edx, 0x41c31ac
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fstp qword [ebp - 0x190]
wait
mov eax, dword [ebp + 8]
mov eax, dword [eax - 0xc]
mov edx, dword [eax]
call dword [edx + 0x1c]
fld qword [eax + 0x80]
mov eax, dword [ebp + 8]
fdiv qword [eax - 0x18]
fmul qword [ebp - 0x190]
pop eax
fstp qword [eax]
wait
jmp 0x41c2d4f
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
xor edx, edx
mov dword [eax + 0x80], edx
mov dword [eax + 0x84], edx
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x88
push eax
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0x80
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, 0xb8
push eax
mov eax, dword [esi]
mov edx, 0x41c3140
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fstp qword [ebp - 0x190]
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 - 0x190]
fstp xword [ebp - 0x1a0]
wait
mov eax, dword [esi]
mov edx, 0x41c3158
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fld xword [ebp - 0x1a0]
fmulp st(1)
pop eax
fstp qword [eax]
wait
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0xe0
push eax
mov eax, dword [esi]
mov edx, 0x41c31c4
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x1a4]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov edx, dword [ebp - 0x1a4]
pop eax
call sub.rtl60.bpl__System__LStrAsg_qqrpvpxv
mov eax, dword [ebx]
mov edx, dword [eax]
call dword [edx + 0x1c]
add eax, 0xb0
push eax
mov eax, dword [esi]
mov edx, 0x41c3140
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x58]
mov dword [ebp - 0x1a8], eax
fild dword [ebp - 0x1a8]
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 0x41c2af4
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 0x41c2eec
lea eax, [ebp - 0x1a4]
call sub.rtl60.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x194]
call sub.rtl60.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x188]
mov edx, 2
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x180]
mov edx, dword [0x419facc]
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