Page 5840 Standard Cost Worksheet Names, 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.Manufacturing.StandardCost;

page 5840 "Standard Cost Worksheet Names"
{
    Caption = 'Standard Cost Worksheet Names';
    PageType = List;
    SourceTable = "Standard Cost Worksheet Name";

    layout
    {
        area(content)
        {
            repeater(Control1)
            {
                ShowCaption = false;
                field(Name; Rec.Name)
                {
                    ApplicationArea = Basic, Suite;
                }
                field(Description; Rec.Description)
                {
                    ApplicationArea = Basic, Suite;
                }
            }
        }
        area(factboxes)
        {
            systempart(Control1900383207; Links)
            {
                ApplicationArea = RecordLinks;
                Visible = false;
            }
            systempart(Control1905767507; Notes)
            {
                ApplicationArea = Notes;
                Visible = false;
            }
        }
    }

    actions
    {
        area(processing)
        {
            action(EditWorksheet)
            {
                ApplicationArea = Basic, Suite;
                Caption = 'Edit Worksheet';
                Image = OpenWorksheet;
                ShortCutKey = 'Return';
                ToolTip = 'Open the related worksheet.';

                trigger OnAction()
                begin
                    StdCostWksh."Standard Cost Worksheet Name" := Rec.Name;
                    PAGE.Run(PAGE::"Standard Cost Worksheet", StdCostWksh);
                end;
            }
        }
        area(Promoted)
        {
            group(Category_Process)
            {
                Caption = 'Process';

                actionref(EditWorksheet_Promoted; EditWorksheet)
                {
                }
            }
        }
    }

    trigger OnOpenPage()
    begin
        if not StdCostWkshName.FindFirst() then begin
            StdCostWkshName.Init();
            StdCostWkshName.Name := Text001;
            StdCostWkshName.Description := Text001;
            StdCostWkshName.Insert();
        end;
    end;

    var
        StdCostWkshName: Record "Standard Cost Worksheet Name";
        StdCostWksh: Record "Standard Cost Worksheet";

#pragma warning disable AA0074
        Text001: Label 'Default';
#pragma warning restore AA0074
}