How to get Vendors or Customer Contact Information Primary & None Primary
Via below code you can get the Vendor/Customer complete contact information (Primary & None Primary).
LogisticsElectronicAddress
logisticsElectronicAddress;
DirPartyLocation dirLocation;
DirPartyTable dirPartyTable=DirPartyTable::findRec(VendTable::find("S00038").Party);
while select
logisticsElectronicAddress
join dirLocation
where
dirLocation.Location==logisticsElectronicAddress.Location
&&
dirLocation.Party==dirPartyTable.RecId
{
info(strFmt("%1",logisticsElectronicAddress.Locator));
}