Page 9260 Customer Experience Survey in 28

#if not CLEAN27
// ------------------------------------------------------------------------------------------------
// Copyright (c) Microsoft Corporation. All rights reserved.
// Licensed under the MIT License. See License.txt in the project root for license information.
// ------------------------------------------------------------------------------------------------

namespace System.Feedback;

page 9260 "Customer Experience Survey"
{
    Extensible = false;
    Caption = ' ';
    DeleteAllowed = false;
    Editable = false;
    InsertAllowed = false;
    LinksAllowed = false;
    ModifyAllowed = false;
    PageType = Card;
    InherentEntitlements = X;
    InherentPermissions = X;
    ObsoleteReason = 'This module is no longer used.';
    ObsoleteState = Pending;
    ObsoleteTag = '27.0';

    layout
    {
        area(Content)
        {
            usercontrol(Survey; CustomerExperienceSurvey)
            {
                ApplicationArea = All;

                trigger ControlReady()
                begin
                    CurrPage.Survey.RenderSurvey(SurveyDivLbl, SurveyId, TenantId, FormsProEligibilityId, Locale);
                end;
            }
        }
    }

    var
        SurveyId: Text;
        TenantId: Text;
        FormsProEligibilityId: Text;
        Locale: Text;
        SurveyDivLbl: Label 'surveyDiv', Locked = true;

    internal procedure SetSurveyProperties(NewSurveyId: Text; NewTenantId: Text; NewFormsProEligibilityId: Text; NewLocale: Text)
    begin
        SurveyId := NewSurveyId;
        TenantId := NewTenantId;
        FormsProEligibilityId := NewFormsProEligibilityId;
        Locale := NewLocale;
    end;
}
#endif