Table 9052 Service Cue, 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.Service.RoleCenters;

using Microsoft.Service.Contract;
using Microsoft.Service.Document;
using System.Security.User;

table 9052 "Service Cue"
{
    Caption = 'Service Cue';
    DataClassification = CustomerContent;

    fields
    {
        field(1; "Primary Key"; Code[10])
        {
            AllowInCustomizations = Never;
            Caption = 'Primary Key';
        }
        field(2; "Service Orders - in Process"; Integer)
        {
            CalcFormula = count("Service Header" where("Document Type" = filter(Order),
                                                        Status = filter("In Process"),
                                                        "Responsibility Center" = field("Responsibility Center Filter")));
            Caption = 'Service Orders - in Process';
            ToolTip = 'Specifies the number of in process service orders that are displayed in the Service Cue on the Role Center. The documents are filtered by today''s date.';
            Editable = false;
            FieldClass = FlowField;
        }
        field(3; "Service Orders - Finished"; Integer)
        {
            CalcFormula = count("Service Header" where("Document Type" = filter(Order),
                                                        Status = filter(Finished),
                                                        "Responsibility Center" = field("Responsibility Center Filter")));
            Caption = 'Service Orders - Finished';
            ToolTip = 'Specifies the finished service orders that are displayed in the Service Cue on the Role Center. The documents are filtered by today''s date.';
            Editable = false;
            FieldClass = FlowField;
        }
        field(4; "Service Orders - Inactive"; Integer)
        {
            CalcFormula = count("Service Header" where("Document Type" = filter(Order),
                                                        Status = filter(Pending | "On Hold"),
                                                        "Responsibility Center" = field("Responsibility Center Filter")));
            Caption = 'Service Orders - Inactive';
            ToolTip = 'Specifies the number of inactive service orders that are displayed in the Service Cue on the Role Center. The documents are filtered by today''s date.';
            Editable = false;
            FieldClass = FlowField;
        }
        field(5; "Open Service Quotes"; Integer)
        {
            CalcFormula = count("Service Header" where("Document Type" = filter(Quote),
                                                        Status = filter(Pending | "On Hold"),
                                                        "Responsibility Center" = field("Responsibility Center Filter")));
            Caption = 'Open Service Quotes';
            ToolTip = 'Specifies the number of open service quotes that are displayed in the Service Cue on the Role Center. The documents are filtered by today''s date.';
            Editable = false;
            FieldClass = FlowField;
        }
        field(6; "Open Service Contract Quotes"; Integer)
        {
            CalcFormula = count("Service Contract Header" where("Contract Type" = filter(Quote),
                                                                 Status = filter(" "),
                                                                 "Responsibility Center" = field("Responsibility Center Filter")));
            Caption = 'Open Service Contract Quotes';
            ToolTip = 'Specifies the number of open service contract quotes that are displayed in the Service Cue on the Role Center. The documents are filtered by today''s date.';
            Editable = false;
            FieldClass = FlowField;
        }
        field(7; "Service Contracts to Expire"; Integer)
        {
            CalcFormula = count("Service Contract Header" where("Contract Type" = filter(Contract),
                                                                 "Expiration Date" = field("Date Filter"),
                                                                 "Responsibility Center" = field("Responsibility Center Filter")));
            Caption = 'Service Contracts to Expire';
            ToolTip = 'Specifies the number of service contracts set to expire that are displayed in the Service Cue on the Role Center. The documents are filtered by today''s date.';
            Editable = false;
            FieldClass = FlowField;
        }
        field(8; "Service Orders - Today"; Integer)
        {
            CalcFormula = count("Service Header" where("Document Type" = filter(Order),
                                                        "Response Date" = field("Date Filter"),
                                                        "Responsibility Center" = field("Responsibility Center Filter")));
            Caption = 'Service Orders - Today';
            ToolTip = 'Specifies the number of in-service orders that are displayed in the Service Cue on the Role Center. The documents are filtered by today''s date.';
            Editable = false;
            FieldClass = FlowField;
        }
        field(9; "Service Orders - to Follow-up"; Integer)
        {
            CalcFormula = count("Service Header" where("Document Type" = filter(Order),
                                                        Status = filter("In Process"),
                                                        "Responsibility Center" = field("Responsibility Center Filter")));
            Caption = 'Service Orders - to Follow-up';
            ToolTip = 'Specifies the number of service orders that have been marked for follow up that are displayed in the Service Cue on the Role Center. The documents are filtered by today''s date.';
            Editable = false;
            FieldClass = FlowField;
        }
        field(20; "Date Filter"; Date)
        {
            Caption = 'Date Filter';
            Editable = false;
            FieldClass = FlowFilter;
        }
        field(21; "Responsibility Center Filter"; Code[10])
        {
            Caption = 'Responsibility Center Filter';
            Editable = false;
            FieldClass = FlowFilter;
        }
        field(22; "User ID Filter"; Code[50])
        {
            Caption = 'User ID Filter';
            FieldClass = FlowFilter;
        }
    }

    keys
    {
        key(Key1; "Primary Key")
        {
            Clustered = true;
        }
    }

    fieldgroups
    {
    }

    procedure SetRespCenterFilter()
    var
        UserSetupMgt: Codeunit "User Setup Management";
        RespCenterCode: Code[10];
    begin
        RespCenterCode := UserSetupMgt.GetServiceFilter();
        if RespCenterCode <> '' then begin
            FilterGroup(2);
            SetRange("Responsibility Center Filter", RespCenterCode);
            FilterGroup(0);
        end;
    end;
}