Skip to content

KVSKBAMandatoryFieldsLib#

Procedures#

EditCust(Record Customer) :#

Summary: Use this procedure to edit a customer with mandatory Fields function

procedure EditCust(var Customer: Record "Customer"):

Parameters:

  • Customer: The Customer that should be editable

Remarks: This procedure sets the customer record to be editable with mandatory fields check in progress.

BatchFinishCust(Record Customer) :#

Summary: Use this procedure to finish a batch of customers with mandatory fields check

procedure BatchFinishCust(var Customer: Record "Customer"):

Parameters:

  • Customer: The customer record to finish

Remarks: This procedure finalizes a batch of customer records by performing mandatory fields checks and updating their statuses accordingly.

FinishCust(Record Customer) :#

Summary: Use this procedure to finish a customer with mandatory fields check

procedure FinishCust(var Customer: Record "Customer"):

Parameters:

  • Customer: The customer record to finish

Remarks: This procedure finalizes the customer record by performing a mandatory fields check and updating its status accordingly.

EditVend(Record Vendor) :#

Summary: Use this procedure to edit a vendor with mandatory Fields function

procedure EditVend(var Vendor: Record "Vendor"):

Parameters:

  • Vendor: The vendor record to edit

Remarks: This procedure sets the vendor record into maintenance mode and updates its blocking status based on mandatory fields check requirements.

BatchFinishVend(Record Vendor) :#

Summary: Use this procedure to batch finish vendor maintenance with mandatory fields function

procedure BatchFinishVend(var Vendor: Record "Vendor"):

Parameters:

  • Vendor: The vendor records to finish

Remarks: This procedure finalizes the mandatory fields check for the provided vendor records and updates their status accordingly.

FinishVend(Record Vendor) :#

Summary: Use this procedure to finish a vendor with mandatory Fields function

procedure FinishVend(var Vendor: Record "Vendor"):

Parameters:

  • Vendor: The vendor record to finish

Remarks: This procedure finalizes the mandatory fields check for the provided vendor record and updates its status accordingly.

EditItem(Record Item) :#

Summary: Use this procedure to edit an item with mandatory Fields function

procedure EditItem(var Item: Record "Item"):

Parameters:

  • Item: The Item that should be editable

Remarks: This procedure prepares the item for editing by setting its maintenance status and initializing mandatory fields checks.

BatchFinishItem(Record Item) :#

Summary: Use this procedure to batch finish item maintenance with mandatory fields function

procedure BatchFinishItem(var Item: Record "Item"):

Parameters:

  • Item: The Item that should be finished

Remarks: This procedure processes multiple items to finalize their maintenance status based on mandatory fields checks.

FinishItem(Record Item) :#

Summary: Use this procedure to finish item maintenance with mandatory fields function

procedure FinishItem(var Item: Record "Item"):

Parameters:

  • Item: The Item that should be finished

Remarks: This procedure finalizes the maintenance status of a single item based on mandatory fields checks.

CheckMandatoryFieldsItem(Record Item, Boolean, Boolean) :#

Summary: Use this procedure to check mandatory fields for an item

procedure CheckMandatoryFieldsItem(var Item: Record "Item"; ShowFoundFields: Boolean; ChangeFieldsInRec: Boolean):

Parameters:

  • Item: The Item that should be checked
  • ShowFoundFields: If true, a page with found fields is shown
  • ChangeFieldsInRec: If true, the fields in the item record are changed according to the check result

Remarks: This procedure performs a mandatory fields check for the specified item and updates its status accordingly.

EditPackageNoInformation(Record Package No. Information) :#

Summary: Use this function to edit a Package No. Information with Mandatory Fields function

procedure EditPackageNoInformation(var PackageNoInformation: Record "Package No. Information"):

Parameters:

  • PackageNoInformation: The Package No. Information that should be editable

Remarks: This function edits a Package No. Information record with mandatory fields check.

BatchFinishPackageNoInformation(Record Package No. Information) :#

Summary: Use this function to finish Package No. Informations with Mandatory Fields function

procedure BatchFinishPackageNoInformation(var PackageNoInformation: Record "Package No. Information"):

Parameters:

  • PackageNoInformation: The Package No. Informations that should be finished

Remarks: This function finishes multiple Package No. Information records with mandatory fields check.

FinishPackageNoInformation(Record Package No. Information) :#

Summary: Use this function to finish a Package No. Information with Mandatory Fields function

procedure FinishPackageNoInformation(var PackageNoInformation: Record "Package No. Information"):

Parameters:

  • PackageNoInformation: The Package No. Information that should be finished

Remarks: This function finishes a Package No. Information record with mandatory fields check.

CheckMandatoryFieldsPackageNoInformation(Record Package No. Information, Boolean, Boolean) :#

Summary: Use this function to check the mandatory fields of a Package No. Information

procedure CheckMandatoryFieldsPackageNoInformation(var PackageNoInformation: Record "Package No. Information"; ShowFoundFields: Boolean; ChangeFieldsInRec: Boolean):

Parameters:

  • PackageNoInformation: The Package No. Information that should be checked
  • ShowFoundFields: Specifies if mandatory fields are shown after check is done
  • ChangeFieldsInRec: Specifies if the mandatory fields are changed in the record

Remarks: This function checks the mandatory fields of a Package No. Information record.

EditLotNoInformation(Record Lot No. Information) :#

Summary: Use this function to edit a Lot No. Information with Mandatory Fields function

procedure EditLotNoInformation(var LotNoInformation: Record "Lot No. Information"):

Parameters:

  • LotNoInformation: The Lot No. Information that should be editable

Remarks: This function edits a Lot No. Information record with mandatory fields check.

BatchFinishLotNoInformation(Record Lot No. Information) :#

Summary: Use this function to finish Lot No. Informations with Mandatory Fields function

procedure BatchFinishLotNoInformation(var LotNoInformation: Record "Lot No. Information"):

Parameters:

  • LotNoInformation: The Lot No. Informations that should be finished

Remarks: This function finishes multiple Lot No. Information records with mandatory fields check.

FinishLotNoInformation(Record Lot No. Information) :#

Summary: Use this function to finish a Lot No. Information with Mandatory Fields function

procedure FinishLotNoInformation(var LotNoInformation: Record "Lot No. Information"):

Parameters:

  • LotNoInformation: The Lot No. Information that should be finished

