Skip to content

KVSKBAItemLib#

Procedures#

GetLineInfos(Record Production BOM Line, Code[20], Code[20]) :#

procedure GetLineInfos(ProductionBOMLine: Record "Production BOM Line"; var RoutingNo: Code[20]; var ProductionBOMNoLine: Code[20]): 

ShowRoutingNo(Record Item) :#

Summary: Function show the routing card or routing bom version card, depending on Item."Routing No." If Item."Routing No." empty, a new routing is created.

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

Parameters:

  • Item:

ShowProductionBOMNo(Record Item) :#

Summary: Function show the production bom card or production version card If Item."Production BOM No." empty, a new "Production BOM Header" is created.

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

Parameters:

  • Item:

CheckSalesBlocked(Record Sales Line) :#

procedure CheckSalesBlocked(SalesLine: Record "Sales Line"): 

TestNoEntriesExist(Text[100], Record Item) :#

procedure TestNoEntriesExist(CurrentFieldName: Text[100]; Item: Record "Item"): 

IsVariantCodeMandatory(Code[20], Decimal, Variant) : Boolean#

Summary: Returns if item variant is mandatory

procedure IsVariantCodeMandatory(ItemNo: Code[20]; Quantity: Decimal; RecRelatedVariant: Variant): Boolean

Parameters:

  • ItemNo:
  • Quantity:
  • RecRelatedVariant:

Returns:

CheckItemVariantBlockedTab5407(Record Prod. Order Component) :#

Obsolete

This Element will be removed or changed with a future Version of the App.

[Obsolete('This procedure is no longer supported, please use procedure CheckItemVariantBlockedTableProdOrderComponent', '24.1')]
procedure CheckItemVariantBlockedTab5407(ProdOrderComponent: Record "Prod. Order Component"): 

CheckItemVariantBlockedTableProdOrderComponent(Record Prod. Order Component) :#

procedure CheckItemVariantBlockedTableProdOrderComponent(ProdOrderComponent: Record "Prod. Order Component"): 

CheckItemVariantBlockedTab5741(Record Transfer Line) :#

Obsolete

This Element will be removed or changed with a future Version of the App.

[Obsolete('This procedure is no longer supported, please use procedure CheckItemVariantBlockedTableTransferLine', '25.1')]
procedure CheckItemVariantBlockedTab5741(TransferLine: Record "Transfer Line"): 

CheckItemVariantBlockedTableTransferLine(Record Transfer Line) :#

procedure CheckItemVariantBlockedTableTransferLine(TransferLine: Record "Transfer Line"): 

GetErrorTextByVariantMandatory(Code[20]) : Text[100]#

procedure GetErrorTextByVariantMandatory(ItemNo: Code[20]): Text[100]

Events#

