Skip to content

KVSKBAManufacturingLib#

Procedures#

CalcProjAvailableBalance(Code[20], Code[20], Code[20], Date) : Decimal#

procedure CalcProjAvailableBalance(itemNoPar: Code[20]; variantCodePar: Code[20]; locationCodePar: Code[20]; dueDatePar: Date): Decimal

ItemAvailability(Option, Record KVSKBAProdStructureBuffer) :#

Summary: This procedure is used to display item availability information based on the availability type parameter. It initializes three page objects, "Item Availability by Location", "Item Availability by Periods", and "Item Availability by Variant". Finally, the selected page object is opened in lookup mode, and the "Item" record is set as the record and table view for the page. The page is then displayed to the user as modal.

procedure ItemAvailability(availabilityTypePar: Option; var prodStructurBuffer: Record "KVSKBAProdStructureBuffer"): 

Parameters:

  • availabilityTypePar: The availability type parameter (Date,Variant,Location,Bin)
  • prodStructurBuffer: A reference to a "KVSKBAProdStructureBuffer" record

InsertShowProdStructureBuffer(Record Prod. Order Component, Boolean) : Boolean#

procedure InsertShowProdStructureBuffer(var ProdOrderComponent: Record "Prod. Order Component"; StatusChange: Boolean): Boolean

FindRecords(Record KVSKBAProdStructureBuffer, Record KVSKBAProdStructureBuffer, Code[20], Code[20], Code[20], Code[20], Code[20], Date, Boolean, Decimal, Code[10]) :#

procedure FindRecords(var TempProdStructureBuffer: Record "KVSKBAProdStructureBuffer"; var TempPageProdStructureBuffer: Record "KVSKBAProdStructureBuffer"; ItemNo: Code[20]; ProdBOMNo: Code[20]; ProdBOMVersionCode: Code[20]; RoutingNo: Code[20]; RoutingVersionCode: Code[20]; CalculationDate: Date; CalcRouting: Boolean; Quantity: Decimal; UomCode: Code[10]): 

InsertProdStructure(Record KVSKBAProdStructureBuffer, Code[20], Code[20], Code[20], Code[20], Code[20], Date, Boolean, Integer, Decimal, Decimal) :#

procedure InsertProdStructure(var tempProdStructureBufferVar: Record "KVSKBAProdStructureBuffer"; itemNoPar: Code[20]; prodBOMNoPar: Code[20]; prodBOMVersionCodePar: Code[20]; routingNoPar: Code[20]; routingVersionCodePar: Code[20]; calculationDatePar: Date; calcRoutingPar: Boolean; actLevelPar: Integer; qtyBOMHeaderPar: Decimal; qtyPerUnitOfMeasurePar: Decimal): 

InsertProdStructureBufferBOM(Record KVSKBAProdStructureBuffer, Record Production BOM Line, Integer, Date, Decimal, Decimal, Record Item) :#

procedure InsertProdStructureBufferBOM(var tempProdStructureBufferVar: Record "KVSKBAProdStructureBuffer"; bOMComponentPar: Record "Production BOM Line"; levelPar: Integer; calculationDatePar: Date; qtyBOMHeaderPar: Decimal; qtyPerUnitOfMeasurePar: Decimal; compItemPar: Record "Item"): 

InsertProdStructureBufferRtg(Record KVSKBAProdStructureBuffer, Record Routing Line, Integer) :#

procedure InsertProdStructureBufferRtg(var tempProdStructureBufferVar: Record "KVSKBAProdStructureBuffer"; rtgLinePar: Record "Routing Line"; levelPar: Integer): 

ExpandAll(Record KVSKBAProdStructureBuffer, Record KVSKBAProdStructureBuffer) :#

Summary: This function expands all levels of the structure, i.e. inserts all lines regardless the level.

procedure ExpandAll(var tempProdStructureBuffer: Record "KVSKBAProdStructureBuffer"; var tempProdStructureBuffer2: Record "KVSKBAProdStructureBuffer"): 

