Codeunit 5560 Contact BRL Employee, source in 29

Source29

src/Layers/W1/BaseApp/CRM/BusinessRelation/ContactBRLEmployee.Codeunit.al23 lines, Copyright (c) Microsoft Corporation. MIT

// ------------------------------------------------------------------------------------------------
// 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.BusinessRelation;

using Microsoft.HumanResources.Employee;

codeunit 5560 "Contact BRL Employee" implements "Contact Business Relation Link"
{

    procedure GetTableAndSystemId(No: Code[20]; var TableId: Integer; var SystemId: Guid): Boolean
    var
        Employee: Record Employee;
    begin
        TableId := Database::Employee;
        Employee.SetRange("No.", No);
        Employee.FindFirst();
        SystemId := Employee.SystemId;
        exit(Employee.Count() = 1);
    end;
}