Table of Contents

Codeunit "Origin/Dest. Addr. Mgt WCAP"

ID 70345397
Namespace: CapVision.CapCollecte.General

Properties

Name Value
Access Public
SingleInstance False

Methods

FillAddress

Récupère le détail de l'adresse à partir du type, du code et du code d'adresse fournis.

procedure FillAddress(SearchCompanyName: Text[30]; ThirdPartyType: Enum "Third-party Type WCAP"; ThirdPartyCode: Text[30]; ThirdPartyAddressCode: Code[10]; var NewName: Text[100]; var NewName2: Text[50]; var NewAddress: Text[100]; var NewAddress2: Text[50]; var NewCity: Text[30]; var NewPostCode: Code[20]; var NewCountryRegionCode: Code[10]; var NewLatitude: Decimal; var NewLongitude: Decimal)

Parameters

Name Type Description
SearchCompanyName Text[30]
ThirdPartyType Enum CapVision.CapCollecte.General."Third-party Type WCAP"
ThirdPartyCode Text[30]
ThirdPartyAddressCode Code[10]
NewName Text[100]
NewName2 Text[50]
NewAddress Text[100]
NewAddress2 Text[50]
NewCity Text[30]
NewPostCode Code[20]
NewCountryRegionCode Code[10]
NewLatitude Decimal
NewLongitude Decimal

FillAddress

Récupère le détail de l'adresse à partir du type, du code et du code d'adresse fournis.

procedure FillAddress(SearchCompanyName: Text[30]; ThirdPartyType: Enum "Third-party Type WCAP"; ThirdPartyCode: Text[30]; ThirdPartyAddressCode: Code[10]; var NewName: Text[100]; var NewName2: Text[50]; var NewAddress: Text[100]; var NewAddress2: Text[50]; var NewCity: Text[30]; var NewPostCode: Code[20]; var NewCountryRegionCode: Code[10]; var NewLatitude: Decimal; var NewLongitude: Decimal; var NewVarRec: Variant)

Parameters

Name Type Description
SearchCompanyName Text[30]
ThirdPartyType Enum CapVision.CapCollecte.General."Third-party Type WCAP"
ThirdPartyCode Text[30]
ThirdPartyAddressCode Code[10]
NewName Text[100]
NewName2 Text[50]
NewAddress Text[100]
NewAddress2 Text[50]
NewCity Text[30]
NewPostCode Code[20]
NewCountryRegionCode Code[10]
NewLatitude Decimal
NewLongitude Decimal
NewVarRec Variant

FillAddress

Renseigner l'adresse interne à cette instance à partir du code du tiers.

procedure FillAddress(SearchCompanyName: Text[30]; ThirdPartyType: Enum "Third-party Type WCAP"; ThirdPartyCode: Text[30]; AddressCode: Code[10])

Parameters

Name Type Description
SearchCompanyName Text[30]
ThirdPartyType Enum CapVision.CapCollecte.General."Third-party Type WCAP"
ThirdPartyCode Text[30]
AddressCode Code[10]

Remarks

Utilisez la fonction GetAddress pour récupérer les informations de l'adresse.

FillOriginAddress

Remplit les champs de l'adresse de provenance sur une ligne vente en fonction du type, code et code adresse provenance.

procedure FillOriginAddress(var SalesLine: Record "Sales Line")

Parameters

Name Type Description
SalesLine Record "Sales Line"

FillOriginAddress

Remplit les champs de l'adresse de provenance sur une ligne vente en fonction du type, code et code adresse provenance.

procedure FillOriginAddress(SearchCompanyName: Text[30]; var SalesLine: Record "Sales Line")

Parameters

Name Type Description
SearchCompanyName Text[30]
SalesLine Record "Sales Line"

FillDestinationAddress

Remplit les champs de l'adresse de destination sur une ligne vente en fonction du type, code et code adresse destination.

procedure FillDestinationAddress(var SalesLine: Record "Sales Line")

Parameters

Name Type Description
SalesLine Record "Sales Line"

FillDestinationAddress

Remplit les champs de l'adresse de destination sur une ligne vente en fonction du type, code et code adresse destination.

procedure FillDestinationAddress(SearchCompanyName: Text[30]; var SalesLine: Record "Sales Line")