Remarks: This function finishes a Lot No. Information record with mandatory fields check.

CheckMandatoryFieldsLotNoInformation(Record Lot No. Information, Boolean, Boolean) :#

Summary: Use this function to check the mandatory fields of a Lot No. Information

procedure CheckMandatoryFieldsLotNoInformation(var LotNoInformation: Record "Lot No. Information"; ShowFoundFields: Boolean; ChangeFieldsInRec: Boolean):

Parameters:

  • LotNoInformation: The Lot No. Information that should be checked
  • ShowFoundFields: Specifies if mandatory fields are shown after check is done
  • ChangeFieldsInRec: Specifies if the mandatory fields are changed in the record

Remarks: This function checks the mandatory fields of a Lot No. Information record.

EditSerialNoInformation(Record Serial No. Information) :#

Summary: Use this function to edit a Serial No. Information with Mandatory Fields function

procedure EditSerialNoInformation(var SerialNoInformation: Record "Serial No. Information"):

Parameters:

  • SerialNoInformation: The Serial No. Information that should be editable

Remarks: This function prepares a Serial No. Information record for editing with mandatory fields check.

BatchFinishSerialNoInformation(Record Serial No. Information) :#

Summary: Use this function to finish Serial No. Informations with Mandatory Fields function

procedure BatchFinishSerialNoInformation(var SerialNoInformation: Record "Serial No. Information"):

Parameters:

  • SerialNoInformation: The Serial No. Informations that should be finished

Remarks: This function processes a batch of Serial No. Information records to finish their mandatory fields check.

FinishSerialNoInformation(Record Serial No. Information) :#

Summary: Use this function to finish a Serial No. Information with Mandatory Fields function

procedure FinishSerialNoInformation(var SerialNoInformation: Record "Serial No. Information"):

Parameters:

  • SerialNoInformation: The Serial No. Information that should be finished

Remarks: This function finishes the mandatory fields check for a single Serial No. Information record.

CheckMandatoryFieldsSerialNoInformation(Record Serial No. Information, Boolean, Boolean) :#

Summary: Use this function to check the mandatory fields of a Serial No. Information

procedure CheckMandatoryFieldsSerialNoInformation(var SerialNoInformation: Record "Serial No. Information"; ShowFoundFields: Boolean; ChangeFieldsInRec: Boolean):

Parameters:

  • SerialNoInformation: The Serial No. Information that should be checked
  • ShowFoundFields: Specifies if mandatory fields are shown after check is done
  • ChangeFieldsInRec: Specifies if the mandatory fields are changed in the record

Remarks: This procedure checks mandatory fields for Serial No. Information records.

CheckMandatoryFieldsSalesDoc(Record Sales Header, Boolean) : Boolean#

Summary: Within this procedure, the mandatory field check for sales documents is done.

procedure CheckMandatoryFieldsSalesDoc(SalesHeader: Record "Sales Header"; ShowFoundFields: Boolean): Boolean

Parameters:

  • SalesHeader: Contains the Sales Header that has to be checked
  • ShowFoundFields: Specifies if mandatory fields are shown after check is done

Returns: true if the mandatory field check succeeded without errors else false

Remarks: This procedure checks mandatory fields for sales documents including their lines.

CheckMandatoryFieldsPurchDoc(Record Purchase Header, Boolean) : Boolean#

Summary: Within this procedure, the mandatory field check for purchase documents is done.

procedure CheckMandatoryFieldsPurchDoc(PurchaseHeader: Record "Purchase Header"; ShowFoundFields: Boolean): Boolean

Parameters:

  • PurchaseHeader: Contains the Purchase Header that has to be checked
  • ShowFoundFields: Specifies if mandatory fields are shown after check is done

Returns: true if the mandatory field check succeeded without errors else false

Remarks: This procedure checks mandatory fields for purchase documents including their lines.

CheckMandatoryFieldsWhseRcpt(Record Warehouse Receipt Header, Boolean) : Boolean#

Summary: Within this procedure, the mandatory field check for warehouse receipt documents is done.

procedure CheckMandatoryFieldsWhseRcpt(WarehouseReceiptHeader: Record "Warehouse Receipt Header"; ShowFoundFields: Boolean): Boolean

Parameters:

  • WarehouseReceiptHeader: Contains the Warehouse Receipt Header that has to be checked
  • ShowFoundFields: Specifies if mandatory fields are shown after check is done

Returns: true if the mandatory field check succeeded without errors else false

Remarks: This procedure checks mandatory fields for warehouse receipt documents including their lines.

CheckMandatoryFieldsOrderQuote(Record KVSKBAOrderQuote, Boolean) : Boolean#

Summary: Within this procedure, the mandatory field check for order quote documents is done.

procedure CheckMandatoryFieldsOrderQuote(OrderQuote: Record "KVSKBAOrderQuote"; ShowFoundFields: Boolean): Boolean

Parameters:

  • OrderQuote: Contains the Order Quote that has to be checked
  • ShowFoundFields: Specifies if mandatory fields are shown after check is done

Returns: true if the mandatory field check succeeded without errors else false

Remarks: This procedure uses to perform the mandatory field check for Purchase Quotes.

CheckMandatoryFields(RecordRef, Record KVSKBAMandatoryFieldCheckEntry, Enum KVSKBAIntegerAsEnum, Code[20], Integer, Integer, Text[250]) : Boolean#

Summary: Use this function to check the mandatory fields of a record

procedure CheckMandatoryFields(RecRefPar: RecordRef; var MandatoryFieldCheckEntry: Record "KVSKBAMandatoryFieldCheckEntry"; DocType: Enum "KVSKBAIntegerAsEnum"; DocNo: Code[20]; DocLineNo: Integer; DocSubLineNo: Integer; DocDescription: Text[250]): Boolean

Parameters:

  • RecRefPar: The RecordRef of the record that should be checked
  • MandatoryFieldCheckEntry: The MandatoryFieldCheckEntry record to store the found mandatory fields
  • DocType: The document type as Enum KVSKBAIntegerAsEnum
  • DocNo: The document number or code as Code[20]
  • DocLineNo: The document line number as Integer
  • DocSubLineNo: The document sub line number as Integer
  • DocDescription: The document or table description as Text[250]

Returns: Returns true if no mandatory fields are missing, else false

