Codeunit "Item Charge Assgnt. (Sales)"

ID 5807
Namespace: Microsoft.Sales.Document

Properties

Name Value
Permissions TableData "Sales Header" = r, TableData "Sales Line" = r, TableData "Sales Shipment Line" = r, TableData "Item Charge Assignment (Sales)" = rimd, TableData "Return Receipt Line" = r

Methods

InsertItemChargeAssignment

procedure InsertItemChargeAssignment(ItemChargeAssgntSales: Record "Item Charge Assignment (Sales)", ApplToDocType: Enum "Sales Applies-to Document Type", ApplToDocNo: Code[20], ApplToDocLineNo: Integer, ItemNo: Code[20], Description: Text[100], var NextLineNo: Integer)

Parameters

Name Type Description
ItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
ApplToDocType Enum Microsoft.Sales.Document."Sales Applies-to Document Type"
ApplToDocNo Code[20]
ApplToDocLineNo Integer
ItemNo Code[20]
Description Text[100]
NextLineNo Integer

InsertItemChargeAssignmentWithValues

procedure InsertItemChargeAssignmentWithValues(FromItemChargeAssgntSales: Record "Item Charge Assignment (Sales)", ApplToDocType: Enum "Sales Applies-to Document Type", FromApplToDocNo: Code[20], FromApplToDocLineNo: Integer, FromItemNo: Code[20], FromDescription: Text[100], QtyToAssign: Decimal, AmountToAssign: Decimal, var NextLineNo: Integer)

Parameters

Name Type Description
FromItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
ApplToDocType Enum Microsoft.Sales.Document."Sales Applies-to Document Type"
FromApplToDocNo Code[20]
FromApplToDocLineNo Integer
FromItemNo Code[20]
FromDescription Text[100]
QtyToAssign Decimal
AmountToAssign Decimal
NextLineNo Integer

InsertItemChargeAssignmentWithValuesTo

procedure InsertItemChargeAssignmentWithValuesTo(FromItemChargeAssgntSales: Record "Item Charge Assignment (Sales)", ApplToDocType: Enum "Sales Applies-to Document Type", FromApplToDocNo: Code[20], FromApplToDocLineNo: Integer, FromItemNo: Code[20], FromDescription: Text[100], QtyToAssign: Decimal, AmountToAssign: Decimal, var NextLineNo: Integer, var ItemChargeAssgntSales: Record "Item Charge Assignment (Sales)")

Parameters

Name Type Description
FromItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
ApplToDocType Enum Microsoft.Sales.Document."Sales Applies-to Document Type"
FromApplToDocNo Code[20]
FromApplToDocLineNo Integer
FromItemNo Code[20]
FromDescription Text[100]
QtyToAssign Decimal
AmountToAssign Decimal
NextLineNo Integer
ItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"

Summarize

procedure Summarize(var TempToItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)" temporary, var ToItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)")

Parameters

Name Type Description
TempToItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
ToItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"

CreateDocChargeAssgn

procedure CreateDocChargeAssgn(LastItemChargeAssgntSales: Record "Item Charge Assignment (Sales)", ShipmentNo: Code[20])

Parameters

Name Type Description
LastItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
ShipmentNo Code[20]

CreateShptChargeAssgnt

procedure CreateShptChargeAssgnt(var FromSalesShptLine: Record "Sales Shipment Line", ItemChargeAssgntSales: Record "Item Charge Assignment (Sales)")

Parameters

Name Type Description
FromSalesShptLine Table Microsoft.Sales.History."Sales Shipment Line"
ItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"

CreateRcptChargeAssgnt

procedure CreateRcptChargeAssgnt(var FromReturnRcptLine: Record "Return Receipt Line", ItemChargeAssgntSales: Record "Item Charge Assignment (Sales)")

Parameters

Name Type Description
FromReturnRcptLine Table Microsoft.Sales.History."Return Receipt Line"
ItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"

SuggestAssignment

procedure SuggestAssignment(SalesLine: Record "Sales Line", TotalQtyToAssign: Decimal, TotalAmtToAssign: Decimal)

Parameters

Name Type Description
SalesLine Table Microsoft.Sales.Document."Sales Line"
TotalQtyToAssign Decimal
TotalAmtToAssign Decimal