Parameters

Name Type Description
SearchCompanyName Text[30]
SalesLine Record "Sales Line"

FillOriginAddress

Remplit les champs de l'adresse de provenance sur une ligne achat en fonction du type, code et code adresse provenance.

procedure FillOriginAddress(var PurchaseLine: Record "Purchase Line")

Parameters

Name Type Description
PurchaseLine Record "Purchase Line"

FillOriginAddress

Remplit les champs de l'adresse de provenance sur une ligne achat en fonction du type, code et code adresse provenance.

procedure FillOriginAddress(SearchCompanyName: Text[30]; var PurchaseLine: Record "Purchase Line")

Parameters

Name Type Description
SearchCompanyName Text[30]
PurchaseLine Record "Purchase Line"

FillDestinationAddress

Remplit les champs de l'adresse de destination sur une ligne achat en fonction du type, code et code adresse destination.

procedure FillDestinationAddress(var PurchaseLine: Record "Purchase Line")

Parameters

Name Type Description
PurchaseLine Record "Purchase Line"

FillDestinationAddress

Remplit les champs de l'adresse de destination sur une ligne achat en fonction du type, code et code adresse destination.

procedure FillDestinationAddress(SearchCompanyName: Text[30]; var PurchaseLine: Record "Purchase Line")

Parameters

Name Type Description
SearchCompanyName Text[30]
PurchaseLine Record "Purchase Line"

FillOriginAddress

Remplit les champs de l'adresse de provenance sur une tournée type en fonction du type, code et code adresse provenance.

procedure FillOriginAddress(var TypicalTour: Record "Typical Tour WCAP")

Parameters

Name Type Description
TypicalTour Table CapVision.CapCollecte.Missions."Typical Tour WCAP"

FillOriginAddress

Remplit les champs de l'adresse de provenance sur une tournée type en fonction du type, code et code adresse provenance.

procedure FillOriginAddress(SearchCompanyName: Text[30]; var TypicalTour: Record "Typical Tour WCAP")

Parameters

Name Type Description
SearchCompanyName Text[30]
TypicalTour Table CapVision.CapCollecte.Missions."Typical Tour WCAP"

FillDestinationAddress

Remplit les champs de l'adresse de destination sur une tournée type en fonction du type, code et code adresse destination.

procedure FillDestinationAddress(var TypicalTour: Record "Typical Tour WCAP")

Parameters

Name Type Description
TypicalTour Table CapVision.CapCollecte.Missions."Typical Tour WCAP"

FillDestinationAddress

Remplit les champs de l'adresse de destination sur une tournée type en fonction du type, code et code adresse destination.

procedure FillDestinationAddress(SearchCompanyName: Text[30]; var TypicalTour: Record "Typical Tour WCAP")

Parameters

Name Type Description
SearchCompanyName Text[30]
TypicalTour Table CapVision.CapCollecte.Missions."Typical Tour WCAP"

FillOriginAddress

Remplit les champs de l'adresse de provenance sur une tournée type en fonction du type, code et code adresse provenance.

procedure FillOriginAddress(var Tour: Record "Tour WCAP")

Parameters

Name Type Description
Tour Table CapVision.CapCollecte.Missions."Tour WCAP"

FillDestinationAddress

Remplit les champs de l'adresse de destination sur une tournée en fonction du type, code et code adresse destination.

procedure FillDestinationAddress(var Tour: Record "Tour WCAP")

Parameters

Name Type Description
Tour Table CapVision.CapCollecte.Missions."Tour WCAP"

FillOriginAddress

Remplit les champs de l'adresse de provenance sur une mission en fonction du type, code et code adresse provenance.

procedure FillOriginAddress(var Mission: Record "Mission WCAP")

Parameters

Name Type Description
Mission Table CapVision.CapCollecte.Missions."Mission WCAP"

FillDestinationAddress

Remplit les champs de l'adresse de destination sur une mission en fonction du type, code et code adresse destination.

procedure FillDestinationAddress(var Mission: Record "Mission WCAP")

Parameters

Name Type Description
Mission Table CapVision.CapCollecte.Missions."Mission WCAP"

FillOriginAddress

