Share via

Codeunit "Undo Sales Shipment Line"

ID 5815
Namespace: Microsoft.Sales.History

Properties

Name Value
Permissions TableData "Sales Line" = rimd, TableData "Sales Shipment Line" = rimd, TableData "Item Application Entry" = rmd, TableData "Item Entry Relation" = ri
TableNo Table Microsoft.Sales.History."Sales Shipment Line"
EventSubscriberInstance Manual

Methods

SetHideDialog

procedure SetHideDialog(NewHideDialog: Boolean)

Parameters

Name Type Description
NewHideDialog Boolean

SetParameters

procedure SetParameters(var NewUndoSalesShptLineParams: Record "Undo Sales Shpt. Line Params" temporary)

Parameters

Name Type Description
NewUndoSalesShptLineParams Table Microsoft.Sales.History."Undo Sales Shpt. Line Params"

GetCorrectionLineNo

procedure GetCorrectionLineNo(SalesShipmentLine2: Record "Sales Shipment Line"): Integer

Parameters

Name Type Description
SalesShipmentLine2 Table Microsoft.Sales.History."Sales Shipment Line"

Returns

Type Description
Integer

UpdateOrderLine

procedure UpdateOrderLine(SalesShipmentLine2: Record "Sales Shipment Line")

Parameters

Name Type Description
SalesShipmentLine2 Table Microsoft.Sales.History."Sales Shipment Line"

UpdateBlanketOrder

procedure UpdateBlanketOrder(SalesShipmentLine2: Record "Sales Shipment Line")

Parameters

Name Type Description
SalesShipmentLine2 Table Microsoft.Sales.History."Sales Shipment Line"

GetInvoicedShptEntries

procedure GetInvoicedShptEntries(SalesShipmentLine2: Record "Sales Shipment Line", var ItemLedgerEntry: Record "Item Ledger Entry"): Boolean

Parameters

Name Type Description
SalesShipmentLine2 Table Microsoft.Sales.History."Sales Shipment Line"
ItemLedgerEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"

Returns

Type Description
Boolean

Events

OnAfterCode

[IntegrationEvent(False,False)]
local procedure OnAfterCode(var SalesShipmentLine: Record "Sales Shipment Line")

Parameters

Name Type Description
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"

OnAfterCopyItemJnlLineFromSalesShpt

[IntegrationEvent(False,False)]
local procedure OnAfterCopyItemJnlLineFromSalesShpt(var ItemJournalLine: Record "Item Journal Line", SalesShipmentHeader: Record "Sales Shipment Header", SalesShipmentLine: Record "Sales Shipment Line", var TempWhseJnlLine: Record "Warehouse Journal Line" temporary, var WhseUndoQty: Codeunit "Whse. Undo Quantity", var ItemLedgEntryNo: Integer, var NextLineNo: Integer, var TempGlobalItemLedgerEntry: Record "Item Ledger Entry" temporary, var TempGlobalItemEntryRelation: Record "Item Entry Relation" temporary, var IsHandled: Boolean)

Parameters

Name Type Description
ItemJournalLine Table Microsoft.Inventory.Journal."Item Journal Line"
SalesShipmentHeader Table Microsoft.Sales.History."Sales Shipment Header"
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
TempWhseJnlLine Table Microsoft.Warehouse.Journal."Warehouse Journal Line"
WhseUndoQty Codeunit Microsoft.Warehouse.History."Whse. Undo Quantity"
ItemLedgEntryNo Integer
NextLineNo Integer
TempGlobalItemLedgerEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"
TempGlobalItemEntryRelation Table Microsoft.Inventory.Item."Item Entry Relation"
IsHandled Boolean

OnAfterCheckSalesShptLine

[IntegrationEvent(False,False)]
local procedure OnAfterCheckSalesShptLine(var SalesShptLine: Record "Sales Shipment Line", var TempItemLedgEntry: Record "Item Ledger Entry" temporary)

Parameters