SuggestAssignment

procedure SuggestAssignment(SalesLine: Record "Sales Line", TotalQtyToAssign: Decimal, TotalAmtToAssign: Decimal, TotalQtyToHandle: Decimal, TotalAmtToHandle: Decimal)

Parameters

Name Type Description
SalesLine Table Microsoft.Sales.Document."Sales Line"
TotalQtyToAssign Decimal
TotalAmtToAssign Decimal
TotalQtyToHandle Decimal
TotalAmtToHandle Decimal

AssignItemCharges

procedure AssignItemCharges(SalesLine: Record "Sales Line", TotalQtyToAssign: Decimal, TotalAmtToAssign: Decimal, SelectedOptionValue: Integer)

Parameters

Name Type Description
SalesLine Table Microsoft.Sales.Document."Sales Line"
TotalQtyToAssign Decimal
TotalAmtToAssign Decimal
SelectedOptionValue Integer

AssignItemCharges

procedure AssignItemCharges(SalesLine: Record "Sales Line", TotalQtyToAssign: Decimal, TotalAmtToAssign: Decimal, SelectionTxt: Text)

Parameters

Name Type Description
SalesLine Table Microsoft.Sales.Document."Sales Line"
TotalQtyToAssign Decimal
TotalAmtToAssign Decimal
SelectionTxt Text

AssignItemCharges

procedure AssignItemCharges(SalesLine: Record "Sales Line", TotalQtyToAssign: Decimal, TotalAmtToAssign: Decimal, TotalQtyToHandle: Decimal, TotalAmtToHandle: Decimal, SelectionTxt: Text)

Parameters

Name Type Description
SalesLine Table Microsoft.Sales.Document."Sales Line"
TotalQtyToAssign Decimal
TotalAmtToAssign Decimal
TotalQtyToHandle Decimal
TotalAmtToHandle Decimal
SelectionTxt Text

AssignEquallyMenuText

procedure AssignEquallyMenuText(): Text

Returns

Type Description
Text

AssignByAmountMenuText

procedure AssignByAmountMenuText(): Text

Returns

Type Description
Text

AssignByWeightMenuText

procedure AssignByWeightMenuText(): Text

Returns

Type Description
Text

AssignByVolumeMenuText

procedure AssignByVolumeMenuText(): Text

Returns

Type Description
Text

AssignSalesItemCharge

procedure AssignSalesItemCharge(var ItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)", ItemChargeAssignmentSales2: Record "Item Charge Assignment (Sales)", Currency: Record Currency, var QtyRemaining: Decimal, var AmountRemaining: Decimal)

Parameters

Name Type Description
ItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
ItemChargeAssignmentSales2 Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
Currency Table Microsoft.Finance.Currency.Currency
QtyRemaining Decimal
AmountRemaining Decimal

GetItemValues

procedure GetItemValues(TempItemChargeAssgntSales: Record "Item Charge Assignment (Sales)" temporary, var DecimalArray: array[3] of Decimal)

Parameters

Name Type Description
TempItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
DecimalArray array[3] of Decimal

SuggestAssignmentFromLine

procedure SuggestAssignmentFromLine(var FromItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)")

Parameters

Name Type Description
FromItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"

Events

OnAfterCreateDocChargeAssgnt

[IntegrationEvent(False,False)]
local procedure OnAfterCreateDocChargeAssgnt(var LastItemChargeAssgntSales: Record "Item Charge Assignment (Sales)", var ShipmentNo: Code[20])

Parameters

Name Type Description
LastItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
ShipmentNo Code[20]

OnAfterGetItemValues

[IntegrationEvent(False,False)]
local procedure OnAfterGetItemValues(TempItemChargeAssgntSales: Record "Item Charge Assignment (Sales)" temporary, var DecimalArray: array[3] of Decimal)

Parameters

Name Type Description
TempItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
DecimalArray array[3] of Decimal

OnAssignByWeightOnAfterCalcTotalGrossWeight

[IntegrationEvent(False,False)]
local procedure OnAssignByWeightOnAfterCalcTotalGrossWeight(var ItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)", TotalGrossWeight: Decimal, Currency: Record Currency)

Parameters

Name Type Description
ItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
TotalGrossWeight Decimal
Currency Table Microsoft.Finance.Currency.Currency

