Skip to content

KVSKBAPurchaseLinePrice#

Implements [#2b6ee9f5d5ac4624beeed0c03606b396#KVSCOREModuleSetup ](https://github.com/search?q=Table+%232b6ee9f5d5ac4624beeed0c03606b396%23KVSCOREModuleSetup+repo%3AStefanMaron%2FMSDyn365BC.Code.History&type=Code) .

Procedures#

GetTableNo() : Integer#

procedure GetTableNo(): Integer

SetLine(Enum Price Type, Variant) :#

procedure SetLine(PriceType: Enum "Price Type"; Line: Variant):

SetLine(Enum Price Type, Variant, Variant) :#

procedure SetLine(PriceType: Enum "Price Type"; Header: Variant; Line: Variant):

SetSources(Codeunit Price Source List) :#

procedure SetSources(var NewPriceSourceList: Codeunit "Price Source List"):

GetLine(Variant) :#

procedure GetLine(var Line: Variant):

GetLine(Variant, Variant) :#

procedure GetLine(var Header: Variant; var Line: Variant):

GetPriceType() : Enum#

procedure GetPriceType(): Enum Price Type

IsPriceUpdateNeeded(Enum Price Amount Type, Boolean, Integer) : Boolean#

procedure IsPriceUpdateNeeded(AmountType: Enum "Price Amount Type"; FoundPrice: Boolean; CalledByFieldNo: Integer): Boolean

IsDiscountAllowed() : Boolean#

procedure IsDiscountAllowed(): Boolean

Verify() :#

procedure Verify():

SetAssetSourceForSetup(Record Dtld. Price Calculation Setup) : Boolean#

procedure SetAssetSourceForSetup(var DtldPriceCalculationSetup: Record "Dtld. Price Calculation Setup"): Boolean

GetAssetType() : Enum#

procedure GetAssetType(): Enum Price Asset Type

CopyToBuffer(Codeunit Price Calculation Buffer Mgt.) : Boolean#

procedure CopyToBuffer(var PriceCalculationBufferMgt: Codeunit "Price Calculation Buffer Mgt."): Boolean

SetPrice(Enum Price Amount Type, Record Price List Line) :#

procedure SetPrice(AmountType: Enum "Price Amount Type"; PriceListLine: Record "Price List Line"):

ValidatePrice(Enum Price Amount Type) :#

procedure ValidatePrice(AmountType: Enum "Price Amount Type"):

Update(Enum Price Amount Type) :#

procedure Update(AmountType: Enum "Price Amount Type"):

Events#

OnAfterAddSources(Record Purchase Header, Record Purchase Line, Enum Price Type, Codeunit Price Source List) :#

[IntegrationEvent(false, false)]
local procedure OnAfterAddSources(PurchaseHeader: Record "Purchase Header"; PurchaseLine: Record "Purchase Line"; PriceType: Enum "Price Type"; var PriceSourceList: Codeunit "Price Source List"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLinePrice", 'OnAfterAddSources', '', false, false)]
local procedure DoSomethingOnAfterAddSources(PurchaseHeader: Record "Purchase Header"; PurchaseLine: Record "Purchase Line"; PriceType: Enum "Price Type"; var PriceSourceList: Codeunit "Price Source List")
begin
end;

OnAfterFillBuffer(Record Price Calculation Buffer, Record Purchase Header, Record Purchase Line) :#

[IntegrationEvent(false, false)]
local procedure OnAfterFillBuffer(var PriceCalculationBuffer: Record "Price Calculation Buffer"; PurchaseHeader: Record "Purchase Header"; PurchaseLine: Record "Purchase Line"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLinePrice", 'OnAfterFillBuffer', '', false, false)]
local procedure DoSomethingOnAfterFillBuffer(var PriceCalculationBuffer: Record "Price Calculation Buffer"; PurchaseHeader: Record "Purchase Header"; PurchaseLine: Record "Purchase Line")
begin
end;

OnAfterIsDiscountAllowed(Record Purchase Line, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnAfterIsDiscountAllowed(PurchaseLine: Record "Purchase Line"; PriceCalculated: Boolean; var Result: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLinePrice", 'OnAfterIsDiscountAllowed', '', false, false)]
local procedure DoSomethingOnAfterIsDiscountAllowed(PurchaseLine: Record "Purchase Line"; PriceCalculated: Boolean; var Result: Boolean)
begin
end;

OnAfterGetAssetType(Record Purchase Line, Enum Price Asset Type) :#

[IntegrationEvent(false, false)]
local procedure OnAfterGetAssetType(PurchaseLine: Record "Purchase Line"; var AssetType: Enum "Price Asset Type"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLinePrice", 'OnAfterGetAssetType', '', false, false)]
local procedure DoSomethingOnAfterGetAssetType(PurchaseLine: Record "Purchase Line"; var AssetType: Enum "Price Asset Type")
begin
end;

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

[IntegrationEvent(false, false)]
local procedure OnAfterGetDocumentDate(var DocumentDate: Date; PurchaseHeader: Record "Purchase Header"; PurchaseLine: Record "Purchase Line"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLinePrice", 'OnAfterGetDocumentDate', '', false, false)]
local procedure DoSomethingOnAfterGetDocumentDate(var DocumentDate: Date; PurchaseHeader: Record "Purchase Header"; PurchaseLine: Record "Purchase Line")
begin
end;

OnAfterIsPriceUpdateNeeded(Enum Price Amount Type, Boolean, Integer, Record Purchase Line, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnAfterIsPriceUpdateNeeded(AmountType: Enum "Price Amount Type"; FoundPrice: Boolean; CalledByFieldNo: Integer; PurchaseLine: Record "Purchase Line"; var Result: Boolean; IsSKU: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLinePrice", 'OnAfterIsPriceUpdateNeeded', '', false, false)]
local procedure DoSomethingOnAfterIsPriceUpdateNeeded(AmountType: Enum "Price Amount Type"; FoundPrice: Boolean; CalledByFieldNo: Integer; PurchaseLine: Record "Purchase Line"; var Result: Boolean; IsSKU: Boolean)
begin
end;

OnAfterValidatePrice(Record Purchase Line, Enum Price Type, Enum Price Amount Type, Record Purchase Header) :#

[IntegrationEvent(false, false)]
local procedure OnAfterValidatePrice(var PurchaseLine: Record "Purchase Line"; CurrPriceType: Enum "Price Type"; AmountType: Enum "Price Amount Type"; var PurchaseHeader: Record "Purchase Header"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLinePrice", 'OnAfterValidatePrice', '', false, false)]
local procedure DoSomethingOnAfterValidatePrice(var PurchaseLine: Record "Purchase Line"; CurrPriceType: Enum "Price Type"; AmountType: Enum "Price Amount Type"; var PurchaseHeader: Record "Purchase Header")
begin
end;

OnBeforeVerify(Record Purchase Header, Record Purchase Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeVerify(PurchaseHeader: Record "Purchase Header"; PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLinePrice", 'OnBeforeVerify', '', false, false)]
local procedure DoSomethingOnBeforeVerify(PurchaseHeader: Record "Purchase Header"; PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;

OnAfterSetPrice(Record Purchase Line, Record Price List Line, Enum Price Amount Type) :#

[IntegrationEvent(false, false)]
local procedure OnAfterSetPrice(var PurchaseLine: Record "Purchase Line"; PriceListLine: Record "Price List Line"; AmountType: Enum "Price Amount Type"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLinePrice", 'OnAfterSetPrice', '', false, false)]
local procedure DoSomethingOnAfterSetPrice(var PurchaseLine: Record "Purchase Line"; PriceListLine: Record "Price List Line"; AmountType: Enum "Price Amount Type")
begin
end;

OnAfterUpdate(Record Purchase Line, Enum Price Type, Enum Price Amount Type, Record Purchase Header) :#

[IntegrationEvent(false, false)]
local procedure OnAfterUpdate(var PurchaseLine: Record "Purchase Line"; CurrPriceType: Enum "Price Type"; AmountType: Enum "Price Amount Type"; var PurchaseHeader: Record "Purchase Header"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLinePrice", 'OnAfterUpdate', '', false, false)]
local procedure DoSomethingOnAfterUpdate(var PurchaseLine: Record "Purchase Line"; CurrPriceType: Enum "Price Type"; AmountType: Enum "Price Amount Type"; var PurchaseHeader: Record "Purchase Header")
begin
end;

KVSKBAOnGetVendNoForPurchaseHeader(Record Purchase Header, Code[20]) :#

[IntegrationEvent(false, false)]
local procedure KVSKBAOnGetVendNoForPurchaseHeader(var PurchaseHeader: Record "Purchase Header"; var VendorNo: Code[20]): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLinePrice", 'KVSKBAOnGetVendNoForPurchaseHeader', '', false, false)]
local procedure DoSomethingKVSKBAOnGetVendNoForPurchaseHeader(var PurchaseHeader: Record "Purchase Header"; var VendorNo: Code[20])
begin
end;

KVSKBAOnGetContactNoForPurchaseHeader(Record Purchase Header, Code[20]) :#

[IntegrationEvent(false, false)]
local procedure KVSKBAOnGetContactNoForPurchaseHeader(var PurchaseHeader: Record "Purchase Header"; var ContactNo: Code[20]): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLinePrice", 'KVSKBAOnGetContactNoForPurchaseHeader', '', false, false)]
local procedure DoSomethingKVSKBAOnGetContactNoForPurchaseHeader(var PurchaseHeader: Record "Purchase Header"; var ContactNo: Code[20])
begin
end;

OnSetPriceOriginFromPriceListLineOnBeforePriceListLineTypeCaseElse(Record Purchase Line, Record Price List Line, Enum Price Amount Type) :#

[IntegrationEvent(false, false)]
local procedure OnSetPriceOriginFromPriceListLineOnBeforePriceListLineTypeCaseElse(var PurchaseLine: Record "Purchase Line"; PriceListLine: Record "Price List Line"; AmountType: Enum "Price Amount Type"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAPurchaseLinePrice", 'OnSetPriceOriginFromPriceListLineOnBeforePriceListLineTypeCaseElse', '', false, false)]
local procedure DoSomethingOnSetPriceOriginFromPriceListLineOnBeforePriceListLineTypeCaseElse(var PurchaseLine: Record "Purchase Line"; PriceListLine: Record "Price List Line"; AmountType: Enum "Price Amount Type")
begin
end;