Name Type Description
SalesShptLine Table Microsoft.Sales.History."Sales Shipment Line"
TempItemLedgEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"

OnAfterNewSalesShptLineInsert

[IntegrationEvent(False,False)]
local procedure OnAfterNewSalesShptLineInsert(var NewSalesShipmentLine: Record "Sales Shipment Line", OldSalesShipmentLine: Record "Sales Shipment Line")

Parameters

Name Type Description
NewSalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
OldSalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"

OnAfterSalesShptLineModify

[IntegrationEvent(False,False)]
local procedure OnAfterSalesShptLineModify(var SalesShptLine: Record "Sales Shipment Line", DocLineNo: Integer, HideDialog: Boolean)

Parameters

Name Type Description
SalesShptLine Table Microsoft.Sales.History."Sales Shipment Line"
DocLineNo Integer
HideDialog Boolean

OnAfterGetCorrectionLineNo

[IntegrationEvent(False,False)]
local procedure OnAfterGetCorrectionLineNo(SalesShipmentLine: Record "Sales Shipment Line", var Result: Integer)

Parameters

Name Type Description
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
Result Integer

OnAfterUpdateSalesLine

[IntegrationEvent(False,False)]
local procedure OnAfterUpdateSalesLine(var SalesLine: Record "Sales Line", var SalesShptLine: Record "Sales Shipment Line")

Parameters

Name Type Description
SalesLine Table Microsoft.Sales.Document."Sales Line"
SalesShptLine Table Microsoft.Sales.History."Sales Shipment Line"

OnBeforeBlanketOrderInitOutstanding

[IntegrationEvent(False,False)]
local procedure OnBeforeBlanketOrderInitOutstanding(var BlanketOrderSalesLine: Record "Sales Line", SalesShipmentLine: Record "Sales Shipment Line")

Parameters

Name Type Description
BlanketOrderSalesLine Table Microsoft.Sales.Document."Sales Line"
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"

OnBeforeGetCorrectionLineNo

[IntegrationEvent(False,False)]
local procedure OnBeforeGetCorrectionLineNo(SalesShipmentLine: Record "Sales Shipment Line", var Result: Integer, var IsHandled: Boolean)

Parameters

Name Type Description
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
Result Integer
IsHandled Boolean

OnBeforeCheckSalesShptLine

[IntegrationEvent(False,False)]
local procedure OnBeforeCheckSalesShptLine(var SalesShipmentLine: Record "Sales Shipment Line", var IsHandled: Boolean, var SkipTestFields: Boolean, var SkipUndoPosting: Boolean, var SkipUndoInitPostATO: Boolean)

Parameters

Name Type Description
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
IsHandled Boolean
SkipTestFields Boolean
SkipUndoPosting Boolean
SkipUndoInitPostATO Boolean

OnBeforeDeleteSalesShptLineServItems

Obsolete

This element will become obsolete from version 25.0. Moved to codeunit ServUndoSalesShipmentLine

[Obsolete(Moved to codeunit ServUndoSalesShipmentLine,25.0)]
[IntegrationEvent(False,False)]
local procedure OnBeforeDeleteSalesShptLineServItems(var SalesShipmentLine: Record "Sales Shipment Line", var IsHandled: Boolean)

Parameters

Name Type Description
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
IsHandled Boolean

OnAfterInsertNewShipmentLine

[IntegrationEvent(False,False)]
local procedure OnAfterInsertNewShipmentLine(var SalesShipmentLine: Record "Sales Shipment Line", var PostedWhseShipmentLine: Record "Posted Whse. Shipment Line", var PostedWhseShptLineFound: Boolean, DocLineNo: Integer, ItemShptEntryNo: Integer)

Parameters

Name Type Description
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
PostedWhseShipmentLine Table Microsoft.Warehouse.History."Posted Whse. Shipment Line"
PostedWhseShptLineFound Boolean
DocLineNo Integer
ItemShptEntryNo Integer

OnBeforeOnRun

