Skip to content

KVSKBACreatePurchaseOrderKFW#

Procedures#

DefDropShpt() :#

Summary: Set's the Global Order Type to "Drop Shipment"

procedure DefDropShpt(): 

DefSpecialOrder() :#

Summary: Set's the Global Order Type to "Special Order"

procedure DefSpecialOrder(): 

DefSales() :#

Summary: Set's the Global Order Type to "Sales"

procedure DefSales(): 

DefService() :#

Summary: Set's the Global Order Type to "Service"

procedure DefService(): 

DefOrderNo(Code[20]) :#

Summary: Set's the Global Order No.

procedure DefOrderNo(NewOrderNo: Code[20]): 

Parameters:

  • NewOrderNo: Order No. to set

DefOrderNo(Code[20], Integer) :#

Summary: Set's the Global Order No.

procedure DefOrderNo(NewOrderNo: Code[20]; NewLineNo: Integer): 

Parameters:

  • NewOrderNo: Order No. to set
  • NewLineNo: Line No. to set

GetVendorNo() :#

procedure GetVendorNo(): 

GetVendorNos() :#

procedure GetVendorNos(): 

Events#

OnBeforeSalesHeaderOnAfterGetRecord(Record Sales Header, Option, Code[20], Code[20], Boolean, List, Boolean, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeSalesHeaderOnAfterGetRecord(var SalesHeader: Record "Sales Header"; var OrderType: Option; var OrderNo: Code[20]; var VendorNo: Code[20]; var SkipStandardCode: Boolean; var VendorNoList: List; var MultipleVendors: Boolean; var VendorwithNoItemNoExist: Boolean; var SelectOneVendor: Boolean): 
[EventSubscriber(ObjectType::Report, Report::"KVSKBACreatePurchaseOrderKFW", 'OnBeforeSalesHeaderOnAfterGetRecord', '', false, false)]
local procedure DoSomethingOnBeforeSalesHeaderOnAfterGetRecord(var SalesHeader: Record "Sales Header"; var OrderType: Option; var OrderNo: Code[20]; var VendorNo: Code[20]; var SkipStandardCode: Boolean; var VendorNoList: List; var MultipleVendors: Boolean; var VendorwithNoItemNoExist: Boolean; var SelectOneVendor: Boolean)
begin
end;

OnBeforeSetNoteText(Text, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeSetNoteText(var NoteText: Text; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Report, Report::"KVSKBACreatePurchaseOrderKFW", 'OnBeforeSetNoteText', '', false, false)]
local procedure DoSomethingOnBeforeSetNoteText(var NoteText: Text; var IsHandled: Boolean)
begin
end;

OnBeforeSetFilterSalesLines(Record Sales Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeSetFilterSalesLines(var SalesLine: Record "Sales Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Report, Report::"KVSKBACreatePurchaseOrderKFW", 'OnBeforeSetFilterSalesLines', '', false, false)]
local procedure DoSomethingOnBeforeSetFilterSalesLines(var SalesLine: Record "Sales Line"; var IsHandled: Boolean)
begin
end;

OnBeforeFindSalesLines(Record Sales Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeFindSalesLines(var SalesLine: Record "Sales Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Report, Report::"KVSKBACreatePurchaseOrderKFW", 'OnBeforeFindSalesLines', '', false, false)]
local procedure DoSomethingOnBeforeFindSalesLines(var SalesLine: Record "Sales Line"; var IsHandled: Boolean)
begin
end;

OnBeforeGetItemVendorNo(Record Sales Line, Code[20], Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeGetItemVendorNo(SalesLine: Record "Sales Line"; var ItemVendorNo: Code[20]; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Report, Report::"KVSKBACreatePurchaseOrderKFW", 'OnBeforeGetItemVendorNo', '', false, false)]
local procedure DoSomethingOnBeforeGetItemVendorNo(SalesLine: Record "Sales Line"; var ItemVendorNo: Code[20]; var IsHandled: Boolean)
begin
end;

OnBeforeGetVendorNo(Code[20], Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeGetVendorNo(var MainVendorNo: Code[20]; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Report, Report::"KVSKBACreatePurchaseOrderKFW", 'OnBeforeGetVendorNo', '', false, false)]
local procedure DoSomethingOnBeforeGetVendorNo(var MainVendorNo: Code[20]; var IsHandled: Boolean)
begin
end;

OnBeforeGetVendorNos(Boolean, Boolean, Boolean, List, Code[20], Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeGetVendorNos(var MultipleVendors: Boolean; var SelectOneVendor: Boolean; var VendorwithNoItemNoExist: Boolean; var VendorNoList: List; var MainVendorNo: Code[20]; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Report, Report::"KVSKBACreatePurchaseOrderKFW", 'OnBeforeGetVendorNos', '', false, false)]
local procedure DoSomethingOnBeforeGetVendorNos(var MultipleVendors: Boolean; var SelectOneVendor: Boolean; var VendorwithNoItemNoExist: Boolean; var VendorNoList: List; var MainVendorNo: Code[20]; var IsHandled: Boolean)
begin
end;

OnBeforeServiceHeaderOnAfterGetRecord(Record Service Header, Option, Code[20], Integer, Code[20], Boolean, List, Boolean, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeServiceHeaderOnAfterGetRecord(ServiceHeader: Record "Service Header"; GlobalOrderType: Option; OrderNo: Code[20]; LineNo: Integer; MainVendorNo: Code[20]; var IsHandled: Boolean; VendorNoList: List; MultipleVendors: Boolean; VendorwithNoItemNoExist: Boolean; SelectOneVendor: Boolean): 
[EventSubscriber(ObjectType::Report, Report::"KVSKBACreatePurchaseOrderKFW", 'OnBeforeServiceHeaderOnAfterGetRecord', '', false, false)]
local procedure DoSomethingOnBeforeServiceHeaderOnAfterGetRecord(ServiceHeader: Record "Service Header"; GlobalOrderType: Option; OrderNo: Code[20]; LineNo: Integer; MainVendorNo: Code[20]; var IsHandled: Boolean; VendorNoList: List; MultipleVendors: Boolean; VendorwithNoItemNoExist: Boolean; SelectOneVendor: Boolean)
begin
end;

OnBeforeSetFilterServiceLines(Record Service Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeSetFilterServiceLines(var ServiceLine: Record "Service Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Report, Report::"KVSKBACreatePurchaseOrderKFW", 'OnBeforeSetFilterServiceLines', '', false, false)]
local procedure DoSomethingOnBeforeSetFilterServiceLines(var ServiceLine: Record "Service Line"; var IsHandled: Boolean)
begin
end;

OnBeforeFindServiceLines(Record Service Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeFindServiceLines(var ServiceLine: Record "Service Line"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Report, Report::"KVSKBACreatePurchaseOrderKFW", 'OnBeforeFindServiceLines', '', false, false)]
local procedure DoSomethingOnBeforeFindServiceLines(var ServiceLine: Record "Service Line"; var IsHandled: Boolean)
begin
end;

OnBeforeGetItemVendorNoService(Record Service Line, Code[20], Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeGetItemVendorNoService(ServiceLine: Record "Service Line"; var ItemVendorNo: Code[20]; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Report, Report::"KVSKBACreatePurchaseOrderKFW", 'OnBeforeGetItemVendorNoService', '', false, false)]
local procedure DoSomethingOnBeforeGetItemVendorNoService(ServiceLine: Record "Service Line"; var ItemVendorNo: Code[20]; var IsHandled: Boolean)
begin
end;

OnBeforeGetItemVendorNoItemNo(Code[20], Code[20], Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeGetItemVendorNoItemNo(ItemNo: Code[20]; var ItemVendorNo: Code[20]; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Report, Report::"KVSKBACreatePurchaseOrderKFW", 'OnBeforeGetItemVendorNoItemNo', '', false, false)]
local procedure DoSomethingOnBeforeGetItemVendorNoItemNo(ItemNo: Code[20]; var ItemVendorNo: Code[20]; var IsHandled: Boolean)
begin
end;