Page 956 Actual/Sched. Summary FactBox, 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.TimeSheet;

page 956 "Actual/Sched. Summary FactBox"
{
    Caption = 'Actual/Scheduled Summary';
    PageType = CardPart;

    layout
    {
        area(Content)
        {
            field(FirstDaySummary; DateQuantity[1])
            {
                ApplicationArea = Jobs;
                CaptionClass = '3,' + DateDescription[1];
                Editable = false;
            }
            field(SecondDaySummary; DateQuantity[2])
            {
                ApplicationArea = Jobs;
                CaptionClass = '3,' + DateDescription[2];
                Editable = false;
            }
            field(ThirdDaySummary; DateQuantity[3])
            {
                ApplicationArea = Jobs;
                CaptionClass = '3,' + DateDescription[3];
                Editable = false;
            }
            field(ForthDaySummary; DateQuantity[4])
            {
                ApplicationArea = Jobs;
                CaptionClass = '3,' + DateDescription[4];
                Editable = false;
            }
            field(FifthDaySummary; DateQuantity[5])
            {
                ApplicationArea = Jobs;
                CaptionClass = '3,' + DateDescription[5];
                Editable = false;
            }
            field(SixthDaySummary; DateQuantity[6])
            {
                ApplicationArea = Jobs;
                CaptionClass = '3,' + DateDescription[6];
                Editable = false;
            }
            field(SeventhDaySummary; DateQuantity[7])
            {
                ApplicationArea = Jobs;
                CaptionClass = '3,' + DateDescription[7];
                Editable = false;
            }
            field(TotalQtyText; TotalQtyText)
            {
                ApplicationArea = Jobs;
                Caption = 'Total';
                Editable = false;
                Style = Strong;
                StyleExpr = true;
                ToolTip = 'Specifies the total.';
            }
            field(PresenceQty; PresenceQty)
            {
                AutoFormatType = 0;
                ApplicationArea = Jobs;
                Caption = 'Total Presence';
                DecimalPlaces = 2 : 2;
                ToolTip = 'Specifies the total presence (calculated in days or hours) for all resources on the line.';
            }
            field(AbsenceQty; AbsenceQty)
            {
                AutoFormatType = 0;
                ApplicationArea = Jobs;
                Caption = 'Total Absence';
                DecimalPlaces = 2 : 2;
                ToolTip = 'Specifies the total absence (calculated in days or hours) for all resources on the line.';
            }
        }
    }

    actions
    {
    }

    var
        TimeSheetMgt: Codeunit "Time Sheet Management";
        AbsenceQty: Decimal;
        PresenceQty: Decimal;
        TotalQuantity: Decimal;
        DateDescription: array[7] of Text[30];
        DateQuantity: array[7] of Text[30];
        TotalQtyText: Text[30];

    procedure UpdateData(TimeSheetHeader: Record "Time Sheet Header")
    var
        IsHandled: Boolean;
    begin
        IsHandled := false;
        OnBeforeUpdateData(
            TimeSheetHeader, DateDescription, DateQuantity, TotalQtyText, TotalQuantity, AbsenceQty, PresenceQty, IsHandled);
        if IsHandled then
            exit;

        TimeSheetMgt.CalcActSchedFactBoxData(TimeSheetHeader, DateDescription, DateQuantity, TotalQtyText, TotalQuantity, AbsenceQty);
        PresenceQty := TotalQuantity - AbsenceQty;
        CurrPage.Update(false);
    end;

    [IntegrationEvent(true, false)]
    local procedure OnBeforeUpdateData(
        var TimeSheetHeader: Record "Time Sheet Header"; var DateDescription: array[7] of Text[30]; var DateQuantity: array[7] of Text[30];
        var TotalQtyText: Text[30]; var TotalQuantity: Decimal; var AbsenceQty: Decimal; var PresenceQty: Decimal; var IsHandled: Boolean)
    begin
    end;
}