Codeunit 18122730 EOS066 EX038 ETC

Codeunit 18122730 EOS066 EX038 ETC

Methods

GetTourTotals

procedure GetTourTotals(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

SetDocShippingPricePK

procedure SetDocShippingPricePK(var RecRef: RecordRef; var DocType: Enum "EOS066 EX038 Ship. Price Doc Type"; var DocNo: Code[20]; var Handled: Boolean)

Parameters / Return Value

  • RecRef RecordRef

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

  • DocNo Code[20]

  • Handled Boolean

SetDocShippingPriceInfo

procedure SetDocShippingPriceInfo(var recref: recordRef; var CustNo: Code[20]; var Description: Text[100]; var DocumentDate: Date; var ReqDeliveryDate: Date; var AgentCode: code[10]; var AgentServiceCode: Code[10]; var Handled: Boolean)

Parameters / Return Value

  • recref recordRef

  • CustNo Code[20]

  • Description Text[100]

  • DocumentDate Date

  • ReqDeliveryDate Date

  • AgentCode code[10]

  • AgentServiceCode Code[10]

  • Handled Boolean

DeleteVariantShippingPrice

procedure DeleteVariantShippingPrice(source: Variant; DeleteManuallyModified: Boolean)

Parameters / Return Value

  • source Variant

  • DeleteManuallyModified Boolean

ExistsVariantShippingPrice

procedure ExistsVariantShippingPrice(source: Variant; DeleteManuallyModified: Boolean) Return: Boolean

Parameters / Return Value

  • source Variant

  • DeleteManuallyModified Boolean

  • Returns Boolean

CalcVariantShippingPrice

procedure CalcVariantShippingPrice(source: Variant; DeleteManuallyModified: Boolean)

Parameters / Return Value

  • source Variant

  • DeleteManuallyModified Boolean

DeleteVariantShippingPrice

procedure DeleteVariantShippingPrice(source: Variant; DeleteManuallyModified: Boolean; HideMessage: Boolean)

Parameters / Return Value

  • source Variant

  • DeleteManuallyModified Boolean

  • HideMessage Boolean

ExistsVariantShippingPrice

procedure ExistsVariantShippingPrice(source: Variant; DeleteManuallyModified: Boolean; HideMessage: Boolean) Return: Boolean

Parameters / Return Value

  • source Variant

  • DeleteManuallyModified Boolean

  • HideMessage Boolean

  • Returns Boolean

CalcVariantShippingPrice

procedure CalcVariantShippingPrice(source: Variant; DeleteManuallyModified: Boolean; HideMessage: Boolean)

Parameters / Return Value

  • source Variant

  • DeleteManuallyModified Boolean

  • HideMessage Boolean

CheckDocIsDefinitive

procedure CheckDocIsDefinitive(source: Variant) Return: Boolean

Parameters / Return Value

  • source Variant

  • Returns Boolean

FindCalculationReports

procedure FindCalculationReports(var Buffer: Record "Name/Value Buffer" temporary)

Parameters / Return Value

  • Buffer Record "Name/Value Buffer"

ExecuteCalculationReports

procedure ExecuteCalculationReports(var Buffer: Record "Name/Value Buffer" temporary)

Parameters / Return Value

  • Buffer Record "Name/Value Buffer"

CheckShippingMethodExcludeCalculation

procedure CheckShippingMethodExcludeCalculation(recref: RecordRef; var handled: Boolean; var ShipmentMethod: Record "Shipment Method")

Parameters / Return Value

  • recref RecordRef

  • handled Boolean

  • ShipmentMethod Record "Shipment Method"

GetFieldValue

procedure GetFieldValue(recRef: RecordRef; fieldNo: Integer; var fieldValue: Text[250]; var handled: Boolean)

Parameters / Return Value

  • recRef RecordRef

  • fieldNo Integer

  • fieldValue Text[250]

  • handled Boolean

RowEnabled

procedure RowEnabled(recRef: RecordRef; PriceHeaderOrderCalculation: Boolean; PriceHeaderInvoiceCalculation: Boolean; PriceHeaderShippingCalculation: Boolean;PriceTypeOrderCalculation: Boolean; PriceTypeInvoiceCalculation: Boolean; PriceTypeShippingCalculation: Boolean; var handled: Boolean; var return: Boolean)

Parameters / Return Value

  • recRef RecordRef

  • PriceHeaderOrderCalculation Boolean

  • PriceHeaderInvoiceCalculation Boolean

  • PriceHeaderShippingCalculation Boolean

  • PriceTypeOrderCalculation Boolean

  • PriceTypeInvoiceCalculation Boolean

  • PriceTypeShippingCalculation Boolean

  • handled Boolean

  • return Boolean

GetSourceDocRecRef

procedure GetSourceDocRecRef(DocType: Enum "EOS066 EX038 Ship. Price Doc Type"; DocNo: Code[20]; var recref: RecordRef; var handled: Boolean)

Parameters / Return Value

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

  • DocNo Code[20]

  • recref RecordRef

  • handled Boolean

GetETCParamCalculationType

procedure GetETCParamCalculationType(var CalculateParamsSource: Enum "EOS038 Calculate Params Source")

Parameters / Return Value

  • CalculateParamsSource Enum "EOS038 Calculate Params Source"

GetTotalValuesFromSourceDoc

procedure GetTotalValuesFromSourceDoc(SourceDoc: RecordRef; var TotalNetWeight: Decimal; var TotalGrossWeight: Decimal; var TotalVolume: Decimal; var TotalParcels: Decimal; var TotalPallets: Decimal)

Parameters / Return Value

  • SourceDoc RecordRef

  • TotalNetWeight Decimal

  • TotalGrossWeight Decimal

  • TotalVolume Decimal

  • TotalParcels Decimal

  • TotalPallets Decimal

SetPageActionVisibility

procedure SetPageActionVisibility(var CalcSalesOrdersTraspCostVisible: Boolean;var CalcSalesRetOrdersTraspCostVisible: Boolean;var CalcSalesShptTraspCostVisible: Boolean;var CalcPurchOrdersTraspCostVisible: Boolean;var CalcPurchRetOrdersTraspCostVisible: Boolean;var CalcTransfShptTraspCostVisible: Boolean;var CalcTransfOrderTraspCostVisible: Boolean;var CalcPurchRcptTraspCostVisible: Boolean)

Parameters / Return Value

  • CalcSalesOrdersTraspCostVisible Boolean

  • CalcSalesRetOrdersTraspCostVisible Boolean

  • CalcSalesShptTraspCostVisible Boolean

  • CalcPurchOrdersTraspCostVisible Boolean

  • CalcPurchRetOrdersTraspCostVisible Boolean

  • CalcTransfShptTraspCostVisible Boolean

  • CalcTransfOrderTraspCostVisible Boolean

  • CalcPurchRcptTraspCostVisible Boolean

SettlementETCDocumentAssignChargeItem

procedure SettlementETCDocumentAssignChargeItem(var purchaseLine: Record "Purchase Line"; DocumentType: Enum "EOS066 EX038 Ship. Price Doc Type"; DocNo: Code[20]; TotShippinPrice: Decimal)

Parameters / Return Value

  • purchaseLine Record "Purchase Line"

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

  • DocNo Code[20]

  • TotShippinPrice Decimal

AssignETCTransferLineCode

procedure AssignETCTransferLineCode(var purchaseLine: Record "Purchase Line"; DocumentType: Enum "EOS066 EX038 Ship. Price Doc Type"; DocNo: Code[20]; var IsHandled: Boolean; TransferLineCode: Code[20])

Parameters / Return Value

  • purchaseLine Record "Purchase Line"

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

  • DocNo Code[20]

  • IsHandled Boolean

  • TransferLineCode Code[20]

RaiseCalcShipmentGroupPriceAllShipAgents

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

Parameters / Return Value

  • SourceType Integer

  • SourceNo Code[20]

  • SourceSystemId Guid

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

  • RunPage Boolean

  • ShipAgentCodeFieldId Integer

  • ShipAgentServiceCodeFieldId Integer

RaiseOpenPageSuggestTransportCosts

procedure RaiseOpenPageSuggestTransportCosts(DocShippingPriceType: Enum "EOS066 EX038 Ship. Price Doc Type"; DocumentNoFilter: Text)

Parameters / Return Value

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

  • DocumentNoFilter Text[]

RaiseOnGetShippingPriceDocOnGetTransportCost

procedure RaiseOnGetShippingPriceDocOnGetTransportCost(DocumentType: Enum "Item Ledger Document Type"; DocumentNo: Code[20]; DocumentLineNo: Integer; var ShipPriceDocType: Integer; var ShipPriceDocNo: Code[20]; var DocLineNetWeight: Decimal; var DocLineQty: Decimal; var IsHandled: Boolean)

Parameters / Return Value

  • DocumentType Enum "Item Ledger Document Type"

  • DocumentNo Code[20]

  • DocumentLineNo Integer

  • ShipPriceDocType Integer

  • ShipPriceDocNo Code[20]

  • DocLineNetWeight Decimal

  • DocLineQty Decimal

  • IsHandled Boolean

GetDocumentTourParams

procedure GetDocumentTourParams(var SourceDocRecRef: RecordRef; var TourCode: Code[10]; var TourPlanNo: Code[20]; var SequenceNumberTourPlan: Code[10])

Parameters / Return Value

  • SourceDocRecRef RecordRef

  • TourCode Code[10]

  • TourPlanNo Code[20]

  • SequenceNumberTourPlan Code[10]

GetDocumentsInTourPlan

procedure GetDocumentsInTourPlan(var TempTourLineBuffer: Record "EOS Record Ident. Buffer" temporary; TourPlanNo: Code[20])

Parameters / Return Value

  • TempTourLineBuffer Record "EOS Record Ident. Buffer"

  • TourPlanNo Code[20]

GetPostedDocumentFromTourLine

procedure GetPostedDocumentFromTourLine(var TourLineRecRef: RecordRef; TourPlanNo: Code[20]; var PostedSourceType: Integer; var PostedSourceSubtype: Integer; var PostedSourceNo: Code[20]; var PostedSourceSystemID: Guid; var IsHandled: Boolean)

Parameters / Return Value

  • TourLineRecRef RecordRef

  • TourPlanNo Code[20]

  • PostedSourceType Integer

  • PostedSourceSubtype Integer

  • PostedSourceNo Code[20]

  • PostedSourceSystemID Guid

  • IsHandled Boolean

RaiseOnGetCWSGroupForTourLine

procedure RaiseOnGetCWSGroupForTourLine(var TourLineRecRef: RecordRef; TourPlanNo: Code[20]; var SourceType: Integer; var SourceSubtype: Integer; var SourceNo: Code[20]; var SourceSystemID: Guid; var IsHandled: Boolean)

Parameters / Return Value

  • TourLineRecRef RecordRef

  • TourPlanNo Code[20]

  • SourceType Integer

  • SourceSubtype Integer

  • SourceNo Code[20]

  • SourceSystemID Guid

  • IsHandled Boolean

GetDocumentTypeShippingPrice

procedure GetDocumentTypeShippingPrice(SourceType: Integer; SourceSubtype: Integer; var DocumentType: Enum "EOS066 EX038 Ship. Price Doc Type"; var IsHandled: Boolean)

Parameters / Return Value

  • SourceType Integer

  • SourceSubtype Integer

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

  • IsHandled Boolean

CalcTourTotals

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

Parameters / Return Value

  • SourceDocRecRef RecordRef

  • TourCode Code[10]

  • TourPlanNo Code[20]

  • SequenceNumberTourPlan Code[10]

  • TourType Option

    Sales (0) , Purch (1)

  • TourKM Decimal

  • TourHours Decimal

  • TourAmount Decimal

  • TourShipAgentServiceCode Code[10]

  • SkipTourTotals Boolean

  • IsInterface Boolean

CalcTourTotalsForSales

procedure CalcTourTotalsForSales(var TempTourLineBuffer: Record "EOS Record Ident. Buffer" temporary; TourPlanNo: Code[20]; var DocFound: Boolean; var TourKM: Decimal; var TourHours: Decimal; var TourAmount: Decimal; var TourShipAgentServiceCode: Code[10]; var TourCode: Code[10])

Parameters / Return Value

  • TempTourLineBuffer Record "EOS Record Ident. Buffer"

  • TourPlanNo Code[20]

  • DocFound Boolean

  • TourKM Decimal

  • TourHours Decimal

  • TourAmount Decimal

  • TourShipAgentServiceCode Code[10]

  • TourCode Code[10]

SetTourTypeOnGetTourTotals

procedure SetTourTypeOnGetTourTotals(var SourceDocRecRef: RecordRef; var TourType: Integer; var IsHandled: Boolean)

Parameters / Return Value

  • SourceDocRecRef RecordRef

  • TourType Integer

  • IsHandled Boolean

GetRecRefFromDocShippingPrice

procedure GetRecRefFromDocShippingPrice(DocumentType: Enum "EOS066 EX038 Ship. Price Doc Type"; DocumentNo: Code[20]; var SourceDocRecRef: RecordRef; var IsHandled: Boolean)

Parameters / Return Value

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

  • DocumentNo Code[20]

  • SourceDocRecRef RecordRef

  • IsHandled Boolean

GetDocumentOnCalcTourRemainingAmount

procedure GetDocumentOnCalcTourRemainingAmount(var DocumentType: Enum "EOS066 EX038 Ship. Price Doc Type"; var DocumentNo: Code[20]; var SourceDocRecRef: RecordRef; var IsHandled: Boolean)

Parameters / Return Value

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

  • DocumentNo Code[20]

  • SourceDocRecRef RecordRef

  • IsHandled Boolean

GetTransportCostTourPlanForSourceDoc

procedure GetTransportCostTourPlanForSourceDoc(SourceType: Integer; SourceSubtype: Integer; SourceNo: Code[20]; TourPlanNo: Code[20])

Parameters / Return Value

  • SourceType Integer

  • SourceSubtype Integer

  • SourceNo Code[20]

  • TourPlanNo Code[20]

Events

OnCalcShipmentGroupPriceAllShipAgents

local procedure OnCalcShipmentGroupPriceAllShipAgents(SourceType: Integer; SourceNo: Code[20]; SourceSystemId: Guid; DocShippingPriceType: Enum "EOS066 EX038 Ship. Price Doc Type"; RunPage: Boolean; ShipAgentCodeFieldId: Integer; ShipAgentServiceCodeFieldId: Integer)

Parameters / Return Value

  • SourceType Integer

  • SourceNo Code[20]

  • SourceSystemId Guid

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

  • RunPage Boolean

  • ShipAgentCodeFieldId Integer

  • ShipAgentServiceCodeFieldId Integer

OnOpenPageSuggestTransportCosts

local procedure OnOpenPageSuggestTransportCosts(DocShippingPriceType: Enum "EOS066 EX038 Ship. Price Doc Type"; DocumentNoFilter: Text)

Parameters / Return Value

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

  • DocumentNoFilter Text[]

OnGetShippingPriceDocOnGetTransportCost

local procedure OnGetShippingPriceDocOnGetTransportCost(DocumentType: Enum "Item Ledger Document Type"; DocumentNo: Code[20]; DocumentLineNo: Integer; var ShipPriceDocType: Integer; var ShipPriceDocNo: Code[20]; var DocLineNetWeight: Decimal; var DocLineQty: Decimal; var IsHandled: Boolean)

Parameters / Return Value

  • DocumentType Enum "Item Ledger Document Type"

  • DocumentNo Code[20]

  • DocumentLineNo Integer

  • ShipPriceDocType Integer

  • ShipPriceDocNo Code[20]

  • DocLineNetWeight Decimal

  • DocLineQty Decimal

  • IsHandled Boolean

OnGetTransportCostTourPlanForSourceDoc

local procedure OnGetTransportCostTourPlanForSourceDoc(SourceType: Integer; SourceSubtype: Integer; SourceNo: Code[20]; TourPlanNo: Code[20])

Raised after running Report of Transport Costs for the source document in the Tour Plan. It is used from EX006 CWS to run the specific Report.

Parameters / Return Value

  • SourceType Integer

    Source Type of current document

  • SourceSubtype Integer

    Source Subtype of current document

  • SourceNo Code[20]

    Source No. of current document

  • TourPlanNo Code[20]

    The Tour Plan No.

OnGetDocumentTourParams

local procedure OnGetDocumentTourParams(var SourceDocRecRef: RecordRef; var TourCode: Code[10]; var TourPlanNo: Code[20]; var SequenceNumberTourPlan: Code[10])

Raised in the app EX092 DRP to get the Tour Plan No. for the Source Document.

Parameters / Return Value

  • SourceDocRecRef RecordRef

    Source Document

  • TourCode Code[10]

    Tour Code on the Source Document

  • TourPlanNo Code[20]

    Tour Plan No to set

  • SequenceNumberTourPlan Code[10]

    Sequence Number Tour Plan to set

OnGetDocumentsInTourPlan

local procedure OnGetDocumentsInTourPlan(var TempTourLineBuffer: Record "EOS Record Ident. Buffer" temporary; TourPlanNo: Code[20])

Raised in the app EX092.02 “DRP for ETC” to get the Tour Line Buffer for the specific Tour Plan.

Parameters / Return Value

  • TempTourLineBuffer Record "EOS Record Ident. Buffer"

    The Tour Line Buffer to set

  • TourPlanNo Code[20]

    Tour Plan No.

OnCalcTourTotals

local procedure OnCalcTourTotals(var SourceDocRecRef: RecordRef; var TourCode: Code[10]; var TourPlanNo: Code[20]; var SequenceNumberTourPlan: Code[10]; TourType: Option Sales,Purch; var TourKM: Decimal; var TourHours: Decimal; var TourAmount: Decimal; var TourShipAgentServiceCode: Code[10]; SkipTourTotals: Boolean; IsInterface: Boolean)

Raised in the app EX038 ETC to run the procedure CalcTourTotals for the specific Tour Plan. This is used from the EX006 CWS and EX066.04 Doc. Shipping Info, that implemet the ETC interface.

Parameters / Return Value

  • SourceDocRecRef RecordRef

    The Source Doc

  • TourCode Code[10]

  • TourPlanNo Code[20]

  • SequenceNumberTourPlan Code[10]

  • TourType Option

    Sales (0) , Purch (1)

  • TourKM Decimal

  • TourHours Decimal

  • TourAmount Decimal

  • TourShipAgentServiceCode Code[10]

  • SkipTourTotals Boolean

    if true, runs the procedure CalcTourTotals

  • IsInterface Boolean

    Specifies if the event is raised from the interface. It is set to true from the interface of apps CWS and Doc. Shipping Info

OnCalcTourTotalsForSales

local procedure OnCalcTourTotalsForSales(var TempTourLineBuffer: Record "EOS Record Ident. Buffer" temporary; TourPlanNo: Code[20]; var DocFound: Boolean; var TourKM: Decimal; var TourHours: Decimal; var TourAmount: Decimal; var TourShipAgentServiceCode: Code[10]; var TourCode: Code[10])

Raised in the app EX006 CWS to calculate the Tour Totals, if there are CWS Shipments on the Tour Plan.

Parameters / Return Value

  • TempTourLineBuffer Record "EOS Record Ident. Buffer"

    The Tour Line Buffer

  • TourPlanNo Code[20]

  • DocFound Boolean

    if true, skip the calculation of the tour totals for Sales Shipments

  • TourKM Decimal

  • TourHours Decimal

  • TourAmount Decimal

  • TourShipAgentServiceCode Code[10]

  • TourCode Code[10]

OnSetTourTypeOnGetTourTotals

local procedure OnSetTourTypeOnGetTourTotals(var SourceDocRecRef: RecordRef; var TourType: Integer; var IsHandled: Boolean)

Raised in the app EX006 CWS to set the Tour Type from Source Document.

Parameters / Return Value

  • SourceDocRecRef RecordRef

    Source Document RecRef

  • TourType Integer

    0 for Sales, 1 for Purchase

  • IsHandled Boolean

    if true, doesn’t return error “Unexpected table”

OnGetRecRefFromDocShippingPrice

local procedure OnGetRecRefFromDocShippingPrice(DocumentType: Enum "EOS066 EX038 Ship. Price Doc Type"; DocumentNo: Code[20]; var SourceDocRecRef: RecordRef; var IsHandled: Boolean)

Raised in the app EX006 CWS to set RecRef for CWS Shipment.

Parameters / Return Value

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

    The Document Type

  • DocumentNo Code[20]

    Document No

  • SourceDocRecRef RecordRef

    The Source Document to set

  • IsHandled Boolean

    if true, skip the error for custom tables

OnGetDocumentTypeShippingPrice

local procedure OnGetDocumentTypeShippingPrice(SourceType: Integer; SourceSubtype: Integer; var DocumentType: Enum "EOS066 EX038 Ship. Price Doc Type"; var IsHandled: Boolean)

Raised to get the ETC Document type from the Source Type.

Parameters / Return Value

  • SourceType Integer

  • SourceSubtype Integer

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

    ETC Document Type to set

  • IsHandled Boolean

OnGetDocumentOnCalcTourRemainingAmount

local procedure OnGetDocumentOnCalcTourRemainingAmount(var DocumentType: Enum "EOS066 EX038 Ship. Price Doc Type"; var DocumentNo: Code[20]; var SourceDocRecRef: RecordRef; var IsHandled: Boolean)

Raised in the app EX006 CWS to set Document from RecRef, to get the tour remaining amount in the app EX038 ETC.

Parameters / Return Value

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

    Document Type to set

  • DocumentNo Code[20]

    Document No. to set

  • SourceDocRecRef RecordRef

    The Source Document

  • IsHandled Boolean

    if true, skip the error for custom tables

OnGetPostedDocumentFromTourLine

local procedure OnGetPostedDocumentFromTourLine(var TourLineRecRef: RecordRef; TourPlanNo: Code[20]; var PostedSourceType: Integer; var PostedSourceSubtype: Integer; var PostedSourceNo: Code[20]; var PostedSourceSystemID: Guid; var IsHandled: Boolean)

Raised in the calculation of Transport Costs from the Route Plan. It is used from the bridge app EX092.01 “DRP for CWS” to set CWS Shipment as the posted document.

Parameters / Return Value

  • TourLineRecRef RecordRef

    Record Ref of the Route Plan line

  • TourPlanNo Code[20]

  • PostedSourceType Integer

  • PostedSourceSubtype Integer

  • PostedSourceNo Code[20]

  • PostedSourceSystemID Guid

  • IsHandled Boolean

OnGetCWSGroupForTourLine

local procedure OnGetCWSGroupForTourLine(var TourLineRecRef: RecordRef; TourPlanNo: Code[20]; var SourceType: Integer; var SourceSubtype: Integer; var SourceNo: Code[20]; var SourceSystemID: Guid; var IsHandled: Boolean)

Raised in the calculation of Transport Costs from the Route Plan for CWS Groups. It is used from the bridge app EX092.01 “DRP for CWS” to set CWS Group on the Route Plan Line.

Parameters / Return Value

  • TourLineRecRef RecordRef

    Record Ref of the Route Plan line

  • TourPlanNo Code[20]

  • SourceType Integer

  • SourceSubtype Integer

  • SourceNo Code[20]

  • SourceSystemID Guid

  • IsHandled Boolean

OnGetTourTotals

local procedure OnGetTourTotals(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

OnSetDocShippingPricePK

local procedure OnSetDocShippingPricePK(var RecRef: RecordRef; var DocType: Enum "EOS066 EX038 Ship. Price Doc Type"; var DocNo: Code[20]; var Handled: Boolean)

Parameters / Return Value

  • RecRef RecordRef

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

  • DocNo Code[20]

  • Handled Boolean

OnSetDocShippingPriceInfo

local procedure OnSetDocShippingPriceInfo(var recref: recordRef; var CustNo: Code[20]; var Description: Text[100]; var DocumentDate: Date; var ReqDeliveryDate: Date; var AgentCode: code[10]; var AgentServiceCode: Code[10]; var Handled: Boolean)

Parameters / Return Value

  • recref recordRef

  • CustNo Code[20]

  • Description Text[100]

  • DocumentDate Date

  • ReqDeliveryDate Date

  • AgentCode code[10]

  • AgentServiceCode Code[10]

  • Handled Boolean

OnDeleteVariantShippingPrice

local procedure OnDeleteVariantShippingPrice(source: Variant; DeleteManuallyModified: Boolean; HideMessage: Boolean)

Parameters / Return Value

  • source Variant

  • DeleteManuallyModified Boolean

  • HideMessage Boolean

OnExistsVariantShippingPrice

local procedure OnExistsVariantShippingPrice(source: Variant; DeleteManuallyModified: Boolean; HideMessage: Boolean; var Return: Boolean)

Parameters / Return Value

  • source Variant

  • DeleteManuallyModified Boolean

  • HideMessage Boolean

  • Return Boolean

OnCalcVariantShippingPrice

local procedure OnCalcVariantShippingPrice(source: Variant; DeleteManuallyModified: Boolean; HideMessage: Boolean)

Parameters / Return Value

  • source Variant

  • DeleteManuallyModified Boolean

  • HideMessage Boolean

OnCheckDocIsDefinitive

local procedure OnCheckDocIsDefinitive(source: Variant; var Return: Boolean)

Parameters / Return Value

  • source Variant

  • Return Boolean

OnFindCalculationReports

local procedure OnFindCalculationReports(var Buffer: Record "Name/Value Buffer" temporary)

Parameters / Return Value

  • Buffer Record "Name/Value Buffer"

OnExecuteCalculationReports

local procedure OnExecuteCalculationReports(var Buffer: Record "Name/Value Buffer" temporary)

Parameters / Return Value

  • Buffer Record "Name/Value Buffer"

OnCheckShippingMethodExcludeCalculation

local procedure OnCheckShippingMethodExcludeCalculation(recref: RecordRef; var handled: Boolean; var ShipmentMethod: Record "Shipment Method")

Parameters / Return Value

  • recref RecordRef

  • handled Boolean

  • ShipmentMethod Record "Shipment Method"

OnGetFieldValue

local procedure OnGetFieldValue(recRef: RecordRef; fieldNo: Integer; var fieldValue: Text[250]; var handled: Boolean)

Parameters / Return Value

  • recRef RecordRef

  • fieldNo Integer

  • fieldValue Text[250]

  • handled Boolean

OnRowEnabled

local procedure OnRowEnabled(recRef: RecordRef; PriceHeaderOrderCalculation: Boolean; PriceHeaderInvoiceCalculation: Boolean; PriceHeaderShippingCalculation: Boolean;PriceTypeOrderCalculation: Boolean; PriceTypeInvoiceCalculation: Boolean; PriceTypeShippingCalculation: Boolean; var handled: Boolean; var return: Boolean)

Parameters / Return Value

  • recRef RecordRef

  • PriceHeaderOrderCalculation Boolean

  • PriceHeaderInvoiceCalculation Boolean

  • PriceHeaderShippingCalculation Boolean

  • PriceTypeOrderCalculation Boolean

  • PriceTypeInvoiceCalculation Boolean

  • PriceTypeShippingCalculation Boolean

  • handled Boolean

  • return Boolean

OnGetSourceDocRecRef

local procedure OnGetSourceDocRecRef(DocType: Enum "EOS066 EX038 Ship. Price Doc Type"; DocNo: Code[20]; var recref: RecordRef; var handled: Boolean)

Parameters / Return Value

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

  • DocNo Code[20]

  • recref RecordRef

  • handled Boolean

OnSetPageActionVisibility

local procedure OnSetPageActionVisibility(var CalcSalesOrdersTraspCostVisible: Boolean; var CalcSalesRetOrdersTraspCostVisible: Boolean;var CalcSalesShptTraspCostVisible: Boolean; var CalcPurchOrdersTraspCostVisible: Boolean;var CalcPurchRetOrdersTraspCostVisible: Boolean; var CalcTransfShptTraspCostVisible: Boolean;var CalcTransfOrderTraspCostVisible: Boolean; var CalcPurchRcptTraspCostVisible: Boolean)

Parameters / Return Value

  • CalcSalesOrdersTraspCostVisible Boolean

  • CalcSalesRetOrdersTraspCostVisible Boolean

  • CalcSalesShptTraspCostVisible Boolean

  • CalcPurchOrdersTraspCostVisible Boolean

  • CalcPurchRetOrdersTraspCostVisible Boolean

  • CalcTransfShptTraspCostVisible Boolean

  • CalcTransfOrderTraspCostVisible Boolean

  • CalcPurchRcptTraspCostVisible Boolean

OnGetETCParamCalculationType

local procedure OnGetETCParamCalculationType(var CalculateParamsSource: Enum "EOS038 Calculate Params Source")

Parameters / Return Value

  • CalculateParamsSource Enum "EOS038 Calculate Params Source"

OnSettlementETCDocumentAssignChargeItem

local procedure OnSettlementETCDocumentAssignChargeItem(var purchaseLine: Record "Purchase Line"; DocumentType: Enum "EOS066 EX038 Ship. Price Doc Type"; DocNo: Code[20]; TotShippinPrice: Decimal)

Parameters / Return Value

  • purchaseLine Record "Purchase Line"

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

  • DocNo Code[20]

  • TotShippinPrice Decimal

OnAssignETCTransferLineCode

local procedure OnAssignETCTransferLineCode(var PurchaseLine: Record "Purchase Line"; DocumentType: Enum "EOS066 EX038 Ship. Price Doc Type"; DocNo: Code[20]; var IsHandled: Boolean; TransferLineCode: Code[20])

Raised to assign G/L Account on Purchase Line if there are Transfer Shipments in CWS Shipment.

Parameters / Return Value

  • PurchaseLine Record "Purchase Line"

    Purchase line to modify

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

    Enum “EOS066 EX038 Ship. Price Doc Type”.

  • DocNo Code[20]

    Document No

  • IsHandled Boolean

    if true, skip the app code

  • TransferLineCode Code[20]

    Code

OnGetTotalValuesFromSourceDoc

local procedure OnGetTotalValuesFromSourceDoc(SourceDoc: RecordRef; var TotalNetWeight: Decimal; var TotalGrossWeight: Decimal; var TotalVolume: Decimal; var TotalParcels: Decimal; var TotalPallets: Decimal)

Raised to get the totals from the source document in the calculation of Transport Costs.

Parameters / Return Value

  • SourceDoc RecordRef

    The source document

  • TotalNetWeight Decimal

    Total Net Weight of the source document

  • TotalGrossWeight Decimal

    Total Gross Weight of the source document

  • TotalVolume Decimal

    Total Volume of the source document

  • TotalParcels Decimal

    Total Parcels of the source document

  • TotalPallets Decimal

    Total Pallets of the source document


EOS Labs -