Skip to content

KVSMEDAddressLib#

Procedures#

SaveNewMasterDataAddresses(Record KVSMEDMasterDataAddress, Integer, Code[20], Code[10], Date, Date, Text[100], Text[50], Text[100], Text[50], Text[30], Text[30], Code[20], Code[10]) : Boolean#

Summary: Saves a new Master Data Address record

procedure SaveNewMasterDataAddresses(var KVSMEDMasterDataAddress: Record "KVSMEDMasterDataAddress"; ForType: Integer; ForCode: Code[20]; ForAddressCode: Code[10]; ForFromDate: Date; ForToDate: Date; ActualName: Text[100]; ActualName2: Text[50]; ActualAddress: Text[100]; ActualAddress2: Text[50]; ActualCity: Text[30]; ActualCounty: Text[30]; ActualPostCode: Code[20]; ActualCountryRegionCode: Code[10]): Boolean

Parameters:

  • KVSMEDMasterDataAddress:
  • ForType:
  • ForCode:
  • ForAddressCode:
  • ForFromDate:
  • ForToDate:
  • ActualName:
  • ActualName2:
  • ActualAddress:
  • ActualAddress2:
  • ActualCity:
  • ActualCounty:
  • ActualPostCode:
  • ActualCountryRegionCode:

Returns:

GetActualMasterDataAddress(Record KVSMEDMasterDataAddress) : Boolean#

Summary: Gets the actual Master Data Address record based on the current workdate.

procedure GetActualMasterDataAddress(var KVSMEDMasterDataAddress: Record "KVSMEDMasterDataAddress"): Boolean

Parameters:

  • KVSMEDMasterDataAddress:

Returns:

UpdateSalesHeaderAddresses(Record Sales Header) : Boolean#

Summary: Update all sales document addresses. If Modifed = true then Adressfields are updated in SalesHeader. Sales Header have to be modifed.

procedure UpdateSalesHeaderAddresses(var SalesHeader: Record "Sales Header"): Boolean

Parameters:

  • SalesHeader:

Returns: Modified

GetSalesHeaderAddresses(Record Sales Header, Record KVSMEDMasterDataAddress) :#

Summary: Gets all sales document addresses into array KVSMEDMasterDataAddress.

procedure GetSalesHeaderAddresses(var SalesHeader: Record "Sales Header"; var KVSMEDMasterDataAddress: Record "KVSMEDMasterDataAddress"):

Parameters:

  • SalesHeader:
  • KVSMEDMasterDataAddress:

GetContactNoFromAddressDefaultControl(Code[20], Enum KVSMEDAddressDocType, Integer, Code[20], Integer, Code[30], Code[20], Code[20], Date, Date, Enum KVSMEDShipBillToType, Code[10], Code[20], Code[10], Code[10]) : Boolean#

Summary: Gets the ContactNo from AddressDefaultControl

procedure GetContactNoFromAddressDefaultControl(ComTermCodeFrom: Code[20]; KVSMEDAddressDocType: Enum "KVSMEDAddressDocType"; ComLevel: Integer; ProcessNo: Code[20]; ProcessPeriod: Integer; ContractPeriodCode: Code[30]; CustomerNo: Code[20]; ContactNo: Code[20]; StartDate: Date; EndDate: Date; KVSMEDShipBillToType: Enum "KVSMEDShipBillToType"; FilterRole: Code[10]; var NewContactNo: Code[20]; var NewAddressCode: Code[10]; var NewPartnerRoleCode: Code[10]): Boolean

Parameters:

  • ComTermCodeFrom:
  • KVSMEDAddressDocType:
  • ComLevel:
  • ProcessNo:
  • ProcessPeriod:
  • ContractPeriodCode:
  • CustomerNo:
  • ContactNo:
  • StartDate:
  • EndDate:
  • KVSMEDShipBillToType:
  • FilterRole:
  • NewContactNo:
  • NewAddressCode:
  • NewPartnerRoleCode:

Returns:

Events#

OnAfterTransferContactShipToAddressToShipToAddress(Record KVSMEDContactShipToAddress, Record Ship-to Address) :#

Summary: Event raised after transferring fields from Contact Ship-to Address to Ship-to Address

[IntegrationEvent(false, false)]
local procedure OnAfterTransferContactShipToAddressToShipToAddress(var KVSMEDContactShipToAddress: Record "KVSMEDContactShipToAddress"; var ShipToAddress: Record "Ship-to Address"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSMEDAddressLib", 'OnAfterTransferContactShipToAddressToShipToAddress', '', false, false)]
local procedure DoSomethingOnAfterTransferContactShipToAddressToShipToAddress(var KVSMEDContactShipToAddress: Record "KVSMEDContactShipToAddress"; var ShipToAddress: Record "Ship-to Address")
begin
end;

Parameters:

  • KVSMEDContactShipToAddress:
  • ShipToAddress:

OnAfterTransferContactBillToAddressToBillToAddress(Record KVSMEDContactBilltoAddress, Record KVSMEDBilltoAddress) :#

Summary: Event raised after transferring fields from Contact Bill-to Address to Bill-to Address

[IntegrationEvent(false, false)]
local procedure OnAfterTransferContactBillToAddressToBillToAddress(var KVSMEDContactBilltoAddress: Record "KVSMEDContactBilltoAddress"; var KVSMEDBilltoAddress: Record "KVSMEDBilltoAddress"): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSMEDAddressLib", 'OnAfterTransferContactBillToAddressToBillToAddress', '', false, false)]
local procedure DoSomethingOnAfterTransferContactBillToAddressToBillToAddress(var KVSMEDContactBilltoAddress: Record "KVSMEDContactBilltoAddress"; var KVSMEDBilltoAddress: Record "KVSMEDBilltoAddress")
begin
end;

Parameters:

  • KVSMEDContactBilltoAddress:
  • KVSMEDBilltoAddress: