ContactInformation

       Updating Contact Person Information in Customer Contact Information Module in D365FO

Requirement:

My requirement is to get a Contact person's contact information from smmcontactperson form to the Custtable form in the Contact Information tab.

3.     >. Customer Contact Information Tab

Adding Customer's contact id:-

Develop procedure:

>. Take an extension of logisticselectronicsaddress table and add contacted

>. After adding the field then go to logisticscontactinfogrid form and drag that contacted field into grid.

>. It will show that field in the customer information tab.

Table Extension:-

[ExtensionOf(formdatasourcestr(LogisticsContactInfoGrid,LogisticsElectronicAddress))]

internal final class DAXLogisticsElectronicAddress_Extension

{

 

   public boolean validateWrite()

   {

     boolean     ret;    

     ContactPerson                     contactPerson;  

     DirPartyTable                     dirPartyTable , dirPartyTableLoc;  

     CustTable                         custTable , custTableLoc;  

     LogisticsElectronicAddress        logisticsElectronicaddress , logistcsElectronicAddressloc,electronicaddress,logistcscheck;

     LogisticsLocation                 logisticslocation , logisticslocationloc;  

     DirPartyLocation                  dirPartyLocation , dirPartylocationloc;

     LogisticsLocationRole             locationRole;   

     Map                               locationRoleMap;    

     container                         locationRoleCon;    

     FormDataSource              fds = this.formRun().dataSource();     

     formRun callerformrun =           this.formRun().args().caller();     

     ContactPerson                     contactPersonLoc = callerformrun.dataSource().cursor();   

     logisticsElectronicAddress =      this.cursor();            

     ret = next validateWrite();     

       if(callerformrun.name() == formStr("smmcontactperson") && logisticsElectronicAddress.isNewRecord()

           || logisticsElectronicAddress.isFieldModified(fieldNum(logisticsElectronicAddress,Locator))

           ||logisticsElectronicAddress.isFieldModified(fieldNum(logisticsElectronicAddress,Description  ))

           ||logisticsElectronicAddress.isFieldModified(fieldNum(logisticsElectronicAddress,LocatorExtension ))

           ||logisticsElectronicAddress.isFieldModified(fieldNum(logisticsElectronicAddress,IsPrimary )) )

     {     

         select * from contactPerson    where contactPerson.ContactPersonId == contactPersonLoc.ContactPersonId ;

         select * from custTable        where custTable.party == contactPerson.ContactForParty;

         select  *from dirPartyTable    where  dirPartyTable.RECID == contactPerson.PARTY ;   

         {          

             select forupdate electronicaddress         

                  where electronicaddress.ContactId == contactPerson.ContactPersonId          

                      &&   electronicaddress.Type == logisticsElectronicAddress.Type

                      && electronicaddress.AddressId == logisticsElectronicAddress.ElectronicAddressId

          join dirPartylocationloc           

                 where electronicaddress.Location  == dirPartylocationloc.Location          

          join dirPartyTableLoc

                 where dirPartyTableLoc.RecId == dirPartylocationloc.party     

          join custTableLoc

                 where custTableLoc.Party == dirPartyTableLoc.RecId               

                   && custTableLoc.AccountNum ==custtable.AccountNum;          

             if(!electronicaddress)             

             {            

                 locationRoleMap = new Map(Types::Int64, Types::String);  

                 locationRole = LogisticsLocationRole::findByName('Business');              

                 if (locationRole)            

                 {                   

                     locationRoleMap.insert(locationRole.RecId, locationRole.description());   

                     locationRoleCon = map2Con(locationRoleMap);                         

                     ttsBegin;                         

                     logistcsElectronicAddressloc.Type = logisticsElectronicAddress.Type;          

                     logistcsElectronicAddressloc.Locator = logisticsElectronicAddress.locator;   

                     logistcsElectronicAddressloc.Location = DirPartyLocation::findOrCreate(custTable.Party, 0).Location;    

                     logistcsElectronicAddressloc = LogisticsElectronicAddress::findOrCreate(logistcsElectronicAddressloc);

                     logistcsElectronicAddressloc = LogisticsElectronicAddress::findRecId(logistcsElectronicAddressloc.RecId, true);  

                     logistcsElectronicAddressloc.Description = logisticsElectronicAddress.Description ;        

                     logistcsElectronicAddressloc.IsPrimary = logisticsElectronicAddress.IsPrimary;

                     logistcsElectronicAddressloc.ContactId = contactPerson.ContactPersonId;  

                     logistcsElectronicAddressloc.AddressId = logisticsElectronicAddress.ElectronicAddressId;

                     logistcsElectronicAddressloc.LocatorExtension = logisticsElectronicAddress.LocatorExtension;

                     logistcsElectronicAddressloc.update();                        

                     LogisticsEntityLocationRoleMap::createEntityLocationRoles(tableNum(LogisticsElectronicAddressRole), logistcsElectronicAddressloc.RecId, conPeek(locationRoleCon, 1), true);         

                     ttsCommit;                                   

                     }            

                     }               

                     else              

                     {                    

                         ttsbegin;  

                         electronicaddress.Description = logisticsElectronicAddress.Description;

                         electronicaddress.Locator = logisticsElectronicAddress.Locator;

                         electronicaddress.LocatorExtension = logisticsElectronicAddress.LocatorExtension;

                         electronicaddress.IsPrimary  = logisticsElectronicAddress.IsPrimary;

                         electronicaddress.update();          

                         ttscommit;           

                      }  

     

                 }  

                      

       }    

                         return      ret;

 

   }

 

