CustTable custTable;
LogisticsElectronicAddress logisticsElectronicAddress;
DirPartyLocation dirLocation;
DAX_ContactInformation dAX_ContactInformation;
DirPartyTable dirPartyTable = DirPartyTable::findRec('12345');
while select dirLocation
where dirLocation.party == dirPartyTable.RecId
{
while select logisticsElectronicAddress
where dirLocation.Location == logisticsElectronicAddress.Location
{
dAX_ContactInformation.Locator = logisticsElectronicAddress.Locator;
dAX_ContactInformation.Description = logisticsElectronicAddress.Description;
dAX_ContactInformation.LocatorExtension= logisticsElectronicAddress.LocatorExtension;
dAX_ContactInformation.Type = logisticsElectronicAddress.Type;
dAX_ContactInformation.insert();
}
}
No comments:
Post a Comment