Codeunit 18090627 EOS Shipping Price Mgt.

Codeunit 18090627 EOS Shipping Price Mgt.

Methods

GetPriceVersion

procedure GetPriceVersion(ShippingPriceCode: Code[20]; Date: Date; OnlyCertified: Boolean): Code[10]

Get the price version for the given Shipping price code and for the given date

Parameters / Return Value

  • ShippingPriceCode Code[20]

    Code[20]

  • Date Date

    Date

  • OnlyCertified Boolean

    Boolean

  • Returns Code[10]

    Code

DeleteRows

procedure DeleteRows(ShippingPriceCode: Code[10])

Delete Rows for the Shipping Price Code given in input

Parameters / Return Value

  • ShippingPriceCode Code[10]

    Code[10]

DeleteVersion

procedure DeleteVersion(ShippingPriceCode: Code[10]; VersionCode: Code[10])

Delete given Version from the give Shipping Price Code

Parameters / Return Value

  • ShippingPriceCode Code[10]

    Code[10]

  • VersionCode Code[10]

    Code[10]

CheckShippingPrice

procedure CheckShippingPrice(var ShippingPriceHeader: Record "EOS Shipping Price Header"; CheckVersions: Boolean)

Check Shipping Price

Parameters / Return Value

  • ShippingPriceHeader Record "EOS Shipping Price Header"

    Record “EOS Shipping Price Header”

  • CheckVersions Boolean

    Boolean

CheckShippingVersion

procedure CheckShippingVersion(ShippingPriceCode: Code[10]; VersionCode: Code[10])

Check Shipping Version

Parameters / Return Value

  • ShippingPriceCode Code[10]

    Code[10]

  • VersionCode Code[10]

    Code[10]

CheckAreaConsistency

procedure CheckAreaConsistency(ShippingPriceAreaLine: Record "EOS ShippingPriceAreaLine")

Check Shipping Price Area Consistency

Parameters / Return Value

  • ShippingPriceAreaLine Record "EOS ShippingPriceAreaLine"

    Record “EOS ShippingPriceAreaLine”

CheckDetailExist

procedure CheckDetailExist(ShippingPriceAreaLine: Record "EOS ShippingPriceAreaLine")

Check Detail Exist otherwise return error

Parameters / Return Value

  • ShippingPriceAreaLine Record "EOS ShippingPriceAreaLine"

    Record “EOS ShippingPriceAreaLine”

CollectShipAgentService

procedure CollectShipAgentService(ShippingPriceAreaLine: Record "EOS ShippingPriceAreaLine"; var ShippingPriceAreaLineTmp: Record "EOS ShippingPriceAreaLine" temporary)

Collect Shipping Agent Service

Parameters / Return Value

  • ShippingPriceAreaLine Record "EOS ShippingPriceAreaLine"

    Record “EOS ShippingPriceAreaLine”

  • ShippingPriceAreaLineTmp Record "EOS ShippingPriceAreaLine"

    Record “EOS ShippingPriceAreaLine”

CheckShipAgentMixed

procedure CheckShipAgentMixed(ShippingPriceAreaLine: Record "EOS ShippingPriceAreaLine")

Check Shipping Agent Mixed

Parameters / Return Value

  • ShippingPriceAreaLine Record "EOS ShippingPriceAreaLine"

    Record “EOS ShippingPriceAreaLine”

GetRecRefFromDocShippingPrice

procedure GetRecRefFromDocShippingPrice(DocShippingPrice: Record "EOS DocumentShippingPrice"; var RecRef: RecordRef)

Get RecRef From Document Shipping Price

Parameters / Return Value

  • DocShippingPrice Record "EOS DocumentShippingPrice"

    Record “EOS DocumentShippingPrice”

  • RecRef RecordRef

    RecordRef

GetDocParams

procedure GetDocParams(var RecRef: RecordRef; var CustNo: Code[20]; var ShipToCode: Code[20]; var ShippingAgentCode: Code[20]; var ShippingAgentServiceCode: Code[20]; var LocationCode: Code[10]; var ToLocationCode: Code[10]; var TourCode: Code[10]; var RefDate: Date; var DocAmount: Decimal; var DocParcelNumber: Decimal; var DocWeight: Decimal; var DocVolume: Decimal; var DocPalletNumber: Decimal; var DocKm: Decimal; var DocHours: Decimal; var DocTourAmount: Decimal; var DocGrossWeight: Decimal; SkipTourTotals: Boolean)

Get Shipping relative information

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • CustNo Code[20]

    Code[20]

  • ShipToCode Code[20]

    Code[20]

  • ShippingAgentCode Code[20]

    Code[20]

  • ShippingAgentServiceCode Code[20]

    Code[20]

  • LocationCode Code[10]

    Code[10]

  • ToLocationCode Code[10]

    Code[10]

  • TourCode Code[10]

    Code[10]

  • RefDate Date

    Date

  • DocAmount Decimal

    Decimal

  • DocParcelNumber Decimal

    Decimal

  • DocWeight Decimal

    Decimal

  • DocVolume Decimal

    Decimal

  • DocPalletNumber Decimal

    Decimal

  • DocKm Decimal

    Decimal

  • DocHours Decimal

    Decimal

  • DocTourAmount Decimal

    Decimal

  • DocGrossWeight Decimal

    Decimal

  • SkipTourTotals Boolean

    Boolean

GetShippingPriceCode

procedure GetShippingPriceCode(ShippingAgentCode: Code[20]): Code[20]

Get Shipping Price Code

Parameters / Return Value

  • ShippingAgentCode Code[20]

    Code[20]

  • Returns Code[20]

    Code

GetQty

procedure GetQty(var RecRef: RecordRef; ShippingAgentCode: Code[20]; ShipPriceTypeCode: Code[10]; var CheckTourTotal: Boolean; var QtyError: Boolean; var QtyErrorMessage: Text[250]): Decimal

Get Quantity for the given Shiping Price Type Code

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • ShippingAgentCode Code[20]

    Code[20]

  • ShipPriceTypeCode Code[10]

    Code[10]

  • CheckTourTotal Boolean

    Boolean

  • QtyError Boolean

    Boolean

  • QtyErrorMessage Text[250]

    Text[250]

  • Returns Decimal

    Decimal

GetAdditionalCharges

procedure GetAdditionalCharges(var RecRef: RecordRef; HideConfirm: Boolean)

Get Additional Charges for the given record

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • HideConfirm Boolean

    Boolean

UniqueDeliveryCompliant

procedure UniqueDeliveryCompliant(var RecRef: RecordRef; ShipAdditionalCharge: Record "EOS ShippingAdditionalCharge"): Boolean

