Function at 0x4aafb4
Capabilities:
Reference sql statements

Disassembly:
push ebp
mov ebp, esp
push ecx
mov ecx, 0x21
push 0
push 0
dec ecx
jne 0x4aafbd
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__UStrAddRef_qqrpv
mov eax, dword [ebp - 0xc]
call sub.rtl260.bpl__System__UStrAddRef_qqrpv
mov eax, dword [ebp + 0x1c]
call sub.rtl260.bpl__System__UStrAddRef_qqrpv
mov eax, dword [ebp + 0x18]
call sub.rtl260.bpl__System__UStrAddRef_qqrpv
mov eax, dword [ebp + 0x14]
call sub.rtl260.bpl__System__UStrAddRef_qqrpv
mov eax, dword [ebp + 0x10]
call sub.rtl260.bpl__System__UStrAddRef_qqrpv
mov eax, dword [ebp + 0xc]
call sub.rtl260.bpl__System__UStrAddRef_qqrpv
xor eax, eax
push ebp
push 0x4abe24
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
add eax, 0x5f4
mov edx, dword [ebp - 0xc]
call sub.rtl260.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x488]
mov dword [ebp - 0x78], eax
mov eax, dword [ebp - 0x78]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov edx, 0x4abe40
mov eax, dword [ebp - 0x78]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
mov edx, dword [ebp - 8]
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov eax, dword [ebp - 0x78]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Open_qqrv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x57c]
xor edx, edx
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x488]
mov edx, 0x4abe60
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fstp qword [ebp - 0x20]
wait
cmp dword [ebp - 0x10], 0
jne 0x4ab0a7
call fcn.006e7910
add esp, 0xfffffff8
fstp qword [esp]
wait
lea edx, [ebp - 0x10]
mov eax, 0x4abe74
call sub.rtl260.bpl__System_Sysutils_FormatDateTime_qqrx20System_UnicodeString16System_TDateTime
jmp 0x4ab0ec
call fcn.006e7910
add esp, 0xfffffff8
fstp qword [esp]
wait
lea edx, [ebp - 0x9c]
mov eax, 0x4abe74
call sub.rtl260.bpl__System_Sysutils_FormatDateTime_qqrx20System_UnicodeString16System_TDateTime
mov edx, dword [ebp - 0x9c]
mov eax, dword [ebp - 0x10]
call sub.rtl260.bpl__System__UStrCmp_qqrv
jbe 0x4ab0ec
call fcn.006e7910
add esp, 0xfffffff8
fstp qword [esp]
wait
lea edx, [ebp - 0x10]
mov eax, 0x4abe74
call sub.rtl260.bpl__System_Sysutils_FormatDateTime_qqrx20System_UnicodeString16System_TDateTime
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x488]
mov edx, 0x4abe98
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x18]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x488]
mov edx, 0x4abeb0
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0x14]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x420]
mov edx, dword [ebp + 0x1c]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x424]
mov edx, dword [ebp + 0x18]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
xor eax, eax
mov dword [ebp - 0x74], eax
mov eax, 0x4abecc
mov edx, dword [ebp - 0x18]
call sub.rtl260.bpl__System__UStrCmp_qqrv
ja 0x4ab203
mov eax, dword [0x730f34]
mov eax, dword [eax]
mov eax, dword [eax + 0x6c]
mov dword [ebp - 0x7c], eax
mov eax, dword [ebp - 0x7c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 0x7c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, dword [eax]
call dword [edx + 0x48]
mov eax, dword [ebp - 0x7c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4abee0
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x7c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4abfa8
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov edx, 0x4abe40
mov eax, dword [ebp - 0x7c]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_MacroByName_qqrx20System_UnicodeString
mov edx, dword [ebp - 0xc]
call sub.dac260.bpl__Dbaccess_TMacro_SetValue_qqrx20System_UnicodeString
mov eax, dword [ebp - 0x7c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Open_qqrv
mov edx, 0x4ac040
mov eax, dword [ebp - 0x7c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fldz
fucompp
wait
fnstsw ax
sahf
jae 0x4ab1fb
mov dword [ebp - 0x74], 1
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x42c]
mov edx, 0x4ac058
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRSysData_SetText_qqr20System_UnicodeString
mov eax, dword [ebp - 0x7c]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x3e0]
mov dword [ebp - 0x80], eax
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov edx, 0x4abe40
mov eax, dword [ebp - 0x80]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_MacroByName_qqrx20System_UnicodeString
mov edx, dword [ebp - 0xc]
call sub.dac260.bpl__Dbaccess_TMacro_SetValue_qqrx20System_UnicodeString
mov edx, 0x4ac0b8
mov eax, dword [ebp - 0x80]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
mov edx, dword [ebp + 0x1c]
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov edx, 0x4ac0d0
mov eax, dword [ebp - 0x80]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
mov edx, dword [ebp + 0x18]
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov edx, 0x4ac0e8
mov eax, dword [ebp - 0x80]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
mov edx, dword [ebp + 0x14]
mov ecx, dword [eax]
call dword [ecx + 0x48]
cmp dword [ebp - 0x74], 1
jne 0x4ab288
mov edx, 0x4ac0fc
mov eax, dword [ebp - 0x80]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
mov edx, 0x4ac114
mov ecx, dword [eax]
call dword [ecx + 0x48]
cmp dword [ebp + 8], 1
sbb eax, eax
inc eax
cmp al, 1
jne 0x4ab2ac
mov edx, 0x4ac12c
mov eax, dword [ebp - 0x80]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
mov edx, 0x4ac148
mov ecx, dword [eax]
call dword [ecx + 0x48]
jmp 0x4ab2c1
mov edx, 0x4ac12c
mov eax, dword [ebp - 0x80]
call sub.odac260.bpl__Ora_TOraDataSet_ParamByName_qqrx20System_UnicodeString
mov edx, dword [ebp - 0x14]
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Open_qqrv
xor eax, eax
mov dword [ebp - 0x28], eax
mov dword [ebp - 0x24], eax
xor eax, eax
mov dword [ebp - 0x30], eax
mov dword [ebp - 0x2c], eax
xor eax, eax
mov dword [ebp - 0x38], eax
mov dword [ebp - 0x34], eax
xor eax, eax
mov dword [ebp - 0x48], eax
mov dword [ebp - 0x44], eax
jmp 0x4ab51e
mov edx, 0x4ac160
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xa0]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0xa0]
mov edx, 0x4ac17c
call sub.rtl260.bpl__System__UStrEqual_qqrv
jne 0x4ab333
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x42c]
mov edx, 0x4ac18c
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRSysData_SetText_qqr20System_UnicodeString
jmp 0x4ab43f
mov edx, 0x4ac160
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xa4]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0xa4]
mov edx, 0x4ac1e0
call sub.rtl260.bpl__System__UStrEqual_qqrv
jne 0x4ab378
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x42c]
mov edx, 0x4ac1f0
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRSysData_SetText_qqr20System_UnicodeString
jmp 0x4ab43f
mov edx, 0x4ac160
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xa8]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0xa8]
mov edx, 0x4ac244
call sub.rtl260.bpl__System__UStrEqual_qqrv
jne 0x4ab3bd
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x42c]
mov edx, 0x4ac254
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRSysData_SetText_qqr20System_UnicodeString
jmp 0x4ab43f
mov edx, 0x4ac160
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xac]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0xac]
mov edx, 0x4ac2a4
call sub.rtl260.bpl__System__UStrEqual_qqrv
jne 0x4ab3ff
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x42c]
mov edx, 0x4ac2b4
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRSysData_SetText_qqr20System_UnicodeString
jmp 0x4ab43f
mov edx, 0x4ac160
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xb0]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0xb0]
mov edx, 0x4ac304
call sub.rtl260.bpl__System__UStrEqual_qqrv
jne 0x4ab43f
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x42c]
mov edx, 0x4ac314
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRSysData_SetText_qqr20System_UnicodeString
mov edx, 0x4ac040
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x28]
fstp qword [ebp - 0x28]
wait
mov edx, 0x4ac160
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xb4]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0xb4]
mov edx, 0x4ac2a4
call sub.rtl260.bpl__System__UStrEqual_qqrv
je 0x4ab4cb
mov edx, 0x4ac160
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
lea edx, [ebp - 0xb8]
mov ecx, dword [eax]
call dword [ecx + 0x88]
mov eax, dword [ebp - 0xb8]
mov edx, 0x4ac304
call sub.rtl260.bpl__System__UStrEqual_qqrv
je 0x4ab4cb
mov edx, 0x4ac35c
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x30]
fstp qword [ebp - 0x30]
wait
mov edx, 0x4ac374
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x38]
fstp qword [ebp - 0x38]
wait
mov edx, 0x4ac390
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x48]
fstp qword [ebp - 0x48]
wait
mov edx, 0x4ac3b0
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x40]
fstp qword [ebp - 0x40]
wait
mov eax, dword [ebp - 0x80]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Next_qqrv
mov eax, dword [ebp - 0x80]
cmp byte [eax + 0xad], 0
je 0x4ab2ee
fld qword [ebp - 0x28]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0xbc]
mov eax, 0x4ac3d0
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0xbc]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4a8]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
fld qword [ebp - 0x30]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0xc0]
mov eax, 0x4ac3d0
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0xc0]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4b0]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
fld qword [ebp - 0x38]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0xc4]
mov eax, 0x4ac3d0
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0xc4]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4b8]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
fld qword [ebp - 0x48]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0xc8]
mov eax, 0x4ac3d0
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0xc8]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4b4]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
fld qword [ebp - 0x40]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0xcc]
mov eax, 0x4ac3d0
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0xcc]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4ec]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
fld qword [ebp - 0x48]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0xd0]
mov eax, 0x4ac3d0
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0xd0]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4e8]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
mov eax, dword [0x730f34]
mov eax, dword [eax]
mov eax, dword [eax + 0x6c]
mov dword [ebp - 0x84], eax
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, dword [eax]
call dword [edx + 0x48]
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4abee0
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4abfa8
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov edx, 0x4abe40
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_MacroByName_qqrx20System_UnicodeString
mov edx, dword [ebp - 0xc]
call sub.dac260.bpl__Dbaccess_TMacro_SetValue_qqrx20System_UnicodeString
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Open_qqrv
mov edx, 0x4ac040
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fldz
fucompp
wait
fnstsw ax
sahf
jae 0x4ab7f8
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, dword [eax]
call dword [edx + 0x48]
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4ac3e8
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4ac4ac
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov edx, 0x4abe40
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_MacroByName_qqrx20System_UnicodeString
mov edx, dword [ebp - 0xc]
call sub.dac260.bpl__Dbaccess_TMacro_SetValue_qqrx20System_UnicodeString
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Open_qqrv
mov edx, 0x4ac040
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fldz
fucompp
wait
fnstsw ax
sahf
jae 0x4ab91e
mov edx, 0x4ac040
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x30]
fstp qword [ebp - 0x30]
wait
fld qword [ebp - 0x30]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0xd4]
mov eax, 0x4ac3d0
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0xd4]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4b0]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
fld qword [ebp - 0x28]
fsub qword [ebp - 0x38]
fsub qword [ebp - 0x30]
fsub qword [ebp - 0x48]
fsub qword [ebp - 0x40]
fstp qword [ebp - 0x38]
wait
fld qword [ebp - 0x38]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0xd8]
mov eax, 0x4ac3d0
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0xd8]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4b8]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
jmp 0x4ab91e
fldz
fld qword [ebp - 0x30]
fucompp
wait
fnstsw ax
sahf
jp 0x4ab91e
jne 0x4ab91e
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, dword [eax]
call dword [edx + 0x48]
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4ac3e8
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4ac530
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov edx, 0x4abe40
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_MacroByName_qqrx20System_UnicodeString
mov edx, dword [ebp - 0xc]
call sub.dac260.bpl__Dbaccess_TMacro_SetValue_qqrx20System_UnicodeString
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Open_qqrv
mov edx, 0x4ac040
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fldz
fucompp
wait
fnstsw ax
sahf
jae 0x4ab91e
mov edx, 0x4ac040
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fadd qword [ebp - 0x30]
fstp qword [ebp - 0x30]
wait
fld qword [ebp - 0x30]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0xdc]
mov eax, 0x4ac3d0
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0xdc]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4b0]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
mov eax, dword [ebp - 0x38]
mov dword [ebp - 0x38], eax
mov eax, dword [ebp - 0x34]
mov dword [ebp - 0x34], eax
fld qword [ebp - 0x38]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0xe0]
mov eax, 0x4ac3d0
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0xe0]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4b8]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, dword [eax]
call dword [edx + 0x48]
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4ac604
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4ac6e0
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_GetSQL_qqrv
mov edx, 0x4ac79c
mov ecx, dword [eax]
call dword [ecx + 0x3c]
mov edx, 0x4abe40
mov eax, dword [ebp - 0x84]
call sub.dac260.bpl__Dbaccess_TCustomDADataSet_MacroByName_qqrx20System_UnicodeString
mov edx, dword [ebp - 0xc]
call sub.dac260.bpl__Dbaccess_TMacro_SetValue_qqrx20System_UnicodeString
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Open_qqrv
mov edx, 0x4ac7e8
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fstp qword [ebp - 0x68]
wait
mov edx, 0x4ac804
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fstp qword [ebp - 0x70]
wait
mov edx, 0x4ac824
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fsubr qword [ebp - 0x28]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0xe4]
mov eax, 0x4ac850
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0xe4]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x5c0]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
mov edx, 0x4ac824
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_FieldByName_qqrx20System_UnicodeString
mov edx, dword [eax]
call dword [edx + 0x6c]
fsubr qword [ebp - 0x28]
fstp qword [ebp - 0x60]
wait
fldz
fld qword [ebp - 0x60]
fucompp
wait
fnstsw ax
sahf
jp 0x4aba4e
jne 0x4aba4e
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x5c0]
mov edx, 0x4ac86c
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
fld qword [ebp - 0x28]
fsub qword [ebp - 0x60]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0xe8]
mov eax, 0x4ac3d0
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0xe8]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4dc]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
fldz
fld qword [ebp - 0x40]
fucompp
wait
fnstsw ax
sahf
jp 0x4abab9
jne 0x4abab9
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x550]
mov edx, 0x4ac86c
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4f0]
mov edx, 0x4ac86c
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
jmp 0x4abb51
cmp dword [ebp + 8], 1
sbb eax, eax
inc eax
cmp al, 1
jne 0x4abb16
lea edx, [ebp - 0xec]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x5c0]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_GetCaption_qqrv
mov edx, dword [ebp - 0xec]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x550]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
lea edx, [ebp - 0xf0]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4dc]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_GetCaption_qqrv
mov edx, dword [ebp - 0xf0]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4f0]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
jmp 0x4abb51
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x550]
mov edx, 0x4ac86c
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
lea edx, [ebp - 0xf4]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4ec]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_GetCaption_qqrv
mov edx, dword [ebp - 0xf4]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4f0]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
xor eax, eax
mov dword [ebp - 0x50], eax
mov dword [ebp - 0x4c], eax
fld qword [ebp - 0x30]
fld qword [ebp - 0x68]
fucompp
wait
fnstsw ax
sahf
jae 0x4abba4
fld qword [ebp - 0x30]
fsub qword [ebp - 0x68]
fstp qword [ebp - 0x50]
wait
fld qword [ebp - 0x30]
fsub qword [ebp - 0x68]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0xf8]
mov eax, 0x4ac850
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0xf8]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4cc]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
jmp 0x4abbb7
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4cc]
mov edx, 0x4ac86c
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
fldz
fld qword [ebp - 0x38]
fucompp
wait
fnstsw ax
sahf
jp 0x4abbdb
jne 0x4abbdb
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4c8]
mov edx, 0x4ac86c
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
jmp 0x4abc22
mov eax, dword [ebp - 0x70]
mov dword [ebp - 0x58], eax
mov eax, dword [ebp - 0x6c]
mov dword [ebp - 0x54], eax
fld qword [ebp - 0x58]
fsub qword [ebp - 0x38]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0xfc]
mov eax, 0x4ac87c
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0xfc]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4c8]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
fld qword [ebp - 0x58]
fsub qword [ebp - 0x38]
fstp qword [ebp - 0x58]
wait
mov eax, dword [ebp - 0x84]
call sub.dbrtl260.bpl__Data_Db_TDataSet_Close_qqrv
fld qword [ebp - 0x30]
fsub qword [ebp - 0x50]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x100]
mov eax, 0x4ac3d0
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0x100]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4e0]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
fld qword [ebp - 0x38]
fadd qword [ebp - 0x58]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x104]
mov eax, 0x4ac3d0
call sub.rtl260.bpl__System_Sysutils_FormatFloat_qqrx20System_UnicodeStringg
mov edx, dword [ebp - 0x104]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x4e4]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
push dword [ebp + 0x10]
push 0x4ac894
push dword [ebp + 0xc]
push 0x4ac8bc
lea eax, [ebp - 0x108]
mov edx, 4
call sub.rtl260.bpl__System__UStrCatN_qqrv
mov edx, dword [ebp - 0x108]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x500]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
call sub.rtl260.bpl__System_Sysutils_Now_qqrv
add esp, 0xfffffff8
fstp qword [esp]
wait
lea edx, [ebp - 0x10c]
mov eax, 0x4ac8e0
call sub.rtl260.bpl__System_Sysutils_FormatDateTime_qqrx20System_UnicodeString16System_TDateTime
mov edx, dword [ebp - 0x10c]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x504]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
mov edx, dword [0x730b7c]
mov edx, dword [edx]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x524]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
mov edx, dword [0x730c64]
mov edx, dword [edx]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x51c]
call sub.QRWRunDXE10_3_w64.bpl__Qrctrls_TQRCustomLabel_SetCaption_qqr20System_UnicodeString
mov dl, 1
mov eax, 0x4ac90c
call sub.rtl260.bpl__System_Sysutils_FileExists_qqrx20System_UnicodeStringo
test al, al
je 0x4abddc
xor eax, eax
push ebp
push 0x4abd69
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x5e8]
mov eax, dword [eax + 0x2f0]
call sub.vcl260.bpl__Vcl_Graphics_TPicture_GetBitmap_qqrv
mov edx, 0x4ac90c
mov ecx, dword [eax]
call dword [ecx + 0x54]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x4abd73
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x5e8]
mov eax, dword [eax + 0x2f0]
call sub.vcl260.bpl__Vcl_Graphics_TPicture_GetBitmap_qqrv
mov edx, dword [eax]
call dword [edx + 0x30]
test eax, eax
je 0x4abddc
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x5e8]
mov dl, 1
mov ecx, dword [eax]
call dword [ecx + 0x94]
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x5e8]
mov eax, dword [eax + 0x2f0]
call sub.vcl260.bpl__Vcl_Graphics_TPicture_GetBitmap_qqrv
mov edx, 0xffffff
call sub.vcl260.bpl__Vcl_Graphics_TBitmap_SetTransparentColor_qqr21System_Uitypes_TColor
mov eax, dword [ebp - 4]
mov eax, dword [eax + 0x5e8]
mov eax, dword [eax + 0x2f0]
call sub.vcl260.bpl__Vcl_Graphics_TPicture_GetBitmap_qqrv
mov dl, 1
mov ecx, dword [eax]
call dword [ecx + 0x40]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4abe2b
lea eax, [ebp - 0x10c]
mov edx, 0x1d
call sub.rtl260.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x90]
mov edx, 3
call sub.rtl260.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x18]
mov edx, 5
call sub.rtl260.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp + 0xc]
mov edx, 5
call sub.rtl260.bpl__System__UStrArrayClr_qqrpvi
ret