Skip to content

KVSKBAPriceComparsionList#

Procedures#

SetItemNoVariantCode(Record Item, Code[10]) :#

procedure SetItemNoVariantCode(NewItem: Record "Item"; NewVariantCode: Code[10]): 

Events#

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

[IntegrationEvent(false, false)]
local procedure OnBeforeChangeContactToVendor(var PurchaseLine: Record "Purchase Line"; var HaveChanged: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSKBAPriceComparsionList", 'OnBeforeChangeContactToVendor', '', false, false)]
local procedure DoSomethingOnBeforeChangeContactToVendor(var PurchaseLine: Record "Purchase Line"; var HaveChanged: Boolean; var IsHandled: Boolean)
begin
end;

OnBeforeTransferInToItemVendors(Record Purchase Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeTransferInToItemVendors(var PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSKBAPriceComparsionList", 'OnBeforeTransferInToItemVendors', '', false, false)]
local procedure DoSomethingOnBeforeTransferInToItemVendors(var PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;

OnTransferInToItemVendorsOnBeforeInsertItemVendor(Record Purchase Line, Record Item Vendor) :#

[IntegrationEvent(false, false)]
local procedure OnTransferInToItemVendorsOnBeforeInsertItemVendor(var PurchaseLine: Record "Purchase Line"; var ItemVendor: Record "Item Vendor"): 
[EventSubscriber(ObjectType::Page, Page::"KVSKBAPriceComparsionList", 'OnTransferInToItemVendorsOnBeforeInsertItemVendor', '', false, false)]
local procedure DoSomethingOnTransferInToItemVendorsOnBeforeInsertItemVendor(var PurchaseLine: Record "Purchase Line"; var ItemVendor: Record "Item Vendor")
begin
end;

OnBeforeTransferInToPurchPrices(Record Purchase Line, Boolean) :#

Obsolete

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

[Obsolete('This Publisher is no longer used for the new Price Calculation because changed functionality, please used  OnBeforeSavePriceAndDiscount', '23.0')]
[IntegrationEvent(false, false)]
local procedure OnBeforeTransferInToPurchPrices(var PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSKBAPriceComparsionList", 'OnBeforeTransferInToPurchPrices', '', false, false)]
local procedure DoSomethingOnBeforeTransferInToPurchPrices(var PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;

OnTransferInToPurchPricesOnBeforeInsertPurchasePrice(Record Purchase Line, Record KVSKBAPurchasePrice) :#

Obsolete

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

[Obsolete('The price calculation needs a redesign due to the standard changes, possibly the Action will not be available in the future', '22.3')]
[IntegrationEvent(false, false)]
local procedure OnTransferInToPurchPricesOnBeforeInsertPurchasePrice(var PurchaseLine: Record "Purchase Line"; var PurchasePrice: Record "KVSKBAPurchasePrice"): 
[EventSubscriber(ObjectType::Page, Page::"KVSKBAPriceComparsionList", 'OnTransferInToPurchPricesOnBeforeInsertPurchasePrice', '', false, false)]
local procedure DoSomethingOnTransferInToPurchPricesOnBeforeInsertPurchasePrice(var PurchaseLine: Record "Purchase Line"; var PurchasePrice: Record "KVSKBAPurchasePrice")
begin
end;

OnBeforeSavePurchasePrice(Record Purchase Line, Boolean) :#

Obsolete

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

[Obsolete('This Publisher is no longer used because changed functionality, please used  OnBeforeSavePriceAndDiscount', '23.0')]
[IntegrationEvent(false, false)]
local procedure OnBeforeSavePurchasePrice(var PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSKBAPriceComparsionList", 'OnBeforeSavePurchasePrice', '', false, false)]
local procedure DoSomethingOnBeforeSavePurchasePrice(var PurchaseLine: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;

OnSavePurchasePriceOnBeforeInsert(Record Purchase Line, Record Price List Line) :#

Obsolete

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

[Obsolete('This Publisher is no longer used because changed functionality, please used  OnBeforeSavePriceAndDiscount', '23.0')]
[IntegrationEvent(false, false)]
local procedure OnSavePurchasePriceOnBeforeInsert(var PurchaseLine: Record "Purchase Line"; var PriceListLine: Record "Price List Line"): 
[EventSubscriber(ObjectType::Page, Page::"KVSKBAPriceComparsionList", 'OnSavePurchasePriceOnBeforeInsert', '', false, false)]
local procedure DoSomethingOnSavePurchasePriceOnBeforeInsert(var PurchaseLine: Record "Purchase Line"; var PriceListLine: Record "Price List Line")
begin
end;

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

[IntegrationEvent(false, false)]
local procedure OnBeforeSavePriceAndDiscount(CurrentPurchaseLine: Record "Purchase Line"; var SelectedPurchaseLine: Record "Purchase Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Page, Page::"KVSKBAPriceComparsionList", 'OnBeforeSavePriceAndDiscount', '', false, false)]
local procedure DoSomethingOnBeforeSavePriceAndDiscount(CurrentPurchaseLine: Record "Purchase Line"; var SelectedPurchaseLine: Record "Purchase Line"; var IsHandled: Boolean)
begin
end;