Unique Delivery Compliant

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • ShipAdditionalCharge Record "EOS ShippingAdditionalCharge"

    Record “EOS ShippingAdditionalCharge”

  • Returns Boolean

    Boolean

InsertCustAdditionalCharge

procedure InsertCustAdditionalCharge(var RecRef: RecordRef; CustAdditionalCharge: Record "EOS CustomerAdditionalCharge")

Insert Customer Additional Charge in the given record

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • CustAdditionalCharge Record "EOS CustomerAdditionalCharge"

    Record “EOS CustomerAdditionalCharge”

InsertFixedAdditionalCharge

procedure InsertFixedAdditionalCharge(var RecRef: RecordRef; ShipAdditionalCharge: Record "EOS ShippingAdditionalCharge")

Insert Fixed Additional Charge in the given Record

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • ShipAdditionalCharge Record "EOS ShippingAdditionalCharge"

    Record “EOS ShippingAdditionalCharge”

SetDocAdditionalChargeFields

procedure SetDocAdditionalChargeFields(var RecRef: RecordRef; var DocAdditionalCharge: Record "EOS DocumentAdditionalCharge"; ShipAdditionalCharge: Record "EOS ShippingAdditionalCharge"; Qty: Decimal; DocGrossWeight: Decimal; DocNetWeight: Decimal)

Fill Document Additional Charge Fields

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • DocAdditionalCharge Record "EOS DocumentAdditionalCharge"

    Record “EOS DocumentAdditionalCharge”

  • ShipAdditionalCharge Record "EOS ShippingAdditionalCharge"

    Record “EOS ShippingAdditionalCharge”

  • Qty Decimal

    Decimal

  • DocGrossWeight Decimal

    Decimal

  • DocNetWeight Decimal

    Decimal

SetNote

procedure SetNote(var RecRef: RecordRef; NoteIn: Text[250]; Field1: Integer; Field2: Integer): Text[250]

Set Note

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • NoteIn Text[250]

    Text[250]

  • Field1 Integer

    Integer

  • Field2 Integer

    Integer

  • Returns Text[250]

    Text

GetFieldValue

procedure GetFieldValue(var RecRef: RecordRef; FieldNum: Integer): Text[250]

Get Field Value

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • FieldNum Integer

    Integer

  • Returns Text[250]

    Text

DocumentBlockedByConstraints

procedure DocumentBlockedByConstraints(CustAdditionalCharge: Record "EOS CustomerAdditionalCharge"; DocAmount: Decimal; DocParcelNumber: Decimal; DocPalletNumber: Decimal; DocWeight: Decimal; DocVolume: Decimal): Boolean

Return true if document Document Blocked By Constraints

Parameters / Return Value

  • CustAdditionalCharge Record "EOS CustomerAdditionalCharge"

    Record “EOS CustomerAdditionalCharge”

  • DocAmount Decimal

    Decimal

  • DocParcelNumber Decimal

    Decimal

  • DocPalletNumber Decimal

    Decimal

  • DocWeight Decimal

    Decimal

  • DocVolume Decimal

    Decimal

  • Returns Boolean

    Boolean

GetShipAdditionalChargePrice

procedure GetShipAdditionalChargePrice(var ToShipAdditionalCharge: Record "EOS ShippingAdditionalCharge"; ShippingPriceCode: Code[20]; VersionCode: Code[10]; AdditionalChargeCode: Code[20]; RefDate: Date): Boolean

GetShipAdditionalChargePrice

Parameters / Return Value

  • ToShipAdditionalCharge Record "EOS ShippingAdditionalCharge"

    Record “EOS ShippingAdditionalCharge”

  • ShippingPriceCode Code[20]

    Code[20]

  • VersionCode Code[10]

    Code[10]

  • AdditionalChargeCode Code[20]

    Code[20]

  • RefDate Date

    Date

  • Returns Boolean

    Boolean

DelShippingPrice

procedure DelShippingPrice(var RecRef: RecordRef; DeleteManuallyModified: Boolean)

Delete Shipping Price

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • DeleteManuallyModified Boolean

    Boolean

CalcShipPrice

procedure CalcShipPrice(RecRef: RecordRef; CalcOnlyTourTotals: Boolean; var TourTotals: Record "EOS ShippingPriceAreaDetail" temporary)

Calculate Shiping Price

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • CalcOnlyTourTotals Boolean

    Boolean

  • TourTotals Record "EOS ShippingPriceAreaDetail"

    Record “EOS ShippingPriceAreaDetail”

UpdateDocAdditionalCharges

procedure UpdateDocAdditionalCharges(DocShippingPrice: Record "EOS DocumentShippingPrice")

Update Doc Additional Charges

Parameters / Return Value

  • DocShippingPrice Record "EOS DocumentShippingPrice"

    Record “EOS DocumentShippingPrice”

GetDetail

procedure GetDetail(ShippingPriceAreaLine: Record "EOS ShippingPriceAreaLine"; Qty: Decimal; var ShippingPriceAreaDetail: Record "EOS ShippingPriceAreaDetail"): Boolean

Get Detail for the given line

Parameters / Return Value

  • ShippingPriceAreaLine Record "EOS ShippingPriceAreaLine"

    Record “EOS ShippingPriceAreaLine”

  • Qty Decimal

    Decimal

  • ShippingPriceAreaDetail Record "EOS ShippingPriceAreaDetail"

    Record “EOS ShippingPriceAreaDetail”

  • Returns Boolean

    Boolean

SetDocShippingPricePK

procedure SetDocShippingPricePK(var RecRef: RecordRef; var DocShippingPrice: Record "EOS DocumentShippingPrice")

Set Document Shipping Price Primary Key

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • DocShippingPrice Record "EOS DocumentShippingPrice"

    Record “EOS DocumentShippingPrice”

SetDocShippingPriceInfo

procedure SetDocShippingPriceInfo(var RecRef: RecordRef; var DocShippingPrice: Record "EOS DocumentShippingPrice")

Set Document Shipping Price Information

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • DocShippingPrice Record "EOS DocumentShippingPrice"

    Record “EOS DocumentShippingPrice”

SetDocShippingPriceLinePK

procedure SetDocShippingPriceLinePK(var RecRef: RecordRef; var DocShippingPriceLine: Record "EOS Doc. Shipping Price Line")

Set Document Shipping Price Line Primary Key

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • DocShippingPriceLine Record "EOS Doc. Shipping Price Line"

    Record “EOS Doc. Shipping Price Line”

SetDocAdditionalChargePK

procedure SetDocAdditionalChargePK(var RecRef: RecordRef; var DocAdditionalCharge: Record "EOS DocumentAdditionalCharge")

Set Document Additional Charge Primary Key

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • DocAdditionalCharge Record "EOS DocumentAdditionalCharge"

    Record “EOS DocumentAdditionalCharge”

