Skip to content

KVSFCYCopyProdOrderDocument#

Procedures#

SetProdOrder(Record Production Order) :#

procedure SetProdOrder(var NewProdOrder: Record "Production Order"):

SetFromDocument(Option, Code[20]) :#

procedure SetFromDocument(statusPar: Option; docNoPar: Code[20]):

SetOtherGlobals(Boolean, Option) :#

procedure SetOtherGlobals(includeHeaderPar: Boolean; directionPar: Option):

Events#

OnAfterCopyProdLines(Record Prod. Order Line, Record Prod. Order Line, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnAfterCopyProdLines(var ToProdOrderLine: Record "Prod. Order Line"; FromProdOrderLine: Record "Prod. Order Line"; IncludeHeader: Boolean): 

[EventSubscriber(ObjectType::Report, Report::"KVSFCYCopyProdOrderDocument", 'OnAfterCopyProdLines', '', false, false)]
local procedure DoSomethingOnAfterCopyProdLines(var ToProdOrderLine: Record "Prod. Order Line"; FromProdOrderLine: Record "Prod. Order Line"; IncludeHeader: Boolean)
begin
end;

OnBeforeToProdOrderModify(Record Production Order, Record Production Order) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeToProdOrderModify(var ToProdOrder: Record "Production Order"; FromProdOrder: Record "Production Order"): 

[EventSubscriber(ObjectType::Report, Report::"KVSFCYCopyProdOrderDocument", 'OnBeforeToProdOrderModify', '', false, false)]
local procedure DoSomethingOnBeforeToProdOrderModify(var ToProdOrder: Record "Production Order"; FromProdOrder: Record "Production Order")
begin
end;

OnBeforeToProdOrderLineInsert(Record Prod. Order Line, Record Prod. Order Line) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeToProdOrderLineInsert(var ToProdOrderLine: Record "Prod. Order Line"; FromProdOrderLine: Record "Prod. Order Line"): 

[EventSubscriber(ObjectType::Report, Report::"KVSFCYCopyProdOrderDocument", 'OnBeforeToProdOrderLineInsert', '', false, false)]
local procedure DoSomethingOnBeforeToProdOrderLineInsert(var ToProdOrderLine: Record "Prod. Order Line"; FromProdOrderLine: Record "Prod. Order Line")
begin
end;

OnBeforeToProdOrderCompItemValidate(Record Prod. Order Component, Record Prod. Order Component) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeToProdOrderCompItemValidate(var ToProdOrderComp: Record "Prod. Order Component"; FromProdOrderComp: Record "Prod. Order Component"): 

[EventSubscriber(ObjectType::Report, Report::"KVSFCYCopyProdOrderDocument", 'OnBeforeToProdOrderCompItemValidate', '', false, false)]
local procedure DoSomethingOnBeforeToProdOrderCompItemValidate(var ToProdOrderComp: Record "Prod. Order Component"; FromProdOrderComp: Record "Prod. Order Component")
begin
end;

OnBeforeToProdOrderCompModify(Record Prod. Order Component, Record Prod. Order Component) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeToProdOrderCompModify(var ToProdOrderComp: Record "Prod. Order Component"; FromProdOrderComp: Record "Prod. Order Component"): 

[EventSubscriber(ObjectType::Report, Report::"KVSFCYCopyProdOrderDocument", 'OnBeforeToProdOrderCompModify', '', false, false)]
local procedure DoSomethingOnBeforeToProdOrderCompModify(var ToProdOrderComp: Record "Prod. Order Component"; FromProdOrderComp: Record "Prod. Order Component")
begin
end;

OnAfterToProdOrderCompModify(Record Prod. Order Component, Record Prod. Order Component) :#

[IntegrationEvent(false, false)]
local procedure OnAfterToProdOrderCompModify(var ToProdOrderComp: Record "Prod. Order Component"; FromProdOrderComp: Record "Prod. Order Component"): 

[EventSubscriber(ObjectType::Report, Report::"KVSFCYCopyProdOrderDocument", 'OnAfterToProdOrderCompModify', '', false, false)]
local procedure DoSomethingOnAfterToProdOrderCompModify(var ToProdOrderComp: Record "Prod. Order Component"; FromProdOrderComp: Record "Prod. Order Component")
begin
end;

OnBeforeToProdOrderRtngLineModify(Record Prod. Order Routing Line, Record Prod. Order Routing Line) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeToProdOrderRtngLineModify(var ToProdOrderRtngLine: Record "Prod. Order Routing Line"; FromProdOrderRtngLine: Record "Prod. Order Routing Line"): 

[EventSubscriber(ObjectType::Report, Report::"KVSFCYCopyProdOrderDocument", 'OnBeforeToProdOrderRtngLineModify', '', false, false)]
local procedure DoSomethingOnBeforeToProdOrderRtngLineModify(var ToProdOrderRtngLine: Record "Prod. Order Routing Line"; FromProdOrderRtngLine: Record "Prod. Order Routing Line")
begin
end;

OnAfterToProdOrderRtngLineModify(Record Prod. Order Routing Line, Record Prod. Order Routing Line) :#

[IntegrationEvent(false, false)]
local procedure OnAfterToProdOrderRtngLineModify(var ToProdOrderRtngLine: Record "Prod. Order Routing Line"; FromProdOrderRtngLine: Record "Prod. Order Routing Line"): 

[EventSubscriber(ObjectType::Report, Report::"KVSFCYCopyProdOrderDocument", 'OnAfterToProdOrderRtngLineModify', '', false, false)]
local procedure DoSomethingOnAfterToProdOrderRtngLineModify(var ToProdOrderRtngLine: Record "Prod. Order Routing Line"; FromProdOrderRtngLine: Record "Prod. Order Routing Line")
begin
end;