Remplit les champs de l'adresse de provenance sur une écriture de pesée en fonction du type, code et code adresse provenance.

procedure FillOriginAddress(var WeighingLogEntry: Record "Weighing Log Entry WCAP")

Parameters

Name Type Description
WeighingLogEntry Table CapVision.CapCollecte.Weighing.Bridges."Weighing Log Entry WCAP"

FillDestinationAddress

Remplit les champs de l'adresse de destination sur une écriture de pesée en fonction du type, code et code adresse destination.

procedure FillDestinationAddress(var WeighingLogEntry: Record "Weighing Log Entry WCAP")

Parameters

Name Type Description
WeighingLogEntry Table CapVision.CapCollecte.Weighing.Bridges."Weighing Log Entry WCAP"

FillOriginAddress

Obsolete

This element will become obsolete from version V27.202605. This method will be replaced by FillAddress with same parameters, to merge the logic and avoid code duplication.

Récupère le détail de l'adresse d'origine à partir du type, du code et du code d'adresse fournis.

[Obsolete(This method will be replaced by FillAddress with same parameters, to merge the logic and avoid code duplication.,V27.202605)]
procedure FillOriginAddress(SearchCompanyName: Text[30]; OriginType: Enum "Third-party Type WCAP"; OriginCode: Text[30]; OriginAddressCode: Code[10]; var OriginName: Text[100]; var OriginName2: Text[50]; var OriginAddress: Text[100]; var OriginAddress2: Text[50]; var OriginCity: Text[30]; var OriginPostCode: Code[20]; var OriginCountryRegionCode: Code[10]; var OriginLatitude: Decimal; var OriginLongitude: Decimal)

Parameters

Name Type Description
SearchCompanyName Text[30]
OriginType Enum CapVision.CapCollecte.General."Third-party Type WCAP"
OriginCode Text[30]
OriginAddressCode Code[10]
OriginName Text[100]
OriginName2 Text[50]
OriginAddress Text[100]
OriginAddress2 Text[50]
OriginCity Text[30]
OriginPostCode Code[20]
OriginCountryRegionCode Code[10]
OriginLatitude Decimal
OriginLongitude Decimal

FillDestinationAddress

Obsolete

This element will become obsolete from version V27.202605. This method will be replaced by FillAddress with same parameters, to merge the logic and avoid code duplication.

Récupère le détail de l'adresse de destination à partir du type, du code et du code d'adresse fournis.

[Obsolete(This method will be replaced by FillAddress with same parameters, to merge the logic and avoid code duplication.,V27.202605)]
procedure FillDestinationAddress(SearchCompanyName: Text[30]; DestinationType: Enum "Third-party Type WCAP"; DestinationCode: Text[30]; DestinationAddressCode: Code[10]; var DestinationName: Text[100]; var DestinationName2: Text[50]; var DestinationAddress: Text[100]; var DestinationAddress2: Text[50]; var DestinationCity: Text[30]; var DestinationPostCode: Code[20]; var DestinationCountryRegionCode: Code[10]; var DestinationLatitude: Decimal; var DestinationLongitude: Decimal)

Parameters

Name Type Description
SearchCompanyName Text[30]
DestinationType Enum CapVision.CapCollecte.General."Third-party Type WCAP"
DestinationCode Text[30]
DestinationAddressCode Code[10]
DestinationName Text[100]
DestinationName2 Text[50]
DestinationAddress Text[100]
DestinationAddress2 Text[50]
DestinationCity Text[30]
DestinationPostCode Code[20]
DestinationCountryRegionCode Code[10]
DestinationLatitude Decimal
DestinationLongitude Decimal

GetAddress

Obsolete

This element will become obsolete from version V27.202605. Use the overload of FillAddress that returns the address details in parameters instead of using this function.

Récupérer les informations de l'adresse renseignée dans cette instance.

[Obsolete(Use the overload of FillAddress that returns the address details in parameters instead of using this function.,V27.202605)]
procedure GetAddress(var OutName: Text[100]; var OutName2: Text[50]; var OutAddress: Text[100]; var OutAddress2: Text[50]; var OutCity: Text[30]; var OutPostCode: Code[20]; var OutCountryRegionCode: Code[10]; var OutLatitude: Decimal; var OutLongitude: Decimal; var OutRec: Variant)