GetAreaFromLocationCode

procedure GetAreaFromLocationCode(ShippingPriceCode: Code[20]; VersionCode: Code[10]; LocationCode: Code[10]; var "Area": Code[20]; var GeoErrorMessage: Text[250]): Boolean

Get Shipping Area From Location Code

Parameters / Return Value

  • ShippingPriceCode Code[20]

    Code[20]

  • VersionCode Code[10]

    Code[10]

  • LocationCode Code[10]

    Code[10]

  • Area Code[20]

    Code[20]

  • GeoErrorMessage Text[250]

    Text[250]

  • Returns Boolean

    Boolean

GetAreaFromStandardFields

procedure GetAreaFromStandardFields(var RecRef: RecordRef; var "Area": Code[20]; var GeoErrorMessage: Text[250]): Boolean

Get Shipping Area From Standard Fields

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • Area Code[20]

    Code[20]

  • GeoErrorMessage Text[250]

    Text[250]

  • Returns Boolean

    Boolean

IsLastRemainingAmount

procedure IsLastRemainingAmount(DocShippingPrice: Record "EOS DocumentShippingPrice"; ShippingPriceAreaLine: Record "EOS ShippingPriceAreaLine"; LastShippingPriceAreaLine: Record "EOS ShippingPriceAreaLine" temporary): Boolean

Is Last Remaining Amount

Parameters / Return Value

  • DocShippingPrice Record "EOS DocumentShippingPrice"

    Record “EOS DocumentShippingPrice”

  • ShippingPriceAreaLine Record "EOS ShippingPriceAreaLine"

    Record “EOS ShippingPriceAreaLine”

  • LastShippingPriceAreaLine Record "EOS ShippingPriceAreaLine"

    Record “EOS ShippingPriceAreaLine”

  • Returns Boolean

    Boolean

CalcActualCostFromExpected

procedure CalcActualCostFromExpected(var DocShippingPrice: Record "EOS DocumentShippingPrice"; CalcTariff: Boolean; CalcAddCharges: Boolean)

Calculate Actual Cost From Expected

Parameters / Return Value

  • DocShippingPrice Record "EOS DocumentShippingPrice"

    Record “EOS DocumentShippingPrice”

  • CalcTariff Boolean

    Boolean

  • CalcAddCharges Boolean

    Boolean

GetDataFromPostCode

procedure GetDataFromPostCode(var PostCode: Code[20]; var ISTATCityCode: Code[10]; var CountyCode: Text[30]; var TerritoryCode: Code[10]; var GeoErrorMessage: Text[250]; City: Text[30]): Boolean

Parameters / Return Value

  • PostCode Code[20]

  • ISTATCityCode Code[10]

  • CountyCode Text[30]

  • TerritoryCode Code[10]

  • GeoErrorMessage Text[250]

  • City Text[30]

  • Returns Boolean

CalcSalesRetOrderPriceAllShipAgents

procedure CalcSalesRetOrderPriceAllShipAgents(var SalesHeader: Record "Sales Header")

Parameters / Return Value

  • SalesHeader Record "Sales Header"

CalcSalesRetOrderPriceShipAgent

procedure CalcSalesRetOrderPriceShipAgent(var SalesHeader: Record "Sales Header"; ShippingAgentCode: Code[20]; ShippingAgentServiceCode: Code[20]; var LastEntryNo: Integer)

Parameters / Return Value

  • SalesHeader Record "Sales Header"

  • ShippingAgentCode Code[20]

  • ShippingAgentServiceCode Code[20]

  • LastEntryNo Integer

CalcSalesOrderPriceAllShipAgents

procedure CalcSalesOrderPriceAllShipAgents(var SalesHeader: Record "Sales Header")

Parameters / Return Value

  • SalesHeader Record "Sales Header"

CalcSalesOrderPriceShipAgent

procedure CalcSalesOrderPriceShipAgent(var SalesHeader: Record "Sales Header"; ShippingAgentCode: Code[20]; ShippingAgentServiceCode: Code[20]; var LastEntryNo: Integer)

Parameters / Return Value

  • SalesHeader Record "Sales Header"

  • ShippingAgentCode Code[20]

  • ShippingAgentServiceCode Code[20]

  • LastEntryNo Integer

CalcShipmentGroupPriceAllShipAgents

procedure CalcShipmentGroupPriceAllShipAgents(SourceType: Integer; SourceNo: Code[20]; SourceSystemId: Guid; DocShippingPriceType: Enum "EOS066 EX038 Ship. Price Doc Type"; RunPage: Boolean; var DocShipAgentPrice: Record "EOS DocShippingAgentPrice"; ShipAgentCodeFieldId: Integer; ShipAgentServiceCodeFieldId: Integer)

Parameters / Return Value

  • SourceType Integer

  • SourceNo Code[20]

  • SourceSystemId Guid

  • DocShippingPriceType Enum "EOS066 EX038 Ship. Price Doc Type"

  • RunPage Boolean

  • DocShipAgentPrice Record "EOS DocShippingAgentPrice"

  • ShipAgentCodeFieldId Integer

  • ShipAgentServiceCodeFieldId Integer

DelSalesShippingPrice

procedure DelSalesShippingPrice(SalesHeader: Record "Sales Header")

Delete Sales Shipping Price

Parameters / Return Value

  • SalesHeader Record "Sales Header"

    Record “Sales Header”

ExistSalesShippingPrice

procedure ExistSalesShippingPrice(SalesHeader: Record "Sales Header"): Boolean

Exist Sales Shipping Price

Parameters / Return Value

  • SalesHeader Record "Sales Header"

    Record “Sales Header”

  • Returns Boolean

    Boolean

GetSalesAdditionalCharges

procedure GetSalesAdditionalCharges(SalesHeader: Record "Sales Header")

Get Sales Additional Charges

Parameters / Return Value

  • SalesHeader Record "Sales Header"

    Record “Sales Header”

ShowSalesShippingPrices

procedure ShowSalesShippingPrices(SalesHeader: Record "Sales Header")

Show Sales Shipping Prices

Parameters / Return Value

  • SalesHeader Record "Sales Header"

    Record “Sales Header”

CalcSalesShippingPrice

procedure CalcSalesShippingPrice(SalesHeader: Record "Sales Header")

Calculate Sales Shipping Price

Parameters / Return Value

  • SalesHeader Record "Sales Header"

    Record “Sales Header”

CalcSalesAmount

procedure CalcSalesAmount(SalesHeader: Record "Sales Header"; QtyType: Option General,Invoicing,Shipping): Decimal

Calculate Sales Amount

