Codeunit 18123471 EOS History Calc. Cost Mgt.

Codeunit 18123471 EOS History Calc. Cost Mgt.

Codeunit EOS History Calc. Cost Mgt. (ID 18123471).

Methods

RoutingCostPerUnit

procedure RoutingCostPerUnit(PeriodCode: Code[20]; ItemNo: Code[20]; CapacityTypeJnl: Enum "Capacity Type Journal"; No: Code[20]; SetupUOMCode: Code[10]; RunUOMCode: Code[10]; var DirUnitCost: Decimal; var IndirCostPct: Decimal; var OvhdRate: Decimal; var UnitCost: Decimal; var UnitCostCalculation: Enum "Unit Cost Calculation Type")

RoutingCostPerUnit.

Parameters / Return Value

  • PeriodCode Code[20]

    Code[20].

  • ItemNo Code[20]

    Code[20].

  • CapacityTypeJnl Enum "Capacity Type Journal"

    Enum “Capacity Type Journal”.

  • No Code[20]

    Code[20].

  • SetupUOMCode Code[10]

    Code[10].

  • RunUOMCode Code[10]

    Code[10].

  • DirUnitCost Decimal

    VAR Decimal.

  • IndirCostPct Decimal

    VAR Decimal.

  • OvhdRate Decimal

    VAR Decimal.

  • UnitCost Decimal

    VAR Decimal.

  • UnitCostCalculation Enum "Unit Cost Calculation Type"

    VAR Option Time,Unit.

RoutingCostPerUnit2

procedure RoutingCostPerUnit2(PeriodCode: Code[20]; ItemNo: Code[20]; CapacityTypeJnl: Enum "Capacity Type Journal"; CapacityNo: Code[20]; SetupUOMCode: Code[10]; RunUOMCode: Code[10]; var DirUnitCost: Decimal; var IndirCostPct: Decimal; var OvhdRate: Decimal; var UnitCost: Decimal; var UnitCostCalculation: enum "Unit Cost Calculation Type"; RoutingUnitCost: Decimal)

RoutingCostPerUnit2.

Parameters / Return Value

  • PeriodCode Code[20]

    Code[20].

  • ItemNo Code[20]

    Code[20].

  • CapacityTypeJnl Enum "Capacity Type Journal"

    Enum “Capacity Type Journal”.

  • CapacityNo Code[20]

    Code[20].

  • SetupUOMCode Code[10]

    Code[10].

  • RunUOMCode Code[10]

    Code[10].

  • DirUnitCost Decimal

    VAR Decimal.

  • IndirCostPct Decimal

    VAR Decimal.

  • OvhdRate Decimal

    VAR Decimal.

  • UnitCost Decimal

    VAR Decimal.

  • UnitCostCalculation enum "Unit Cost Calculation Type"

    VAR Option Time,Unit.

  • RoutingUnitCost Decimal

    Decimal.

CalcDirUnitCost

procedure CalcDirUnitCost(UnitCost: Decimal; OvhdRate: Decimal; IndirCostPct: Decimal): Decimal

CalcDirUnitCost.

Parameters / Return Value

  • UnitCost Decimal

    Decimal.

  • OvhdRate Decimal

    Decimal.

  • IndirCostPct Decimal

    Decimal.

  • Returns Decimal

    Return value of type Decimal.

CalcCompItemQtyBase

procedure CalcCompItemQtyBase(ProdBOMComponent: Record "EOS Production BOM History"; MfgItemQtyBase: Decimal; RtngNo: Code[20]; AdjdForRtngScrap: Boolean): Decimal

CalcCompItemQtyBase.

Parameters / Return Value

  • ProdBOMComponent Record "EOS Production BOM History"

    Record “EOS Production BOM History”.

  • MfgItemQtyBase Decimal

    Decimal.

  • RtngNo Code[20]

    Code[20].

  • AdjdForRtngScrap Boolean

    Boolean.

  • Returns Decimal

    Return value of type Decimal.

