KVSKBARequisitionLib#
Procedures#
ResetBlanketOrderData(Record Requisition Line) :#
Summary: This function reset the blanket order datas at the requisition line
procedure ResetBlanketOrderData(var CurrentRequisitionLine: Record "Requisition Line"):
Parameters:
CurrentRequisitionLine: Requisition line, in which the values are to be reset
GetAssignedBlanketOrderQty(Record Requisition Line, Code[20], Integer) : Decimal#
Summary: This function give back the qty. base of already assigend qty. of the blanket order line
procedure GetAssignedBlanketOrderQty(CurrentRequisitionLine: Record "Requisition Line"; SearchBlanketOrderNo: Code[20]; SearchBlanketOrderLineNo: Integer): Decimal
Parameters:
CurrentRequisitionLine: Requisition line from where is searched is not taken into account when determining the ReturnValueSearchBlanketOrderNo: Blanket order number to be searched withSearchBlanketOrderLineNo: Blanket order line number to be searched wit
Returns: ReturnValue as Decimal
AssignBlanketOrdersToReqLines(Record Requisition Line, Option) :#
Summary: Assign to the requisition lines possible blanket order lines If the qty. of the requisition lines is greatet than the blanket order line, it will splitt the requisition lines
procedure AssignBlanketOrdersToReqLines(var RequisitionLine: Record "Requisition Line"; AssignmentMethod: Option):
Parameters:
RequisitionLine: Requisition line, in which the values are to be setAssignmentMethod: how should be assigned: assign,reassign,delete
VerifyQtyToBlanketOrderQty(Record Requisition Line) :#
Summary: this function checks each modification of the quantity, if the actual outstanding qty of the blanket order is enough
procedure VerifyQtyToBlanketOrderQty(var RequisitionLine: Record "Requisition Line"):
Parameters:
RequisitionLine: Requisition line, in which the values are to be check
NextBlanketOrderNo(Record Requisition Line, Boolean) : Boolean#
Summary: This function returns yes, if blanket order no. or blanket order line no. changed on checkReqLine
procedure NextBlanketOrderNo(RequisitionLine: Record "Requisition Line"; SetPreviousValues: Boolean): Boolean
Parameters:
RequisitionLine: Requisition line, in which the values are to be checkSetPreviousValues: Defines the blanket order data to be saved in the codeunit
Returns: Boolean
TransferFromReqLineToPurchLine(Record Purchase Line, Record Requisition Line) :#
Summary: this function handle additional fields to tranfered form requisition Line to purchase line
procedure TransferFromReqLineToPurchLine(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line"):
Parameters:
PurchaseLine: Purchase Line, in which data is to be writtenRequisitionLine: Requisition Line, from which the data is to be taken
SplitReqLine(Record Requisition Line, Decimal) :#
Summary: this function splitts a requisition Line to the new requisition Line about the split quantity
procedure SplitReqLine(var OriginalRequisitionLine: Record "Requisition Line"; SplitQuantityBase: Decimal):
Parameters:
OriginalRequisitionLine: Requisition Line, original line from which a split line is to be createdSplitQuantityBase: Quantity (Base), which is to be split
OnDeleteReqLine(Record Requisition Line) :#
Summary: Delete further data records when the requisition line is deleted
procedure OnDeleteReqLine(RequisitionLine: Record "Requisition Line"):
Parameters:
RequisitionLine: Requisition Line, which is deleted
TransferFromReqLineToProdOrder(Record Production Order, Record Requisition Line) :#
Summary: This function transfers additional values from the Requisition Line to a new created Production Order
procedure TransferFromReqLineToProdOrder(var ProductionOrder: Record "Production Order"; RequisitionLine: Record "Requisition Line"):
Parameters:
ProductionOrder: Production Order, in which the values are to be setRequisitionLine: Requisition Line, from which the data is to be take
CalcNoOfPurchasePrices(Record Requisition Line) : Integer#
procedure CalcNoOfPurchasePrices(var RequisitionLine: Record "Requisition Line"): Integer
CalcNoOfRequisitionLineDisc(Record Requisition Line) : Integer#
procedure CalcNoOfRequisitionLineDisc(var RequisitionLine: Record "Requisition Line"): Integer
Events#
OnBeforeAssignBlanketOrdersToReqLines(Record Requisition Line, Option, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeAssignBlanketOrdersToReqLines(var RequisitionLine: Record "Requisition Line"; AssignmentMethod: Option; var HandledLoc: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnBeforeAssignBlanketOrdersToReqLines', '', false, false)]
local procedure DoSomethingOnBeforeAssignBlanketOrdersToReqLines(var RequisitionLine: Record "Requisition Line"; AssignmentMethod: Option; var HandledLoc: Boolean)
begin
end;
OnAssignBlanketOrdersToReqLinesOnAfterSetCurrentKey(Record Purchase Line, Record Requisition Line, Option) :#
[IntegrationEvent(false, false)]
local procedure OnAssignBlanketOrdersToReqLinesOnAfterSetCurrentKey(var PurchaseLine: Record "Purchase Line"; RequisitionLine: Record "Requisition Line"; AssignmentMethod: Option):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnAssignBlanketOrdersToReqLinesOnAfterSetCurrentKey', '', false, false)]
local procedure DoSomethingOnAssignBlanketOrdersToReqLinesOnAfterSetCurrentKey(var PurchaseLine: Record "Purchase Line"; RequisitionLine: Record "Requisition Line"; AssignmentMethod: Option)
begin
end;
OnDrillDownBlanketOrderLinesOnSetFilterBlanketPurchLine(Record Purchase Line, Record Requisition Line) :#
[IntegrationEvent(false, false)]
local procedure OnDrillDownBlanketOrderLinesOnSetFilterBlanketPurchLine(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnDrillDownBlanketOrderLinesOnSetFilterBlanketPurchLine', '', false, false)]
local procedure DoSomethingOnDrillDownBlanketOrderLinesOnSetFilterBlanketPurchLine(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line")
begin
end;
OnLookupBlanketOrderLinesOnSetFilterBlanketPurchLine(Record Purchase Line, Record Requisition Line) :#
[IntegrationEvent(false, false)]
local procedure OnLookupBlanketOrderLinesOnSetFilterBlanketPurchLine(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnLookupBlanketOrderLinesOnSetFilterBlanketPurchLine', '', false, false)]
local procedure DoSomethingOnLookupBlanketOrderLinesOnSetFilterBlanketPurchLine(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line")
begin
end;
OnLookupBlanketOrderLinesOnBeforeAssignBlanketOrderValues(Record Purchase Line, Record Requisition Line) :#
[IntegrationEvent(false, false)]
local procedure OnLookupBlanketOrderLinesOnBeforeAssignBlanketOrderValues(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnLookupBlanketOrderLinesOnBeforeAssignBlanketOrderValues', '', false, false)]
local procedure DoSomethingOnLookupBlanketOrderLinesOnBeforeAssignBlanketOrderValues(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line")
begin
end;
OnSplitReqLineOnAfterNewSplittReqLineModify(Record Requisition Line, Record Requisition Line, Decimal) :#
[IntegrationEvent(false, false)]
local procedure OnSplitReqLineOnAfterNewSplittReqLineModify(var NewRequisitionLine: Record "Requisition Line"; var OrigRequisitionLine: Record "Requisition Line"; SplittQtyBase: Decimal):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnSplitReqLineOnAfterNewSplittReqLineModify', '', false, false)]
local procedure DoSomethingOnSplitReqLineOnAfterNewSplittReqLineModify(var NewRequisitionLine: Record "Requisition Line"; var OrigRequisitionLine: Record "Requisition Line"; SplittQtyBase: Decimal)
begin
end;
OnSplitReqLineOnBeforeNewSplittReqLineModify(Record Requisition Line, Record Requisition Line, Decimal) :#
[IntegrationEvent(false, false)]
local procedure OnSplitReqLineOnBeforeNewSplittReqLineModify(var NewRequisitionLine: Record "Requisition Line"; var OrigRequisitionLine: Record "Requisition Line"; SplittQtyBase: Decimal):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnSplitReqLineOnBeforeNewSplittReqLineModify', '', false, false)]
local procedure DoSomethingOnSplitReqLineOnBeforeNewSplittReqLineModify(var NewRequisitionLine: Record "Requisition Line"; var OrigRequisitionLine: Record "Requisition Line"; SplittQtyBase: Decimal)
begin
end;
OnTransferFromReqLineToPurchLineOnAssignValuestoPurchLine(Record Purchase Line, Record Requisition Line) :#
[IntegrationEvent(false, false)]
local procedure OnTransferFromReqLineToPurchLineOnAssignValuestoPurchLine(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnTransferFromReqLineToPurchLineOnAssignValuestoPurchLine', '', false, false)]
local procedure DoSomethingOnTransferFromReqLineToPurchLineOnAssignValuestoPurchLine(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line")
begin
end;
OnBeforeAssignBlanketPurchLine(Record Purchase Line, Record Requisition Line) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeAssignBlanketPurchLine(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnBeforeAssignBlanketPurchLine', '', false, false)]
local procedure DoSomethingOnBeforeAssignBlanketPurchLine(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line")
begin
end;
OnAfterAssignBlanketPurchLine(Record Purchase Line, Record Requisition Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterAssignBlanketPurchLine(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnAfterAssignBlanketPurchLine', '', false, false)]
local procedure DoSomethingOnAfterAssignBlanketPurchLine(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line")
begin
end;
OnBeforeVerifyQtyToBlanketOrderQty(Record Purchase Line, Record Requisition Line) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeVerifyQtyToBlanketOrderQty(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnBeforeVerifyQtyToBlanketOrderQty', '', false, false)]
local procedure DoSomethingOnBeforeVerifyQtyToBlanketOrderQty(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line")
begin
end;
OnVerifyQtyToBlanketOrderQtyOnAfterCalculateRemainingBlanketOrderQty(Record Purchase Line, Record Requisition Line, Decimal) :#
[IntegrationEvent(false, false)]
local procedure OnVerifyQtyToBlanketOrderQtyOnAfterCalculateRemainingBlanketOrderQty(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line"; var RemainingBlanketOrderQty: Decimal):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnVerifyQtyToBlanketOrderQtyOnAfterCalculateRemainingBlanketOrderQty', '', false, false)]
local procedure DoSomethingOnVerifyQtyToBlanketOrderQtyOnAfterCalculateRemainingBlanketOrderQty(var PurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line"; var RemainingBlanketOrderQty: Decimal)
begin
end;
OnBeforeDrillDownBlanketOrderLines(Record Requisition Line, Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeDrillDownBlanketOrderLines(RequisitionLine: Record "Requisition Line"; FilterwithVendor: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnBeforeDrillDownBlanketOrderLines', '', false, false)]
local procedure DoSomethingOnBeforeDrillDownBlanketOrderLines(RequisitionLine: Record "Requisition Line"; FilterwithVendor: Boolean; var IsHandled: Boolean)
begin
end;
OnBeforeGetBlanketOrderData(Record Requisition Line, Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeGetBlanketOrderData(var RequisitionLine: Record "Requisition Line"; var Returnvalue: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnBeforeGetBlanketOrderData', '', false, false)]
local procedure DoSomethingOnBeforeGetBlanketOrderData(var RequisitionLine: Record "Requisition Line"; var Returnvalue: Boolean; var IsHandled: Boolean)
begin
end;
OnGetBlanketOrderDataOnAfterAssignValues(Record Purchase Line, Record Requisition Line) :#
[IntegrationEvent(false, false)]
local procedure OnGetBlanketOrderDataOnAfterAssignValues(BlanketPurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnGetBlanketOrderDataOnAfterAssignValues', '', false, false)]
local procedure DoSomethingOnGetBlanketOrderDataOnAfterAssignValues(BlanketPurchaseLine: Record "Purchase Line"; var RequisitionLine: Record "Requisition Line")
begin
end;
OnBeforeResetBlanketOrderData(Record Requisition Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeResetBlanketOrderData(var RequisitionLine: Record "Requisition Line"; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnBeforeResetBlanketOrderData', '', false, false)]
local procedure DoSomethingOnBeforeResetBlanketOrderData(var RequisitionLine: Record "Requisition Line"; var IsHandled: Boolean)
begin
end;
OnAfterResetBlanketOrderData(Record Requisition Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterResetBlanketOrderData(var RequisitionLine: Record "Requisition Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnAfterResetBlanketOrderData', '', false, false)]
local procedure DoSomethingOnAfterResetBlanketOrderData(var RequisitionLine: Record "Requisition Line")
begin
end;
OnBeforeGetAssignedBlanketOrderQty(Record Requisition Line, Code[20], Integer, Decimal, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeGetAssignedBlanketOrderQty(RequisitionLine: Record "Requisition Line"; SearchBlanketOrderNo: Code[20]; SearchBlanketOrderLineNo: Integer; var ReturnValue: Decimal; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnBeforeGetAssignedBlanketOrderQty', '', false, false)]
local procedure DoSomethingOnBeforeGetAssignedBlanketOrderQty(RequisitionLine: Record "Requisition Line"; SearchBlanketOrderNo: Code[20]; SearchBlanketOrderLineNo: Integer; var ReturnValue: Decimal; var IsHandled: Boolean)
begin
end;
OnGetAssignedBlanketOrderQtyOnAfterSetFilterRequisitionLine(Record Requisition Line, Record Requisition Line, Code[20], Integer) :#
[IntegrationEvent(false, false)]
local procedure OnGetAssignedBlanketOrderQtyOnAfterSetFilterRequisitionLine(var RequisitionLine: Record "Requisition Line"; CurrentRequisitionLine: Record "Requisition Line"; SearchBlanketOrderNo: Code[20]; SearchBlanketOrderLineNo: Integer):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnGetAssignedBlanketOrderQtyOnAfterSetFilterRequisitionLine', '', false, false)]
local procedure DoSomethingOnGetAssignedBlanketOrderQtyOnAfterSetFilterRequisitionLine(var RequisitionLine: Record "Requisition Line"; CurrentRequisitionLine: Record "Requisition Line"; SearchBlanketOrderNo: Code[20]; SearchBlanketOrderLineNo: Integer)
begin
end;
OnBeforeLookupBlanketOrderLines(Record Requisition Line, Boolean, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeLookupBlanketOrderLines(var RequisitionLine: Record "Requisition Line"; var ReturnValue: Boolean; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnBeforeLookupBlanketOrderLines', '', false, false)]
local procedure DoSomethingOnBeforeLookupBlanketOrderLines(var RequisitionLine: Record "Requisition Line"; var ReturnValue: Boolean; var IsHandled: Boolean)
begin
end;
OnAfterOnDeleteReqLine(Record Requisition Line) :#
[IntegrationEvent(false, false)]
local procedure OnAfterOnDeleteReqLine(RequisitionLine: Record "Requisition Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnAfterOnDeleteReqLine', '', false, false)]
local procedure DoSomethingOnAfterOnDeleteReqLine(RequisitionLine: Record "Requisition Line")
begin
end;
OnAfterSetFilterBlanketOrderPurchaseLine(Record Purchase Line, Record Requisition Line, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnAfterSetFilterBlanketOrderPurchaseLine(var BlanketOrderPurchaseLine: Record "Purchase Line"; var AssigntoRequisitionLine: Record "Requisition Line"; FilterEmptyLocationCode: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnAfterSetFilterBlanketOrderPurchaseLine', '', false, false)]
local procedure DoSomethingOnAfterSetFilterBlanketOrderPurchaseLine(var BlanketOrderPurchaseLine: Record "Purchase Line"; var AssigntoRequisitionLine: Record "Requisition Line"; FilterEmptyLocationCode: Boolean)
begin
end;
OnBeforeCalcAvailability(Record Item, Record Requisition Line, Decimal, Boolean) :#
[IntegrationEvent(false, false)]
local procedure OnBeforeCalcAvailability(var Item: Record "Item"; RequisitionLine: Record "Requisition Line"; var AvailableQuantity: Decimal; var IsHandled: Boolean):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBARequisitionLib", 'OnBeforeCalcAvailability', '', false, false)]
local procedure DoSomethingOnBeforeCalcAvailability(var Item: Record "Item"; RequisitionLine: Record "Requisition Line"; var AvailableQuantity: Decimal; var IsHandled: Boolean)
begin
end;