Parameters / Return Value

  • SalesHeader Record "Sales Header"

    Record “Sales Header”

  • QtyType Option

    General (0) , Invoicing (1) , Shipping (2)

    Option General,Invoicing,Shipping

  • Returns Decimal

    Decimal

DelSalesShptShippingPrice

procedure DelSalesShptShippingPrice(SalesShptHeader: Record "Sales Shipment Header")

Delelte Sales Shipment Shipping Price

Parameters / Return Value

  • SalesShptHeader Record "Sales Shipment Header"

    Record “Sales Shipment Header”

ExistSalesShptShippingPrice

procedure ExistSalesShptShippingPrice(SalesShptHeader: Record "Sales Shipment Header"): Boolean

Exist Sales Shipment Shipping Price

Parameters / Return Value

  • SalesShptHeader Record "Sales Shipment Header"

    Record “Sales Shipment Header”

  • Returns Boolean

    Boolean

GetSalesShptAdditionalCharges

procedure GetSalesShptAdditionalCharges(SalesShptHeader: Record "Sales Shipment Header")

Get Sales Shipment Additional Charges

Parameters / Return Value

  • SalesShptHeader Record "Sales Shipment Header"

    Record “Sales Shipment Header”

CopySalesOrdersAddCharges

procedure CopySalesOrdersAddCharges(SalesShptHeader: Record "Sales Shipment Header")

Copy Sales Orders Add Charges

Parameters / Return Value

  • SalesShptHeader Record "Sales Shipment Header"

    Record “Sales Shipment Header”

CopySalesOrderAddCharges

procedure CopySalesOrderAddCharges(SalesShptHeader: Record "Sales Shipment Header"; SalesHeader: Record "Sales Header"; ShippingPriceCode: Code[20]; CurrVersionCode: Code[10]; RefDate: Date; DocGrossWeight: Decimal; DocNetWeight: Decimal)

Copy Sales Order Additional Charges

Parameters / Return Value

  • SalesShptHeader Record "Sales Shipment Header"

    Record “Sales Shipment Header”

  • SalesHeader Record "Sales Header"

    Record “Sales Header”

  • ShippingPriceCode Code[20]

    Code[20]

  • CurrVersionCode Code[10]

    Code[10]

  • RefDate Date

    Date

  • DocGrossWeight Decimal

    Decimal

  • DocNetWeight Decimal

    Decimal

ShowSalesShptShippingPrices

procedure ShowSalesShptShippingPrices(SalesShptHeader: Record "Sales Shipment Header")

Show Sales Shipment Shipping Prices

Parameters / Return Value

  • SalesShptHeader Record "Sales Shipment Header"

    Record “Sales Shipment Header”

CalcSalesShptShippingPrice

procedure CalcSalesShptShippingPrice(SalesShptHeader: Record "Sales Shipment Header")

Calculate Sales Shipment Shipping Price

Parameters / Return Value

  • SalesShptHeader Record "Sales Shipment Header"

    Record “Sales Shipment Header”

CalcSalesShptAmount

procedure CalcSalesShptAmount(SalesShptHeader: Record "Sales Shipment Header"): Decimal

Calculate Sales Shipment Amount

Parameters / Return Value

  • SalesShptHeader Record "Sales Shipment Header"

    Record “Sales Shipment Header”

  • Returns Decimal

    Decimal

DelTransferShippingPrice

procedure DelTransferShippingPrice(TransferHeader: Record "Transfer Header")

Parameters / Return Value

  • TransferHeader Record "Transfer Header"

ExistTransferShippingPrice

procedure ExistTransferShippingPrice(TransferHeader: Record "Transfer Header"): Boolean

Parameters / Return Value

  • TransferHeader Record "Transfer Header"

  • Returns Boolean

GetTransferAdditionalCharges

procedure GetTransferAdditionalCharges(TransferHeader: Record "Transfer Header")

Parameters / Return Value

  • TransferHeader Record "Transfer Header"

ShowTransferShippingPrices

procedure ShowTransferShippingPrices(TransferHeader: Record "Transfer Header")

Parameters / Return Value

  • TransferHeader Record "Transfer Header"

CalcTransferShippingPrice

procedure CalcTransferShippingPrice(TransferHeader: Record "Transfer Header")

Parameters / Return Value

  • TransferHeader Record "Transfer Header"

CalcTransferAmount

procedure CalcTransferAmount(TransferHeader: Record "Transfer Header"; QtyType: Option General,Invoicing,Shipping): Decimal

Parameters / Return Value

  • TransferHeader Record "Transfer Header"

  • QtyType Option

    General (0) , Invoicing (1) , Shipping (2)

  • Returns Decimal

DelTransfShptShippingPrice

procedure DelTransfShptShippingPrice(TransferShptHeader: Record "Transfer Shipment Header")

Parameters / Return Value

  • TransferShptHeader Record "Transfer Shipment Header"

ExistTransfShptShippingPrice

procedure ExistTransfShptShippingPrice(TransferShptHeader: Record "Transfer Shipment Header"): Boolean

Parameters / Return Value

  • TransferShptHeader Record "Transfer Shipment Header"

  • Returns Boolean

GetTransfShptAdditionalCharges

procedure GetTransfShptAdditionalCharges(TransferShptHeader: Record "Transfer Shipment Header")

Parameters / Return Value

  • TransferShptHeader Record "Transfer Shipment Header"

CopyTransfOrdersAddCharges

procedure CopyTransfOrdersAddCharges(TransferShptHeader: Record "Transfer Shipment Header")

Parameters / Return Value

  • TransferShptHeader Record "Transfer Shipment Header"

CopyTransfOrderAddCharges

procedure CopyTransfOrderAddCharges(TransferShptHeader: Record "Transfer Shipment Header"; TransferHeader: Record "Transfer Header"; ShippingAgentCode: Code[20]; CurrVersionCode: Code[10]; RefDate: Date; DocGrossWeight: Decimal; DocNetWeight: Decimal)

Parameters / Return Value

  • TransferShptHeader Record "Transfer Shipment Header"

  • TransferHeader Record "Transfer Header"

  • ShippingAgentCode Code[20]

  • CurrVersionCode Code[10]

  • RefDate Date

  • DocGrossWeight Decimal

  • DocNetWeight Decimal

ShowTransfShptShippingPrices

procedure ShowTransfShptShippingPrices(TransferShptHeader: Record "Transfer Shipment Header")

Parameters / Return Value

  • TransferShptHeader Record "Transfer Shipment Header"

CalcTransfShptShippingPrice

procedure CalcTransfShptShippingPrice(TransferShptHeader: Record "Transfer Shipment Header")

Parameters / Return Value

  • TransferShptHeader Record "Transfer Shipment Header"

CalcTransfShptAmount