Parameters

Name Type Description
OutName Text[100]
OutName2 Text[50]
OutAddress Text[100]
OutAddress2 Text[50]
OutCity Text[30]
OutPostCode Code[20]
OutCountryRegionCode Code[10]
OutLatitude Decimal
OutLongitude Decimal
OutRec Variant

Remarks

Vous pouvez éviter d'appeler cette fonction en appellant la surcharge de la fonction FillAddress qui retourne directement les détails de l'adresse en paramètres. Solution 1 (la plus optimale) : procedure FillAddress(CompanyName, ThirdPartyType, ThirdPartyCode, ThirdPartyAddressCode, var Name, var Name2, var Address, var Address2, var City, var PostCode, var CountryRegionCode, var Latitude, var Longitude, var VarRec) Solution 2 : procedure FillAddress(CompanyName, ThirdPartyType, ThirdPartyCode, ThirdPartyAddressCode) puis procedure GetAddress(var Name, var Name2, var Address, var Address2, var City, var PostCode, var CountryRegionCode, var Latitude, var Longitude, var VarRec)

FillOriginDestinationAddresses

Obsolete

This element will become obsolete from version V27.202605. This method is moved to the Sales Line tableextension.

[Obsolete(This method is moved to the Sales Line tableextension.,V27.202605)]
procedure FillOriginDestinationAddresses(var SalesLine: Record "Sales Line"; Item: Record Item)

Parameters

Name Type Description
SalesLine Record "Sales Line"
Item Record Item

FillOriginDestinationAddresses

Obsolete

This element will become obsolete from version V27.202605. This method is moved to the Purchase Line tableextension.

[Obsolete(This method is moved to the Purchase Line tableextension.,V27.202605)]
procedure FillOriginDestinationAddresses(var PurchaseLine: Record "Purchase Line"; Item: Record Item)

Parameters

Name Type Description
PurchaseLine Record "Purchase Line"
Item Record Item

SetDeliveryAddresses

Obsolete

This element will become obsolete from version V27.202605. This method is moved to the Purchase Line tableextension.

[Obsolete(This method is moved to the Purchase Line tableextension.,V27.202605)]
procedure SetDeliveryAddresses(var PurchaseLine: Record "Purchase Line")

Parameters

Name Type Description
PurchaseLine Record "Purchase Line"

SetPickupAddresses

Obsolete

This element will become obsolete from version V27.202605. This method is moved to the Purchase Line tableextension.

[Obsolete(This method is moved to the Purchase Line tableextension.,V27.202605)]
procedure SetPickupAddresses(var PurchaseLine: Record "Purchase Line")

Parameters

Name Type Description
PurchaseLine Record "Purchase Line"

FillOriginAddress

Obsolete

This element will become obsolete from version V27.202605. This method is useless, please use the procedure FillOriginAddress without the CompanyName parameter.

[Obsolete(This method is useless, please use the procedure FillOriginAddress without the CompanyName parameter.,V27.202605)]
procedure FillOriginAddress(SearchCompanyName: Text[30]; var Tour: Record "Tour WCAP")

Parameters

Name Type Description
SearchCompanyName Text[30]
Tour Table CapVision.CapCollecte.Missions."Tour WCAP"

FillDestinationAddress

Obsolete

This element will become obsolete from version V27.202605. This method is useless, please use the procedure FillDestinationAddress without the CompanyName parameter.

[Obsolete(This method is useless, please use the procedure FillDestinationAddress without the CompanyName parameter.,V27.202605)]
procedure FillDestinationAddress(SearchCompanyName: Text[30]; var Tour: Record "Tour WCAP")

Parameters

Name Type Description
SearchCompanyName Text[30]
Tour Table CapVision.CapCollecte.Missions."Tour WCAP"

FillOriginAddress

Obsolete

This element will become obsolete from version V27.202605. This method is useless, please use the procedure FillOriginAddress without the CompanyName parameter.

[Obsolete(This method is useless, please use the procedure FillOriginAddress without the CompanyName parameter.,V27.202605)]
procedure FillOriginAddress(SearchCompanyName: Text[30]; var Mission: Record "Mission WCAP")

