Add OnBefore Event Publisher for Approvals Mgmt. PreventInsertRecIfOpenApprovalEntryExist

Why do you need this change?

Hi!

Our customer is not using Worfklows and Approvals. Therefore we do not need to perform unnecessary checks when we insert new General Journal Lines (e.g. for performance reasons). There is no possibility for us to skip these checks. And even if our customer was starting to use Approval logic, we would like to be able to control the program code before runtime errors are raised if open approvals do exist.

Best regards,
Johannes Gritsch

Describe the request

A possible Event Publisher would look like

OnBeforePreventInsertRecIfOpenApprovalEntryExist(Variant: Variant; var IsHandled: Boolean)

and would be implemented at the very beginning of procedure PreventInsertRecIfOpenApprovalEntryExist() with

OnBeforePreventInsertRecIfOpenApprovalEntryExist(Variant, IsHandled);
if IsHandled then
   exit();

Furthermore consider to restructure the code so that procedure CanCancelApprovalForRecord() is only called once in the current function.

Thanks!
Internal work item: AB#606350

Locate PreventInsertRecIfOpenApprovalEntryExist and CanCancelApprovalForRecord in the approvals-management code; first read how General Journal Line insertion reaches that procedure. Done means the OnBeforePreventInsertRecIfOpenApprovalEntryExist publisher can set IsHandled to bypass the checks, and CanCancelApprovalForRecord is called once while existing approval behavior remains unchanged.