================================================================================
NonDebuggable attribute on variable
================================================================================

page 50100 "Test Page"
{
    var
        UserName: Text;
        [NonDebuggable]
        PasswordText: Text;

    procedure Test()
    begin
    end;
}

--------------------------------------------------------------------------------

(source_file
  (page_declaration
    (page_keyword)
    (integer)
    (quoted_identifier)
    (var_section
      (var_keyword)
      (variable_declaration
        (identifier)
        (type_specification
          (text_type)))
      (attribute_item
        (attribute_content
          (identifier)))
      (variable_declaration
        (identifier)
        (type_specification
          (text_type))))
    (procedure
      (procedure_keyword)
      (identifier)
      (code_block))))

================================================================================
RunOnClient attribute on DotNet variable
================================================================================

codeunit 50100 "Test DotNet"
{
    var
        TempRecord: Record "Test" temporary;
        [RunOnClient]
        OfficeHost: DotNet OfficeHost;
        IsInitialized: Boolean;

    procedure Test()
    begin
    end;
}

--------------------------------------------------------------------------------

(source_file
  (codeunit_declaration
    (codeunit_keyword)
    (integer)
    (quoted_identifier)
    (var_section
      (var_keyword)
      (variable_declaration
        (identifier)
        (type_specification
          (record_type
            (quoted_identifier)
            (temporary_keyword))))
      (attribute_item
        (attribute_content
          (identifier)))
      (variable_declaration
        (identifier)
        (type_specification
          (dotnet_type
            (dotnet_keyword)
            (identifier))))
      (variable_declaration
        (identifier)
        (type_specification
          (basic_type))))
    (procedure
      (procedure_keyword)
      (identifier)
      (code_block))))

================================================================================
Multiple attributes on variable
================================================================================

page 50101 "Test Multiple Attrs"
{
    var
        [RunOnClient]
        [WithEvents]
        PageNotifier: DotNet PageNotifier;
        ShowActivities: Boolean;

    procedure Test()
    begin
    end;
}

--------------------------------------------------------------------------------

(source_file
  (page_declaration
    (page_keyword)
    (integer)
    (quoted_identifier)
    (var_section
      (var_keyword)
      (attribute_item
        (attribute_content
          (identifier)))
      (attribute_item
        (attribute_content
          (identifier)))
      (variable_declaration
        (identifier)
        (type_specification
          (dotnet_type
            (dotnet_keyword)
            (identifier))))
      (variable_declaration
        (identifier)
        (type_specification
          (basic_type))))
    (procedure
      (procedure_keyword)
      (identifier)
      (code_block))))

================================================================================
NonDebuggable in local var section
================================================================================

codeunit 50102 "Test Local Attr"
{
    procedure Login()
    var
        Username: Text;
        [NonDebuggable]
        Password: Text;
    begin
    end;
}

--------------------------------------------------------------------------------

(source_file
  (codeunit_declaration
    (codeunit_keyword)
    (integer)
    (quoted_identifier)
    (procedure
      (procedure_keyword)
      (identifier)
      (var_section
        (var_keyword)
        (variable_declaration
          (identifier)
          (type_specification
            (text_type)))
        (attribute_item
          (attribute_content
            (identifier)))
        (variable_declaration
          (identifier)
          (type_specification
            (text_type))))
      (code_block))))

================================================================================
InDataSet attribute on variable
================================================================================

page 50103 "Test InDataSet"
{
    var
        [InDataSet]
        StyleEnabled: Boolean;
        Counter: Integer;

    procedure Test()
    begin
    end;
}

--------------------------------------------------------------------------------

(source_file
  (page_declaration
    (page_keyword)
    (integer)
    (quoted_identifier)
    (var_section
      (var_keyword)
      (attribute_item
        (attribute_content
          (identifier)))
      (variable_declaration
        (identifier)
        (type_specification
          (basic_type)))
      (variable_declaration
        (identifier)
        (type_specification
          (basic_type))))
    (procedure
      (procedure_keyword)
      (identifier)
      (code_block))))
