Function at 0x41e3644
Capabilities:
Reference sql statements

Disassembly:
push ebp
mov ebp, esp
mov ecx, 0x13
push 0
push 0
dec ecx
jne 0x41e364c
push ebx
push esi
push edi
mov edi, edx
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x41e3b14
push dword fs:[eax]
mov dword fs:[eax], esp
xor esi, esi
xor ebx, ebx
xor eax, eax
mov dword [ebp - 0x10], eax
mov dword [ebp - 0xc], 0x3ff00000
lea edx, [ebp - 0x18]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x350]
mov ecx, dword [eax]
call dword [ecx + 0x4a8]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x3a0]
cmp byte [eax + 0x170], 0
jne 0x41e3999
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x350]
call sub.ECQDBCD6.bpl__Dxdbctrl_TCustomdxDBTreeListControl_GetFocusedField_qqrv
mov edx, dword [ebp - 4]
cmp eax, dword [edx + 0x3cc]
jne 0x41e3717
lea edx, [ebp - 0x1c]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x350]
mov ecx, dword [eax]
call dword [ecx + 0x4a8]
cmp dword [ebp - 0x1c], 0
je 0x41e3717
lea edx, [ebp - 0x20]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x350]
mov ecx, dword [eax]
call dword [ecx + 0x4a8]
mov edx, dword [ebp - 0x20]
mov eax, dword [ebp - 4]
call fcn.041e4720
mov ebx, eax
push ebp
lea edx, [ebp - 0x24]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x350]
mov ecx, dword [eax]
call dword [ecx + 0x4a8]
mov eax, dword [ebp - 0x24]
call fcn.041e3540
pop ecx
mov esi, eax
test esi, esi
jne 0x41e377d
lea edx, [ebp - 0x28]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x350]
mov ecx, dword [eax]
call dword [ecx + 0x4a8]
mov edx, dword [ebp - 0x28]
mov eax, dword [ebp - 4]
call fcn.041e44c0
test al, al
je 0x41e377d
lea eax, [ebp - 0x10]
push eax
lea edx, [ebp - 0x2c]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x350]
mov ecx, dword [eax]
call dword [ecx + 0x4a8]
mov edx, dword [ebp - 0x2c]
lea ecx, [ebp - 0x14]
mov eax, dword [ebp - 4]
call fcn.041e4578
push ebp
mov eax, dword [ebp - 0x14]
call fcn.041e3540
pop ecx
mov esi, eax
mov edx, dword [ebp - 0x14]
mov eax, dword [ebp - 4]
call fcn.041e4720
mov ebx, eax
test esi, esi
jle 0x41e3815
xor ecx, ecx
mov edx, ebx
mov eax, dword [ebp - 4]
call fcn.041e3c58
test esi, esi
jle 0x41e3808
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x338]
call sub.dbrtl60.bpl__Db_TDataSet_Edit_qqrv
push dword [ebp - 0xc]
push dword [ebp - 0x10]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x338]
mov edx, 0x41e3b2c
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0xa4]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x3e8]
mov edx, dword [eax]
call dword [edx + 0x54]
fmul qword [ebp - 0x10]
add esp, 0xfffffff8
fstp qword [esp]
wait
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x338]
mov edx, 0x41e3b3c
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0xa4]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x338]
mov edx, dword [eax]
call dword [edx + 0x248]
mov eax, dword [ebp - 4]
call fcn.041e4120
jmp 0x41e3ab6
mov ecx, dword [ebp - 4]
mov dl, 1
mov eax, dword [0x41c518c]
call sub.vegalib60.bpl__Untvform_TVForm__bctr_qqrp18Classes_TComponent
mov dword [ebp - 8], eax
xor edx, edx
push ebp
push 0x41e3992
push dword fs:[edx]
mov dword fs:[edx], esp
test esi, esi
jne 0x41e397c
lea eax, [ebp - 0x48]
push eax
or ecx, 0xffffffff
mov dl, 0x27
mov eax, dword [ebp - 0x18]
call sub.vegalib60.bpl__Strtools_QS_qqr17System_AnsiStringci
mov eax, dword [ebp - 0x48]
mov dword [ebp - 0x44], eax
mov byte [ebp - 0x40], 0xb
lea eax, [ebp - 0x44]
push eax
push 0
lea eax, [ebp - 0x3c]
push eax
mov eax, dword [0x4203a7c]
mov eax, dword [eax]
push eax
lea eax, [ebp - 0x4c]
push eax
mov ecx, dword [0x4203a8c]
mov ecx, dword [ecx]
mov edx, 0x41e3b4c
mov eax, dword [0x419a734]
call fcn.0419b668
mov ecx, dword [ebp - 0x4c]
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x50c]
mov eax, dword [0x419a734]
call fcn.0419afa0
lea eax, [ebp - 0x3c]
call sub.rtl60.bpl__System__VarToInt_qqrrx14System_Variant
mov ebx, eax
test ebx, ebx
jle 0x41e38c2
xor ecx, ecx
mov edx, ebx
mov eax, dword [ebp - 4]
call fcn.041e3c58
mov eax, dword [ebp - 4]
call fcn.041e4120
jmp 0x41e397c
cmp dword [ebp - 0x18], 0
je 0x41e3903
lea eax, [ebp - 0x54]
push eax
lea eax, [ebp - 0x58]
mov ecx, 0x41e3b8c
mov edx, edi
call sub.rtl60.bpl__System__LStrCat3_qqrv
mov eax, dword [ebp - 0x58]
or ecx, 0xffffffff
mov dl, 0x27
call sub.vegalib60.bpl__Strtools_QS_qqr17System_AnsiStringci
mov ecx, dword [ebp - 0x54]
lea eax, [ebp - 0x50]
mov edx, 0x41e3b98
call sub.rtl60.bpl__System__LStrCat3_qqrv
mov edx, dword [ebp - 0x50]
mov eax, dword [ebp - 8]
call fcn.041c575c
mov eax, dword [ebp - 8]
call fcn.041c5718
mov esi, eax
mov eax, dword [ebp - 8]
mov al, byte [eax + 0x388]
test al, al
jne 0x41e395a
mov ebx, dword [esi + 8]
dec ebx
test ebx, ebx
jl 0x41e395a
inc ebx
xor edi, edi
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x338]
mov dl, byte [eax + 0x9d]
add dl, 0xfe
sub dl, 2
jb 0x41e3941
call sub.dbrtl60.bpl__Db_TDataSet_Append_qqrv
mov edx, edi
mov eax, esi
call sub.rtl60.bpl__Classes_TList_Get_qqri
mov edx, eax
mov cl, 1
mov eax, dword [ebp - 4]
call fcn.041e3c58
inc edi
dec ebx
jne 0x41e3925
mov eax, dword [ebp - 4]
call fcn.041e4120
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x338]
mov eax, dword [0x419a734]
call fcn.0419a9f8
mov eax, esi
call sub.rtl60.bpl__System_TObject_Free_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41e3ab6
mov eax, dword [ebp - 8]
call sub.rtl60.bpl__Classes_TComponent_FreeOnRelease_qqrv
ret
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x338]
call sub.dbrtl60.bpl__Db_TDataSet_Last_qqrv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x338]
call sub.dbrtl60.bpl__Db_TDataSet_Delete_qqrv
mov eax, dword [ebp - 4]
call fcn.041e4120
lea eax, [ebp - 0x7c]
push eax
or ecx, 0xffffffff
mov dl, 0x27
mov eax, dword [ebp - 0x18]
call sub.vegalib60.bpl__Strtools_QS_qqr17System_AnsiStringci
mov eax, dword [ebp - 0x7c]
mov dword [ebp - 0x78], eax
mov byte [ebp - 0x74], 0xb
lea eax, [ebp - 0x80]
push eax
or ecx, 0xffffffff
mov dl, 0x27
mov eax, dword [ebp - 0x18]
call sub.vegalib60.bpl__Strtools_QS_qqr17System_AnsiStringci
mov eax, dword [ebp - 0x80]
mov dword [ebp - 0x70], eax
mov byte [ebp - 0x6c], 0xb
lea eax, [ebp - 0x78]
push eax
push 1
lea eax, [ebp - 0x68]
push eax
mov eax, dword [0x4203a7c]
mov eax, dword [eax]
push eax
lea eax, [ebp - 0x84]
push eax
mov ecx, dword [0x4203a8c]
mov ecx, dword [ecx]
mov edx, 0x41e3bb0
mov eax, dword [0x419a734]
call fcn.0419b668
mov ecx, dword [ebp - 0x84]
mov eax, dword [ebp - 4]
mov edx, dword [eax + 0x50c]
mov eax, dword [0x419a734]
call fcn.0419afa0
lea eax, [ebp - 0x68]
call sub.rtl60.bpl__System__VarToInt_qqrrx14System_Variant
mov ebx, eax
mov al, byte [0x41e3c48]
push eax
lea eax, [ebp - 0x94]
mov edx, ebx
mov cl, 0xfc
call sub.rtl60.bpl__System__VarFromInt_qqrr14System_Variantxixi
lea ecx, [ebp - 0x94]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x338]
mov edx, 0x41e3c54
mov ebx, dword [eax]
call dword [ebx + 0x240]
test al, al
je 0x41e3a89
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x338]
call sub.dbrtl60.bpl__Db_TDataSet_Delete_qqrv
lea edx, [ebp - 0x98]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4c0]
call sub.vcl60.bpl__Controls_TControl_GetText_qqrv
cmp dword [ebp - 0x98], 0
je 0x41e3ab6
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4c0]
xor edx, edx
call sub.vcl60.bpl__Controls_TControl_SetText_qqrx17System_AnsiString
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41e3b1b
lea eax, [ebp - 0x98]
call sub.rtl60.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x94]
call sub.rtl60.bpl__System__VarClr_qqrr14System_Variant
lea eax, [ebp - 0x84]
mov edx, 3
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x68]
call sub.rtl60.bpl__System__VarClr_qqrr14System_Variant
lea eax, [ebp - 0x58]
mov edx, 5
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x3c]
call sub.rtl60.bpl__System__VarClr_qqrr14System_Variant
lea eax, [ebp - 0x2c]
mov edx, 7
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
ret