   public void delete()

   {

       FormRun                         formRun = this.formRun().args().caller();

       FormDataSource                  Fds= formrun.dataSource();

       DirPartyTable                   dirPartyTable , dirPartyTableLoc;

       CustTable                       custTable , custTableLoc;

       LogisticsElectronicAddress      logisticsElectronicaddress ,  logistcsElectronicAddressloc,electronicaddress;

       LogisticsLocation               logisticslocation , logisticslocationloc;

       DirPartyLocation                dirPartyLocation , dirPartylocationloc;

       if(formRun.name() == formStr("smmcontactperson") )

 

       {

           ContactPerson              contactperson = fds.cursor();

           logisticsElectronicAddress = this.cursor();

           select * from custtable

                 where custtable.AccountNum == contactperson.CustAccount;

           ttsbegin;

           select forupdate electronicaddress

             where electronicaddress.ContactId == contactPerson.ContactPersonId

             && electronicaddress.Type == logisticsElectronicAddress.Type

              && electronicaddress.AddressId == logisticsElectronicAddress.ElectronicAddressId

     exists join dirPartylocationloc

           where electronicaddress.Location  == dirPartylocationloc.Location

     join dirPartyTableLoc

             where dirPartyTableLoc.RecId == dirPartylocationloc.party

      join custTableLoc

             where custTableLoc.Party == dirPartyTableLoc.RecId

      && custTableLoc.AccountNum ==custtable.AccountNum ;

           if (electronicaddress)

           {

               electronicaddress.delete();

           }

           ttscommit;

       }

       next delete();

   }

 

}

extension of DirPartyQuickCreateForm :-

[ExtensionOf(formStr(DirPartyQuickCreateForm))]

internal final class DAXDirPartyQuickCreateForm_Extension

{

 

   public void closeOk()

