Table 1626 Office Contact Details, source in 29

// ------------------------------------------------------------------------------------------------
// Copyright (c) Microsoft Corporation. All rights reserved.
// Licensed under the MIT License. See License.txt in the project root for license information.
// ------------------------------------------------------------------------------------------------
namespace Microsoft.CRM.Outlook;

using Microsoft.Bank.BankAccount;
using Microsoft.CRM.BusinessRelation;
using Microsoft.Purchases.Vendor;
using Microsoft.Sales.Customer;

table 1626 "Office Contact Details"
{
    Caption = 'Office Contact Details';
    DataClassification = CustomerContent;

    fields
    {
        field(1; "Contact No."; Code[20])
        {
            Caption = 'Contact No.';
            ToolTip = 'Specifies the number of the associated Office contact.';
        }
        field(2; "Business Relation Code"; Code[10])
        {
            Caption = 'Business Relation Code';
            TableRelation = "Business Relation";
        }
        field(3; "Associated Table"; Option)
        {
            Caption = 'Associated Table';
            ToolTip = 'Specifies the table that is associated with the contact, such as Customer, Vendor, Bank Account, or Company.';
            OptionCaption = ' ,Customer,Vendor,Bank Account,Company';
            OptionMembers = " ",Customer,Vendor,"Bank Account",Company;
        }
        field(4; "No."; Code[20])
        {
            Caption = 'No.';
            ToolTip = 'Specifies the number of the involved entry or record, according to the specified number series.';
            TableRelation = if ("Associated Table" = const(Customer)) Customer
            else
            if ("Associated Table" = const(Vendor)) Vendor
            else
            if ("Associated Table" = const("Bank Account")) "Bank Account";
        }
        field(5; "Business Relation Description"; Text[100])
        {
            Caption = 'Business Relation Description';
            Editable = false;
        }
        field(6; "Contact Name"; Text[100])
        {
            Caption = 'Contact Name';
            ToolTip = 'Specifies the name of the Office contact.';
        }
        field(7; Type; Enum "Office Contact Type")
        {
            Caption = 'Type';
            ToolTip = 'Specifies the type of the contact, such as company or contact person.';
        }
        field(8; Company; Text[50])
        {
            Caption = 'Company';
            ToolTip = 'Specifies the company of the contact.';
            DataClassification = OrganizationIdentifiableInformation;
        }
    }

    keys
    {
        key(Key1; "Contact No.", Type, "Associated Table", Company)
        {
            Clustered = true;
        }
    }

    fieldgroups
    {
    }

    procedure GetContactNo() ContactNo: Code[20]
    begin
        if "Associated Table" = "Associated Table"::" " then
            ContactNo := "Contact No."
        else
            ContactNo := "No.";
    end;
}