Skip to content

KVSKBACLLCMPComplianceLib#

Procedures#

OnBeforeReopen(RecordRef) :#

Summary: OnBeforeReopen. Called on before reopening a record. Within this procedure, it is checked if a new call header needs to be created.

procedure OnBeforeReopen(recRef: RecordRef): 

Parameters:

  • recRef: RecordRef. Reference to the according record which needs to be reopened.

OnBeforeRelease(RecordRef, Boolean) : Code[20]#

Summary: OnBeforeRelease. Called on before releasing a record. Within this procedure, it is checked if a new call header needs to be created.

procedure OnBeforeRelease(recRef: RecordRef; showError: Boolean): Code[20]

Parameters:

  • recRef: RecordRef. Reference to the according record which needs to be released.
  • showError: Boolean. Defines if it is allowed to show an according error within the processing. If an approval of compliance action is not successful and the parameter showError is set to true, an error will be shown. If parameter showError is set to false, a message wil be shown instead.

Returns: Returns the unique No. of the according call header. Return value of type Code[20].

FindComplianceTable(Integer, Text, Record KVSKBACLLCMPComplianceTable) : Boolean#

Summary: FindComplianceTable.

procedure FindComplianceTable(TableNo: Integer; PrimaryKey: Text; var CLLCMPComplianceTable: Record "KVSKBACLLCMPComplianceTable"): Boolean

Parameters:

  • TableNo: Integer.
  • PrimaryKey: Text.
  • CLLCMPComplianceTable: VAR Record "KVSKBACLLCMPComplianceTable".

Returns: Return value of type Boolean.

CheckSubtable(RecordRef, Integer, Boolean, Text, Text) :#

Summary: CheckSubtable.

procedure CheckSubtable(RecRef: RecordRef; TableNo: Integer; IsReleased: Boolean; MainTableField: Text; MainTableFieldValue: Text): 

Parameters:

  • RecRef: RecordRef.
  • TableNo: Integer.
  • IsReleased: Boolean.
  • MainTableField: Text.
  • MainTableFieldValue: Text.

Events#

OnBeforeAmountCheckAtFindComplianceTable(Record KVSKBACLLCMPComplianceTable, RecordRef, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeAmountCheckAtFindComplianceTable(complianceTable: Record "KVSKBACLLCMPComplianceTable"; recRef: RecordRef; var isInFilter: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBACLLCMPComplianceLib", 'OnBeforeAmountCheckAtFindComplianceTable', '', false, false)]
local procedure DoSomethingOnBeforeAmountCheckAtFindComplianceTable(complianceTable: Record "KVSKBACLLCMPComplianceTable"; recRef: RecordRef; var isInFilter: Boolean)
begin
end;

OnAfterFindRecOnBeforeReopen(Integer, Text, Record KVSKBACLLCMPComplianceTable) :#

[IntegrationEvent(false, false)]
local procedure OnAfterFindRecOnBeforeReopen(tableNo: Integer; primaryKey: Text; complianceTable: Record "KVSKBACLLCMPComplianceTable"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBACLLCMPComplianceLib", 'OnAfterFindRecOnBeforeReopen', '', false, false)]
local procedure DoSomethingOnAfterFindRecOnBeforeReopen(tableNo: Integer; primaryKey: Text; complianceTable: Record "KVSKBACLLCMPComplianceTable")
begin
end;

OnBeforeInsertCallHeaderOnCreateCall(Record KVSKBACLLCallHeader) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeInsertCallHeaderOnCreateCall(var callHeader: Record "KVSKBACLLCallHeader"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBACLLCMPComplianceLib", 'OnBeforeInsertCallHeaderOnCreateCall', '', false, false)]
local procedure DoSomethingOnBeforeInsertCallHeaderOnCreateCall(var callHeader: Record "KVSKBACLLCallHeader")
begin
end;

OnAfterInsertCallHeaderOnCreateCall(Record KVSKBACLLCallHeader) :#

[IntegrationEvent(false, false)]
local procedure OnAfterInsertCallHeaderOnCreateCall(var callHeader: Record "KVSKBACLLCallHeader"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBACLLCMPComplianceLib", 'OnAfterInsertCallHeaderOnCreateCall', '', false, false)]
local procedure DoSomethingOnAfterInsertCallHeaderOnCreateCall(var callHeader: Record "KVSKBACLLCallHeader")
begin
end;

OnAfterCreateCallHeader(Record KVSKBACLLCallHeader) :#

[IntegrationEvent(false, false)]
local procedure OnAfterCreateCallHeader(var callHeader: Record "KVSKBACLLCallHeader"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBACLLCMPComplianceLib", 'OnAfterCreateCallHeader', '', false, false)]
local procedure DoSomethingOnAfterCreateCallHeader(var callHeader: Record "KVSKBACLLCallHeader")
begin
end;