How to add contacts to customer

Question

I try to add contacts to a customer, like this:

   WHILE (LoopCount <> 0) DO
   BEGIN
       KlantContact.GET(FirstContact);
       KlantContact.VALIDATE(KlantContact."Company No.", BussinesContactName."Contact No.");     //'44241';
       KlantContact.MODIFY;
       MESSAGE(KlantContact.Name);
       LoopCount := LoopCount - 1;
       FirstContact := INCSTR(FirstContact);    
   END;

But the problem is that the contacts are not connected with the customer.

score 3 · Accepted Answer · edited Dec 13 '15 at 23:03

3

You have to use the Contact Business Relation table to link them together. Just check the table structure.

Otherwise, if you set up the Bus. Relation Codes in the Marketing Setup NAV will create a new Contact in the background for Customers, Vendors and Bank Accounts.

edited Dec 13 '15 at 23:03

Jake Edwards

1,190
11
24

answered Dec 11 '15 at 17:32

azatoth

705
6
14

At azatoth. Thank you. Solved – InfinityGoesAround Dec 14 '15 at 09:24

Florian · Answer 2 · 2015-12-14T08:00:24.280

2

If you look in the OnInsert trigger of the Customer Table you can see, that a Method UpdateContFromCust.OnInsert(Rec); is called. Within this Method a new Contact Bus. Relation is inserted.

From Method InsertNewContact (Codeunit 5056), with Cont beeing the contact and RMSetup beeing Marketing Setup

 WITH ContBusRel DO BEGIN
      INIT;
      "Contact No." := Cont."No.";
      "Business Relation Code" := RMSetup."Bus. Rel. Code for Customers";
      "Link to Table" := "Link to Table"::Customer;
      "No." := Cust."No.";
      INSERT(TRUE);
    END;

edited Dec 14 '15 at 08:00

answered Dec 14 '15 at 07:51

Florian

1,827
4
30
62

At Campl3r. Thank you for your answare. I have solved now – InfinityGoesAround Dec 14 '15 at 09:25

How to add contacts to customer

2 Answers2