CalcQtyAdjdForBOMScrap

procedure CalcQtyAdjdForBOMScrap(Qty: Decimal; ScrapPct: Decimal): Decimal

CalcQtyAdjdForBOMScrap.

Parameters / Return Value

  • Qty Decimal

    Decimal.

  • ScrapPct Decimal

    Decimal.

  • Returns Decimal

    Return value of type Decimal.

CalcQtyAdjdForRoutingScrap

procedure CalcQtyAdjdForRoutingScrap(Qty: Decimal; ScrapFactorPctAccum: Decimal; FixedScrapQtyAccum: Decimal): Decimal

CalcQtyAdjdForRoutingScrap.

Parameters / Return Value

  • Qty Decimal

    Decimal.

  • ScrapFactorPctAccum Decimal

    Decimal.

  • FixedScrapQtyAccum Decimal

    Decimal.

  • Returns Decimal

    Return value of type Decimal.

CalcCostTime

procedure CalcCostTime(ItemNo: Code[20]; MfgItemQtyBase: Decimal; SetupTime: Decimal; SetupTimeUOMCode: Code[10]; RunTime: Decimal; RunTimeUOMCode: Code[10]; RtngLotSize: Decimal; ScrapFactorPctAccum: Decimal; FixedScrapQtyAccum: Decimal; WorkCenterNo: Code[20]; UnitCostCalculation: Enum "Unit Cost Calculation Type"; CostInclSetup: Boolean; ConcurrentCapacities: Decimal) CostTime: Decimal

CalcCostTime.

Parameters / Return Value

  • ItemNo Code[20]

    Code[20].

  • MfgItemQtyBase Decimal

    Decimal.

  • SetupTime Decimal

    Decimal.

  • SetupTimeUOMCode Code[10]

    Code[10].

  • RunTime Decimal

    Decimal.

  • RunTimeUOMCode Code[10]

    Code[10].

  • RtngLotSize Decimal

    Decimal.

  • ScrapFactorPctAccum Decimal

    Decimal.

  • FixedScrapQtyAccum Decimal

    Decimal.

  • WorkCenterNo Code[20]

    Code[20].

  • UnitCostCalculation Enum "Unit Cost Calculation Type"

    Option Time,Unit.

  • CostInclSetup Boolean

    Boolean.

  • ConcurrentCapacities Decimal

    Decimal.

  • Returns Decimal

    Return variable CostTime of type Decimal.

CalcOvhdCost

procedure CalcOvhdCost(DirCost: Decimal; IndirCostPct: Decimal; OvhdRate: Decimal; QtyBase: Decimal): Decimal

CalcOvhdCost.

Parameters / Return Value

  • DirCost Decimal

    Decimal.

  • IndirCostPct Decimal

    Decimal.

  • OvhdRate Decimal

    Decimal.

  • QtyBase Decimal

    Decimal.

  • Returns Decimal

    Return value of type Decimal.

GetLastCost

procedure GetLastCost(var ItemHistory: Record "EOS Item Cost History"; EndDate: Date)

GetLastCost.

Parameters / Return Value

  • ItemHistory Record "EOS Item Cost History"

    VAR Record “EOS Item Cost History”.

  • EndDate Date

    Date.

GetCostFromILE

procedure GetCostFromILE(PeriodCode: Code[20]; ItemNo: Code[20]; StartDate: Date; EndDate: Date; OnlyEntryWithValue: Boolean; var LastDate: Date; var UnitCost: Decimal): Decimal

GetCostFromILE.

Parameters / Return Value

  • PeriodCode Code[20]

    Code[20].

  • ItemNo Code[20]

    Code[20].

  • StartDate Date

    Date.

  • EndDate Date

    Date.

  • OnlyEntryWithValue Boolean

    Boolean.

  • LastDate Date

    VAR Date.

  • UnitCost Decimal

    VAR Decimal.

  • Returns Decimal

    Return value of type Decimal.