procedure CalcTransfShptAmount(TransferShptHeader: Record "Transfer Shipment Header"): Decimal

Parameters / Return Value

  • TransferShptHeader Record "Transfer Shipment Header"

  • Returns Decimal

DelPurchShippingPrice

procedure DelPurchShippingPrice(PurchHeader: Record "Purchase Header")

Parameters / Return Value

  • PurchHeader Record "Purchase Header"

ExistPurchShippingPrice

procedure ExistPurchShippingPrice(PurchHeader: Record "Purchase Header"): Boolean

Parameters / Return Value

  • PurchHeader Record "Purchase Header"

  • Returns Boolean

GetPurchAdditionalCharges

procedure GetPurchAdditionalCharges(PurchHeader: Record "Purchase Header")

Parameters / Return Value

  • PurchHeader Record "Purchase Header"

ShowPurchShippingPrices

procedure ShowPurchShippingPrices(PurchHeader: Record "Purchase Header")

Parameters / Return Value

  • PurchHeader Record "Purchase Header"

CalcPurchShippingPrice

procedure CalcPurchShippingPrice(PurchHeader: Record "Purchase Header")

Parameters / Return Value

  • PurchHeader Record "Purchase Header"

CalcPurchOrderPriceAllShipAgents

procedure CalcPurchOrderPriceAllShipAgents(var PurchaseHeader: Record "Purchase Header")

Parameters / Return Value

  • PurchaseHeader Record "Purchase Header"

CalcPurchOrderPriceShipAgent

procedure CalcPurchOrderPriceShipAgent(var PurchaseHeader: Record "Purchase Header"; ShippingAgentCode: Code[20]; ShippingAgentServiceCode: Code[20]; var LastEntryNo: Integer)

Parameters / Return Value

  • PurchaseHeader Record "Purchase Header"

  • ShippingAgentCode Code[20]

  • ShippingAgentServiceCode Code[20]

  • LastEntryNo Integer

CalcPurchAmount

procedure CalcPurchAmount(PurchHeader: Record "Purchase Header"; QtyType: Option General,Invoicing,Shipping): Decimal

Parameters / Return Value

  • PurchHeader Record "Purchase Header"

  • QtyType Option

    General (0) , Invoicing (1) , Shipping (2)

  • Returns Decimal

CalcPurchRetOrderPriceAllShipAgents

procedure CalcPurchRetOrderPriceAllShipAgents(var PurchaseHeader: Record "Purchase Header")

Parameters / Return Value

  • PurchaseHeader Record "Purchase Header"

CalcPurchRetOrderPriceShipAgent

procedure CalcPurchRetOrderPriceShipAgent(var PurchaseHeader: Record "Purchase Header"; ShippingAgentCode: Code[20]; ShippingAgentServiceCode: Code[20]; var LastEntryNo: Integer)

Parameters / Return Value

  • PurchaseHeader Record "Purchase Header"

  • ShippingAgentCode Code[20]

  • ShippingAgentServiceCode Code[20]

  • LastEntryNo Integer

DelPurchRcptShippingPrice

procedure DelPurchRcptShippingPrice(PurchRcptHeader: Record "Purch. Rcpt. Header")

Parameters / Return Value

  • PurchRcptHeader Record "Purch. Rcpt. Header"

ExistPurchRcptShippingPrice

procedure ExistPurchRcptShippingPrice(PurchRcptHeader: Record "Purch. Rcpt. Header"): Boolean

Parameters / Return Value

  • PurchRcptHeader Record "Purch. Rcpt. Header"

  • Returns Boolean

GetPurchRcptAdditionalCharges

procedure GetPurchRcptAdditionalCharges(PurchRcptHeader: Record "Purch. Rcpt. Header")

Parameters / Return Value

  • PurchRcptHeader Record "Purch. Rcpt. Header"

CopyPurchOrdersAddCharges

procedure CopyPurchOrdersAddCharges(PurchRcptHeader: Record "Purch. Rcpt. Header")

Parameters / Return Value

  • PurchRcptHeader Record "Purch. Rcpt. Header"

CopyPurchOrderAddCharges

procedure CopyPurchOrderAddCharges(PurchRcptHeader: Record "Purch. Rcpt. Header"; PurchHeader: Record "Purchase Header"; ShippingPriceCode: Code[20]; CurrVersionCode: Code[10]; RefDate: Date; DocGrossWeight: Decimal; DocNetWeight: Decimal)

Parameters / Return Value

  • PurchRcptHeader Record "Purch. Rcpt. Header"

  • PurchHeader Record "Purchase Header"

  • ShippingPriceCode Code[20]

  • CurrVersionCode Code[10]

  • RefDate Date

  • DocGrossWeight Decimal

  • DocNetWeight Decimal

ShowPurchRcptShippingPrices

procedure ShowPurchRcptShippingPrices(PurchRcptHeader: Record "Purch. Rcpt. Header")

Parameters / Return Value

  • PurchRcptHeader Record "Purch. Rcpt. Header"

CalcPurchRcptShippingPrice

procedure CalcPurchRcptShippingPrice(PurchRcptHeader: Record "Purch. Rcpt. Header")

Parameters / Return Value

  • PurchRcptHeader Record "Purch. Rcpt. Header"

CalcPurchRcptAmount

procedure CalcPurchRcptAmount(PurchRcptHeader: Record "Purch. Rcpt. Header"): Decimal

Parameters / Return Value

  • PurchRcptHeader Record "Purch. Rcpt. Header"

  • Returns Decimal

CalcSettlement

procedure CalcSettlement(var DocShippingPricePar: Record "EOS DocumentShippingPrice"; InvoiceActualTariff: Decimal; SpreadType: Option Weight,Pallet,"Good value",Expected,Actual)

Parameters / Return Value

  • DocShippingPricePar Record "EOS DocumentShippingPrice"

  • InvoiceActualTariff Decimal

  • SpreadType Option

    Weight (0) , Pallet (1) , "Good value" (2) , Expected (3) , Actual (4)

ChangeStatusToDefinitive

procedure ChangeStatusToDefinitive(var DocShippingPricePar: Record "EOS DocumentShippingPrice")

Parameters / Return Value

  • DocShippingPricePar Record "EOS DocumentShippingPrice"

ReopenDocuments

procedure ReopenDocuments(var DocShippingPricePar: Record "EOS DocumentShippingPrice")

Parameters / Return Value

  • DocShippingPricePar Record "EOS DocumentShippingPrice"

UpdateDocShipPriceTourTotals

procedure UpdateDocShipPriceTourTotals(DocShippingPricePar: Record "EOS DocumentShippingPrice")

Update Document Shiping Price Tour Totals

Parameters / Return Value

  • DocShippingPricePar Record "EOS DocumentShippingPrice"

    Record “EOS DocumentShippingPrice”