   {

       ContactPerson                     contactPerson;

       DirPartyTable                     dirPartyTable ;

       CustTable                         custTable ;

       LogisticsElectronicAddress        logisticsElectronicaddress , logistcsElectronicAddressloc;

       LogisticsLocation                 logisticslocation , logisticslocationloc;

       DirPartyLocation                  dirPartyLocation;

       LogisticsLocationRole             locationRole;

       Map                               locationRoleMap;

       container                         locationRoleCon;

       next closeOk();

       FormRun formrun = this.dataSource().formRun();

       Common  common = this.dataSource().cursor();

       ContactPerson   contactPersonloc = common;

       formRun callerformrun =  formRun.args().caller();

       logisticsElectronicaddress = formrun.dataSource("LogisticsElectronicAddressEmail").cursor();

 

       if(callerformrun.name()== formStr("smmcontactperson"))

       {

           custTable = CustTable::find(contactPersonloc.CustAccount);

           while select contactPerson    where contactPerson.ContactPersonId == contactPersonLoc.ContactPersonId

               join dirPartyTable    where  dirPartyTable.RECID == contactPerson.PARTY

               join dirPartyLocation where  dirPartyTable.RecId == dirPartyLocation.Party

               join logisticsElectronicaddress where dirPartyLocation.Location == logisticsElectronicaddress.Location

           {

 

               locationRoleMap = new Map(Types::Int64, Types::String);

               locationRole = LogisticsLocationRole::findByName('Business');

               if (locationRole)

               {

                   locationRoleMap.insert(locationRole.RecId, locationRole.description());

                   locationRoleCon = map2Con(locationRoleMap);

                   ttsBegin;

                   logistcsElectronicAddressloc.Type = logisticsElectronicAddress.Type;

                   logistcsElectronicAddressloc.Locator = logisticsElectronicAddress.locator;

                   logistcsElectronicAddressloc.Location = DirPartyLocation::findOrCreate(custTable.Party, 0).Location;

                   logistcsElectronicAddressloc = LogisticsElectronicAddress::findOrCreate(logistcsElectronicAddressloc);

                   logistcsElectronicAddressloc = LogisticsElectronicAddress::findRecId(logistcsElectronicAddressloc.RecId, true);

                   logistcsElectronicAddressloc.Description = logisticsElectronicAddress.Description ;

                   logistcsElectronicAddressloc.IsPrimary = logisticsElectronicAddress.IsPrimary;

                   logistcsElectronicAddressloc.ContactId = contactPerson.ContactPersonId;

                   logistcsElectronicAddressloc.AddressId = logisticsElectronicAddress.ElectronicAddressId;

                   logistcsElectronicAddressloc.LocatorExtension = logisticsElectronicAddress.LocatorExtension;

                   logistcsElectronicAddressloc.update();

                   LogisticsEntityLocationRoleMap::createEntityLocationRoles(tableNum(LogisticsElectronicAddressRole), logistcsElectronicAddressloc.RecId, conPeek(locationRoleCon, 1), true);

                   ttsCommit;

               }

           }

       }

 

   }

 

}

Direct delete the contact Id:-

datasource extension:-

[ExtensionOf(formDataSourceStr(smmContactPerson,ContactPerson))]

internal final class DAXSmmContactPerson_Extension

{

    public void delete()    

  {      

  DirPartylocation                dirPartylocation;  

      DirPartyTable                   dirPartyTable;        

LogisticsElectronicAddress    logisticsElectronicAddress;  

      ContactPerson                  contactPerson;     

   CustTable                      custTable;   

     FormRun                         formrun = this.formRun(); 

       ContactPerson        contactPersonLoc= formRun.dataSource().cursor();     

   FormRun                   Callerform = formRun.args().caller();      

  str value;    

    value = contactPersonLoc.CustAccount;      

  str value1;     

   value1 =  contactPersonLoc.ContactPersonId;    

    next delete();    

          if(callerform.name()== formStr("CustTable"))  

      {    

     // CustTable  custTable = CustTable::find(contactPersonloc.CustAccount);           

    while select custTable    where custTable.AccountNum == value            

    join dirPartyTable    where  dirPartyTable.RECID == custTable.PARTY         

       join dirPartyLocation where  dirPartyTable.RecId == dirPartyLocation.Party         

       join logisticsElectronicaddress where dirPartyLocation.Location == logisticsElectronicaddress.Location     

           && logisticsElectronicaddress.ContactId == value1                         

             {         

       if(logisticsElectronicaddress)     

           {                

    ttsbegin;  

logisticsElectronicaddress.selectforUpdate(true);            

      logisticsElectronicaddress.delete();           

         ttscommit;    

            }                          

   }   

     }  

    }

}

------------------------

Output:-