Function at 0x550c50
Capabilities:
Reference sql statements

Disassembly:
push ebp
mov ebp, esp
push ecx
mov ecx, 0xe
push 0
push 0
dec ecx
jne 0x550c59
push ecx
xchg dword [ebp - 4], ecx
push ebx
push esi
push edi
mov dword [ebp - 0xc], ecx
mov dword [ebp - 8], edx
mov dword [ebp - 4], eax
mov eax, dword [ebp - 8]
call sub.rtl260.bpl__System__LStrAddRef_qqrpv
mov eax, dword [ebp - 0xc]
call sub.rtl260.bpl__System__LStrAddRef_qqrpv
mov eax, dword [ebp + 0x18]
call sub.rtl260.bpl__System__LStrAddRef_qqrpv
mov eax, dword [ebp + 0x14]
call sub.rtl260.bpl__System__LStrAddRef_qqrpv
mov eax, dword [ebp + 0x10]
call sub.rtl260.bpl__System__LStrAddRef_qqrpv
mov eax, dword [ebp + 0xc]
call sub.rtl260.bpl__System__LStrAddRef_qqrpv
xor eax, eax
push ebp
push 0x5512f2
push dword fs:[eax]
mov dword fs:[eax], esp
xor eax, eax
push ebp
push 0x551225
push dword fs:[eax]
mov dword fs:[eax], esp
xor eax, eax
mov dword [ebp - 0x18], eax
mov dword [ebp - 0x14], eax
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x3e0]
mov dword [ebp - 0x1c], eax
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, dword [eax]
call dword [edx + 0x48]
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x551314
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x5513a0
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov edx, 0x55144c
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
push eax
lea eax, [ebp - 0x28]
mov edx, dword [ebp + 0x18]
call sub.rtl260.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
mov edx, dword [ebp - 0x28]
pop eax
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov edx, 0x551464
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
push eax
lea eax, [ebp - 0x2c]
mov edx, dword [ebp - 0xc]
call sub.rtl260.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
mov edx, dword [ebp - 0x2c]
pop eax
mov ecx, dword [eax]
call dword [ecx + 0x48]
call sub.rtl260.bpl__System_Sysutils_Now_qqrv
add esp, 0xfffffff8
fstp qword [esp]
wait
lea edx, [ebp - 0x30]
mov eax, 0x55147c
call sub.rtl260.bpl__System_Sysutils_FormatDateTime_qqrx20System_UnicodeString16System_TDateTime
mov eax, dword [ebp - 0x30]
push eax
mov edx, 0x5514a0
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Open_qqrv
mov eax, dword [ebp - 0x1c]
mov edx, dword [eax]
call dword [edx + 0x194]
test eax, eax
jle 0x550eab
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, dword [eax]
call dword [edx + 0x48]
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x5514b8
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x551580
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov edx, 0x55144c
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
push eax
lea eax, [ebp - 0x34]
mov edx, dword [ebp + 0x18]
call sub.rtl260.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
mov edx, dword [ebp - 0x34]
pop eax
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov edx, 0x551464
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
push eax
lea eax, [ebp - 0x38]
mov edx, dword [ebp - 0xc]
call sub.rtl260.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
mov edx, dword [ebp - 0x38]
pop eax
mov ecx, dword [eax]
call dword [ecx + 0x48]
call sub.rtl260.bpl__System_Sysutils_Now_qqrv
add esp, 0xfffffff8
fstp qword [esp]
wait
lea edx, [ebp - 0x3c]
mov eax, 0x55147c
call sub.rtl260.bpl__System_Sysutils_FormatDateTime_qqrx20System_UnicodeString16System_TDateTime
mov eax, dword [ebp - 0x3c]
push eax
mov edx, 0x5514a0
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Open_qqrv
mov eax, dword [ebp - 0x1c]
mov edx, dword [eax]
call dword [edx + 0x194]
test eax, eax
jle 0x550e89
mov edx, 0x551638
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [ebp + 8]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x551268
mov eax, dword [ebp + 8]
mov edx, 0x55164c
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x551268
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, dword [eax]
call dword [edx + 0x48]
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x5514b8
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x551660
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov edx, 0x55144c
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
push eax
lea eax, [ebp - 0x40]
mov edx, dword [ebp + 0x18]
call sub.rtl260.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
mov edx, dword [ebp - 0x40]
pop eax
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov edx, 0x551464
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
push eax
lea eax, [ebp - 0x44]
mov edx, dword [ebp - 0xc]
call sub.rtl260.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
mov edx, dword [ebp - 0x44]
pop eax
mov ecx, dword [eax]
call dword [ecx + 0x48]
call sub.rtl260.bpl__System_Sysutils_Now_qqrv
add esp, 0xfffffff8
fstp qword [esp]
wait
lea edx, [ebp - 0x48]
mov eax, 0x55147c
call sub.rtl260.bpl__System_Sysutils_FormatDateTime_qqrx20System_UnicodeString16System_TDateTime
mov eax, dword [ebp - 0x48]
push eax
mov edx, 0x5514a0
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Open_qqrv
mov eax, dword [ebp - 0x1c]
mov edx, dword [eax]
call dword [edx + 0x194]
test eax, eax
jle 0x550f9c
mov edx, 0x551638
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [ebp + 8]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x551268
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, dword [eax]
call dword [edx + 0x48]
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x551718
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Open_qqrv
mov edx, 0x55177c
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fstp qword [ebp - 0x18]
wait
mov eax, dword [ebp - 0x1c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, dword [eax]
call dword [edx + 0x48]
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x551794
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x5517cc
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x551878
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x1c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x551894
mov ecx, dword [eax]
call dword [ecx + 0x3c]
push dword [ebp - 0x14]
push dword [ebp - 0x18]
mov edx, 0x551638
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x78]
mov eax, dword [ebp + 0xc]
mov edx, 0x551988
call sub.rtl260.bpl__System__LStrEqual_qqrv
jne 0x551141
mov edx, 0x551998
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
mov edx, 0x5519b0
mov ecx, dword [eax]
call dword [ecx + 0x48]
lea eax, [ebp - 0x50]
push eax
mov ecx, 0x14
mov edx, 1
mov eax, dword [ebp - 8]
call sub.rtl260.bpl__System__LStrCopy_qqrx27System__AnsiStringT_us_i0__ii
mov edx, dword [ebp - 0x50]
lea eax, [ebp - 0x4c]
call sub.rtl260.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
mov eax, dword [ebp - 0x4c]
push eax
mov edx, 0x5519c0
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0x48]
lea eax, [ebp - 0x58]
push eax
mov ecx, 0xb4
mov edx, 1
mov eax, dword [ebp + 0x14]
call sub.rtl260.bpl__System__LStrCopy_qqrx27System__AnsiStringT_us_i0__ii
mov edx, dword [ebp - 0x58]
lea eax, [ebp - 0x54]
call sub.rtl260.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
mov eax, dword [ebp - 0x54]
push eax
mov edx, 0x5519e0
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0x48]
lea eax, [ebp - 0x60]
push eax
mov ecx, 7
mov edx, 1
mov eax, dword [ebp + 0x10]
call sub.rtl260.bpl__System__LStrCopy_qqrx27System__AnsiStringT_us_i0__ii
mov edx, dword [ebp - 0x60]
lea eax, [ebp - 0x5c]
call sub.rtl260.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
mov eax, dword [ebp - 0x5c]
push eax
mov edx, 0x5519fc
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov edx, 0x551a18
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
mov edx, 0x551a34
mov ecx, dword [eax]
call dword [ecx + 0x48]
jmp 0x551191
mov edx, 0x551a44
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
push eax
lea eax, [ebp - 0x64]
mov edx, dword [ebp + 0xc]
call sub.rtl260.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
mov edx, dword [ebp - 0x64]
pop eax
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov edx, 0x551998
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
mov edx, 0x551a58
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov edx, 0x551a18
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
mov edx, 0x551a34
mov ecx, dword [eax]
call dword [ecx + 0x48]
lea eax, [ebp - 0x6c]
push eax
mov ecx, 0x1e
mov edx, 1
mov eax, dword [ebp - 0xc]
call sub.rtl260.bpl__System__LStrCopy_qqrx27System__AnsiStringT_us_i0__ii
mov edx, dword [ebp - 0x6c]
lea eax, [ebp - 0x68]
call sub.rtl260.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
mov eax, dword [ebp - 0x68]
push eax
mov edx, 0x551464
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0x48]
lea eax, [ebp - 0x74]
push eax
mov ecx, 0x20
mov edx, 1
mov eax, dword [ebp + 0x18]
call sub.rtl260.bpl__System__LStrCopy_qqrx27System__AnsiStringT_us_i0__ii
mov edx, dword [ebp - 0x74]
lea eax, [ebp - 0x70]
call sub.rtl260.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
mov eax, dword [ebp - 0x70]
push eax
mov edx, 0x55144c
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
pop edx
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov eax, dword [ebp - 0x1c]
call sub.odac260.bpl__Ora_TOraDataSet_ExecSQL_qqrv
fld qword [ebp - 0x18]
add esp, 0xfffffff4
fstp xword [esp]
wait
mov eax, dword [ebp + 8]
call sub.rtl260.bpl__System_Sysutils_FloatToStr_qqrg
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x551268
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x5512fc
lea eax, [ebp - 0x78]
call sub.rtl260.bpl__System__UStrClr_qqrpv
lea eax, [ebp - 0x74]
call sub.rtl260.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x70]
call sub.rtl260.bpl__System__UStrClr_qqrpv
lea eax, [ebp - 0x6c]
call sub.rtl260.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x68]
mov edx, 2
call sub.rtl260.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x60]
call sub.rtl260.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x5c]
call sub.rtl260.bpl__System__UStrClr_qqrpv
lea eax, [ebp - 0x58]
call sub.rtl260.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x54]
call sub.rtl260.bpl__System__UStrClr_qqrpv
lea eax, [ebp - 0x50]
call sub.rtl260.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x4c]
mov edx, 0xb
call sub.rtl260.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0xc]
mov edx, 2
call sub.rtl260.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp + 0xc]
mov edx, 4
call sub.rtl260.bpl__System__LStrArrayClr_qqrpvi
ret