OnAssignByWeightOnBeforeTempItemChargeAssgntSalesDelete

[IntegrationEvent(False,False)]
local procedure OnAssignByWeightOnBeforeTempItemChargeAssgntSalesDelete(var ItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)", QtyRemaining: Decimal, TotalQtyToAssign: Decimal, Currency: Record Currency)

Parameters

Name Type Description
ItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
QtyRemaining Decimal
TotalQtyToAssign Decimal
Currency Table Microsoft.Finance.Currency.Currency

OnAssignByAmountOnAfterAssignAppliesToDocLineAmount

[IntegrationEvent(False,False)]
local procedure OnAssignByAmountOnAfterAssignAppliesToDocLineAmount(ItemChargeAssignmentSale: Record "Item Charge Assignment (Sales)", var TempItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)" temporary, SalesHeader: Record "Sales Header", TotalQtyToAssign: Decimal, TotalAmtToAssign: Decimal)

Parameters

Name Type Description
ItemChargeAssignmentSale Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
TempItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
SalesHeader Table Microsoft.Sales.Document."Sales Header"
TotalQtyToAssign Decimal
TotalAmtToAssign Decimal

OnBeforeAssignItemCharges

[IntegrationEvent(False,False)]
local procedure OnBeforeAssignItemCharges(var SalesLine: Record "Sales Line", TotalQtyToAssign: Decimal, TotalAmtToAssign: Decimal, var IsHandled: Boolean, SelectionTxt: Text)

Parameters

Name Type Description
SalesLine Table Microsoft.Sales.Document."Sales Line"
TotalQtyToAssign Decimal
TotalAmtToAssign Decimal
IsHandled Boolean
SelectionTxt Text

OnBeforeCreateDocChargeAssgn

[IntegrationEvent(False,False)]
local procedure OnBeforeCreateDocChargeAssgn(var LastItemChargeAssgntSales: Record "Item Charge Assignment (Sales)", var FromSalesLine: Record "Sales Line")

Parameters

Name Type Description
LastItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
FromSalesLine Table Microsoft.Sales.Document."Sales Line"

OnBeforeInsertItemChargeAssgntWithAssignValues

[IntegrationEvent(False,False)]
local procedure OnBeforeInsertItemChargeAssgntWithAssignValues(var ItemChargeAssgntSales: Record "Item Charge Assignment (Sales)", FromItemChargeAssgntSales: Record "Item Charge Assignment (Sales)")

Parameters

Name Type Description
ItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
FromItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"

OnBeforeInsertItemChargeAssignmentWithValuesTo

[IntegrationEvent(False,False)]
local procedure OnBeforeInsertItemChargeAssignmentWithValuesTo(var FromItemChargeAssgntSales: Record "Item Charge Assignment (Sales)", var ItemChargeAssgntSales: Record "Item Charge Assignment (Sales)", var ApplToDocType: Enum "Sales Applies-to Document Type", var FromApplToDocNo: Code[20], var FromApplToDocLineNo: Integer, var FromItemNo: Code[20], var FromDescription: Text[100], var NextLineNo: Integer, var qtytoAssign: Decimal, var AmounttoAssign: Decimal, var IsHandled: Boolean)

Parameters

Name Type Description
FromItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
ItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
ApplToDocType Enum Microsoft.Sales.Document."Sales Applies-to Document Type"
FromApplToDocNo Code[20]
FromApplToDocLineNo Integer
FromItemNo Code[20]
FromDescription Text[100]
NextLineNo Integer
qtytoAssign Decimal
AmounttoAssign Decimal
IsHandled Boolean

OnBeforeShowSuggestItemChargeAssignStrMenu

[IntegrationEvent(False,False)]
local procedure OnBeforeShowSuggestItemChargeAssignStrMenu(SalesLine: Record "Sales Line", var SuggestItemChargeMenuTxt: Text, var SuggestItemChargeMessageTxt: Text, var Selection: Integer)

Parameters

Name Type Description
SalesLine Table Microsoft.Sales.Document."Sales Line"
SuggestItemChargeMenuTxt Text
SuggestItemChargeMessageTxt Text
Selection Integer

OnAssignItemCharges