GetODPUnitCost

procedure GetODPUnitCost(PeriodCode: Code[20]; ProdOrderNo: Code[20]; ProdOrderLineNo: Integer): Decimal

GetODPUnitCost.

Parameters / Return Value

  • PeriodCode Code[20]

    Code[20].

  • ProdOrderNo Code[20]

    Code[20].

  • ProdOrderLineNo Integer

    Integer.

  • Returns Decimal

    Return value of type Decimal.

GetStandardLastCost

procedure GetStandardLastCost(PeriodCode: Code[20]; ItemNo: Code[20]; StartDate: Date; EndDate: Date): Decimal

GetStandardLastCost.

Parameters / Return Value

  • PeriodCode Code[20]

    Code[20].

  • ItemNo Code[20]

    Code[20].

  • StartDate Date

    Date.

  • EndDate Date

    Date.

  • Returns Decimal

    Return value of type Decimal.

GetItemSpecificCostByPeriod

procedure GetItemSpecificCostByPeriod(PeriodCode: Code[20]; ItemNo: Code[20]; VariantCode: Code[20]; LotNo: Code[50]; SerialNo: Code[50]; var ItemSpecificCost: Record "EOS Specific Cost"): Decimal

GetItemSpecificCostByPeriod.

Parameters / Return Value

  • PeriodCode Code[20]

    Code[20].

  • ItemNo Code[20]

    Code[20].

  • VariantCode Code[20]

    Code[20].

  • LotNo Code[50]

    Code[50].

  • SerialNo Code[50]

    Code[50].

  • ItemSpecificCost Record "EOS Specific Cost"

    VAR Record “EOS Specific Cost”.

  • Returns Decimal

    Return value of type Decimal.

GetItemSNLotCost

procedure GetItemSNLotCost(var Item: Record Item; PeriodCode: Code[20]; ReferenceDate: Date; var UnitCost: Decimal; var UnitOtherCost: Decimal): Decimal

GetItemSNLotCost.

Parameters / Return Value

  • Item Record "Item"

    VAR Record Item.

  • PeriodCode Code[20]

    Code[20].

  • ReferenceDate Date

    Date.

  • UnitCost Decimal

    VAR Decimal.

  • UnitOtherCost Decimal

    VAR Decimal.

  • Returns Decimal

    Return value of type Decimal.

GetItemSpecificCost

procedure GetItemSpecificCost(var vRecItem: Record Item; PeriodCode: Code[20]; ReferenceDate: Date): Decimal

GetItemSpecificCost.

Parameters / Return Value

  • vRecItem Record "Item"

    VAR Record Item.

  • PeriodCode Code[20]

    Code[20].

  • ReferenceDate Date

    Date.

  • Returns Decimal

    Return value of type Decimal.

CheckCostManagementType

procedure CheckCostManagementType(ItemNo: Code[20])

CheckCostManagementType.

Parameters / Return Value

  • ItemNo Code[20]

    Code[20].

GetSpecificUnitCost

procedure GetSpecificUnitCost(PeriodCode: Code[20]; ItemNo: Code[20]; VariantCode: Code[20]; LotNo: Code[50]; SNNo: Code[50]; var vDecUnitCost: Decimal): Boolean

GetSpecificUnitCost.

Parameters / Return Value

  • PeriodCode Code[20]

    Code[20].

  • ItemNo Code[20]

    Code[20].

  • VariantCode Code[20]

    Code[20].

  • LotNo Code[50]

    Code[50].

  • SNNo Code[50]

    Code[50].

  • vDecUnitCost Decimal

    VAR Decimal.

  • Returns Boolean

    Return value of type Boolean.

CalcCapLedgEntryCosts

procedure CalcCapLedgEntryCosts(PeriodCode: Code[20]; var CapLedgEntry: Record "Capacity Ledger Entry")

