Skip to content

KVSTRDAlloySurchargeMgt#

Procedures#

InsertAndCalculateItemChargePurchaseLinesByItemAlloySurcharge(Record Purchase Line) :#

Summary: Inserts and calculates the item charge purchase lines by item alloy surcharge.

procedure InsertAndCalculateItemChargePurchaseLinesByItemAlloySurcharge(var PurchaseLine: Record "Purchase Line"): 

InsertAndCalculateItemChargeSalesLinesByItemAlloySurcharge(Record Sales Line) :#

Summary: Inserts and calculates the item charge sales lines by item alloy surcharge.

procedure InsertAndCalculateItemChargeSalesLinesByItemAlloySurcharge(var SalesLine: Record "Sales Line"): 

Events#

KVSTRDOnAfterGetStartingAndEndingDateForSurchargePrice(Integer, Code[20], Code[20], Code[10], Decimal, Code[20], Date, Code[10], Decimal, Date, Date) :#

[IntegrationEvent(false, false)]
local procedure KVSTRDOnAfterGetStartingAndEndingDateForSurchargePrice(var SourceType: Integer; var SourceNo: Code[20]; var ItemNo: Code[20]; var VariantCode: Code[10]; var QtyPerUnitOfMeasure: Decimal; var AlloySurchargeCode: Code[20]; var ValuationDate: Date; var CurrencyCode: Code[10]; var CurrencyFactor: Decimal; var PriceStartingDate: Date; var PriceEndingDate: Date): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSTRDAlloySurchargeMgt", 'KVSTRDOnAfterGetStartingAndEndingDateForSurchargePrice', '', false, false)]
local procedure DoSomethingKVSTRDOnAfterGetStartingAndEndingDateForSurchargePrice(var SourceType: Integer; var SourceNo: Code[20]; var ItemNo: Code[20]; var VariantCode: Code[10]; var QtyPerUnitOfMeasure: Decimal; var AlloySurchargeCode: Code[20]; var ValuationDate: Date; var CurrencyCode: Code[10]; var CurrencyFactor: Decimal; var PriceStartingDate: Date; var PriceEndingDate: Date)
begin
end;

KVSTRDOnAfterSetFilterOnBeforeFindSetPurchaseLineInUpdatePurchaseLines(Record Purchase Line, Date, Record Purchase Header, Record Purchase Line) :#

