Codeunit 5560 Contact BRL Employee
- App
- Base Application
- Namespace
- Microsoft.CRM.BusinessRelation
- Versions
- 19-28
Versions171819202122232425262728
Source29
Source in 29
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;
}