Parameters:

  • tempProdStructureBuffer:
  • tempProdStructureBuffer2:

Returns:

IsExpanded(Record KVSKBAProdStructureBuffer, Record KVSKBAProdStructureBuffer) : Boolean#

Summary: This function gives back the actual expansion status of a Production Structure Buffer line, i.e. shows if a line has inferior structures (children) and if these structures are shown in the actual presentation.

procedure IsExpanded(actualProdStructureBuffer: Record "KVSKBAProdStructureBuffer"; var tempProdStructureBuffer2: Record "KVSKBAProdStructureBuffer"): Boolean

Parameters:

  • actualProdStructureBuffer:
  • tempProdStructureBuffer2:

Returns:

ShowItemCard(Code[20]) :#

Summary: This function open the Item Card for a specific item

procedure ShowItemCard(itemNoPar: Code[20]): 

Parameters:

  • itemNoPar:

CalcProdBOMVersionData(Code[20], Code[20], Code[20], Record Item Unit of Measure) :#

procedure CalcProdBOMVersionData(itemNoPar: Code[20]; prodBOMNoPar: Code[20]; versionCodePar: Code[20]; var itemUOMVar: Record "Item Unit of Measure"): 

Events#

OnInsertProdStructureBufferBOMOnAfterInserttempProdStructureBuffer(Record KVSKBAProdStructureBuffer, Record Production BOM Line, Integer, Date, Decimal, Decimal, Record Item) :#

