When using DR in a webapp we get the following error.
The use of cDRReport.pkg is not inside a object.
I've allready uninstalled and re-installed DR 7.0.1.9626 and DF 19.1
Code:
MSG_REGISTERTHISWEBOBJECT (5680) - oFunctionErrorDialog (64) - at address 17279
MSG_CONSTRUCT_OBJECT (156) - oFunctionErrorDialog (64) - at address 15838
MSG_CONSTRUCT_OBJECT (156) - oFunctionErrorDialog (64) - at address 16514
MSG_CONSTRUCT_OBJECT (156) - oFunctionErrorDialog (64) - at address 16606
MSG_CONSTRUCT_OBJECT (156) - oFunctionErrorDialog (64) - at address 17129
MSG_CONSTRUCT_OBJECT (156) - oFunctionErrorDialog (64) - at address 17137
MSG_CONSTRUCT_OBJECT (156) - oFunctionErrorDialog (64) - at address 19361
MSG_CONSTRUCT_OBJECT (156) - oFunctionErrorDialog (64) - at address 22095
[start] - at address 112564
When editing (after making a backup) and deleting the following lines in cDRreport.pkg the reporting works in the webapp (without errors).
At top:
Code:
#IFDEF IS$WEBAPP
//Use FunctionErrorDialog.wo //deleted -- line 16
#ELSE
Code:
{ Description = "Checks if the property pFunctionErrorInfo contains a value and displays this via the error handler" }
{ MethodType = Method }
{ Visibility = Private }
Procedure CheckFunctionErrorInfo
String sErrMsg
Integer eMode
WebGet peMode of ghoWebApp to eMode
// Testing on desktop as this is where the report can be edited
If (eMode = rmDesktop) Begin
// Send CheckFunctionErrorAndDisplayInfo of oFunctionErrorDialog Self Self //deleted -- line 929
End
Else Begin
Get FormatFunctionErrorMessage to sErrMsg // Create the errormessage text if the current error was caused by a function error
If (sErrMsg <> "") Begin
Error DFERR_DATAFLEX_REPORTS sErrMsg
End
End
Send ResetFunctionErrorInfo
End_Procedure
#ELSE
{ Description = "Send a message to a dialog to check if there is a function error and popup the dialog if so" }
{ MethodType = Method }
{ Visibility = Private }
Procedure CheckFunctionErrorInfo
// Send CheckFunctionErrorAndDisplayInfo of oFunctionErrorDialog Self //deleted -- line 944
// Send ResetFunctionErrorInfo //deleted -- line 945
End_Procedure
#ENDIF