CalcCapLedgEntryCosts.

Parameters / Return Value

  • PeriodCode Code[20]

    Code[20].

  • CapLedgEntry Record "Capacity Ledger Entry"

    VAR Record “Capacity Ledger Entry”.

GetCapacityUnitCosts

procedure GetCapacityUnitCosts(PeriodCode: Code[20]; ItemNo: Code[20]; RoutingNo: Code[20]; OperationNo: Code[10]; CapacityTypeJnl: Enum "Capacity Type Journal"; CapacityNo: Code[20]; var UnitCost: Decimal; var DirectUnitCost: Decimal; var OverheadUnitCost: Decimal)

GetCapacityUnitCosts.

Parameters / Return Value

  • PeriodCode Code[20]

    Code[20].

  • ItemNo Code[20]

    Code[20].

  • RoutingNo Code[20]

    Code[20].

  • OperationNo Code[10]

    Code[10].

  • CapacityTypeJnl Enum "Capacity Type Journal"

    Enum “Capacity Type Journal”.

  • CapacityNo Code[20]

    Code[20].

  • UnitCost Decimal

    VAR Decimal.

  • DirectUnitCost Decimal

    VAR Decimal.

  • OverheadUnitCost Decimal

    VAR Decimal.

GetRoutingHistoryUnitCost

procedure GetRoutingHistoryUnitCost(RtngHistory: Record "EOS Routing History"): Decimal

GetRoutingHistoryUnitCost.

Parameters / Return Value

  • RtngHistory Record "EOS Routing History"

    Record “EOS Routing History”.

  • Returns Decimal

    Return value of type Decimal.

GetCostComponents

procedure GetCostComponents(ItemHistory: Record "EOS Item Cost History"; CostType: Option Standard,"Average","Weighed Average",LIFO,FIFO,Last; var SingleLevelCost: array[6] of Decimal; var RolledUpCost: array[6] of Decimal): Decimal

GetCostComponents.

Parameters / Return Value

  • ItemHistory Record "EOS Item Cost History"

    Record “EOS Item Cost History”.

  • CostType Option

    Standard (0) , "Average" (1) , "Weighed Average" (2) , LIFO (3) , FIFO (4) , Last (5)

    Option Standard,“Average”,“Weighed Average”,LIFO,FIFO,Last.

  • SingleLevelCost Decimal

    VAR array[6] of Decimal.

  • RolledUpCost Decimal

    VAR array[6] of Decimal.

  • Returns Decimal

    Return value of type Decimal.

ForceCostComponents

procedure ForceCostComponents(ItemHistory: Record "EOS Item Cost History"; UnitCost: Decimal; var SingleLevelCost: array[6] of Decimal; var RolledUpCost: array[6] of Decimal)

ForceCostComponents.

Parameters / Return Value

  • ItemHistory Record "EOS Item Cost History"

    Record “EOS Item Cost History”.

  • UnitCost Decimal

    Decimal.

  • SingleLevelCost Decimal

    VAR array[6] of Decimal.

  • RolledUpCost Decimal

    VAR array[6] of Decimal.

GetSpecificUnitCostRec

procedure GetSpecificUnitCostRec(PeriodCode: Code[20]; ItemNo: Code[20]; VariantCode: Code[20]; LotNo: Code[50]; SNNo: Code[50]; var ItemHistory: Record "EOS Item Cost History"): Boolean

GetSpecificUnitCostRec.

Parameters / Return Value

  • PeriodCode Code[20]

    Code[20].

  • ItemNo Code[20]

    Code[20].

  • VariantCode Code[20]

    Code[20].

  • LotNo Code[50]

    Code[50].

  • SNNo Code[50]

    Code[50].

  • ItemHistory Record "EOS Item Cost History"

    VAR Record “EOS Item Cost History”.

  • Returns Boolean

    Return value of type Boolean.

QtyPerTimeUnitOfMeasure