[IntegrationEvent(false, false)]
local procedure OnInsertProdStructureBufferBOMOnAfterInserttempProdStructureBuffer(var TempProdStructureBuffer: Record "KVSKBAProdStructureBuffer"; BOMComponent: Record "Production BOM Line"; Level: Integer; CalculationDate: Date; QtyBOMHeader: Decimal; QtyPerUnitOfMeasure: Decimal; CompItem: Record "Item"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAManufacturingLib", 'OnInsertProdStructureBufferBOMOnAfterInserttempProdStructureBuffer', '', false, false)]
local procedure DoSomethingOnInsertProdStructureBufferBOMOnAfterInserttempProdStructureBuffer(var TempProdStructureBuffer: Record "KVSKBAProdStructureBuffer"; BOMComponent: Record "Production BOM Line"; Level: Integer; CalculationDate: Date; QtyBOMHeader: Decimal; QtyPerUnitOfMeasure: Decimal; CompItem: Record "Item")
begin
end;

OnInsertProdStructureBufferRtgOnAfterInserttempProdStructureBuffer(Record KVSKBAProdStructureBuffer, Record Routing Line, Integer) :#

[IntegrationEvent(false, false)]
local procedure OnInsertProdStructureBufferRtgOnAfterInserttempProdStructureBuffer(var TempProdStructureBuffer: Record "KVSKBAProdStructureBuffer"; RtgLine: Record "Routing Line"; Level: Integer): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAManufacturingLib", 'OnInsertProdStructureBufferRtgOnAfterInserttempProdStructureBuffer', '', false, false)]
local procedure DoSomethingOnInsertProdStructureBufferRtgOnAfterInserttempProdStructureBuffer(var TempProdStructureBuffer: Record "KVSKBAProdStructureBuffer"; RtgLine: Record "Routing Line"; Level: Integer)
begin
end;

OnAfterTransferAddItemFieldsToProdOrd(Record Production Order, Record Item) :#

[IntegrationEvent(false, false)]
local procedure OnAfterTransferAddItemFieldsToProdOrd(var ProductionOrder: Record "Production Order"; Item: Record "Item"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAManufacturingLib", 'OnAfterTransferAddItemFieldsToProdOrd', '', false, false)]
local procedure DoSomethingOnAfterTransferAddItemFieldsToProdOrd(var ProductionOrder: Record "Production Order"; Item: Record "Item")
begin
end;

OnAfterTransferAddItemFieldsToPOLine(Record Prod. Order Line, Record Item) :#

[IntegrationEvent(false, false)]
local procedure OnAfterTransferAddItemFieldsToPOLine(var ProdOrderLine: Record "Prod. Order Line"; Item: Record "Item"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAManufacturingLib", 'OnAfterTransferAddItemFieldsToPOLine', '', false, false)]
local procedure DoSomethingOnAfterTransferAddItemFieldsToPOLine(var ProdOrderLine: Record "Prod. Order Line"; Item: Record "Item")
begin
end;

OnAfterTransAddItJnlFieldsToItLedgEn(Record Item Journal Line, Record Item Ledger Entry) :#

[IntegrationEvent(false, false)]
local procedure OnAfterTransAddItJnlFieldsToItLedgEn(ItemJournalLine: Record "Item Journal Line"; var ItemLedgerEntry: Record "Item Ledger Entry"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAManufacturingLib", 'OnAfterTransAddItJnlFieldsToItLedgEn', '', false, false)]
local procedure DoSomethingOnAfterTransAddItJnlFieldsToItLedgEn(ItemJournalLine: Record "Item Journal Line"; var ItemLedgerEntry: Record "Item Ledger Entry")
begin
end;

OnBeforeCalcAvailableStock(Record Prod. Order Component, Decimal, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCalcAvailableStock(ProdOrderComponent: Record "Prod. Order Component"; var ReturnValue: Decimal; var Handled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAManufacturingLib", 'OnBeforeCalcAvailableStock', '', false, false)]
local procedure DoSomethingOnBeforeCalcAvailableStock(ProdOrderComponent: Record "Prod. Order Component"; var ReturnValue: Decimal; var Handled: Boolean)
begin
end;

OnBeforeProcedureInsertProdStructure(Record KVSKBAProdStructureBuffer, Code[20], Code[20], Code[20], Code[20], Code[20], Date, Boolean, Integer, Decimal, Decimal) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeProcedureInsertProdStructure(var TempProdStructureBuffer: Record "KVSKBAProdStructureBuffer"; ItemNo: Code[20]; ProdBOMNo: Code[20]; ProdBOMVersionCode: Code[20]; RoutingNo: Code[20]; RoutingVersionCode: Code[20]; CalculationDate: Date; CalcRouting: Boolean; ActLevel: Integer; QtyBOMHeader: Decimal; QtyPerUnitOfMeasure: Decimal): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAManufacturingLib", 'OnBeforeProcedureInsertProdStructure', '', false, false)]
local procedure DoSomethingOnBeforeProcedureInsertProdStructure(var TempProdStructureBuffer: Record "KVSKBAProdStructureBuffer"; ItemNo: Code[20]; ProdBOMNo: Code[20]; ProdBOMVersionCode: Code[20]; RoutingNo: Code[20]; RoutingVersionCode: Code[20]; CalculationDate: Date; CalcRouting: Boolean; ActLevel: Integer; QtyBOMHeader: Decimal; QtyPerUnitOfMeasure: Decimal)
begin
end;

OnBeforeInsertShowProdStructureBuffer(Record Prod. Order Component, Boolean, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeInsertShowProdStructureBuffer(var ProdOrderComponent: Record "Prod. Order Component"; statusChangePar: Boolean; var Handled: Boolean; var ReturnValue: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAManufacturingLib", 'OnBeforeInsertShowProdStructureBuffer', '', false, false)]
local procedure DoSomethingOnBeforeInsertShowProdStructureBuffer(var ProdOrderComponent: Record "Prod. Order Component"; statusChangePar: Boolean; var Handled: Boolean; var ReturnValue: Boolean)
begin
end;

OnInsertProdStructureBufferBOMOnBeforeInserttempProdStructureBuffer(Record KVSKBAProdStructureBuffer, Record Production BOM Line, Integer, Date, Decimal, Decimal, Record Item) :#

[IntegrationEvent(false, false)]
local procedure OnInsertProdStructureBufferBOMOnBeforeInserttempProdStructureBuffer(var TempProdStructureBuffer: Record "KVSKBAProdStructureBuffer"; BOMComponent: Record "Production BOM Line"; Level: Integer; CalculationDate: Date; QtyBOMHeader: Decimal; QtyPerUnitOfMeasure: Decimal; CompItem: Record "Item"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAManufacturingLib", 'OnInsertProdStructureBufferBOMOnBeforeInserttempProdStructureBuffer', '', false, false)]
local procedure DoSomethingOnInsertProdStructureBufferBOMOnBeforeInserttempProdStructureBuffer(var TempProdStructureBuffer: Record "KVSKBAProdStructureBuffer"; BOMComponent: Record "Production BOM Line"; Level: Integer; CalculationDate: Date; QtyBOMHeader: Decimal; QtyPerUnitOfMeasure: Decimal; CompItem: Record "Item")
begin
end;

OnInsertProdStructureBufferRtgOnBeforeInserttempProdStructureBuffer(Record KVSKBAProdStructureBuffer, Record Routing Line, Integer) :#

[IntegrationEvent(false, false)]
local procedure OnInsertProdStructureBufferRtgOnBeforeInserttempProdStructureBuffer(var TempProdStructureBuffer: Record "KVSKBAProdStructureBuffer"; RtgLine: Record "Routing Line"; Level: Integer): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAManufacturingLib", 'OnInsertProdStructureBufferRtgOnBeforeInserttempProdStructureBuffer', '', false, false)]
local procedure DoSomethingOnInsertProdStructureBufferRtgOnBeforeInserttempProdStructureBuffer(var TempProdStructureBuffer: Record "KVSKBAProdStructureBuffer"; RtgLine: Record "Routing Line"; Level: Integer)
begin
end;

OnSetFilterCompItematCalcProjAvailableBalance(Code[20], Code[20], Code[20], Date) :#

[IntegrationEvent(false, false)]
local procedure OnSetFilterCompItematCalcProjAvailableBalance(ItemNo: Code[20]; VariantCode: Code[20]; LocationCode: Code[20]; DueDate: Date): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAManufacturingLib", 'OnSetFilterCompItematCalcProjAvailableBalance', '', false, false)]
local procedure DoSomethingOnSetFilterCompItematCalcProjAvailableBalance(ItemNo: Code[20]; VariantCode: Code[20]; LocationCode: Code[20]; DueDate: Date)
begin
end;

SetnewInitTempTableatFindRecords(Boolean) :#

[IntegrationEvent(false, false)]
local procedure SetnewInitTempTableatFindRecords(var SetInitTempTable: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAManufacturingLib", 'SetnewInitTempTableatFindRecords', '', false, false)]
local procedure DoSomethingSetnewInitTempTableatFindRecords(var SetInitTempTable: Boolean)
begin
end;

SetnotShowWindowatFindRecords(Boolean) :#

[IntegrationEvent(false, false)]
local procedure SetnotShowWindowatFindRecords(var NotShowWindow: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAManufacturingLib", 'SetnotShowWindowatFindRecords', '', false, false)]
local procedure DoSomethingSetnotShowWindowatFindRecords(var NotShowWindow: Boolean)
begin
end;

OnSetFilterProductionOrderStatusOnBeforeCaseElse(Enum Production Order Status, Enum Production Order Status, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnSetFilterProductionOrderStatusOnBeforeCaseElse(i: Enum "Production Order Status"; var o: Enum "Production Order Status"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAManufacturingLib", 'OnSetFilterProductionOrderStatusOnBeforeCaseElse', '', false, false)]
local procedure DoSomethingOnSetFilterProductionOrderStatusOnBeforeCaseElse(i: Enum "Production Order Status"; var o: Enum "Production Order Status"; var IsHandled: Boolean)
begin
end;