SplitTourExpectedTotals

procedure SplitTourExpectedTotals(DocShippingPricePar: Record "EOS DocumentShippingPrice")

Split Tour Expected Totals

Parameters / Return Value

  • DocShippingPricePar Record "EOS DocumentShippingPrice"

    Record “EOS DocumentShippingPrice”

SplitTourActualTotals

procedure SplitTourActualTotals(DocShippingPricePar: Record "EOS DocumentShippingPrice")

Split Tour Actual Totals

Parameters / Return Value

  • DocShippingPricePar Record "EOS DocumentShippingPrice"

    Record “EOS DocumentShippingPrice”

IsLastTourDocument

procedure IsLastTourDocument(DocShippingPrice: Record "EOS DocumentShippingPrice"): Boolean

Is Last Tour Document

Parameters / Return Value

  • DocShippingPrice Record "EOS DocumentShippingPrice"

    Record “EOS DocumentShippingPrice”

  • Returns Boolean

    Boolean

TourRemainingAmount

procedure TourRemainingAmount(var RecRef: RecordRef; TourAmount: Decimal): Decimal

Parameters / Return Value

  • RecRef RecordRef

  • TourAmount Decimal

  • Returns Decimal

InsertTourDetail

procedure InsertTourDetail(ShippingPriceAreaDetail: Record "EOS ShippingPriceAreaDetail"; DocShippingPrice: Record "EOS DocumentShippingPrice"; var TourTotals: Record "EOS ShippingPriceAreaDetail" temporary)

Insert Tour Detail

Parameters / Return Value

  • ShippingPriceAreaDetail Record "EOS ShippingPriceAreaDetail"

    Record “EOS ShippingPriceAreaDetail”

  • DocShippingPrice Record "EOS DocumentShippingPrice"

    Record “EOS DocumentShippingPrice”

  • TourTotals Record "EOS ShippingPriceAreaDetail"

    Record “EOS ShippingPriceAreaDetail”

CalcTourDetails

procedure CalcTourDetails(DocShippingPricePar: Record "EOS DocumentShippingPrice"; var TourTotals: Record "EOS ShippingPriceAreaDetail" temporary): Decimal

Calculate Tour Details

Parameters / Return Value

  • DocShippingPricePar Record "EOS DocumentShippingPrice"

    Record “EOS DocumentShippingPrice”

  • TourTotals Record "EOS ShippingPriceAreaDetail"

    Record “EOS ShippingPriceAreaDetail”

  • Returns Decimal

    Decimal

SumUpTourDetails

procedure SumUpTourDetails(var TourTotals: Record "EOS ShippingPriceAreaDetail" temporary): Decimal

Sum Up Tour Details

Parameters / Return Value

  • TourTotals Record "EOS ShippingPriceAreaDetail"

    Record “EOS ShippingPriceAreaDetail”

  • Returns Decimal

    Decimal

CalcTourPlanExpectedTotals

procedure CalcTourPlanExpectedTotals(DocShippingPrice: Record "EOS DocumentShippingPrice"; var TourTotals: Record "EOS ShippingPriceAreaDetail" temporary): Decimal

Calculate Tour Plan Expected Totals

Parameters / Return Value

  • DocShippingPrice Record "EOS DocumentShippingPrice"

    Record “EOS DocumentShippingPrice”

  • TourTotals Record "EOS ShippingPriceAreaDetail"

    Record “EOS ShippingPriceAreaDetail”

  • Returns Decimal

    Decimal

GetTourTotals

procedure GetTourTotals(var RecRef: RecordRef; var TourKM: Decimal; var TourHours: Decimal; var TourAmount: Decimal; var TourShipAgentServiceCode: Code[10]; var TourCode: Code[10])

Get Tour Totals

Parameters / Return Value

  • RecRef RecordRef

    RecordRef

  • TourKM Decimal

    Decimal

  • TourHours Decimal

    Decimal

  • TourAmount Decimal

    Decimal

  • TourShipAgentServiceCode Code[10]

    Code[10]

  • TourCode Code[10]

    Code[10]

CalcTourTotals

procedure CalcTourTotals(TourType: Option Sales,Purch; TourPlanNo: Code[20]; var TourKM: Decimal; var TourHours: Decimal; var TourAmount: Decimal; var TourShipAgentServiceCode: Code[10]; var TourCode: Code[10])

Parameters / Return Value

  • TourType Option

    Sales (0) , Purch (1)

  • TourPlanNo Code[20]

  • TourKM Decimal

  • TourHours Decimal

  • TourAmount Decimal

  • TourShipAgentServiceCode Code[10]

  • TourCode Code[10]

CalcTransportPrices

procedure CalcTransportPrices(DocShippingPricePar: Record "EOS DocumentShippingPrice")

Calculate Transport Prices

Parameters / Return Value

  • DocShippingPricePar Record "EOS DocumentShippingPrice"

    Record “EOS DocumentShippingPrice”

SetHideMessage

procedure SetHideMessage(NewHideMessage: Boolean)

Set HideMessage for calculation reports

Parameters / Return Value

  • NewHideMessage Boolean

    Boolean

SetDeleteManuallyModified

procedure SetDeleteManuallyModified(NewDeleteManuallyModified: Boolean)

Set Delete Manually Modified for calculation reports

Parameters / Return Value

  • NewDeleteManuallyModified Boolean

    Boolean

CheckCountry

procedure CheckCountry(ShippingPriceCode: Code[20]; VersionCode: Code[10]; CountryCode: Code[20]; StartingArea: Boolean; var ShippingArea: Record "EOS Shipping Area"): Boolean

Check Country

Parameters / Return Value

  • ShippingPriceCode Code[20]

    Code[20]

  • VersionCode Code[10]

    Code[10]

  • CountryCode Code[20]

    Code[20]

  • StartingArea Boolean

    Boolean

  • ShippingArea Record "EOS Shipping Area"

    Record “EOS Shipping Area”

  • Returns Boolean

    Boolean

CheckTerritory

procedure CheckTerritory(ShippingPriceCode: Code[20]; VersionCode: Code[10]; TerritoryCode: Code[20]; StartingArea: Boolean; var ShippingArea: Record "EOS Shipping Area"): Boolean

Check Territory

Parameters / Return Value

  • ShippingPriceCode Code[20]

    Code[20]

  • VersionCode Code[10]

    Code[10]

  • TerritoryCode Code[20]

    Code[20]

  • StartingArea Boolean

    Boolean

  • ShippingArea Record "EOS Shipping Area"

    Record “EOS Shipping Area”

  • Returns Boolean

    Boolean

CheckCounty