[IntegrationEvent(False,False)]
local procedure OnBeforeOnRun(var SalesShipmentLine: Record "Sales Shipment Line", var IsHandled: Boolean, var SkipTypeCheck: Boolean, var HideDialog: Boolean)

Parameters

Name Type Description
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
IsHandled Boolean
SkipTypeCheck Boolean
HideDialog Boolean

OnBeforeNewSalesShptLineInsert

[IntegrationEvent(False,False)]
local procedure OnBeforeNewSalesShptLineInsert(var NewSalesShipmentLine: Record "Sales Shipment Line", OldSalesShipmentLine: Record "Sales Shipment Line")

Parameters

Name Type Description
NewSalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
OldSalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"

OnBeforePostItemJnlLine

[IntegrationEvent(False,False)]
local procedure OnBeforePostItemJnlLine(var SalesShipmentLine: Record "Sales Shipment Line", var DocLineNo: Integer, var ItemLedgEntryNo: Integer, var IsHandled: Boolean, var TempGlobalItemLedgEntry: Record "Item Ledger Entry" temporary, var TempGlobalItemEntryRelation: Record "Item Entry Relation" temporary, var TempWhseJnlLine: Record "Warehouse Journal Line" temporary, var NextLineNo: Integer)

Parameters

Name Type Description
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
DocLineNo Integer
ItemLedgEntryNo Integer
IsHandled Boolean
TempGlobalItemLedgEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"
TempGlobalItemEntryRelation Table Microsoft.Inventory.Item."Item Entry Relation"
TempWhseJnlLine Table Microsoft.Warehouse.Journal."Warehouse Journal Line"
NextLineNo Integer

OnBeforeGetDeleteServItems

Obsolete

This element will become obsolete from version 25.0. Moved to codeunit ServUndoSalesShipmentLine

[Obsolete(Moved to codeunit ServUndoSalesShipmentLine,25.0)]
[IntegrationEvent(False,False)]
local procedure OnBeforeGetDeleteServItems(SalesShipmentLine: Record "Sales Shipment Line", var ServiceItem: Record "Service Item", HideDialog: Boolean, var Result: Boolean, var IsHandled: Boolean)

Parameters

Name Type Description
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
ServiceItem Table Microsoft.Service.Item."Service Item"
HideDialog Boolean
Result Boolean
IsHandled Boolean

OnBeforeSalesShptLineModify

[IntegrationEvent(False,False)]
local procedure OnBeforeSalesShptLineModify(var SalesShptLine: Record "Sales Shipment Line")

Parameters

Name Type Description
SalesShptLine Table Microsoft.Sales.History."Sales Shipment Line"

OnBeforeUpdateBlanketOrder

[IntegrationEvent(False,False)]
local procedure OnBeforeUpdateBlanketOrder(var SalesShptLine: Record "Sales Shipment Line", var IsHandled: Boolean)

Parameters

Name Type Description
SalesShptLine Table Microsoft.Sales.History."Sales Shipment Line"
IsHandled Boolean

OnBeforeUpdateOrderLine

[IntegrationEvent(False,False)]
local procedure OnBeforeUpdateOrderLine(var SalesShptLine: Record "Sales Shipment Line", var IsHandled: Boolean, var TempGlobalItemLedgEntry: Record "Item Ledger Entry" temporary)

Parameters

Name Type Description
SalesShptLine Table Microsoft.Sales.History."Sales Shipment Line"
IsHandled Boolean
TempGlobalItemLedgEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"

OnCodeOnBeforeUndoLoop

[IntegrationEvent(False,False)]
local procedure OnCodeOnBeforeUndoLoop(var SalesShptLine: Record "Sales Shipment Line")

Parameters

Name Type Description
SalesShptLine Table Microsoft.Sales.History."Sales Shipment Line"

OnCodeOnAfterSalesShptLineSetFilters

[IntegrationEvent(False,False)]
local procedure OnCodeOnAfterSalesShptLineSetFilters(var SalesShptLine: Record "Sales Shipment Line", HideDialog: Boolean)

