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

BatchFinishCust(Record Customer) :#

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

FinishCust(Record Customer) :#

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

EditVend(Record Vendor) :#

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

BatchFinishVend(Record Vendor) :#

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

FinishVend(Record Vendor) :#

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

EditItem(Record Item) :#

Summary: Use this function to edit a item with Mandatory Fields function

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

Parameters:

  • Item: The Item that should be editable

BatchFinishItem(Record Item) :#

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

FinishItem(Record Item) :#

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

CheckMandatoryFieldsItem(Record Item, Boolean, Boolean) :#

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

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

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

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

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

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

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

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

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

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

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

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

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

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:

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

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

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:

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

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

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

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

CheckMandatoryFieldsOrderQuote(Record KVSKBAOrderQuote, Boolean) : Boolean#

Summary: Use this function to check the mandatory fields for Purchase Request

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

Parameters:

  • OrderQuote: Purchase Request to check.
  • ShowFoundFields: Specifies whether the fields that do not fulfill the conditions should be displayed.

Returns:

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

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

FieldsConditionTest(RecordRef, Record KVSKBAMandatoryCheckField) : Boolean#

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

AnalyzeAndShowMandCheckEntries(Record KVSKBAMandatoryFieldCheckEntry, Boolean, Boolean) :#

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

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

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

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

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

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

FinishResource(Record Resource) :#

Summary: Use this procedure to set the field check of a resource to finished

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

Parameters:

  • Resource: The resources that should be finished

BatchFinishResource(Record Resource) :#

Summary: Use this procedure to set the field check for a set of resources to finished

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

Parameters:

  • Resource: The Resource that should be editable

Events#

OnAfterOnInsertCust(Record 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;

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

[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;

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

[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;

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

[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;

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

[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;

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

[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;

OnBeforeOnValidateCustBlocked(Record Customer, Boolean) :#

[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;

OnBeforeOnValidateCustBlockedUser(Record Customer, Boolean) :#

[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;

OnBeforeAnalyzeAndShowMandCheckEntries(Record KVSKBAMandatoryFieldCheckEntry, Boolean) :#

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

OnBeforeOnValidateItemBlocked(Record Item, Boolean) :#

[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;

OnBeforeOnValidateItemBlockedUser(Record Item, Boolean) :#

[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;

OnBeforeOnValidateVendBlocked(Record Vendor, Boolean) :#

[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;

OnBeforeOnValidateVendBlockedUser(Record Vendor, Boolean) :#

[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;

OnBeforeSetCustBlockedWhenMaintenanceComplete(Record Customer, Boolean) :#

[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;

OnBeforeSetCustBlockedWhenMaintenanceInProgress(Record Customer, Boolean, Boolean) :#

[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;

OnBeforeSetItemBlockedWhenMaintenanceComplete(Record Item, Boolean) :#

[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;

OnBeforeSetItemBlockedWhenMaintenanceInProgress(Record Item, Boolean, Boolean) :#

[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;

OnBeforeSetVendBlockedWhenMaintenanceComplete(Record Vendor, Boolean) :#

[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;

OnBeforeSetVendBlockedWhenMaintenanceInProgress(Record Vendor, Boolean, Boolean) :#

[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;

OnAfterCheckMandatoryFieldsItemOnBeforeSetMaintenance(Record Item, Boolean, Boolean) :#

[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;

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

[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;

OnBeforeSetResourceBlockedWhenMaintenanceComplete(Record Resource, Boolean) :#

[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;

OnBeforeSetResourceBlockedWhenMaintenanceInProgress(Record Resource, Boolean, Boolean) :#

[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;

OnBeforeOnValidateResourceBlockedUser(Record Resource, Boolean) :#

[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;

OnAfterEditCust(Record Customer) :#

[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;

OnBeforeFinishCust(Record Customer) :#

[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;

OnAfterFinishCust(Record Customer) :#

[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;

OnAfterEditVend(Record Vendor) :#

[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;

OnBeforeFinishVend(Record Vendor) :#

[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;

OnAfterFinishVend(Record Vendor) :#

[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;

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

[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;

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

[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;

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

[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;

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

[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;

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

[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;

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

[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;

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

[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;

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

[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;

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

[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;

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

[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;

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

[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;

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

[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;