procedure CheckCounty(ShippingPriceCode: Code[20]; VersionCode: Code[10]; CountyCode: Code[20]; StartingArea: Boolean; var ShippingArea: Record "EOS Shipping Area"): Boolean

Check County

Parameters / Return Value

  • ShippingPriceCode Code[20]

    Code[20]

  • VersionCode Code[10]

    Code[10]

  • CountyCode Code[20]

    Code[20]

  • StartingArea Boolean

    Boolean

  • ShippingArea Record "EOS Shipping Area"

    Record “EOS Shipping Area”

  • Returns Boolean

    Boolean

CheckCity

procedure CheckCity(ShippingPriceCode: Code[20]; VersionCode: Code[10]; ISTATCityCode: Code[10]; StartingArea: Boolean; var ShippingArea: Record "EOS Shipping Area"): Boolean

Check City

Parameters / Return Value

  • ShippingPriceCode Code[20]

    Code[20]

  • VersionCode Code[10]

    Code[10]

  • ISTATCityCode Code[10]

    Code[10]

  • StartingArea Boolean

    Boolean

  • ShippingArea Record "EOS Shipping Area"

    Record “EOS Shipping Area”

  • Returns Boolean

    Boolean

CheckPostCode

procedure CheckPostCode(ShippingPriceCode: Code[20]; VersionCode: Code[10]; PostCode: Code[20]; StartingArea: Boolean; var ShippingArea: Record "EOS Shipping Area"; County: Text[30]): Boolean

Parameters / Return Value

  • ShippingPriceCode Code[20]

  • VersionCode Code[10]

  • PostCode Code[20]

  • StartingArea Boolean

  • ShippingArea Record "EOS Shipping Area"

  • County Text[30]

  • Returns Boolean

CheckCustomer

procedure CheckCustomer(ShippingPriceCode: Code[20]; VersionCode: Code[10]; CustomerNo: Code[20]; StartingArea: Boolean; var ShippingArea: Record "EOS Shipping Area"): Boolean

Check Customer

Parameters / Return Value

  • ShippingPriceCode Code[20]

    Code[20]

  • VersionCode Code[10]

    Code[10]

  • CustomerNo Code[20]

    Code[20]

  • StartingArea Boolean

    Boolean

  • ShippingArea Record "EOS Shipping Area"

    Record “EOS Shipping Area”

  • Returns Boolean

    Boolean

Events

OnBeforeGetAreaFromLocationCode

local procedure OnBeforeGetAreaFromLocationCode(ShippingPriceCode: Code[20]; VersionCode: Code[10]; LocationCode: Code[10]; var "Area": Code[20]; var GeoErrorMessage: Text[250]; var ReturnValue: Boolean; var Handled: boolean)

Parameters / Return Value

  • ShippingPriceCode Code[20]

  • VersionCode Code[10]

  • LocationCode Code[10]

  • Area Code[20]

  • GeoErrorMessage Text[250]

  • ReturnValue Boolean

  • Handled boolean

OnAfterGetAreaFromLocationCode

local procedure OnAfterGetAreaFromLocationCode(ShippingPriceCode: Code[20]; VersionCode: Code[10]; LocationCode: Code[10]; var "Area": Code[20]; var GeoErrorMessage: Text[250]; var ReturnValue: Boolean)

Parameters / Return Value

  • ShippingPriceCode Code[20]

  • VersionCode Code[10]

  • LocationCode Code[10]

  • Area Code[20]

  • GeoErrorMessage Text[250]

  • ReturnValue Boolean

OnBeforeGetAreaFromStandardFields

local procedure OnBeforeGetAreaFromStandardFields(var RecRef: RecordRef; var "Area": Code[20]; var GeoErrorMessage: Text[250]; var returnValue: Boolean; var Handled: Boolean)

Parameters / Return Value

  • RecRef RecordRef

  • Area Code[20]

  • GeoErrorMessage Text[250]

  • returnValue Boolean

  • Handled Boolean

OnAfterGetAreaFromStandardFields

local procedure OnAfterGetAreaFromStandardFields(var RecRef: RecordRef; var "Area": Code[20]; var GeoErrorMessage: Text[250]; var returnValue: Boolean)

Parameters / Return Value

  • RecRef RecordRef

  • Area Code[20]

  • GeoErrorMessage Text[250]

  • returnValue Boolean

OnBeforeGetQty2

local procedure OnBeforeGetQty2(var RecRef: RecordRef; ShippingAgentCode: Code[20]; ShipPriceTypeCode: Code[10]; var CheckTourTotal: Boolean; var QtyError: Boolean; var QtyErrorMessage: Text[250]; var returnValue: Decimal; var handled: boolean)

Parameters / Return Value

  • RecRef RecordRef

  • ShippingAgentCode Code[20]

  • ShipPriceTypeCode Code[10]

  • CheckTourTotal Boolean

  • QtyError Boolean

  • QtyErrorMessage Text[250]

  • returnValue Decimal

  • handled boolean

OnAfterGetQty

local procedure OnAfterGetQty(var RecRef: RecordRef; ShippingAgentCode: Code[20]; ShipPriceTypeCode: Code[10]; var CheckTourTotal: Boolean; var QtyError: Boolean; var QtyErrorMessage: Text[250]; var returnValue: Decimal)

Parameters / Return Value

  • RecRef RecordRef

  • ShippingAgentCode Code[20]

  • ShipPriceTypeCode Code[10]

  • CheckTourTotal Boolean

  • QtyError Boolean

  • QtyErrorMessage Text[250]

  • returnValue Decimal

OnBeforeGetTourTotals

local procedure OnBeforeGetTourTotals(var RecRef: RecordRef; var TourKM: Decimal; var TourHours: Decimal; var TourAmount: Decimal; var TourShipAgentServiceCode: Code[10]; var TourCode: Code[10]; var handled: boolean)

Parameters / Return Value

  • RecRef RecordRef

  • TourKM Decimal

  • TourHours Decimal

  • TourAmount Decimal

  • TourShipAgentServiceCode Code[10]

  • TourCode Code[10]

  • handled boolean

OnAfterCasePriceType_OnGetQty

local procedure OnAfterCasePriceType_OnGetQty(var RecRef: RecordRef; ShipPriceType: Record "EOS Shipping Price Type"; ShippingAgentCode: Code[20]; var CheckTourTotal: Boolean; var ReturnValue: Decimal; var IsHandled: Boolean)

Raised in the procedure GetQty. Use it to manage a custom value of “Price Type” and return the Qty for the given Shiping Price Type Code.