Parameters

Name Type Description
SearchCompanyName Text[30]
Mission Table CapVision.CapCollecte.Missions."Mission WCAP"

FillDestinationAddress

Obsolete

This element will become obsolete from version V27.202605. This method is useless, please use the procedure FillDestinationAddress without the CompanyName parameter.

[Obsolete(This method is useless, please use the procedure FillDestinationAddress without the CompanyName parameter.,V27.202605)]
procedure FillDestinationAddress(SearchCompanyName: Text[30]; var Mission: Record "Mission WCAP")

Parameters

Name Type Description
SearchCompanyName Text[30]
Mission Table CapVision.CapCollecte.Missions."Mission WCAP"

Events

OnAfterFillOriginDestinationAddrInSalesLine

Obsolete

This element will become obsolete from version V27.202605. This event is unused since the parent procedure is moved to the Sales Line tableextension.

[IntegrationEvent(False,False)]
[Obsolete(This event is unused since the parent procedure is moved to the Sales Line tableextension.,V27.202605)]
local procedure OnAfterFillOriginDestinationAddrInSalesLine(var SalesLine: Record "Sales Line"; ServiceTypeDirection: Enum "Service Type Direction WCAP")

Parameters

Name Type Description
SalesLine Record "Sales Line"
ServiceTypeDirection Enum CapVision.CapCollecte.General."Service Type Direction WCAP"

OnAfterSetPickupAddressesInSalesLine

Obsolete

This element will become obsolete from version V27.202605. This event is unused since the parent procedure is moved to the Sales Line tableextension.

[IntegrationEvent(False,False)]
[Obsolete(This event is unused since the parent procedure is moved to the Sales Line tableextension.,V27.202605)]
local procedure OnAfterSetPickupAddressesInSalesLine(var SalesLine: Record "Sales Line")

Parameters

Name Type Description
SalesLine Record "Sales Line"

OnAfterSetDeliveryAddressesInSalesLine

Obsolete

This element will become obsolete from version V27.202605. This event is unused since the parent procedure is moved to the Sales Line tableextension.

[IntegrationEvent(False,False)]
[Obsolete(This event is unused since the parent procedure is moved to the Sales Line tableextension.,V27.202605)]
local procedure OnAfterSetDeliveryAddressesInSalesLine(var SalesLine: Record "Sales Line")

Parameters

Name Type Description
SalesLine Record "Sales Line"

OnAfterSetPickupAddressesInPurchaseLine

Obsolete

This element will become obsolete from version V27.202605. This event is unused since the parent procedure is moved to the Purchase Line tableextension.

[IntegrationEvent(False,False)]
[Obsolete(This event is unused since the parent procedure is moved to the Purchase Line tableextension.,V27.202605)]
local procedure OnAfterSetPickupAddressesInPurchaseLine(var PurchaseLine: Record "Purchase Line")

Parameters

Name Type Description
PurchaseLine Record "Purchase Line"

OnAfterSetDeliveryAddressesInPurchaseLine

Obsolete

This element will become obsolete from version V27.202605. This event is unused since the parent procedure is moved to the Purchase Line tableextension.

[IntegrationEvent(False,False)]
[Obsolete(This event is unused since the parent procedure is moved to the Purchase Line tableextension.,V27.202605)]
local procedure OnAfterSetDeliveryAddressesInPurchaseLine(var PurchaseLine: Record "Purchase Line")

Parameters

Name Type Description
PurchaseLine Record "Purchase Line"

OnAfterFillOriginDestinationAddrInPurchaseLine

Obsolete

This element will become obsolete from version V27.202605. This event is unused since the parent procedure is moved to the Purchase Line tableextension.

[IntegrationEvent(False,False)]
[Obsolete(This event is unused since the parent procedure is moved to the Purchase Line tableextension.,V27.202605)]
local procedure OnAfterFillOriginDestinationAddrInPurchaseLine(var PurchaseLine: Record "Purchase Line"; ServiceTypeDirection: Enum "Service Type Direction WCAP")

Parameters

Name Type Description
PurchaseLine Record "Purchase Line"
ServiceTypeDirection Enum CapVision.CapCollecte.General."Service Type Direction WCAP"

See also