[IntegrationEvent(False,False)]
local procedure OnAssignItemCharges(SelectionTxt: Text, var ItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)", Currency: Record Currency, SalesHeader: Record "Sales Header", TotalQtyToAssign: Decimal, TotalAmtToAssign: Decimal, var ItemChargesAssigned: Boolean)

Parameters

Name Type Description
SelectionTxt Text
ItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
Currency Table Microsoft.Finance.Currency.Currency
SalesHeader Table Microsoft.Sales.Document."Sales Header"
TotalQtyToAssign Decimal
TotalAmtToAssign Decimal
ItemChargesAssigned Boolean

OnAssignEquallyOnBeforeItemChargeAssignmentSalesModify

[IntegrationEvent(False,False)]
local procedure OnAssignEquallyOnBeforeItemChargeAssignmentSalesModify(var ItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)")

Parameters

Name Type Description
ItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"

OnCreateDocChargeAssgnOnAfterFromSalesLineSetFilters

[IntegrationEvent(False,False)]
local procedure OnCreateDocChargeAssgnOnAfterFromSalesLineSetFilters(var LastItemChargeAssgntSales: Record "Item Charge Assignment (Sales)", var FromSalesLine: Record "Sales Line")

Parameters

Name Type Description
LastItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
FromSalesLine Table Microsoft.Sales.Document."Sales Line"

OnAssignByAmountOnBeforeItemChargeAssignmentSalesModify

[IntegrationEvent(False,False)]
local procedure OnAssignByAmountOnBeforeItemChargeAssignmentSalesModify(var ItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)")

Parameters

Name Type Description
ItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"

OnSuggestAssignmentOnBeforeSelectionItemChargeAssign

[IntegrationEvent(False,False)]
local procedure OnSuggestAssignmentOnBeforeSelectionItemChargeAssign(var ItemChargeAssgntSales: Record "Item Charge Assignment (Sales)", SalesLine: Record "Sales Line", TotalQtyToAssign: Decimal, TotalAmtToAssign: Decimal, var IsHandled: Boolean)

Parameters

Name Type Description
ItemChargeAssgntSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
SalesLine Table Microsoft.Sales.Document."Sales Line"
TotalQtyToAssign Decimal
TotalAmtToAssign Decimal
IsHandled Boolean

OnSuggestAssignmentOnBeforeAssignItemCharges

[IntegrationEvent(False,False)]
local procedure OnSuggestAssignmentOnBeforeAssignItemCharges(var SalesLine: Record "Sales Line", ItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)")

Parameters

Name Type Description
SalesLine Table Microsoft.Sales.Document."Sales Line"
ItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"

OnAssignByAmountOnBeforeGetSalesLine

[IntegrationEvent(False,False)]
local procedure OnAssignByAmountOnBeforeGetSalesLine(var SalesLine: Record "Sales Line", ItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)", var IsHandled: Boolean)

Parameters

Name Type Description
SalesLine Table Microsoft.Sales.Document."Sales Line"
ItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
IsHandled Boolean

OnBeforeCreateShptChargeAssgnt

[IntegrationEvent(False,False)]
local procedure OnBeforeCreateShptChargeAssgnt(var FromSalesShptLine: Record "Sales Shipment Line", var ItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)", var IsHandled: Boolean)

Parameters

Name Type Description
FromSalesShptLine Table Microsoft.Sales.History."Sales Shipment Line"
ItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
IsHandled Boolean

OnAssignByAmountOnBeforeModifyItemChargeAssignmentSalesLoop

[IntegrationEvent(False,False)]
local procedure OnAssignByAmountOnBeforeModifyItemChargeAssignmentSalesLoop(var ItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)", var TempItemChargeAssignmentSales: Record "Item Charge Assignment (Sales)" temporary, var TotalAppliesToDocLineAmount: Decimal, SalesHeader: Record "Sales Header", TotalQtyToAssign: Decimal, TotalAmtToAssign: Decimal)

Parameters

Name Type Description
ItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
TempItemChargeAssignmentSales Table Microsoft.Sales.Document."Item Charge Assignment (Sales)"
TotalAppliesToDocLineAmount Decimal
SalesHeader Table Microsoft.Sales.Document."Sales Header"
TotalQtyToAssign Decimal
TotalAmtToAssign Decimal

See also