Skip to content

KVSEDX-CC Purchase Order Exp.#

Events#

OnGetUserSetup_FullName(Code[50], Text[80], Boolean) :#

[IntegrationEvent(true, false)]
local procedure OnGetUserSetup_FullName(UserIDPar: Code[50]; var FullNameVar: Text[80]; var HandledVar: Boolean): 

[EventSubscriber(ObjectType::XmlPort, XmlPort::"KVSEDX-CC Purchase Order Exp.", 'OnGetUserSetup_FullName', '', false, false)]
local procedure DoSomethingOnGetUserSetup_FullName(UserIDPar: Code[50]; var FullNameVar: Text[80]; var HandledVar: Boolean)
begin
end;

OnGetPurchaseLine_Direct_Unit_Cost_Price_Unit(Record Purchase Line, Decimal, Boolean) :#

[IntegrationEvent(true, false)]
local procedure OnGetPurchaseLine_Direct_Unit_Cost_Price_Unit(PurchaseLinePar: Record "Purchase Line"; var DirectUnitCostPriceUnitVar: Decimal; var HandledVar: Boolean): 

[EventSubscriber(ObjectType::XmlPort, XmlPort::"KVSEDX-CC Purchase Order Exp.", 'OnGetPurchaseLine_Direct_Unit_Cost_Price_Unit', '', false, false)]
local procedure DoSomethingOnGetPurchaseLine_Direct_Unit_Cost_Price_Unit(PurchaseLinePar: Record "Purchase Line"; var DirectUnitCostPriceUnitVar: Decimal; var HandledVar: Boolean)
begin
end;

OnGetPurchaseLine_Price_Unit(Record Purchase Line, Decimal, Boolean) :#

[IntegrationEvent(true, false)]
local procedure OnGetPurchaseLine_Price_Unit(PurchaseLinePar: Record "Purchase Line"; var PriceUnitVar: Decimal; var HandledVar: Boolean): 

[EventSubscriber(ObjectType::XmlPort, XmlPort::"KVSEDX-CC Purchase Order Exp.", 'OnGetPurchaseLine_Price_Unit', '', false, false)]
local procedure DoSomethingOnGetPurchaseLine_Price_Unit(PurchaseLinePar: Record "Purchase Line"; var PriceUnitVar: Decimal; var HandledVar: Boolean)
begin
end;

OnGetItem_Inventory_Multiple(Record Item, Decimal, Boolean) :#

[IntegrationEvent(true, false)]
local procedure OnGetItem_Inventory_Multiple(ItemPar: Record "Item"; var InventoryMultipleVar: Decimal; var HandledVar: Boolean): 

[EventSubscriber(ObjectType::XmlPort, XmlPort::"KVSEDX-CC Purchase Order Exp.", 'OnGetItem_Inventory_Multiple', '', false, false)]
local procedure DoSomethingOnGetItem_Inventory_Multiple(ItemPar: Record "Item"; var InventoryMultipleVar: Decimal; var HandledVar: Boolean)
begin
end;

OnPreXMLItemHeaderData(Record Purchase Header, Record KVSEDX Outbound, Boolean) :#

[IntegrationEvent(true, false)]
local procedure OnPreXMLItemHeaderData(PurchHeaderPar: Record "Purchase Header"; var TempBlobVar: Record "KVSEDX Outbound" temporary; var HandledVar: Boolean): 

[EventSubscriber(ObjectType::XmlPort, XmlPort::"KVSEDX-CC Purchase Order Exp.", 'OnPreXMLItemHeaderData', '', false, false)]
local procedure DoSomethingOnPreXMLItemHeaderData(PurchHeaderPar: Record "Purchase Header"; var TempBlobVar: Record "KVSEDX Outbound" temporary; var HandledVar: Boolean)
begin
end;

OnPreXMLItemLineData(Record Purchase Line, Record KVSEDX Outbound, Boolean) :#

[IntegrationEvent(true, false)]
local procedure OnPreXMLItemLineData(PurchLinePar: Record "Purchase Line"; var TempBlobVar: Record "KVSEDX Outbound" temporary; var HandledVar: Boolean): 

[EventSubscriber(ObjectType::XmlPort, XmlPort::"KVSEDX-CC Purchase Order Exp.", 'OnPreXMLItemLineData', '', false, false)]
local procedure DoSomethingOnPreXMLItemLineData(PurchLinePar: Record "Purchase Line"; var TempBlobVar: Record "KVSEDX Outbound" temporary; var HandledVar: Boolean)
begin
end;

OnBeforeGetGTIN(Record Purchase Line, Text, Boolean) :#

[IntegrationEvent(true, false)]
local procedure OnBeforeGetGTIN(PurchaseLine: Record "Purchase Line"; var GTIN: Text; var Handled: Boolean): 

[EventSubscriber(ObjectType::XmlPort, XmlPort::"KVSEDX-CC Purchase Order Exp.", 'OnBeforeGetGTIN', '', false, false)]
local procedure DoSomethingOnBeforeGetGTIN(PurchaseLine: Record "Purchase Line"; var GTIN: Text; var Handled: Boolean)
begin
end;

OnBeforeGetEAN(Record Purchase Line, Text, Boolean) :#

[IntegrationEvent(true, false)]
local procedure OnBeforeGetEAN(PurchaseLine: Record "Purchase Line"; var EAN: Text; var Handled: Boolean): 

[EventSubscriber(ObjectType::XmlPort, XmlPort::"KVSEDX-CC Purchase Order Exp.", 'OnBeforeGetEAN', '', false, false)]
local procedure DoSomethingOnBeforeGetEAN(PurchaseLine: Record "Purchase Line"; var EAN: Text; var Handled: Boolean)
begin
end;

OnAfterGetRecordCompanyInformation(Record Purchase Header, Record Company Information, Boolean) :#

Summary: The event can be used to overwrite the information from the sender element.

[IntegrationEvent(true, false)]
local procedure OnAfterGetRecordCompanyInformation(PurchaseHeader: Record "Purchase Header"; var CompanyInformation: Record "Company Information"; var Handled: Boolean): 

[EventSubscriber(ObjectType::XmlPort, XmlPort::"KVSEDX-CC Purchase Order Exp.", 'OnAfterGetRecordCompanyInformation', '', false, false)]
local procedure DoSomethingOnAfterGetRecordCompanyInformation(PurchaseHeader: Record "Purchase Header"; var CompanyInformation: Record "Company Information"; var Handled: Boolean)
begin
end;

Parameters:

  • PurchaseHeader: Current Purchase Header
  • CompanyInformation: Company Information record which can be overwritten
  • Handled: True if handled in event subscriber