Page 9047 Machine Operator Activities

// ------------------------------------------------------------------------------------------------
// Copyright (c) Microsoft Corporation. All rights reserved.
// Licensed under the MIT License. See License.txt in the project root for license information.
// ------------------------------------------------------------------------------------------------
namespace Microsoft.Manufacturing.RoleCenters;

using Microsoft.Manufacturing.Document;
using Microsoft.Manufacturing.Journal;
using Microsoft.Manufacturing.MachineCenter;
using Microsoft.Manufacturing.WorkCenter;
using Microsoft.Warehouse.Activity;

page 9047 "Machine Operator Activities"
{
    Caption = 'Activities';
    PageType = CardPart;
    RefreshOnActivate = true;
    SourceTable = "Manufacturing Cue";

    layout
    {
        area(content)
        {
            cuegroup("Production Orders")
            {
                Caption = 'Production Orders';
                field("Released Prod. Orders - All"; Rec."Released Prod. Orders - All")
                {
                    ApplicationArea = Manufacturing;
                    DrillDownPageID = "Released Production Orders";
                }
                field("Rlsd. Prod. Orders Until Today"; Rec."Rlsd. Prod. Orders Until Today")
                {
                    ApplicationArea = Manufacturing;
                    Caption = 'Released Prod. Orders Until Today';
                    DrillDownPageID = "Released Production Orders";
                }

                actions
                {
                    action("Consumption Journal")
                    {
                        ApplicationArea = Manufacturing;
                        Caption = 'Consumption Journal';
                        RunObject = Page "Consumption Journal";
                        ToolTip = 'Post the consumption of material as operations are performed.';
                    }
                    action("Output Journal")
                    {
                        ApplicationArea = Manufacturing;
                        Caption = 'Output Journal';
                        RunObject = Page "Output Journal";
                        ToolTip = 'Post finished end items and time spent in production. ';
                    }
                }
            }
            cuegroup(Operations)
            {
                Caption = 'Operations';
                field("Prod. Orders Routings-in Queue"; Rec."Prod. Orders Routings-in Queue")
                {
                    ApplicationArea = Manufacturing;
                    DrillDownPageID = "Prod. Order Routing";
                    ToolTip = 'Specifies how many production order routing lines are in queue. The documents are filtered by today''s date. Finished production orders are excluded.';
                }
                field("Prod. Orders Routings-in Prog."; Rec."Prod. Orders Routings-in Prog.")
                {
                    ApplicationArea = Manufacturing;
                    DrillDownPageID = "Prod. Order Routing";
                    ToolTip = 'Specifies how many production order routing lines are in progress. The documents are filtered by today''s date. Only released production orders are included.';
                }

                actions
                {
                    action("Register Absence - Machine Center")
                    {
                        ApplicationArea = Manufacturing;
                        Caption = 'Register Absence - Machine Center';
                        RunObject = Report "Reg. Abs. (from Machine Ctr.)";
                    }
                    action("Register Absence - Work Center")
                    {
                        ApplicationArea = Manufacturing;
                        Caption = 'Register Absence - Work Center';
                        RunObject = Report "Reg. Abs. (from Work Center)";
                    }
                    action("Prod. Order - Job Card")
                    {
                        ApplicationArea = Manufacturing;
                        Caption = 'Prod. Order - Job Card';
                        RunObject = Report "Prod. Order - Job Card";
                    }
                }
            }
            cuegroup("Warehouse Documents")
            {
                Caption = 'Warehouse Documents';
                field("Invt. Picks to Production"; Rec."Invt. Picks to Production")
                {
                    ApplicationArea = Warehouse;
                    DrillDownPageID = "Inventory Picks";
                }
                field("Invt. Put-aways from Prod."; Rec."Invt. Put-aways from Prod.")
                {
                    ApplicationArea = Warehouse;
                    DrillDownPageID = "Inventory Put-aways";
                }

                actions
                {
                    action("New Inventory Pick")
                    {
                        ApplicationArea = Warehouse;
                        Caption = 'New Inventory Pick';
                        RunObject = Page "Inventory Pick";
                        RunPageMode = Create;
                        ToolTip = 'Prepare to pick items in a basic warehouse configuration.';
                    }
                    action("New Inventory Put-away")
                    {
                        ApplicationArea = Warehouse;
                        Caption = 'New Inventory Put-away';
                        RunObject = Page "Inventory Put-away";
                        RunPageMode = Create;
                        ToolTip = 'Prepare to put items away in a basic warehouse configuration.';
                    }
                }
            }
        }
    }

    actions
    {
    }

    trigger OnOpenPage()
    begin
        Rec.Reset();
        if not Rec.Get() then begin
            Rec.Init();
            Rec.Insert();
        end;

        Rec.SetFilter("Date Filter", '<=%1', WorkDate());
        Rec.SetRange("User ID Filter", UserId());
    end;
}