Function at 0x43ade4
Capabilities:
Access peb ldr_data

Disassembly:
push ebp
mov ebp, esp
mov ecx, 6
push 0
push 0
dec ecx
jne 0x43adec
push ecx
push ebx
push esi
push edi
mov dword [ebp - 4], eax
mov edi, dword [ebp + 8]
add edi, 0xfffffffc
xor eax, eax
push ebp
push 0x43b06d
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [edi]
mov eax, dword [eax + 0x44]
mov dl, 6
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov eax, dword [edi]
mov eax, dword [eax + 0x44]
mov eax, dword [eax + 0x44]
mov edx, dword [sym.imp.dac170.bpl__Dbaccess_TCustomDADataSet_]
call sub.rtl170.bpl__System__AsClass_qqrxp14System_TObjectp17System_TMetaClass
mov dword [ebp - 0x10], eax
mov eax, dword [ebp - 0x10]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetParamCheck_qqrv
mov byte [ebp - 9], al
xor eax, eax
push ebp
push 0x43b045
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [edi]
mov eax, dword [eax + 0xc]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetParamCheck_qqrv
mov edx, eax
mov eax, dword [ebp - 0x10]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_SetParamCheck_qqro
mov eax, dword [ebp - 0x10]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, dword [ebp - 4]
mov ecx, dword [eax]
call dword [ecx + 0x30]
mov eax, dword [edi]
mov eax, dword [eax + 0xc]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetParamCheck_qqrv
test al, al
jne 0x43aea1
mov eax, dword [edi]
mov eax, dword [eax + 0xc]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetParams_qqrv
call sub.rtl170.bpl__System_Classes_TCollection_GetCount_qqrv
mov ebx, eax
test ebx, ebx
jl 0x43aea1
inc ebx
mov eax, dword [ebp - 0x10]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetParams_qqrv
call sub.rtl170.bpl__System_Classes_TCollection_Add_qqrv
dec ebx
jne 0x43ae91
mov eax, dword [ebp - 0x10]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetParamCount_qqrv
test ax, ax
jbe 0x43aeda
mov eax, dword [ebp - 0x10]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetParams_qqrv
xor edx, edx
call sub.dac170.bpl__Dbaccess_TDAParams_GetItem_qqri
mov dl, 0x19
mov ecx, dword [eax]
call dword [ecx + 0x38]
mov eax, dword [ebp - 0x10]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetParams_qqrv
xor edx, edx
call sub.dac170.bpl__Dbaccess_TDAParams_GetItem_qqri
mov dl, 2
call sub.dbrtl170.bpl__Data_Db_TParam_SetParamType_qqr18Data_Db_TParamType
mov eax, dword [edi]
mov eax, dword [eax + 0xc]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetMacros_qqrv
push eax
mov eax, dword [ebp - 0x10]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetMacros_qqrv
pop edx
mov ecx, dword [eax]
call dword [ecx + 8]
mov eax, dword [edi]
mov eax, dword [eax + 0xc]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetParams_qqrv
call sub.rtl170.bpl__System_Classes_TCollection_GetCount_qqrv
mov ebx, eax
dec ebx
test ebx, ebx
jl 0x43af38
inc ebx
xor esi, esi
mov eax, dword [edi]
mov eax, dword [eax + 0xc]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetParams_qqrv
mov edx, esi
call sub.dac170.bpl__Dbaccess_TDAParams_GetItem_qqri
push eax
mov eax, dword [ebp - 0x10]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetParams_qqrv
lea edx, [esi + 1]
call sub.dac170.bpl__Dbaccess_TDAParams_GetItem_qqri
pop edx
mov ecx, dword [eax]
call dword [ecx + 8]
inc esi
dec ebx
jne 0x43af0c
mov eax, dword [edi]
call sub.dac170.bpl__Dbaccess_TDADataSetService_UsedConnection_qqrv
mov edx, eax
mov eax, dword [sym.imp.dac170.bpl__Dbaccess_TDBAccessUtils_]
call sub.dac170.bpl__Dbaccess_TDBAccessUtils_SQLMonitorClass_qqrp28Dbaccess_TCustomDAConnection
mov ebx, eax
mov eax, ebx
call sub.dac170.bpl__Dasqlmonitor_TCustomDASQLMonitor_HasMonitor_qqrv
test al, al
jne 0x43af66
mov eax, dword [edi]
mov eax, dword [eax + 0xc]
cmp byte [eax + 0x208], 0
je 0x43af89
mov eax, dword [ebp - 0x10]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetParams_qqrv
push eax
push 0x43b08c
lea eax, [ebp - 0x14]
push eax
push 1
mov eax, dword [edi]
mov edx, dword [eax + 0xc]
mov ecx, dword [ebp - 4]
mov eax, ebx
call sub.dac170.bpl__Dasqlmonitor_TCustomDASQLMonitor_SQLExecute_qqrp14System_TObjectx20System_UnicodeStringp18Dbaccess_TDAParamst2
mov eax, dword [ebp + 8]
cmp byte [eax - 5], 0
je 0x43afc4
mov eax, dword [ebp - 0x10]
mov edx, dword [eax]
call dword [edx + 0x420]
mov eax, dword [ebp - 0x10]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetParams_qqrv
xor edx, edx
call sub.dac170.bpl__Dbaccess_TDAParams_GetItem_qqri
lea edx, [ebp - 0x24]
mov ecx, dword [eax]
call dword [ecx + 0xa4]
lea eax, [ebp - 0x24]
call sub.rtl170.bpl__System_Variants__VarToInteger_qqrrx8TVarData
mov dword [ebp - 8], eax
jmp 0x43afef
mov eax, dword [ebp - 0x10]
call sub.dbrtl170.bpl__Data_Db_TDataSet_Open_qqrv
mov eax, dword [ebp - 0x10]
mov eax, dword [eax + 0x38]
xor edx, edx
call sub.dbrtl170.bpl__Data_Db_TFields_GetField_qqri
lea edx, [ebp - 0x34]
mov ecx, dword [eax]
call dword [ecx + 0x94]
lea eax, [ebp - 0x34]
call sub.rtl170.bpl__System_Variants__VarToInteger_qqrrx8TVarData
mov dword [ebp - 8], eax
mov eax, ebx
call sub.dac170.bpl__Dasqlmonitor_TCustomDASQLMonitor_HasMonitor_qqrv
test al, al
jne 0x43b008
mov eax, dword [edi]
mov eax, dword [eax + 0xc]
cmp byte [eax + 0x208], 0
je 0x43b02b
mov eax, dword [ebp - 0x10]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_GetParams_qqrv
push eax
push 0x43b08c
lea eax, [ebp - 0x14]
push eax
push 0
mov eax, dword [edi]
mov edx, dword [eax + 0xc]
mov ecx, dword [ebp - 4]
mov eax, ebx
call sub.dac170.bpl__Dasqlmonitor_TCustomDASQLMonitor_SQLExecute_qqrp14System_TObjectx20System_UnicodeStringp18Dbaccess_TDAParamst2
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x43b04c
movzx edx, byte [ebp - 9]
mov eax, dword [ebp - 0x10]
call sub.dac170.bpl__Dbaccess_TCustomDADataSet_SetParamCheck_qqro
ret