Remarks: This procedure performs a comprehensive mandatory field check on the provided record reference.

         The check process includes the following steps:
         1. Retrieves all mandatory field configurations from KVSKBAMandatoryCheckField table for the specified table
         2. For each configured mandatory field:
            - Validates that the field is not removed or obsolete
            - Evaluates any conditional logic defined in the "Condition" and "Condition Field No." fields
            - Checks if the field has a value using the HasValue function (supports Boolean, Option, Integer, Decimal, Date, Time, DateTime, DateFormula, and Text field types)
            - If a field fails validation, creates an entry in the MandatoryFieldCheckEntry with appropriate activity (Abort or Note) and comment
         3. Special handling for FlowFields: automatically calculates the field value before checking
         4. Returns true only if no fields with Activity::Abort were found

         Integration point: The OnBeforeCheckMandatoryFields event allows complete replacement of the check logic.

         The procedure is called from various contexts including:
         - Sales, Purchase, and Service document release processes
         - Master data maintenance completion (Customer, Vendor, Item, Resource, etc.)
         - Warehouse receipt and shipment posting
         - Item tracking information finalization

         Performance consideration: This procedure iterates through all mandatory field configurations for the table,
         so the number of configured fields directly impacts execution time.

FieldsConditionTest(RecordRef, Record KVSKBAMandatoryCheckField) : Boolean#

Summary: Use this function to test the condition of a mandatory field

procedure FieldsConditionTest(RecRef: RecordRef; MandatoryCheckField: Record "KVSKBAMandatoryCheckField"): Boolean

Parameters:

  • RecRef: The RecordRef of the record that is checked
  • MandatoryCheckField: The MandatoryCheckField that contains the condition

Returns: Returns true if the condition is fulfilled, else false

Remarks: This function is called in the procedure CheckMandatoryFields in this codeunit

AnalyzeAndShowMandCheckEntries(Record KVSKBAMandatoryFieldCheckEntry, Boolean, Boolean) :#

Summary: Use this procedure to analyze and show the mandatory field check entries

procedure AnalyzeAndShowMandCheckEntries(var MandatoryFieldCheckEntry: Record "KVSKBAMandatoryFieldCheckEntry"; ShowFoundFields: Boolean; var Ok: Boolean):

Parameters:

  • MandatoryFieldCheckEntry: The Record of Mandatory Field Check Entries to analyze and show
  • ShowFoundFields: Specifies whether the fields that do not fulfill the conditions should be displayed.
  • Ok: Returns true if no abort entries were found, else false

Remarks: This procedure is called after checking mandatory fields in various places

SetItemMaintenanceAndBlockedWhenMandFieldsCheckFinished(Record Item) :#

Summary: Use this procedure set fields Maintenance and Blocked when mandatory fields check is complete or skipped

procedure SetItemMaintenanceAndBlockedWhenMandFieldsCheckFinished(var Item: Record "Item"):

Parameters:

  • Item: The Item that should be editable

Remarks: This procedure is called from the Item table

SetPackageNoInformationMaintenanceAndBlockedWhenMandFieldsCheckFinished(Record Package No. Information) :#

Summary: Use this procedure set fields Maintenance and Blocked when mandatory fields check is complete or skipped

procedure SetPackageNoInformationMaintenanceAndBlockedWhenMandFieldsCheckFinished(var PackageNoInformation: Record "Package No. Information"):

Parameters:

  • PackageNoInformation: The PackageNoInformation that should be editable

Remarks: This procedure is called from the Package No. Information table

SetLotNoInformationMaintenanceAndBlockedWhenMandFieldsCheckFinished(Record Lot No. Information) :#

Summary: Use this procedure set fields Maintenance and Blocked when mandatory fields check is complete or skipped

procedure SetLotNoInformationMaintenanceAndBlockedWhenMandFieldsCheckFinished(var LotNoInformation: Record "Lot No. Information"):

Parameters:

  • LotNoInformation: The LotNoInformation that should be editable

Remarks: This procedure is called from the Lot No. Information table

SetSerialNoInformationMaintenanceAndBlockedWhenMandFieldsCheckFinished(Record Serial No. Information) :#

Summary: Use this procedure set fields Maintenance and Blocked when mandatory fields check is complete or skipped

procedure SetSerialNoInformationMaintenanceAndBlockedWhenMandFieldsCheckFinished(var SerialNoInformation: Record "Serial No. Information"):

Parameters:

  • SerialNoInformation: The SerialNoInformation that should be editable

Remarks: This procedure is called from the Serial No. Information table

EditResource(Record Resource) :#

Summary: Use this procedure to edit a resource with Mandatory Fields function

procedure EditResource(var Resource: Record "Resource"):

Parameters:

  • Resource: The Resource that should be editable

Remarks: This procedure edits a resource with Mandatory Fields function

FinishResource(Record Resource) :#

Summary: Use this procedure to finish a resource with Mandatory Fields function

procedure FinishResource(var Resource: Record "Resource"):

Parameters:

  • Resource: The Resource that should be editable

Remarks: This procedure finishes a resource with Mandatory Fields function

BatchFinishResource(Record Resource) :#

Summary: Use this procedure to batch finish resources with Mandatory Fields function

procedure BatchFinishResource(var Resource: Record "Resource"):

Parameters:

  • Resource: The Resource that should be editable

Remarks: This procedure batch finishes resources with Mandatory Fields function

Events#

OnAfterOnInsertCust(Record Customer) :#

Summary: Event raised after inserting Customer