Parameters

Name Type Description
SalesShptLine Table Microsoft.Sales.History."Sales Shipment Line"
HideDialog Boolean

OnPostItemJnlLineOnAfterInsertTempWhseJnlLine

[IntegrationEvent(False,False)]
local procedure OnPostItemJnlLineOnAfterInsertTempWhseJnlLine(SalesShptLine: Record "Sales Shipment Line", var ItemJnlLine: Record "Item Journal Line", var TempWhseJnlLine: Record "Warehouse Journal Line" temporary, var NextLineNo: Integer)

Parameters

Name Type Description
SalesShptLine Table Microsoft.Sales.History."Sales Shipment Line"
ItemJnlLine Table Microsoft.Inventory.Journal."Item Journal Line"
TempWhseJnlLine Table Microsoft.Warehouse.Journal."Warehouse Journal Line"
NextLineNo Integer

OnPostItemJnlLineOnAfterRunItemJnlPostLine

[IntegrationEvent(False,False)]
local procedure OnPostItemJnlLineOnAfterRunItemJnlPostLine(var ItemJnlLine: Record "Item Journal Line", var SalesShipmentLine: Record "Sales Shipment Line", var SalesShipmentHeader: Record "Sales Shipment Header", var ItemJnlPostLine: Codeunit "Item Jnl.-Post Line")

Parameters

Name Type Description
ItemJnlLine Table Microsoft.Inventory.Journal."Item Journal Line"
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
SalesShipmentHeader Table Microsoft.Sales.History."Sales Shipment Header"
ItemJnlPostLine Codeunit Microsoft.Inventory.Posting."Item Jnl.-Post Line"

OnPostItemJnlLineOnBeforeRunItemJnlPostLine

[IntegrationEvent(False,False)]
local procedure OnPostItemJnlLineOnBeforeRunItemJnlPostLine(var ItemJnlLine: Record "Item Journal Line", ItemLedgEntryNotInvoiced: Record "Item Ledger Entry", SalesShptLine: Record "Sales Shipment Line", SalesShptHeader: Record "Sales Shipment Header", var IsHandled: Boolean)

Parameters

Name Type Description
ItemJnlLine Table Microsoft.Inventory.Journal."Item Journal Line"
ItemLedgEntryNotInvoiced Table Microsoft.Inventory.Ledger."Item Ledger Entry"
SalesShptLine Table Microsoft.Sales.History."Sales Shipment Line"
SalesShptHeader Table Microsoft.Sales.History."Sales Shipment Header"
IsHandled Boolean

OnUpdateOrderLineOnBeforeUpdateSalesLine

[IntegrationEvent(False,False)]
local procedure OnUpdateOrderLineOnBeforeUpdateSalesLine(var SalesShipmentLine: Record "Sales Shipment Line", var SalesLine: Record "Sales Line")

Parameters

Name Type Description
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
SalesLine Table Microsoft.Sales.Document."Sales Line"

OnAfterIsSalesInvoiceCancelled

[IntegrationEvent(False,False)]
local procedure OnAfterIsSalesInvoiceCancelled(var SalesInvoiceHeader: Record "Sales Invoice Header", var Result: Boolean)

Parameters

Name Type Description
SalesInvoiceHeader Table Microsoft.Sales.History."Sales Invoice Header"
Result Boolean

OnCheckSalesShptLineOnBeforeCollectItemLedgEntries

[IntegrationEvent(False,False)]
local procedure OnCheckSalesShptLineOnBeforeCollectItemLedgEntries(SalesShptLine: Record "Sales Shipment Line", var TempItemLedgEntry: Record "Item Ledger Entry" temporary, var IsHandled: Boolean)

Parameters

Name Type Description
SalesShptLine Table Microsoft.Sales.History."Sales Shipment Line"
TempItemLedgEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"
IsHandled Boolean

OnCheckSalesShptLineOnBeforeHasInvoicedNotReturnedQuantity

