Email, Phone Create or Update

LogisticsElectronicAddress.cs

private void emailCreateOrUpdate(Email _email)
{
	LogisticsElectronicAddress  electronicAddress;
	LogisticsLocation           logisticsLocation;
	DirPartyLocation            dirPartyLocation;
	DirPartyTable               dirPartyTable;
	CompanyInfo                 companyInfo;

	companyInfo = CompanyInfo::find();

	electronicAddress = DirParty::primaryElectronicAddress(companyInfo.RecId, LogisticsElectronicAddressMethodType::Email);
		
	if(electronicAddress)
	{
		ttsbegin;
		electronicAddress.selectForUpdate(true);
		electronicAddress.Locator = _email;
		electronicAddress.IsPrimary = NoYes::Yes;
		electronicAddress.update();
		ttscommit;
	}
	else
	{
		ttsbegin;
		dirPartyTable = DirPartyTable::findRec(companyInfo.RecId);

		logisticsLocation.clear();
		logisticsLocation.Description = "Email";
		logisticsLocation.insert();

		dirPartyLocation.clear();
		dirPartyLocation.Party = dirPartyTable.RecId;
		dirPartyLocation.Location = logisticsLocation.RecId;
		dirPartyLocation.IsPrimary = NoYes::Yes;
		dirPartyLocation.insert();

		electronicAddress.clear();
		electronicAddress.Location = logisticsLocation.RecId;
		electronicAddress.Description = "Email";
		electronicAddress.Type = LogisticsElectronicAddressMethodType::Email;
		electronicAddress.Locator = _email;
		electronicAddress.IsPrimary = NoYes::Yes;
		electronicAddress.insert();

		dirPartyTable.reread();
		dirPartyTable.selectForUpdate(true);
		dirPartyTable.PrimaryContactEmail = electronicAddress.RecId;
		dirPartyTable.doUpdate();
		ttscommit;
	}
}