Parameters / Return Value

  • RecRef RecordRef

    Document RecRef

  • ShipPriceType Record "EOS Shipping Price Type"

    Record “EOS Shipping Price Type” to manage a custom Code value

  • ShippingAgentCode Code[20]

    The Shipping Agent Code

  • CheckTourTotal Boolean

    Set to true if the Price Type is a Tour

  • ReturnValue Decimal

    The calculated Qty to return

  • IsHandled Boolean

    if true, no following app code will be executed

OnBeforeCalcShipPrice_OnAfterGetShippingPriceCode

local procedure OnBeforeCalcShipPrice_OnAfterGetShippingPriceCode(var RecRef: RecordRef; CalcOnlyTourTotals: Boolean; var TourTotals: Record "EOS ShippingPriceAreaDetail" temporary; ShippingAgentCode: Code[20];ShippingPriceCode: Code[20]; var IsHandled: Boolean)

Raised in procedure CalcShipPrice, before calculate the Transport Costs and after get the Shipping Price Code.

Parameters / Return Value

  • RecRef RecordRef

    Document RecRef

  • CalcOnlyTourTotals Boolean

    CalcOnlyTourTotals Boolean

  • TourTotals Record "EOS ShippingPriceAreaDetail"

    Record “EOS ShippingPriceAreaDetail”

  • ShippingAgentCode Code[20]

    The Shipping Agent Code

  • ShippingPriceCode Code[20]

    Shipping Price Code found

  • IsHandled Boolean

    if true, no following app code will be executed

OnBeforeTourRemainingAmount

local procedure OnBeforeTourRemainingAmount(var SourceDocRecRef: RecordRef; TourAmount: Decimal; var ReturnAmount: Decimal; var IsHandled: Boolean; var TempTourTotals: Record "EOS ShippingPriceAreaDetail" temporary)

Raised in the procedure TourRemainingAmount, before get the Amount (Expected) for the last tour.

Parameters / Return Value

  • SourceDocRecRef RecordRef

    The source document

  • TourAmount Decimal

    The Total Tour Amount

  • ReturnAmount Decimal

    The Amount to return for the last tour

  • IsHandled Boolean

    if true, no following app code will be executed

  • TempTourTotals Record "EOS ShippingPriceAreaDetail"

    Containes records with total tour quantity and total tour amount for all shipping price lines found

OnAfterCalcTourTotals

local procedure OnAfterCalcTourTotals(TourType: Option Sales,Purch; TourPlanNo: Code[20]; var TourKM: Decimal; var TourHours: Decimal; var TourAmount: Decimal; var TourShipAgentServiceCode: Code[10]; var TourCode: Code[10])

Raised after calculation of total tour parameters for the specific Tour Plan. The tour parameters are the sum of the parameters of the documents, added to the Tour Plan. Use it to calculate the tour parameters for custom document type.

Parameters / Return Value

  • TourType Option

    Sales (0) , Purch (1)

    The Tour Type

  • TourPlanNo Code[20]

    The Tour Plan No.

  • TourKM Decimal

    The sum of the KM on documents

  • TourHours Decimal

    The sum of the Hours on documents

  • TourAmount Decimal

    The sum of the Amount on documents

  • TourShipAgentServiceCode Code[10]

    The shipping Agent Service Code

  • TourCode Code[10]

    The Tour Code on documents

OnBeforeGetRecRefFromDocShippingPrice

local procedure OnBeforeGetRecRefFromDocShippingPrice(DocShippingPrice: Record "EOS DocumentShippingPrice"; var RecRef: RecordRef; var IsHandled: Boolean)

Raised in the procedure GetRecRefFromDocShippingPrice to set the RecRef from the current Document Shipping Price.

Parameters / Return Value

  • DocShippingPrice Record "EOS DocumentShippingPrice"

    Current Record “EOS DocumentShippingPrice”

  • RecRef RecordRef

    RecRef to set

  • IsHandled Boolean

    if true, no following app code will be executed

OnBeforeCalcTourDetails

local procedure OnBeforeCalcTourDetails(DocShippingPricePar: Record "EOS DocumentShippingPrice"; var TourTotals: Record "EOS ShippingPriceAreaDetail" temporary; var IsHandled: Boolean; var ReturnQtyTotal: Decimal)

Raised in the procedure CalcTourDetails, before setting the Total Quantity of the Tour Plan.

Parameters / Return Value

  • DocShippingPricePar Record "EOS DocumentShippingPrice"

    Current Document Shipping Price

  • TourTotals Record "EOS ShippingPriceAreaDetail"

    Set of Records “EOS ShippingPriceAreaDetail”

  • IsHandled Boolean

    if true, no following app code will be executed

  • ReturnQtyTotal Decimal

    Total Quantity to return

OnBeforeGetDetailOnCalcShippingPriceForTourPlan

local procedure OnBeforeGetDetailOnCalcShippingPriceForTourPlan(TourPlanNo: Code[20]; var ShippingPriceQty: Decimal; ShippingPriceTypeCode: Code[10]; ShippingPriceCode: Code[10]; var ApplyTourTotal: Boolean; var DocShippingPrice: Record "EOS DocumentShippingPrice"; var TempShippingPriceAreaLine: Record "EOS ShippingPriceAreaLine" temporary)

Raised before finding the Shipping Price Details in the calculation of transport costs for the Tour Plan. Use it to modify the Shipping Price Quantity to use as filter on details.

Parameters / Return Value

  • TourPlanNo Code[20]

    The Tour Plan No.

  • ShippingPriceQty Decimal

    Quantity to modify

  • ShippingPriceTypeCode Code[10]

    Shipping Price Type Code

  • ShippingPriceCode Code[10]

    Shipping Price Code

  • ApplyTourTotal Boolean

    Specifies if split the total amount of tour

  • DocShippingPrice Record "EOS DocumentShippingPrice"

    Current Record Document Shipping Price

  • TempShippingPriceAreaLine Record "EOS ShippingPriceAreaLine"

    Temporary record used to save filters to find the shipping price details

OnBeforeApplyFiltersToShippingPriceAreaLine

local procedure OnBeforeApplyFiltersToShippingPriceAreaLine(var DocShippingPrice: Record "EOS DocumentShippingPrice"; var ShippingPriceCode: Code[20]; var AreaFrom: Code[20]; var AreaTo: Code[20]; var ShippingAgentServiceCode: Code[20]; var TourCode: Code[10]; TourPlanNo: Code[20])

Raised before apply filters to find the Shipping Price of the Shipping agent. Use it to modify filters.

Parameters / Return Value

  • DocShippingPrice Record "EOS DocumentShippingPrice"

    Current record Document ShippingPrice

  • ShippingPriceCode Code[20]

  • AreaFrom Code[20]

  • AreaTo Code[20]

  • ShippingAgentServiceCode Code[20]

  • TourCode Code[10]

  • TourPlanNo Code[20]


EOS Labs -