procedure QtyPerTimeUnitOfMeasure(WorkCenterNo: Code[20]; UnitOfMeasureCode: Code[10]): Decimal

QtyPerTimeUnitOfMeasure.

Parameters / Return Value

  • WorkCenterNo Code[20]

    Code[20].

  • UnitOfMeasureCode Code[10]

    Code[10].

  • Returns Decimal

    Return value of type Decimal.

CalcSubcCostPerUnit

procedure CalcSubcCostPerUnit(RoutingHistory: Record "EOS Routing History"; SubcCostType: Enum "EOS Subcontracting Cost Priority"; var DirUnitCost: Decimal; var IndirCostPct: Decimal; var OvhdCost: Decimal; var UnitCost: Decimal; var UnitCostCalculation: Enum "Unit Cost Calculation Type")

CalcSubcCostPerUnit.

Parameters / Return Value

  • RoutingHistory Record "EOS Routing History"

    Record “EOS Routing History”.

  • SubcCostType Enum "EOS Subcontracting Cost Priority"

    Enum “EOS Subcontracting Cost Priority”.

  • DirUnitCost Decimal

    VAR Decimal.

  • IndirCostPct Decimal

    VAR Decimal.

  • OvhdCost Decimal

    VAR Decimal.

  • UnitCost Decimal

    VAR Decimal.

  • UnitCostCalculation Enum "Unit Cost Calculation Type"

    VAR Option Time,Unit.

EnableLimitCapacityCost

procedure EnableLimitCapacityCost(SetLimit: Boolean)

Parameters / Return Value

  • SetLimit Boolean

SetLimitCapacityCost

procedure SetLimitCapacityCost(SetValueEntry: Integer)

Parameters / Return Value

  • SetValueEntry Integer

SaveLastEntryNo

procedure SaveLastEntryNo(var ItemCostHistory: Record "EOS Item Cost History"; LastEntryNo: Integer; TableType: Option Purchase,Output,SelfConsumption,Consumption,Value,Capacity)

Parameters / Return Value

  • ItemCostHistory Record "EOS Item Cost History"

  • LastEntryNo Integer

  • TableType Option

    Purchase (0) , Output (1) , SelfConsumption (2) , Consumption (3) , Value (4) , Capacity (5)

Events

CalcSubcPrices

local procedure CalcSubcPrices(RoutingHistory: Record "EOS Routing History"; SubcCostType: Enum "EOS Subcontracting Cost Priority"; var DirUnitCost: Decimal; var IndirCostPct: Decimal; var OvhdCost: Decimal; var UnitCost: Decimal; var UnitCostCalculation: Enum "Unit Cost Calculation Type")

Parameters / Return Value

  • RoutingHistory Record "EOS Routing History"

  • SubcCostType Enum "EOS Subcontracting Cost Priority"

  • DirUnitCost Decimal

  • IndirCostPct Decimal

  • OvhdCost Decimal

  • UnitCost Decimal

  • UnitCostCalculation Enum "Unit Cost Calculation Type"

OnRunCalcSubcCostPerUnitActualEntries

local procedure OnRunCalcSubcCostPerUnitActualEntries(RoutingHistory: Record "EOS Routing History"; SubcCostType: Enum "EOS Subcontracting Cost Priority"; var DirUnitCost: Decimal; var IndirCostPct: Decimal; var OvhdCost: Decimal; var UnitCost: Decimal; var UnitCostCalculation: Enum "Unit Cost Calculation Type"; var IsHandled: Boolean)

Parameters / Return Value

  • RoutingHistory Record "EOS Routing History"

  • SubcCostType Enum "EOS Subcontracting Cost Priority"

  • DirUnitCost Decimal

  • IndirCostPct Decimal

  • OvhdCost Decimal

  • UnitCost Decimal

  • UnitCostCalculation Enum "Unit Cost Calculation Type"

  • IsHandled Boolean


EOS Labs -