OnBeforeCheckSalesBlocked(Record Sales Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckSalesBlocked(SalesLine: Record "Sales Line"; var Handled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeCheckSalesBlocked', '', false, false)]
local procedure DoSomethingOnBeforeCheckSalesBlocked(SalesLine: Record "Sales Line"; var Handled: Boolean)
begin
end;

OnBeforeCheckItemIfInInv(Record Item Journal Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckItemIfInInv(ItemJournalLine: Record "Item Journal Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeCheckItemIfInInv', '', false, false)]
local procedure DoSomethingOnBeforeCheckItemIfInInv(ItemJournalLine: Record "Item Journal Line"; var IsHandled: Boolean)
begin
end;

OnBeforeCheckItemVariantBlockedTablePurchaseLine(Record Purchase Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckItemVariantBlockedTablePurchaseLine(PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeCheckItemVariantBlockedTablePurchaseLine', '', false, false)]
local procedure DoSomethingOnBeforeCheckItemVariantBlockedTablePurchaseLine(PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;

OnBeforeCheckItemVariantBlockedTableSalesLine(Record Sales Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckItemVariantBlockedTableSalesLine(SalesLine: Record "Sales Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeCheckItemVariantBlockedTableSalesLine', '', false, false)]
local procedure DoSomethingOnBeforeCheckItemVariantBlockedTableSalesLine(SalesLine: Record "Sales Line"; var IsHandled: Boolean)
begin
end;

OnBeforeGetLineInfosProductionBOMLineTypeCaseElse(Record Production BOM Line, Code[20], Code[20]) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeGetLineInfosProductionBOMLineTypeCaseElse(ProductionBOMLine: Record "Production BOM Line"; var RoutingNo: Code[20]; var ProductionBOMNoLine: Code[20]): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeGetLineInfosProductionBOMLineTypeCaseElse', '', false, false)]
local procedure DoSomethingOnBeforeGetLineInfosProductionBOMLineTypeCaseElse(ProductionBOMLine: Record "Production BOM Line"; var RoutingNo: Code[20]; var ProductionBOMNoLine: Code[20])
begin
end;

OnBeforeShowRoutingNo(Record Item, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeShowRoutingNo(var Item: Record "Item"; var Handled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeShowRoutingNo', '', false, false)]
local procedure DoSomethingOnBeforeShowRoutingNo(var Item: Record "Item"; var Handled: Boolean)
begin
end;

OnBeforeShowRoutingNofromSKU(Record Stockkeeping Unit, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeShowRoutingNofromSKU(var SKU: Record "Stockkeeping Unit"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeShowRoutingNofromSKU', '', false, false)]
local procedure DoSomethingOnBeforeShowRoutingNofromSKU(var SKU: Record "Stockkeeping Unit"; var IsHandled: Boolean)
begin
end;

OnShowRoutingNofromSKUOnBeforeGenerateLongNoText(Record Stockkeeping Unit, Text[100], Text[1], Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnShowRoutingNofromSKUOnBeforeGenerateLongNoText(SKU: Record "Stockkeeping Unit"; var LongNoText: Text[100]; var TextSeparator: Text[1]; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnShowRoutingNofromSKUOnBeforeGenerateLongNoText', '', false, false)]
local procedure DoSomethingOnShowRoutingNofromSKUOnBeforeGenerateLongNoText(SKU: Record "Stockkeeping Unit"; var LongNoText: Text[100]; var TextSeparator: Text[1]; var IsHandled: Boolean)
begin
end;

OnBeforeShowProductionBOMNo(Record Item, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeShowProductionBOMNo(var Item: Record "Item"; var Handled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeShowProductionBOMNo', '', false, false)]
local procedure DoSomethingOnBeforeShowProductionBOMNo(var Item: Record "Item"; var Handled: Boolean)
begin
end;

OnBeforeShowProductionBOMNofromSKU(Record Stockkeeping Unit, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeShowProductionBOMNofromSKU(var SKU: Record "Stockkeeping Unit"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeShowProductionBOMNofromSKU', '', false, false)]
local procedure DoSomethingOnBeforeShowProductionBOMNofromSKU(var SKU: Record "Stockkeeping Unit"; var IsHandled: Boolean)
begin
end;

OnShowProductionBOMNofromSKUOnBeforeGenerateLongNoText(Record Stockkeeping Unit, Text[100], Text[1], Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnShowProductionBOMNofromSKUOnBeforeGenerateLongNoText(SKU: Record "Stockkeeping Unit"; var LongNoText: Text[100]; var TextSeparator: Text[1]; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnShowProductionBOMNofromSKUOnBeforeGenerateLongNoText', '', false, false)]
local procedure DoSomethingOnShowProductionBOMNofromSKUOnBeforeGenerateLongNoText(SKU: Record "Stockkeeping Unit"; var LongNoText: Text[100]; var TextSeparator: Text[1]; var IsHandled: Boolean)
begin
end;

OnBeforeOnvalidateReorderingPolicy(Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeOnvalidateReorderingPolicy(var Handled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeOnvalidateReorderingPolicy', '', false, false)]
local procedure DoSomethingOnBeforeOnvalidateReorderingPolicy(var Handled: Boolean)
begin
end;

OnCheckSalesBlockedCaseElseSalesLineType(Record Sales Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnCheckSalesBlockedCaseElseSalesLineType(SalesLine: Record "Sales Line"; var Handled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnCheckSalesBlockedCaseElseSalesLineType', '', false, false)]
local procedure DoSomethingOnCheckSalesBlockedCaseElseSalesLineType(SalesLine: Record "Sales Line"; var Handled: Boolean)
begin
end;

OnCheckSalesBlockedCaseItemSalesLineType(Record Sales Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnCheckSalesBlockedCaseItemSalesLineType(SalesLine: Record "Sales Line"; var Handled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnCheckSalesBlockedCaseItemSalesLineType', '', false, false)]
local procedure DoSomethingOnCheckSalesBlockedCaseItemSalesLineType(SalesLine: Record "Sales Line"; var Handled: Boolean)
begin
end;

OnCheckSalesBlockedOnBeforePreCheck(Record Sales Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnCheckSalesBlockedOnBeforePreCheck(SalesLine: Record "Sales Line"; var Handled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnCheckSalesBlockedOnBeforePreCheck', '', false, false)]
local procedure DoSomethingOnCheckSalesBlockedOnBeforePreCheck(SalesLine: Record "Sales Line"; var Handled: Boolean)
begin
end;

OnCheckPurchaseBlockedOnBeforePreCheck(Record Purchase Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnCheckPurchaseBlockedOnBeforePreCheck(PurchaseLine: Record "Purchase Line"; var Handled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnCheckPurchaseBlockedOnBeforePreCheck', '', false, false)]
local procedure DoSomethingOnCheckPurchaseBlockedOnBeforePreCheck(PurchaseLine: Record "Purchase Line"; var Handled: Boolean)
begin
end;

OnBeforeIsVariantCodeMandatory(Code[20], Decimal, Variant, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeIsVariantCodeMandatory(ItemNo: Code[20]; Quantity: Decimal; RecRelatedVariant: Variant; var VariantCodeIsMandatory: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeIsVariantCodeMandatory', '', false, false)]
local procedure DoSomethingOnBeforeIsVariantCodeMandatory(ItemNo: Code[20]; Quantity: Decimal; RecRelatedVariant: Variant; var VariantCodeIsMandatory: Boolean; var IsHandled: Boolean)
begin
end;

OnBeforeCheckItemVariantBlockedTableServiceLine(Record Service Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckItemVariantBlockedTableServiceLine(ServiceLine: Record "Service Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeCheckItemVariantBlockedTableServiceLine', '', false, false)]
local procedure DoSomethingOnBeforeCheckItemVariantBlockedTableServiceLine(ServiceLine: Record "Service Line"; var IsHandled: Boolean)
begin
end;

OnBeforeCheckItemVariantBlockedTableServiceItemLine(Record Service Item Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckItemVariantBlockedTableServiceItemLine(ServiceItemLine: Record "Service Item Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeCheckItemVariantBlockedTableServiceItemLine', '', false, false)]
local procedure DoSomethingOnBeforeCheckItemVariantBlockedTableServiceItemLine(ServiceItemLine: Record "Service Item Line"; var IsHandled: Boolean)
begin
end;

OnBeforeCheckItemVariantBlockedTableTransferLine(Record Transfer Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckItemVariantBlockedTableTransferLine(TransferLine: Record "Transfer Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeCheckItemVariantBlockedTableTransferLine', '', false, false)]
local procedure DoSomethingOnBeforeCheckItemVariantBlockedTableTransferLine(TransferLine: Record "Transfer Line"; var IsHandled: Boolean)
begin
end;

OnBeforeCheckItemVariantBlockedTableAssemblyLine(Record Assembly Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckItemVariantBlockedTableAssemblyLine(AssemblyLine: Record "Assembly Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeCheckItemVariantBlockedTableAssemblyLine', '', false, false)]
local procedure DoSomethingOnBeforeCheckItemVariantBlockedTableAssemblyLine(AssemblyLine: Record "Assembly Line"; var IsHandled: Boolean)
begin
end;

OnBeforeCheckItemVariantBlockedTableJobJournalLine(Record Job Journal Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckItemVariantBlockedTableJobJournalLine(JobJournalLine: Record "Job Journal Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeCheckItemVariantBlockedTableJobJournalLine', '', false, false)]
local procedure DoSomethingOnBeforeCheckItemVariantBlockedTableJobJournalLine(JobJournalLine: Record "Job Journal Line"; var IsHandled: Boolean)
begin
end;

OnBeforeCheckItemVariantBlockedTableJobPlanningLine(Record Job Planning Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckItemVariantBlockedTableJobPlanningLine(JobPlanningLine: Record "Job Planning Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeCheckItemVariantBlockedTableJobPlanningLine', '', false, false)]
local procedure DoSomethingOnBeforeCheckItemVariantBlockedTableJobPlanningLine(JobPlanningLine: Record "Job Planning Line"; var IsHandled: Boolean)
begin
end;

OnBeforeCheckItemVariantBlockedTableProdOrderLine(Record Prod. Order Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckItemVariantBlockedTableProdOrderLine(ProdOrderLine: Record "Prod. Order Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeCheckItemVariantBlockedTableProdOrderLine', '', false, false)]
local procedure DoSomethingOnBeforeCheckItemVariantBlockedTableProdOrderLine(ProdOrderLine: Record "Prod. Order Line"; var IsHandled: Boolean)
begin
end;

OnBeforeCheckItemVariantBlockedTableWarehouseJournalLine(Record Warehouse Journal Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckItemVariantBlockedTableWarehouseJournalLine(WarehouseJournalLine: Record "Warehouse Journal Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAItemLib", 'OnBeforeCheckItemVariantBlockedTableWarehouseJournalLine', '', false, false)]
local procedure DoSomethingOnBeforeCheckItemVariantBlockedTableWarehouseJournalLine(WarehouseJournalLine: Record "Warehouse Journal Line"; var IsHandled: Boolean)
begin
end;