[IntegrationEvent(false, false)]
local procedure OnAfterOnInsertCust(var Customer: Record "Customer"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnAfterOnInsertCust', '', false, false)]
local procedure DoSomethingOnAfterOnInsertCust(var Customer: Record "Customer")
begin
end;

Parameters:

  • Customer: The Customer record

Remarks: This event is raised after inserting Customer

OnBeforeCheckMandatoryFields(RecordRef, Record KVSKBAMandatoryFieldCheckEntry, Enum KVSKBAIntegerAsEnum, Code[20], Integer, Integer, Text[250], Boolean, Boolean) :#

Summary: Event raised before checking mandatory fields

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckMandatoryFields(RecRef: RecordRef; var MandFieldCheckEntry: Record "KVSKBAMandatoryFieldCheckEntry"; DocType: Enum "KVSKBAIntegerAsEnum"; DocNo: Code[20]; DocLineNo: Integer; DocSubLineNo: Integer; DocDescription: Text[250]; var ReturnValue: Boolean; var Handled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeCheckMandatoryFields', '', false, false)]
local procedure DoSomethingOnBeforeCheckMandatoryFields(RecRef: RecordRef; var MandFieldCheckEntry: Record "KVSKBAMandatoryFieldCheckEntry"; DocType: Enum "KVSKBAIntegerAsEnum"; DocNo: Code[20]; DocLineNo: Integer; DocSubLineNo: Integer; DocDescription: Text[250]; var ReturnValue: Boolean; var Handled: Boolean)
begin
end;

Parameters:

  • RecRef: The RecordRef of the record to check
  • MandFieldCheckEntry: The MandFieldCheckEntry record
  • DocType: The document type as Enum KVSKBAIntegerAsEnum
  • DocNo: The document number
  • DocLineNo: The document line number
  • DocSubLineNo: The document sub line number
  • DocDescription: The document description
  • ReturnValue: The return value indicating whether mandatory fields are filled
  • Handled: If set to true, the default logic is skipped

Remarks: This event is raised before checking mandatory fields

OnBeforeFieldsConditionTestwithIsHandled(RecordRef, Record KVSKBAMandatoryCheckField, Boolean, Boolean) :#

Summary: Event raised before testing fields condition with IsHandled pattern

[IntegrationEvent(false, false)]
local procedure OnBeforeFieldsConditionTestwithIsHandled(RecRef: RecordRef; KVSKBAMandatoryCheckField: Record "KVSKBAMandatoryCheckField"; ReturnValue: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeFieldsConditionTestwithIsHandled', '', false, false)]
local procedure DoSomethingOnBeforeFieldsConditionTestwithIsHandled(RecRef: RecordRef; KVSKBAMandatoryCheckField: Record "KVSKBAMandatoryCheckField"; ReturnValue: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • RecRef: The RecordRef of the record to check
  • KVSKBAMandatoryCheckField: The KVSKBAMandatoryCheckField record
  • ReturnValue: The return value of the condition test
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before testing fields condition with IsHandled pattern

OnBeforeCheckMandatoryFieldsCust(Record Customer, Boolean, Boolean, Boolean) :#

Summary: Event raised before checking mandatory fields for Customer

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckMandatoryFieldsCust(var CustVar: Record "Customer"; ShowFoundFieldsPar: Boolean; ChangeFieldsInRecPar: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeCheckMandatoryFieldsCust', '', false, false)]
local procedure DoSomethingOnBeforeCheckMandatoryFieldsCust(var CustVar: Record "Customer"; ShowFoundFieldsPar: Boolean; ChangeFieldsInRecPar: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • CustVar: The Customer record
  • ShowFoundFieldsPar: Indicates whether to show found fields
  • ChangeFieldsInRecPar: Indicates whether to change fields in the record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before checking mandatory fields for Customer

OnBeforeCheckMandatoryFieldsItem(Record Item, Boolean, Boolean, Boolean) :#

Summary: Event raised before checking mandatory fields for Item

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckMandatoryFieldsItem(var ItemVar: Record "Item"; ShowFoundFieldsPar: Boolean; ChangeFieldsInRecPar: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeCheckMandatoryFieldsItem', '', false, false)]
local procedure DoSomethingOnBeforeCheckMandatoryFieldsItem(var ItemVar: Record "Item"; ShowFoundFieldsPar: Boolean; ChangeFieldsInRecPar: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • ItemVar: The Item record
  • ShowFoundFieldsPar: Indicates whether to show found fields
  • ChangeFieldsInRecPar: Indicates whether to change fields in the record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before checking mandatory fields for Item

OnBeforeCheckMandatoryFieldsVend(Record Vendor, Boolean, Boolean, Boolean) :#

Summary: Event raised before checking mandatory fields for Vendor

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckMandatoryFieldsVend(var VendVar: Record "Vendor"; ShowFoundFieldsPar: Boolean; ChangeFieldsInRecPar: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeCheckMandatoryFieldsVend', '', false, false)]
local procedure DoSomethingOnBeforeCheckMandatoryFieldsVend(var VendVar: Record "Vendor"; ShowFoundFieldsPar: Boolean; ChangeFieldsInRecPar: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • VendVar: The Vendor record
  • ShowFoundFieldsPar: Indicates whether to show found fields
  • ChangeFieldsInRecPar: Indicates whether to change fields in the record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before checking mandatory fields for Vendor

OnBeforeOnValidateCustBlocked(Record Customer, Boolean) :#

Summary: Event raised before validating Customer Blocked

[IntegrationEvent(false, false)]
local procedure OnBeforeOnValidateCustBlocked(var Customer: Record "Customer"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeOnValidateCustBlocked', '', false, false)]
local procedure DoSomethingOnBeforeOnValidateCustBlocked(var Customer: Record "Customer"; var IsHandled: Boolean)
begin
end;

Parameters:

  • Customer: The Customer record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before validating Customer Blocked

OnBeforeOnValidateCustBlockedUser(Record Customer, Boolean) :#

Summary: Event raised before validating Customer Blocked User

[IntegrationEvent(false, false)]
local procedure OnBeforeOnValidateCustBlockedUser(var Customer: Record "Customer"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeOnValidateCustBlockedUser', '', false, false)]
local procedure DoSomethingOnBeforeOnValidateCustBlockedUser(var Customer: Record "Customer"; var IsHandled: Boolean)
begin
end;

Parameters:

  • Customer: The Customer record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before validating Customer Blocked User

OnBeforeAnalyzeAndShowMandCheckEntries(Record KVSKBAMandatoryFieldCheckEntry, Boolean, Boolean, Boolean, Boolean) :#

Summary: Event raised before analyzing and showing mandatory check entries

[IntegrationEvent(false, false)]
local procedure OnBeforeAnalyzeAndShowMandCheckEntries(var KVSKBAMandatoryFieldCheckEntry: Record "KVSKBAMandatoryFieldCheckEntry"; var ShowFoundedFields: Boolean; PreviewMode: Boolean; var Ok: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeAnalyzeAndShowMandCheckEntries', '', false, false)]
local procedure DoSomethingOnBeforeAnalyzeAndShowMandCheckEntries(var KVSKBAMandatoryFieldCheckEntry: Record "KVSKBAMandatoryFieldCheckEntry"; var ShowFoundedFields: Boolean; PreviewMode: Boolean; var Ok: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • KVSKBAMandatoryFieldCheckEntry: The Mandatory Field Check Entry record
  • ShowFoundedFields: Indicates whether to show found fields
  • PreviewMode: Indicates whether preview mode is enabled
  • Ok: Indicates whether all mandatory fields are filled
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before analyzing and showing mandatory check entries

OnBeforeOnValidateItemBlocked(Record Item, Boolean) :#

Summary: Event raised before validating Item Blocked

[IntegrationEvent(false, false)]
local procedure OnBeforeOnValidateItemBlocked(var Item: Record "Item"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeOnValidateItemBlocked', '', false, false)]
local procedure DoSomethingOnBeforeOnValidateItemBlocked(var Item: Record "Item"; var IsHandled: Boolean)
begin
end;

Parameters:

  • Item: The Item record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before validating Item Blocked

OnBeforeOnValidateItemBlockedUser(Record Item, Boolean) :#

Summary: Event raised before validating Item Blocked User

[IntegrationEvent(false, false)]
local procedure OnBeforeOnValidateItemBlockedUser(var Item: Record "Item"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeOnValidateItemBlockedUser', '', false, false)]
local procedure DoSomethingOnBeforeOnValidateItemBlockedUser(var Item: Record "Item"; var IsHandled: Boolean)
begin
end;

Parameters:

  • Item: The Item record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before validating Item Blocked User

OnBeforeOnValidateVendBlocked(Record Vendor, Boolean) :#

Summary: Event raised before validating Vendor Blocked

[IntegrationEvent(false, false)]
local procedure OnBeforeOnValidateVendBlocked(var Vendor: Record "Vendor"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeOnValidateVendBlocked', '', false, false)]
local procedure DoSomethingOnBeforeOnValidateVendBlocked(var Vendor: Record "Vendor"; var IsHandled: Boolean)
begin
end;

Parameters:

  • Vendor: The Vendor record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before validating Vendor Blocked

OnBeforeOnValidateVendBlockedUser(Record Vendor, Boolean) :#

Summary: Event raised before validating Vendor Blocked User

[IntegrationEvent(false, false)]
local procedure OnBeforeOnValidateVendBlockedUser(var Vendor: Record "Vendor"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeOnValidateVendBlockedUser', '', false, false)]
local procedure DoSomethingOnBeforeOnValidateVendBlockedUser(var Vendor: Record "Vendor"; var IsHandled: Boolean)
begin
end;

Parameters:

  • Vendor: The Vendor record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before validating Vendor Blocked User

OnBeforeSetCustBlockedWhenMaintenanceComplete(Record Customer, Boolean) :#

Summary: Event raised before setting Item Blocked when maintenance is complete

[IntegrationEvent(false, false)]
local procedure OnBeforeSetCustBlockedWhenMaintenanceComplete(var CustVar: Record "Customer"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeSetCustBlockedWhenMaintenanceComplete', '', false, false)]
local procedure DoSomethingOnBeforeSetCustBlockedWhenMaintenanceComplete(var CustVar: Record "Customer"; var IsHandled: Boolean)
begin
end;

Parameters:

  • CustVar: The Customer record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before setting Customer Blocked when maintenance is complete

OnBeforeSetCustBlockedWhenMaintenanceInProgress(Record Customer, Boolean, Boolean) :#

Summary: Event raised before setting Customer Blocked when maintenance is in progress

[IntegrationEvent(false, false)]
local procedure OnBeforeSetCustBlockedWhenMaintenanceInProgress(var CustVar: Record "Customer"; MandatoryFieldsCheckIsRequiredPar: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeSetCustBlockedWhenMaintenanceInProgress', '', false, false)]
local procedure DoSomethingOnBeforeSetCustBlockedWhenMaintenanceInProgress(var CustVar: Record "Customer"; MandatoryFieldsCheckIsRequiredPar: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • CustVar: The Customer record
  • MandatoryFieldsCheckIsRequiredPar: Indicates whether mandatory fields check is required
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before setting Customer Blocked when maintenance is in progress

OnBeforeSetItemBlockedWhenMaintenanceComplete(Record Item, Boolean) :#

Summary: Event raised before setting Item Blocked when maintenance is complete

[IntegrationEvent(false, false)]
local procedure OnBeforeSetItemBlockedWhenMaintenanceComplete(var ItemVar: Record "Item"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeSetItemBlockedWhenMaintenanceComplete', '', false, false)]
local procedure DoSomethingOnBeforeSetItemBlockedWhenMaintenanceComplete(var ItemVar: Record "Item"; var IsHandled: Boolean)
begin
end;

Parameters:

  • ItemVar: The Item record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before setting Item Blocked when maintenance is complete

OnBeforeSetItemBlockedWhenMaintenanceInProgress(Record Item, Boolean, Boolean) :#

Summary: Event raised before setting Item Blocked when maintenance is in progress

[IntegrationEvent(false, false)]
local procedure OnBeforeSetItemBlockedWhenMaintenanceInProgress(var ItemVar: Record "Item"; MandatoryFieldsCheckIsRequiredPar: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeSetItemBlockedWhenMaintenanceInProgress', '', false, false)]
local procedure DoSomethingOnBeforeSetItemBlockedWhenMaintenanceInProgress(var ItemVar: Record "Item"; MandatoryFieldsCheckIsRequiredPar: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • ItemVar: The Item record
  • MandatoryFieldsCheckIsRequiredPar: Indicates whether mandatory fields check is required
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before setting Item Blocked when maintenance is in progress

OnBeforeSetVendBlockedWhenMaintenanceComplete(Record Vendor, Boolean) :#

Summary: Event raised before setting Vendor Blocked when maintenance is complete

[IntegrationEvent(false, false)]
local procedure OnBeforeSetVendBlockedWhenMaintenanceComplete(var VendVar: Record "Vendor"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeSetVendBlockedWhenMaintenanceComplete', '', false, false)]
local procedure DoSomethingOnBeforeSetVendBlockedWhenMaintenanceComplete(var VendVar: Record "Vendor"; var IsHandled: Boolean)
begin
end;

Parameters:

  • VendVar: The Vendor record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before setting Vendor Blocked when maintenance is complete

OnBeforeSetVendBlockedWhenMaintenanceInProgress(Record Vendor, Boolean, Boolean) :#

Summary: Event raised before setting Vendor Blocked when maintenance is in progress

[IntegrationEvent(false, false)]
local procedure OnBeforeSetVendBlockedWhenMaintenanceInProgress(var VendVar: Record "Vendor"; MandatoryFieldsCheckIsRequiredPar: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeSetVendBlockedWhenMaintenanceInProgress', '', false, false)]
local procedure DoSomethingOnBeforeSetVendBlockedWhenMaintenanceInProgress(var VendVar: Record "Vendor"; MandatoryFieldsCheckIsRequiredPar: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • VendVar: The Vendor record
  • MandatoryFieldsCheckIsRequiredPar: Indicates whether mandatory fields check is required
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before setting Vendor Blocked when maintenance is in progress

OnAfterCheckMandatoryFieldsItemOnBeforeSetMaintenance(Record Item, Boolean, Boolean) :#

Summary: Event raised after checking mandatory fields on Item before setting maintenance in progress

[IntegrationEvent(false, false)]
local procedure OnAfterCheckMandatoryFieldsItemOnBeforeSetMaintenance(var Item: Record "Item"; var ChangeFieldsInRec: Boolean; var Ok: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnAfterCheckMandatoryFieldsItemOnBeforeSetMaintenance', '', false, false)]
local procedure DoSomethingOnAfterCheckMandatoryFieldsItemOnBeforeSetMaintenance(var Item: Record "Item"; var ChangeFieldsInRec: Boolean; var Ok: Boolean)
begin
end;

Parameters:

  • Item: The Item record
  • ChangeFieldsInRec: Indicates whether to change fields in the record
  • Ok: Indicates whether the mandatory fields check was successful

Remarks: This event is raised after checking mandatory fields on Item before setting maintenance in progress

OnBeforeCheckFieldsResource(Record Resource, Boolean, Boolean, Boolean) :#

Summary: Event raised before checking fields of Resource

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckFieldsResource(var Resource: Record "Resource"; ShowFoundFields: Boolean; ChangeFieldsInRec: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeCheckFieldsResource', '', false, false)]
local procedure DoSomethingOnBeforeCheckFieldsResource(var Resource: Record "Resource"; ShowFoundFields: Boolean; ChangeFieldsInRec: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • Resource: The Resource record
  • ShowFoundFields: Indicates whether to show found fields
  • ChangeFieldsInRec: Indicates whether to change fields in the record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before checking fields of Resource

OnBeforeSetResourceBlockedWhenMaintenanceComplete(Record Resource, Boolean) :#

Summary: Event raised before setting Resource Blocked when maintenance is complete

[IntegrationEvent(false, false)]
local procedure OnBeforeSetResourceBlockedWhenMaintenanceComplete(var Resource: Record "Resource"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeSetResourceBlockedWhenMaintenanceComplete', '', false, false)]
local procedure DoSomethingOnBeforeSetResourceBlockedWhenMaintenanceComplete(var Resource: Record "Resource"; var IsHandled: Boolean)
begin
end;

Parameters:

  • Resource: The Resource record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before setting Resource Blocked when maintenance is complete

OnBeforeSetResourceBlockedWhenMaintenanceInProgress(Record Resource, Boolean, Boolean) :#

Summary: Event raised before setting Resource Blocked when maintenance is in progress

[IntegrationEvent(false, false)]
local procedure OnBeforeSetResourceBlockedWhenMaintenanceInProgress(var Resource: Record "Resource"; MandatoryFieldsCheckIsRequired: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeSetResourceBlockedWhenMaintenanceInProgress', '', false, false)]
local procedure DoSomethingOnBeforeSetResourceBlockedWhenMaintenanceInProgress(var Resource: Record "Resource"; MandatoryFieldsCheckIsRequired: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • Resource: The Resource record
  • MandatoryFieldsCheckIsRequired: Indicates whether mandatory fields check is required
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before setting Resource Blocked when maintenance is in progress

OnBeforeOnValidateResourceBlockedUser(Record Resource, Boolean) :#

Summary: Event raised before validating Resource Blocked User

[IntegrationEvent(false, false)]
local procedure OnBeforeOnValidateResourceBlockedUser(var Resource: Record "Resource"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeOnValidateResourceBlockedUser', '', false, false)]
local procedure DoSomethingOnBeforeOnValidateResourceBlockedUser(var Resource: Record "Resource"; var IsHandled: Boolean)
begin
end;

Parameters:

  • Resource: The Resource record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before validating Resource Blocked User

OnAfterEditCust(Record Customer) :#

Summary: Event raised after editing Customer maintenance

[IntegrationEvent(false, false)]
local procedure OnAfterEditCust(var Customer: Record "Customer"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnAfterEditCust', '', false, false)]
local procedure DoSomethingOnAfterEditCust(var Customer: Record "Customer")
begin
end;

Parameters:

  • Customer: The Customer record

Remarks: This event is raised after editing Customer maintenance

OnBeforeFinishCust(Record Customer) :#

Summary: Event raised before finishing Customer maintenance

[IntegrationEvent(false, false)]
local procedure OnBeforeFinishCust(var Customer: Record "Customer"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeFinishCust', '', false, false)]
local procedure DoSomethingOnBeforeFinishCust(var Customer: Record "Customer")
begin
end;

Parameters:

  • Customer: The Customer record

Remarks: This event is raised before finishing Customer maintenance

OnAfterFinishCust(Record Customer) :#

Summary: Event raised after finishing Customer maintenance

[IntegrationEvent(false, false)]
local procedure OnAfterFinishCust(var Customer: Record "Customer"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnAfterFinishCust', '', false, false)]
local procedure DoSomethingOnAfterFinishCust(var Customer: Record "Customer")
begin
end;

Parameters:

  • Customer: The Customer record

Remarks: This event is raised after finishing Customer maintenance

OnAfterEditVend(Record Vendor) :#

Summary: Event raised after editing Vendor maintenance

[IntegrationEvent(false, false)]
local procedure OnAfterEditVend(var Vendor: Record "Vendor"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnAfterEditVend', '', false, false)]
local procedure DoSomethingOnAfterEditVend(var Vendor: Record "Vendor")
begin
end;

Parameters:

  • Vendor: The Vendor record

Remarks: This event is raised after editing Vendor maintenance

OnBeforeFinishVend(Record Vendor) :#

Summary: Event raised before finishing Vendor maintenance

[IntegrationEvent(false, false)]
local procedure OnBeforeFinishVend(var Vendor: Record "Vendor"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeFinishVend', '', false, false)]
local procedure DoSomethingOnBeforeFinishVend(var Vendor: Record "Vendor")
begin
end;

Parameters:

  • Vendor: The Vendor record

Remarks: This event is raised before finishing Vendor maintenance

OnAfterFinishVend(Record Vendor) :#

Summary: Event raised after finishing Vendor maintenance

[IntegrationEvent(false, false)]
local procedure OnAfterFinishVend(var Vendor: Record "Vendor"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnAfterFinishVend', '', false, false)]
local procedure DoSomethingOnAfterFinishVend(var Vendor: Record "Vendor")
begin
end;

Parameters:

  • Vendor: The Vendor record

Remarks: This event is raised after finishing Vendor maintenance

OnBeforeCheckMandatoryFieldsSerialNoInformation(Record Serial No. Information, Boolean, Boolean, Boolean) :#

Summary: Event raised before checking mandatory fields on Serial No. Information

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckMandatoryFieldsSerialNoInformation(var SerialNoInformation: Record "Serial No. Information"; ShowFoundFields: Boolean; ChangeFieldsInRec: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeCheckMandatoryFieldsSerialNoInformation', '', false, false)]
local procedure DoSomethingOnBeforeCheckMandatoryFieldsSerialNoInformation(var SerialNoInformation: Record "Serial No. Information"; ShowFoundFields: Boolean; ChangeFieldsInRec: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • SerialNoInformation: The Serial No. Information record
  • ShowFoundFields: Indicates whether found fields should be shown
  • ChangeFieldsInRec: Indicates whether fields in the record should be changed
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before checking mandatory fields on Serial No. Information

OnAfterCheckMandatoryFieldsSerialNoInformationOnBeforeSetMaintenance(Record Serial No. Information, Boolean, Boolean) :#

Summary: Event raised after checking mandatory fields on Serial No. Information and before setting maintenance status

[IntegrationEvent(false, false)]
local procedure OnAfterCheckMandatoryFieldsSerialNoInformationOnBeforeSetMaintenance(var SerialNoInformation: Record "Serial No. Information"; ChangeFieldsInRec: Boolean; var Ok: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnAfterCheckMandatoryFieldsSerialNoInformationOnBeforeSetMaintenance', '', false, false)]
local procedure DoSomethingOnAfterCheckMandatoryFieldsSerialNoInformationOnBeforeSetMaintenance(var SerialNoInformation: Record "Serial No. Information"; ChangeFieldsInRec: Boolean; var Ok: Boolean)
begin
end;

Parameters:

  • SerialNoInformation: The Serial No. Information record
  • ChangeFieldsInRec: Indicates whether fields in the record should be changed
  • Ok: Indicates whether the operation was successful

Remarks: This event is raised after checking mandatory fields on Serial No. Information and before setting maintenance status

OnBeforeCheckMandatoryFieldsLotNoInformation(Record Lot No. Information, Boolean, Boolean, Boolean) :#

Summary: Event raised before checking mandatory fields on Lot No. Information

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckMandatoryFieldsLotNoInformation(var LotNoInformation: Record "Lot No. Information"; ShowFoundFields: Boolean; ChangeFieldsInRec: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeCheckMandatoryFieldsLotNoInformation', '', false, false)]
local procedure DoSomethingOnBeforeCheckMandatoryFieldsLotNoInformation(var LotNoInformation: Record "Lot No. Information"; ShowFoundFields: Boolean; ChangeFieldsInRec: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • LotNoInformation: The Lot No. Information record
  • ShowFoundFields: Indicates whether found fields should be shown
  • ChangeFieldsInRec: Indicates whether fields in the record should be changed
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before checking mandatory fields on Lot No. Information

OnAfterCheckMandatoryFieldsLotNoInformationOnBeforeSetMaintenance(Record Lot No. Information, Boolean, Boolean) :#

Summary: Event raised after checking mandatory fields on Lot No. Information and before setting maintenance status

[IntegrationEvent(false, false)]
local procedure OnAfterCheckMandatoryFieldsLotNoInformationOnBeforeSetMaintenance(var LotNoInformation: Record "Lot No. Information"; ChangeFieldsInRec: Boolean; var Ok: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnAfterCheckMandatoryFieldsLotNoInformationOnBeforeSetMaintenance', '', false, false)]
local procedure DoSomethingOnAfterCheckMandatoryFieldsLotNoInformationOnBeforeSetMaintenance(var LotNoInformation: Record "Lot No. Information"; ChangeFieldsInRec: Boolean; var Ok: Boolean)
begin
end;

Parameters:

  • LotNoInformation: The Lot No. Information record
  • ChangeFieldsInRec: Indicates whether fields in the record should be changed
  • Ok: Indicates whether the operation was successful

Remarks: This event is raised after checking mandatory fields on Lot No. Information and before setting maintenance status

OnBeforeSetSerialNoInformationBlockedWhenMaintenanceInProgress(Record Serial No. Information, Boolean, Boolean) :#

Summary: Event raised before setting Serial No. Information blocked when maintenance is in progress

[IntegrationEvent(false, false)]
local procedure OnBeforeSetSerialNoInformationBlockedWhenMaintenanceInProgress(var SerialNoInformation: Record "Serial No. Information"; MandatoryFieldsCheckIsRequired: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeSetSerialNoInformationBlockedWhenMaintenanceInProgress', '', false, false)]
local procedure DoSomethingOnBeforeSetSerialNoInformationBlockedWhenMaintenanceInProgress(var SerialNoInformation: Record "Serial No. Information"; MandatoryFieldsCheckIsRequired: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • SerialNoInformation: The Serial No. Information record
  • MandatoryFieldsCheckIsRequired: Indicates whether mandatory fields check is required
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before setting Serial No. Information blocked when maintenance is in progress

OnBeforeSetSerialNoInformationBlockedWhenMaintenanceComplete(Record Serial No. Information, Boolean) :#

Summary: Event raised before setting Serial No. Information blocked when maintenance is complete

[IntegrationEvent(false, false)]
local procedure OnBeforeSetSerialNoInformationBlockedWhenMaintenanceComplete(var SerialNoInformation: Record "Serial No. Information"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeSetSerialNoInformationBlockedWhenMaintenanceComplete', '', false, false)]
local procedure DoSomethingOnBeforeSetSerialNoInformationBlockedWhenMaintenanceComplete(var SerialNoInformation: Record "Serial No. Information"; var IsHandled: Boolean)
begin
end;

Parameters:

  • SerialNoInformation: The Serial No. Information record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before setting Serial No. Information blocked when maintenance is complete

OnBeforeSetLotNoInformationBlockedWhenMaintenanceInProgress(Record Lot No. Information, Boolean, Boolean) :#

Summary: Event raised before setting Lot No. Information blocked when maintenance is in progress

[IntegrationEvent(false, false)]
local procedure OnBeforeSetLotNoInformationBlockedWhenMaintenanceInProgress(var LotNoInformation: Record "Lot No. Information"; MandatoryFieldsCheckIsRequired: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeSetLotNoInformationBlockedWhenMaintenanceInProgress', '', false, false)]
local procedure DoSomethingOnBeforeSetLotNoInformationBlockedWhenMaintenanceInProgress(var LotNoInformation: Record "Lot No. Information"; MandatoryFieldsCheckIsRequired: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • LotNoInformation: The Lot No. Information record
  • MandatoryFieldsCheckIsRequired: Indicates whether mandatory fields check is required
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before setting Lot No. Information blocked when maintenance is in progress

OnBeforeSetLotNoInformationBlockedWhenMaintenanceComplete(Record Lot No. Information, Boolean) :#

Summary: Event raised before setting Lot No. Information blocked when maintenance is complete

[IntegrationEvent(false, false)]
local procedure OnBeforeSetLotNoInformationBlockedWhenMaintenanceComplete(var LotNoInformation: Record "Lot No. Information"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeSetLotNoInformationBlockedWhenMaintenanceComplete', '', false, false)]
local procedure DoSomethingOnBeforeSetLotNoInformationBlockedWhenMaintenanceComplete(var LotNoInformation: Record "Lot No. Information"; var IsHandled: Boolean)
begin
end;

Parameters:

  • LotNoInformation: The Lot No. Information record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before setting Lot No. Information blocked when maintenance is complete

OnBeforeCheckMandatoryFieldsPackageNoInformation(Record Package No. Information, Boolean, Boolean, Boolean) :#

Summary: Event raised before checking mandatory fields on Package No. Information

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckMandatoryFieldsPackageNoInformation(var PackageNoInformation: Record "Package No. Information"; ShowFoundFields: Boolean; ChangeFieldsInRec: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeCheckMandatoryFieldsPackageNoInformation', '', false, false)]
local procedure DoSomethingOnBeforeCheckMandatoryFieldsPackageNoInformation(var PackageNoInformation: Record "Package No. Information"; ShowFoundFields: Boolean; ChangeFieldsInRec: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • PackageNoInformation: The Package No. Information record
  • ShowFoundFields: Indicates whether found fields should be shown
  • ChangeFieldsInRec: Indicates whether fields in the record should be changed
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before checking mandatory fields on Package No. Information

OnAfterCheckMandatoryFieldsPackageNoInformationOnBeforeSetMaintenance(Record Package No. Information, Boolean, Boolean) :#

Summary: Event raised after checking mandatory fields on Package No. Information and before setting maintenance status

[IntegrationEvent(false, false)]
local procedure OnAfterCheckMandatoryFieldsPackageNoInformationOnBeforeSetMaintenance(var PackageNoInformation: Record "Package No. Information"; ChangeFieldsInRec: Boolean; var Ok: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnAfterCheckMandatoryFieldsPackageNoInformationOnBeforeSetMaintenance', '', false, false)]
local procedure DoSomethingOnAfterCheckMandatoryFieldsPackageNoInformationOnBeforeSetMaintenance(var PackageNoInformation: Record "Package No. Information"; ChangeFieldsInRec: Boolean; var Ok: Boolean)
begin
end;

Parameters:

  • PackageNoInformation: The Package No. Information record
  • ChangeFieldsInRec: Indicates whether fields in the record should be changed
  • Ok: Indicates whether the operation was successful

Remarks: This event is raised after checking mandatory fields on Package No. Information and before setting maintenance status

OnBeforeSetPackageNoInformationBlockedWhenMaintenanceComplete(Record Package No. Information, Boolean) :#

Summary: Event raised before setting Package No. Information blocked when maintenance is complete

[IntegrationEvent(false, false)]
local procedure OnBeforeSetPackageNoInformationBlockedWhenMaintenanceComplete(var PackageNoInformation: Record "Package No. Information"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeSetPackageNoInformationBlockedWhenMaintenanceComplete', '', false, false)]
local procedure DoSomethingOnBeforeSetPackageNoInformationBlockedWhenMaintenanceComplete(var PackageNoInformation: Record "Package No. Information"; var IsHandled: Boolean)
begin
end;

Parameters:

  • PackageNoInformation: The Package No. Information record
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before setting Package No. Information blocked when maintenance is complete

OnBeforeSetPackageNoInformationBlockedWhenMaintenanceInProgress(Record Package No. Information, Boolean, Boolean) :#

Summary: Event raised before setting Package No. Information blocked when maintenance is in progress

[IntegrationEvent(false, false)]
local procedure OnBeforeSetPackageNoInformationBlockedWhenMaintenanceInProgress(var PackageNoInformation: Record "Package No. Information"; MandatoryFieldsCheckIsRequired: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAMandatoryFieldsLib", 'OnBeforeSetPackageNoInformationBlockedWhenMaintenanceInProgress', '', false, false)]
local procedure DoSomethingOnBeforeSetPackageNoInformationBlockedWhenMaintenanceInProgress(var PackageNoInformation: Record "Package No. Information"; MandatoryFieldsCheckIsRequired: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • PackageNoInformation: The Package No. Information record
  • MandatoryFieldsCheckIsRequired: Indicates whether mandatory fields check is required
  • IsHandled: If set to true, the default logic is skipped

Remarks: This event is raised before setting Package No. Information blocked when maintenance is in progress