[IntegrationEvent(false, false)]
local procedure KVSTRDOnAfterSetFilterOnBeforeFindSetPurchaseLineInUpdatePurchaseLines(var FilteredPurchaseLine: Record "Purchase Line"; var ValuationDate: Date; var PurchaseHeader: Record "Purchase Header"; var PurchaseLine: Record "Purchase Line"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSTRDAlloySurchargeMgt", 'KVSTRDOnAfterSetFilterOnBeforeFindSetPurchaseLineInUpdatePurchaseLines', '', false, false)]
local procedure DoSomethingKVSTRDOnAfterSetFilterOnBeforeFindSetPurchaseLineInUpdatePurchaseLines(var FilteredPurchaseLine: Record "Purchase Line"; var ValuationDate: Date; var PurchaseHeader: Record "Purchase Header"; var PurchaseLine: Record "Purchase Line")
begin
end;

KVSTRDOnAfterSetFilterOnBeforeFindSetSalesLineInUpdateSalesLines(Record Sales Line, Date, Record Sales Header, Record Sales Line) :#

[IntegrationEvent(false, false)]
local procedure KVSTRDOnAfterSetFilterOnBeforeFindSetSalesLineInUpdateSalesLines(var FilteredSalesLine: Record "Sales Line"; var ValuationDate: Date; var SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSTRDAlloySurchargeMgt", 'KVSTRDOnAfterSetFilterOnBeforeFindSetSalesLineInUpdateSalesLines', '', false, false)]
local procedure DoSomethingKVSTRDOnAfterSetFilterOnBeforeFindSetSalesLineInUpdateSalesLines(var FilteredSalesLine: Record "Sales Line"; var ValuationDate: Date; var SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line")
begin
end;

KVSTRDOnAfterSetValuationDateInUpdatePurchaseLines(Date, Record Purchase Header, Record Purchase Line) :#

[IntegrationEvent(false, false)]
local procedure KVSTRDOnAfterSetValuationDateInUpdatePurchaseLines(var ValuationDate: Date; var PurchaseHeader: Record "Purchase Header"; var PurchaseLine: Record "Purchase Line"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSTRDAlloySurchargeMgt", 'KVSTRDOnAfterSetValuationDateInUpdatePurchaseLines', '', false, false)]
local procedure DoSomethingKVSTRDOnAfterSetValuationDateInUpdatePurchaseLines(var ValuationDate: Date; var PurchaseHeader: Record "Purchase Header"; var PurchaseLine: Record "Purchase Line")
begin
end;

KVSTRDOnAfterSetValuationDateInUpdateSalesLines(Date, Record Sales Header, Record Sales Line) :#

[IntegrationEvent(false, false)]
local procedure KVSTRDOnAfterSetValuationDateInUpdateSalesLines(var ValuationDate: Date; var SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSTRDAlloySurchargeMgt", 'KVSTRDOnAfterSetValuationDateInUpdateSalesLines', '', false, false)]
local procedure DoSomethingKVSTRDOnAfterSetValuationDateInUpdateSalesLines(var ValuationDate: Date; var SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line")
begin
end;

KVSTRDOnBeforeCalculateSurchargePriceOnBeforeSetSurchargePrice(Code[20], Code[10], Code[20], Decimal, Decimal, Decimal, Decimal) :#

[IntegrationEvent(false, false)]
local procedure KVSTRDOnBeforeCalculateSurchargePriceOnBeforeSetSurchargePrice(ItemNo: Code[20]; VariantCode: Code[10]; AlloySurchargeCode: Code[20]; var AlloyWeight: Decimal; var BasePrice: Decimal; var ProcurementCostsPercentage: Decimal; var UnitPrice: Decimal): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSTRDAlloySurchargeMgt", 'KVSTRDOnBeforeCalculateSurchargePriceOnBeforeSetSurchargePrice', '', false, false)]
local procedure DoSomethingKVSTRDOnBeforeCalculateSurchargePriceOnBeforeSetSurchargePrice(ItemNo: Code[20]; VariantCode: Code[10]; AlloySurchargeCode: Code[20]; var AlloyWeight: Decimal; var BasePrice: Decimal; var ProcurementCostsPercentage: Decimal; var UnitPrice: Decimal)
begin
end;

KVSTRDOnBeforeCheckQtyToReceiveBaseDiffersBetweenItemAndAlloySurchargePurchaseLines(Record Purchase Header, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSTRDOnBeforeCheckQtyToReceiveBaseDiffersBetweenItemAndAlloySurchargePurchaseLines(PurchaseHeader: Record "Purchase Header"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSTRDAlloySurchargeMgt", 'KVSTRDOnBeforeCheckQtyToReceiveBaseDiffersBetweenItemAndAlloySurchargePurchaseLines', '', false, false)]
local procedure DoSomethingKVSTRDOnBeforeCheckQtyToReceiveBaseDiffersBetweenItemAndAlloySurchargePurchaseLines(PurchaseHeader: Record "Purchase Header"; var IsHandled: Boolean)
begin
end;

KVSTRDOnBeforeCheckQtyToShipBaseDiffersBetweenItemAndAlloySurchargeSalesLines(Record Sales Header, Boolean) :#

[IntegrationEvent(false, false)]
local procedure KVSTRDOnBeforeCheckQtyToShipBaseDiffersBetweenItemAndAlloySurchargeSalesLines(SalesHeader: Record "Sales Header"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSTRDAlloySurchargeMgt", 'KVSTRDOnBeforeCheckQtyToShipBaseDiffersBetweenItemAndAlloySurchargeSalesLines', '', false, false)]
local procedure DoSomethingKVSTRDOnBeforeCheckQtyToShipBaseDiffersBetweenItemAndAlloySurchargeSalesLines(SalesHeader: Record "Sales Header"; var IsHandled: Boolean)
begin
end;

KVSTRDOnBeforeInsertItemChargeAssignmentPurch(Record Purchase Line, Boolean) :#

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

KVSTRDOnBeforeInsertItemChargeAssignmentSales(Record Sales Line, Boolean) :#

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

KVSTRDOnGetStartingAndEndingDateForSurchargePriceForOtherAlloySurchargeCalcType(Enum KVSTRDAlloySurchargeCalcType, Date, Date, Date) :#

[IntegrationEvent(false, false)]
local procedure KVSTRDOnGetStartingAndEndingDateForSurchargePriceForOtherAlloySurchargeCalcType(AlloySurchargeCalcType: Enum "KVSTRDAlloySurchargeCalcType"; ValuationDate: Date; var StartingDate: Date; var EndingDate: Date): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSTRDAlloySurchargeMgt", 'KVSTRDOnGetStartingAndEndingDateForSurchargePriceForOtherAlloySurchargeCalcType', '', false, false)]
local procedure DoSomethingKVSTRDOnGetStartingAndEndingDateForSurchargePriceForOtherAlloySurchargeCalcType(AlloySurchargeCalcType: Enum "KVSTRDAlloySurchargeCalcType"; ValuationDate: Date; var StartingDate: Date; var EndingDate: Date)
begin
end;

OnBeforeCheckQtyToShipBaseDiffersBetweenItemAndAlloySurchargeSalesLines(Record Sales Header, Boolean) :#

Obsolete

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

[Obsolete('This event is obsolete due to wrong naming. Use KVSTRDOnBeforeCheckQtyToShipBaseDiffersBetweenItemAndAlloySurchargeSalesLines instead.', '25.2')]
[IntegrationEvent(false, false)]
local procedure OnBeforeCheckQtyToShipBaseDiffersBetweenItemAndAlloySurchargeSalesLines(SalesHeader: Record "Sales Header"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSTRDAlloySurchargeMgt", 'OnBeforeCheckQtyToShipBaseDiffersBetweenItemAndAlloySurchargeSalesLines', '', false, false)]
local procedure DoSomethingOnBeforeCheckQtyToShipBaseDiffersBetweenItemAndAlloySurchargeSalesLines(SalesHeader: Record "Sales Header"; var IsHandled: Boolean)
begin
end;