[IntegrationEvent(False,False)]
local procedure OnCheckSalesShptLineOnBeforeHasInvoicedNotReturnedQuantity(SalesShptLine: Record "Sales Shipment Line", var IsHandled: Boolean)

Parameters

Name Type Description
SalesShptLine Table Microsoft.Sales.History."Sales Shipment Line"
IsHandled Boolean

OnSynchronizeATOOnBeforeModify

[IntegrationEvent(False,False)]
local procedure OnSynchronizeATOOnBeforeModify(var SalesLine: Record "Sales Line")

Parameters

Name Type Description
SalesLine Table Microsoft.Sales.Document."Sales Line"

OnAfterPostItemJnlLine

[IntegrationEvent(False,False)]
local procedure OnAfterPostItemJnlLine(var ItemJournalLine: Record "Item Journal Line", var SalesShipmentLine: Record "Sales Shipment Line")

Parameters

Name Type Description
ItemJournalLine Table Microsoft.Inventory.Journal."Item Journal Line"
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"

OnItemJnlPostLineOnAfterGetInvoicedShptEntriesOnBeforeExit

[IntegrationEvent(False,False)]
local procedure OnItemJnlPostLineOnAfterGetInvoicedShptEntriesOnBeforeExit(var ItemJournalLine: Record "Item Journal Line", var SalesShipmentLine: Record "Sales Shipment Line")

Parameters

Name Type Description
ItemJournalLine Table Microsoft.Inventory.Journal."Item Journal Line"
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"

OnPostItemJnlLineOnAfterCalcRemQtyBase

[IntegrationEvent(False,False)]
local procedure OnPostItemJnlLineOnAfterCalcRemQtyBase(var RemQtyBase: Decimal, var ItemJournalLine: Record "Item Journal Line", var SalesShipmentLine: Record "Sales Shipment Line", var ItemLedgerEntryNotInvoiced: Record "Item Ledger Entry")

Parameters

Name Type Description
RemQtyBase Decimal
ItemJournalLine Table Microsoft.Inventory.Journal."Item Journal Line"
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
ItemLedgerEntryNotInvoiced Table Microsoft.Inventory.Ledger."Item Ledger Entry"

OnGetInvoicedShptEntriesOnAfterSetFilters

[IntegrationEvent(False,False)]
local procedure OnGetInvoicedShptEntriesOnAfterSetFilters(var ItemLedgerEntry: Record "Item Ledger Entry", SalesShipmentLine: Record "Sales Shipment Line")

Parameters

Name Type Description
ItemLedgerEntry Table Microsoft.Inventory.Ledger."Item Ledger Entry"
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"

OnCodeOnBeforeProcessItemShptEntry

[IntegrationEvent(False,False)]
local procedure OnCodeOnBeforeProcessItemShptEntry(var ItemShptEntryNo: Integer, var DocLineNo: Integer, var SalesShipmentLine: Record "Sales Shipment Line", var IsHandled: Boolean)

Parameters

Name Type Description
ItemShptEntryNo Integer
DocLineNo Integer
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
IsHandled Boolean

OnAfterCheckSalesShipmentLines

[IntegrationEvent(False,False)]
local procedure OnAfterCheckSalesShipmentLines(var SalesShipmentLine: Record "Sales Shipment Line", var UndoSalesShptLineParams: Record "Undo Sales Shpt. Line Params" temporary)

Parameters

Name Type Description
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
UndoSalesShptLineParams Table Microsoft.Sales.History."Undo Sales Shpt. Line Params"

OnBeforeDeleteRelatedItems

[IntegrationEvent(False,False)]
local procedure OnBeforeDeleteRelatedItems(var SalesShipmentLine: Record "Sales Shipment Line", UndoSalesShptLineParams: Record "Undo Sales Shpt. Line Params" temporary)

Parameters

Name Type Description
SalesShipmentLine Table Microsoft.Sales.History."Sales Shipment Line"
UndoSalesShptLineParams Table Microsoft.Sales.History."Undo Sales Shpt. Line Params"

See also