Report 1106 Resource Usage, 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.Projects.Resources.Resource;

report 1106 "Resource Usage"
{
    ApplicationArea = Jobs;
    Caption = 'Resource Utilization';
    ToolTip = 'View the resource utilization that has taken place. The report includes the resource capacity, quantity of usage, and the remaining balance.';
    UsageCategory = ReportsAndAnalysis;
    DefaultRenderingLayout = RDLCLayout;

    dataset
    {
        dataitem(Resource; Resource)
        {
            DataItemTableView = sorting("No.");
            RequestFilterFields = "No.", "Date Filter";
            column(TodayFormatted; Format(Today, 0, 4))
            {
            }
            column(CompanyName; COMPANYPROPERTY.DisplayName())
            {
            }
            column(ResTableCaptionResFilter; TableCaption + ': ' + ResFilter)
            {
            }
            column(ResFilter; ResFilter)
            {
            }
            column(No_Resource; "No.")
            {
                IncludeCaption = true;
            }
            column(Type_Resource; Type)
            {
                IncludeCaption = true;
            }
            column(Name_Resource; Name)
            {
                IncludeCaption = true;
            }
            column(capacity_Resource; Capacity)
            {
                IncludeCaption = true;
            }
            column(UsageQty_Resource; "Usage (Qty.)")
            {
                IncludeCaption = true;
            }
            column(CapacityUsageQty; Capacity - "Usage (Qty.)")
            {
            }
            column(ResourceUsageCaption; ResourceUsageCaptionLbl)
            {
            }
            column(CurrReportPageNoCaption; CurrReportPageNoCaptionLbl)
            {
            }
            column(CapacityUsageQtyCaption; CapacityUsageQtyCaptionLbl)
            {
            }

            trigger OnAfterGetRecord()
            begin
                CalcFields(Capacity, "Usage (Qty.)");
            end;
        }
    }

    requestpage
    {
        AboutTitle = 'About Resource Utilization';
        AboutText = 'View the resource utilization that has taken place. The report includes the resource capacity, quantity of usage, and the remaining balance.';
        layout
        {
        }

        actions
        {
        }
    }

    rendering
    {
        layout(RDLCLayout)
        {
            Type = RDLC;
            LayoutFile = './Projects/Resources/Reports/ResourceUsage.rdlc';
            Summary = 'Report layout made in the legacy RDLC format. Use an RDLC editor to modify the layout.';
        }
    }

    labels
    {
    }

    trigger OnPreReport()
    begin
        ResFilter := Resource.GetFilters();
    end;

    var
        ResFilter: Text;
        ResourceUsageCaptionLbl: Label 'Resource Usage';
        CurrReportPageNoCaptionLbl: Label 'Page';
        CapacityUsageQtyCaptionLbl: Label 'Balance';
}