testcentricity 2.3.13

data/lib/testcentricity/web_elements/list_button.rb

@@ -0,0 +1,8 @@
+module TestCentricity
+  class ListButton < ListElement
+    def initialize(name, parent, locator, context, list, proxy = nil)
+      super
+      @type = :list_button
+    end
+  end
+end

data/lib/testcentricity/web_elements/list_checkbox.rb

@@ -0,0 +1,38 @@
+module TestCentricity
+  class ListCheckBox < ListElement
+    attr_accessor :proxy
+
+    def initialize(name, parent, locator, context, list, proxy = nil)
+      super
+      @type  = :list_checkbox
+      @proxy = proxy
+    end
+
+    def checked?(row)
+      obj, = find_list_element(row)
+      list_object_not_found_exception(obj, 'List CheckBox', row)
+      obj.checked?
+    end
+
+    def set_checkbox_state(row, state)
+      obj, = find_list_element(row)
+      list_object_not_found_exception(obj, 'List CheckBox', row)
+      obj.set(state)
+    end
+
+    def check(row)
+      set_checkbox_state(row, true)
+    end
+
+    def uncheck(row)
+      set_checkbox_state(row, false)
+    end
+
+    def verify_check_state(row, state, enqueue = false)
+      actual = checked?(row)
+      enqueue ?
+          ExceptionQueue.enqueue_assert_equal(state, actual, "Expected Row #{row} List Checkbox #{object_ref_message}") :
+          assert_equal(state, actual, "Expected Row #{row} List Checkbox #{object_ref_message} to be #{state} but found #{actual} instead")
+    end
+  end
+end

data/lib/testcentricity/web_elements/list_element.rb

@@ -0,0 +1,61 @@
+module TestCentricity
+  class ListElement < UIElement
+    attr_accessor :list
+    attr_accessor :element_locator
+
+    def initialize(name, parent, locator, context, list, proxy = nil)
+      @name            = name
+      @parent          = parent
+      @context         = context
+      @alt_locator     = nil
+      @list            = list
+      @element_locator = locator
+
+      set_locator_type(@list.get_locator)
+
+      if locator.nil?
+        @locator = list.get_list_row_locator('ROW_SPEC')
+      else
+        case @locator_type
+        when :xpath
+          @locator = "#{list.get_list_row_locator('ROW_SPEC')}/#{@element_locator}"
+        when :css
+          @locator = "#{list.get_list_row_locator('ROW_SPEC')} > #{@element_locator}"
+        end
+      end
+    end
+
+    def exists?(row)
+      obj, = find_list_element(row)
+      obj != nil
+    end
+
+    def click(row)
+      obj, = find_list_element(row)
+      list_object_not_found_exception(obj, @type, row)
+      obj.click
+    end
+
+    def get_value(row, visible = true)
+      obj, = find_list_element(row, visible)
+      list_object_not_found_exception(obj, @type, row)
+      case obj.tag_name.downcase
+        when 'input', 'select', 'textarea'
+          obj.value
+        else
+          obj.text
+      end
+    end
+
+    alias get_caption get_value
+
+    def find_list_element(row, visible = true)
+      set_alt_locator("#{@locator.gsub('ROW_SPEC', row.to_s)}")
+      find_element(visible)
+    end
+
+    def list_object_not_found_exception(obj, obj_type, row)
+      object_not_found_exception(obj, "Row #{row} #{obj_type}")
+    end
+  end
+end

data/lib/testcentricity/web_elements/list_radio.rb

@@ -0,0 +1,31 @@
+module TestCentricity
+  class ListRadio < ListElement
+    attr_accessor :proxy
+
+    def initialize(name, parent, locator, context, list, proxy = nil)
+      super
+      @type  = :list_radio
+      @proxy = proxy
+    end
+
+    def selected?(row)
+      obj, = find_list_element(row)
+      list_object_not_found_exception(obj, 'List Radio', row)
+      obj.checked?
+    end
+
+    def set_selected_state(row, state)
+      obj, = find_list_element(row)
+      list_object_not_found_exception(obj, 'List Radio', row)
+      obj.set(state)
+    end
+
+    def select(row)
+      set_selected_state(row, true)
+    end
+
+    def unselect(row)
+      set_selected_state(row, false)
+    end
+  end
+end

data/lib/testcentricity/web_elements/radio.rb

@@ -0,0 +1,74 @@
+module TestCentricity
+  class Radio < UIElement
+    attr_accessor :proxy
+
+    def initialize(name, parent, locator, context, proxy = nil)
+      @name        = name
+      @parent      = parent
+      @locator     = locator
+      @context     = context
+      @alt_locator = nil
+      @proxy       = proxy
+      @type        = :radio
+      set_locator_type
+    end
+
+    # Does radio button object exists?
+    #
+    # @return [Boolean]
+    # @example
+    #   accept_terms_radio.exists?
+    #
+    def exists?
+      obj, = find_object(:all)
+      obj != nil
+    end
+
+    # Is radio button selected?
+    #
+    # @return [Boolean]
+    # @example
+    #   accept_terms_radio.selected?
+    #
+    def selected?
+      obj, = find_element(:all)
+      object_not_found_exception(obj, 'Radio')
+      obj.checked?
+    end
+
+    # Set the select state of a radio button object.
+    #
+    # @param state [Boolean] true = selected / false = unselected
+    # @example
+    #   accept_terms_radio.set_selected_state(true)
+    #
+    def set_selected_state(state)
+      obj, = find_element(:all)
+      object_not_found_exception(obj, 'Radio')
+      invalid_object_type_exception(obj, 'radio')
+      if @proxy.nil?
+        obj.set(state)
+      else
+        @proxy.click unless state == obj.checked?
+      end
+    end
+
+    # Set the selected state of a radio button object.
+    #
+    # @example
+    #   accept_terms_radio.select
+    #
+    def select
+      set_selected_state(true)
+    end
+
+    # Unselect a radio button object.
+    #
+    # @example
+    #   accept_terms_radio.unselect
+    #
+    def unselect
+      set_selected_state(false)
+    end
+  end
+end

data/lib/testcentricity/web_elements/select_list.rb

@@ -0,0 +1,197 @@
+module TestCentricity
+  class SelectList < UIElement
+    attr_accessor :list_item
+    attr_accessor :selected_item
+
+    def initialize(name, parent, locator, context)
+      super
+      @type = :selectlist
+      list_spec = {
+          :list_item     => 'option',
+          :selected_item => 'option[selected]'
+      }
+      define_list_elements(list_spec)
+    end
+
+    def define_list_elements(element_spec)
+      element_spec.each do |element, value|
+        case element
+        when :list_item
+          @list_item = value
+        when :selected_item
+          @selected_item = value
+        else
+          raise "#{element} is not a recognized selectlist element"
+        end
+      end
+    end
+
+    # Select the specified option in a select box object. Accepts a String or Hash.
+    # Supports standard HTML select objects and Chosen select objects.
+    #
+    # @param option [String] text of option to select
+    #             OR
+    # @param option [Hash] :value, :index, or :text of option to select
+    #
+    # @example
+    #   province_select.choose_option('Alberta')
+    #   province_select.choose_option(:value => 'AB')
+    #   state_select.choose_option(:index => 24)
+    #   state_select.choose_option(:text => 'Maryland')
+    #
+    def choose_option(option)
+      obj, = find_element
+      object_not_found_exception(obj, nil)
+      obj.click
+      if first(:css, "li[class*='active-result']")
+        if option.is_a?(Array)
+          option.each do |item|
+            page.find(:css, "li[class*='active-result']", text: item.strip).click
+          end
+        else
+          if option.is_a?(Hash)
+            page.find(:css, "li[class*='active-result']:nth-of-type(#{option[:index]})").click if option.has_key?(:index)
+          else
+            options = obj.all("li[class*='active-result']").collect(&:text)
+            sleep(2) unless options.include?(option)
+            first(:css, "li[class*='active-result']", text: option).click
+          end
+        end
+      else
+        if option.is_a?(Array)
+          option.each do |item|
+            select_item(obj, item)
+          end
+        else
+          select_item(obj, option)
+        end
+      end
+    end
+
+    # Return array of strings of all options in a select box object.
+    # Supports standard HTML select objects and Chosen select objects.
+    #
+    # @return [Array]
+    # @example
+    #   all_colors = color_select.get_options
+    #
+    def get_options
+      obj, = find_element
+      object_not_found_exception(obj, nil)
+      if first(:css, "li[class*='active-result']")
+        obj.all("li[class*='active-result']").collect(&:text)
+      else
+        obj.all(@list_item).collect(&:text)
+      end
+    end
+
+    alias get_list_items get_options
+
+    # Return the number of options in a select box object.
+    # Supports standard HTML select objects and Chosen select objects.
+    #
+    # @return [Integer]
+    # @example
+    #   num_colors = color_select.get_option_count
+    #
+    def get_option_count
+      obj, = find_element
+      object_not_found_exception(obj, nil)
+      if first(:css, "li[class*='active-result']")
+        obj.all("li[class*='active-result']").count
+      else
+        obj.all(@list_item).count
+      end
+    end
+
+    alias get_item_count get_option_count
+
+    def verify_options(expected, enqueue = false)
+      actual = get_options
+      enqueue ?
+          ExceptionQueue.enqueue_assert_equal(expected, actual, "Expected list of options in list #{object_ref_message}") :
+          assert_equal(expected, actual, "Expected list of options in list #{object_ref_message} to be #{expected} but found #{actual}")
+    end
+
+    # Return text of first selected option in a select box object.
+    # Supports standard HTML select objects and Chosen select objects.
+    #
+    # @return [String]
+    # @example
+    #   current_color = color_select.get_selected_option
+    #
+    def get_selected_option
+      obj, = find_element
+      object_not_found_exception(obj, nil)
+      if first(:css, "li[class*='active-result']")
+        obj.first(:css, "li[class*='result-selected']").text
+      else
+        obj.first(@selected_item).text
+      end
+    end
+
+    alias selected? get_selected_option
+
+    # Select the specified option in a Siebel OUI select box object.
+    #
+    # @param option [String] text of option to select
+    # @example
+    #   country_select.choose_siebel_option('Cayman Islands')
+    #
+    def choose_siebel_option(option)
+      Capybara.wait_on_first_by_default = true
+      invoke_siebel_popup
+      first(:xpath, "//li[@class='ui-menu-item']", :exact => true, :match => :prefer_exact, text: option).click
+    end
+
+    # Return array of strings of all options in a Siebel OUI select box object.
+    #
+    # @return [Array]
+    # @example
+    #   all_countries = country_select.get_siebel_options
+    #
+    def get_siebel_options
+      invoke_siebel_popup
+      sleep(0.5)
+      options = page.all(:xpath, "//li[@class='ui-menu-item']").collect(&:text)
+      obj, = find_element
+      obj.native.send_keys(:escape)
+      options
+    end
+
+    def verify_siebel_options(expected, enqueue = false)
+      invoke_siebel_popup
+      sleep(0.5)
+      actual = page.all(:xpath, "//li[@class='ui-menu-item']").collect(&:text)
+      enqueue ?
+          ExceptionQueue.enqueue_assert_equal(expected, actual, "Expected list of options in list #{object_ref_message}") :
+          assert_equal(expected, actual, "Expected list of options in list #{object_ref_message} to be #{expected} but found #{actual}")
+      obj, = find_element
+      obj.native.send_keys(:escape)
+    end
+
+    # Is Siebel JComboBox set to read-only?
+    #
+    # @return [Boolean]
+    # @example
+    #   country_select.read_only?
+    #
+    def read_only?
+      obj, = find_element
+      object_not_found_exception(obj, nil)
+      !obj.native.attribute('readonly')
+    end
+
+    private
+
+    def select_item(obj, option)
+      if option.is_a?(Hash)
+        obj.find("option[value='#{option[:value]}']").click if option.has_key?(:value)
+        obj.find(:xpath, "option[#{option[:index]}]").select_option if option.has_key?(:index)
+        obj.select option[:text] if option.has_key?(:text)
+      else
+        obj.select option
+      end
+    end
+  end
+end

data/lib/testcentricity/web_elements/siebel_open_ui_helper.rb

@@ -0,0 +1,15 @@
+module TestCentricity
+  class UIElement
+    def invoke_siebel_dialog(popup, seconds = nil)
+      invoke_siebel_popup
+      timeout = seconds.nil? ? 15 : seconds
+      popup.wait_until_exists(timeout)
+    end
+
+    def get_siebel_object_type
+      obj, = find_element
+      object_not_found_exception(obj, 'Siebel object')
+      obj.native.attribute('ot')
+    end
+  end
+end

data/lib/testcentricity/web_elements/table.rb

@@ -0,0 +1,612 @@
+module TestCentricity
+  class Table < UIElement
+    attr_accessor :table_body
+    attr_accessor :table_section
+    attr_accessor :table_row
+    attr_accessor :table_column
+    attr_accessor :table_header
+    attr_accessor :header_row
+    attr_accessor :header_column
+    attr_accessor :tree_expand
+    attr_accessor :tree_collapse
+
+    def initialize(name, parent, locator, context)
+      super
+      @type = :table
+
+      table_spec = { :table_body    => 'tbody',
+                     :table_section => nil,
+                     :table_row     => 'tr',
+                     :table_column  => 'td',
+                     :table_header  => 'thead',
+                     :header_row    => 'tr',
+                     :header_column => 'th' }
+
+      case @locator_type
+      when :xpath
+        table_spec[:tree_expand]   = "div/div[contains(@class, 'tree-plus treeclick')]"
+        table_spec[:tree_collapse] = "div/div[contains(@class, 'tree-minus treeclick')]"
+      when :css
+        table_spec[:tree_expand]   = "div/div[class*='tree-plus treeclick']"
+        table_spec[:tree_collapse] = "div/div[class*='tree-minus treeclick']"
+      end
+      define_table_elements(table_spec)
+    end
+
+    def define_table_elements(element_spec)
+      element_spec.each do |element, value|
+        case element
+        when :table_body
+          @table_body = value
+        when :table_section
+          @table_section = value
+        when :table_row
+          @table_row = value
+        when :table_column
+          @table_column = value
+        when :table_header
+          @table_header = value
+        when :header_row
+          @header_row = value
+        when :header_column
+          @header_column = value
+        when :tree_expand
+          @tree_expand = value
+        when :tree_collapse
+          @tree_collapse = value
+        else
+          raise "#{element} is not a recognized table element"
+        end
+      end
+    end
+
+    # Return number of rows in a table object.
+    #
+    # @return [Integer]
+    # @example
+    #   num_rows = list_table.get_row_count
+    #
+    def get_row_count
+      wait_until_exists(5)
+      case @locator_type
+      when :xpath
+        if @table_section.nil?
+          page.all(:xpath, "#{@locator}/#{@table_body}/#{@table_row}", :visible => :all).count
+        else
+          page.all(:xpath, "#{@locator}/#{@table_body}/#{@table_section}", :visible => :all).count
+        end
+      when :css
+        if @table_section.nil?
+          page.all(:css, "#{@locator} > #{@table_body} > #{@table_row}", :visible => :all).count
+        else
+          page.all(:css, "#{@locator} > #{@table_body} > #{@table_section}", :visible => :all).count
+        end
+      end
+    end
+
+    # Return number of columns in a table object.
+    #
+    # @return [Integer]
+    # @example
+    #   num_columns = list_table.get_column_count
+    #
+    def get_column_count
+      row_count = get_row_count
+      case @locator_type
+      when :xpath
+        if row_count == 0
+          page.all(:xpath, "#{@locator}/#{@table_header}/#{@header_row}/#{@header_column}", :visible => :all).count
+        else
+          if @table_section.nil?
+            row_count == 1 ?
+                page.all(:xpath, "#{@locator}/#{@table_body}/#{@table_row}/#{@table_column}", :visible => :all).count :
+                page.all(:xpath, "#{@locator}/#{@table_body}/#{@table_row}[2]/#{@table_column}", :visible => :all).count
+          else
+            row_count == 1 ?
+                page.all(:xpath, "#{@locator}/#{@table_body}/#{@table_section}/#{@table_row}/#{@table_column}", :visible => :all).count :
+                page.all(:xpath, "#{@locator}/#{@table_body}/#{@table_section}[2]/#{@table_row}/#{@table_column}", :visible => :all).count
+          end
+        end
+      when :css
+        if row_count == 0
+          page.all(:css, "#{@locator} > #{@table_header} > #{@header_row} > #{@header_column}", :visible => :all).count
+        else
+          if @table_section.nil?
+            row_count == 1 ?
+                page.all(:css, "#{@locator} > #{@table_body} > #{@table_row} > #{@table_column}", :visible => :all).count :
+                page.all(:css, "#{@locator} > #{@table_body} > #{@table_row}:nth-of-type(2) > #{@table_column}", :visible => :all).count
+          else
+            row_count == 1 ?
+                page.all(:css, "#{@locator} > #{@table_body} > #{@table_section} > #{@table_row} > #{@table_column}", :visible => :all).count :
+                page.all(:css, "#{@locator} > #{@table_body} > #{@table_section}:nth-of-type(2) > #{@table_row} > #{@table_column}", :visible => :all).count
+          end
+        end
+      end
+    end
+
+    # Hover over the specified cell in a table object.
+    #
+    # @param row [Integer] row number
+    # @param column [Integer] column number
+    # @example
+    #   list_table.hover_table_cell(2, 6)
+    #
+    def hover_table_cell(row, column)
+      row_count = get_row_count
+      raise "Row #{row} exceeds number of rows (#{row_count}) in table #{object_ref_message}" if row > row_count
+      column_count = get_column_count
+      raise "Column #{column} exceeds number of columns (#{column_count}) in table #{object_ref_message}" if column > column_count
+      set_table_cell_locator(row, column)
+      hover
+      clear_alt_locator
+    end
+
+    # Click in the specified cell in a table object.
+    #
+    # @param row [Integer] row number
+    # @param column [Integer] column number
+    # @example
+    #   list_table.click_table_cell(3, 5)
+    #
+    def click_table_cell(row, column)
+      row_count = get_row_count
+      raise "Row #{row} exceeds number of rows (#{row_count}) in table #{object_ref_message}" if row > row_count
+      column_count = get_column_count
+      raise "Column #{column} exceeds number of columns (#{column_count}) in table #{object_ref_message}" if column > column_count
+      set_table_cell_locator(row, column)
+      click
+      clear_alt_locator
+    end
+
+    # Double-click in the specified cell in a table object.
+    #
+    # @param row [Integer] row number
+    # @param column [Integer] column number
+    # @example
+    #   list_table.double_click_table_cell(3, 5)
+    #
+    def double_click_table_cell(row, column)
+      row_count = get_row_count
+      raise "Row #{row} exceeds number of rows (#{row_count}) in table #{object_ref_message}" if row > row_count
+      column_count = get_column_count
+      raise "Column #{column} exceeds number of columns (#{column_count}) in table #{object_ref_message}" if column > column_count
+      set_table_cell_locator(row, column)
+      double_click
+      clear_alt_locator
+    end
+
+    # Click the link object embedded within the specified cell in a table object.
+    #
+    # @param row [Integer] row number
+    # @param column [Integer] column number
+    # @example
+    #   list_table.click_table_cell_link(3, 1)
+    #
+    def click_table_cell_link(row, column)
+      row_count = get_row_count
+      raise "Row #{row} exceeds number of rows (#{row_count}) in table #{object_ref_message}" if row > row_count
+      column_count = get_column_count
+      raise "Column #{column} exceeds number of columns (#{column_count}) in table #{object_ref_message}" if column > column_count
+      set_table_cell_locator(row, column)
+      saved_locator = @alt_locator
+      case @locator_type
+      when :xpath
+        set_alt_locator("#{@alt_locator}//a")
+        set_alt_locator("#{saved_locator}//span/a") unless exists?
+        # if link not present, check for text entry fields and try to dismiss by tabbing out
+        unless exists?
+          set_alt_locator("#{saved_locator}//input")
+          set_alt_locator("#{saved_locator}//textarea") unless exists?
+          send_keys(:tab) if exists?
+          set_alt_locator("#{saved_locator}//a")
+          set_alt_locator("#{saved_locator}//span/a") unless exists?
+          send_keys(:tab) unless exists?
+        end
+      when :css
+        set_alt_locator("#{@alt_locator} a")
+        set_alt_locator("#{saved_locator} span > a") unless exists?
+        # if link not present, check for text entry fields and try to dismiss by tabbing out
+        unless exists?
+          set_alt_locator("#{saved_locator} input")
+          set_alt_locator("#{saved_locator} textarea") unless exists?
+          send_keys(:tab) if exists?
+          set_alt_locator("#{saved_locator} a")
+          set_alt_locator("#{saved_locator} span > a") unless exists?
+          send_keys(:tab) unless exists?
+        end
+      end
+      wait_until_exists(1)
+      click
+      clear_alt_locator
+    end
+
+    def get_table_row(row)
+      columns = []
+      row_count = get_row_count
+      raise "Row #{row} exceeds number of rows (#{row_count}) in table #{object_ref_message}" if row > row_count
+      column_count = get_column_count
+      (1..column_count).each do |column|
+        value = ''
+        set_table_cell_locator(row, column)
+        saved_locator = @alt_locator
+        case @locator_type
+        when :xpath
+          set_alt_locator("#{saved_locator}//input")
+          unless exists?
+            set_alt_locator("#{saved_locator}//textarea")
+            set_alt_locator(saved_locator) unless exists?
+          end
+        when :css
+          set_alt_locator("#{saved_locator} input")
+          unless exists?
+            set_alt_locator("#{saved_locator} textarea")
+            set_alt_locator(saved_locator) unless exists?
+          end
+        end
+        value = get_value if exists?
+        columns.push(value)
+      end
+      clear_alt_locator
+      columns
+    end
+
+    def get_row_data(row)
+      row_count = get_row_count
+      raise "Row #{row} exceeds number of rows (#{row_count}) in table #{object_ref_message}" if row > row_count
+      case @locator_type
+      when :xpath
+        row > 1 ?
+            set_alt_locator("#{@locator}/#{@table_body}/#{@table_row}[#{row}]") :
+            set_alt_locator("#{@locator}/#{@table_body}/#{@table_row}")
+      when :css
+        row > 1 ?
+            set_alt_locator("#{@locator} > #{@table_body} > #{@table_row}:nth-of-type(#{row})") :
+            set_alt_locator("#{@locator} > #{@table_body} > #{@table_row}")
+      end
+      value = get_value if exists?
+      clear_alt_locator
+      value
+    end
+
+    def get_table_column(column)
+      rows = []
+      column_count = get_column_count
+      raise "Column #{column} exceeds number of columns (#{column_count}) in table #{object_ref_message}" if column > column_count
+      row_count = get_row_count
+      (1..row_count).each do |row|
+        value = ''
+        set_table_cell_locator(row, column)
+        saved_locator = @alt_locator
+        case @locator_type
+        when :xpath
+          set_alt_locator("#{saved_locator}//input")
+          unless exists?
+            set_alt_locator("#{saved_locator}//textarea")
+            set_alt_locator(saved_locator) unless exists?
+          end
+        when :css
+          set_alt_locator("#{saved_locator} input")
+          unless exists?
+            set_alt_locator("#{saved_locator} textarea")
+            set_alt_locator(saved_locator) unless exists?
+          end
+        end
+        value = get_value if exists?
+        rows.push(value)
+      end
+      clear_alt_locator
+      rows
+    end
+
+    # Return text contained in specified cell of a table object.
+    #
+    # @param row [Integer] row number
+    # @param column [Integer] column number
+    # @return [String] value of table cell
+    # @example
+    #   list_table.get_table_cell(4, 5)
+    #
+    def get_table_cell(row, column)
+      row_count = get_row_count
+      raise "Row #{row} exceeds number of rows (#{row_count}) in table #{object_ref_message}" if row > row_count
+      column_count = get_column_count
+      raise "Column #{column} exceeds number of columns (#{column_count}) in table #{object_ref_message}" if column > column_count
+      set_table_cell_locator(row, column)
+      saved_locator = @alt_locator
+      case @locator_type
+      when :xpath
+        set_alt_locator("#{saved_locator}//input")
+        unless exists?
+          set_alt_locator("#{saved_locator}//textarea")
+          set_alt_locator(saved_locator) unless exists?
+        end
+      when :css
+        set_alt_locator("#{saved_locator} input")
+        unless exists?
+          set_alt_locator("#{saved_locator} textarea")
+          set_alt_locator(saved_locator) unless exists?
+        end
+      end
+      if exists?
+        value = get_value
+      else
+        puts "Could not find table cell at #{@alt_locator}"
+        value = ''
+      end
+      clear_alt_locator
+      value
+    end
+
+    def verify_table_cell(row, column, expected, enqueue = false)
+      actual = get_table_cell(row, column)
+      enqueue ?
+          ExceptionQueue.enqueue_assert_equal(expected.strip, actual.strip, "Expected table #{object_ref_message} row #{row}/column #{column}") :
+          assert_equal(expected.strip, actual.strip, "Expected table #{object_ref_message} row #{row}/column #{column} to display '#{expected}' but found '#{actual}'")
+    end
+
+    # Set the value of the specified cell in a table object.
+    #
+    # @param row [Integer] row number
+    # @param column [Integer] column number
+    # @param value [String] text to set
+    # @example
+    #   list_table.set_table_cell(3, 1, 'Ontario')
+    #
+    def set_table_cell(row, column, value)
+      row_count = get_row_count
+      raise "Row #{row} exceeds number of rows (#{row_count}) in table #{object_ref_message}" if row > row_count
+      find_table_cell(row, column)
+      find_table_cell(row, column) unless exists?
+      set(value)
+      clear_alt_locator
+    end
+
+    def get_cell_attribute(row, column, attrib)
+      row_count = get_row_count
+      raise "Row #{row} exceeds number of rows (#{row_count}) in table #{object_ref_message}" if row > row_count
+      column_count = get_column_count
+      raise "Column #{column} exceeds number of columns (#{column_count}) in table #{object_ref_message}" if column > column_count
+      set_table_cell_locator(row, column)
+      result = get_native_attribute(attrib)
+      clear_alt_locator
+      result
+    end
+
+    def get_row_attribute(row, attrib)
+      row_count = get_row_count
+      raise "Row #{row} exceeds number of rows (#{row_count}) in table #{object_ref_message}" if row > row_count
+      case @locator_type
+      when :xpath
+        row > 1 ?
+            set_alt_locator("#{@locator}/#{@table_body}/#{@table_row}[#{row}]") :
+            set_alt_locator("#{@locator}/#{@table_body}/#{@table_row}")
+      when :css
+        row > 1 ?
+            set_alt_locator("#{@locator} > #{@table_body} > #{@table_row}:nth-of-type(#{row})") :
+            set_alt_locator("#{@locator} > #{@table_body} > #{@table_row}")
+      end
+      result = get_native_attribute(attrib)
+      clear_alt_locator
+      result
+    end
+
+    def find_row_attribute(attrib, search_value)
+      (1..get_row_count).each do |row|
+        return row if get_row_attribute(row, attrib) == search_value
+      end
+      nil
+    end
+
+    # Search for the specified text value in the specified row of the table object.
+    # Returns the number of the first column that contains the search value.
+    #
+    # @param row [Integer] row nummber
+    # @param search_value [String] value to be searched for
+    # @return [Integer] column number of table cell that contains search value
+    # @example
+    #   bom_table.find_in_table_row(4, 'High-speed Framus bolts')
+    #
+    def find_in_table_row(row, search_value)
+      (1..get_column_count).each do |column|
+        return column if get_table_cell(row, column) == search_value
+      end
+      nil
+    end
+
+    # Search for the specified text value in the specified column of the table object.
+    # Returns the number of the first row that contains the search value.
+    #
+    # @param column [Integer] column nummber
+    # @param search_value [String] value to be searched for
+    # @return [Integer] row number of table cell that contains search value
+    # @example
+    #   playlist_table.find_in_table_column(1, 'Ashes to Ashes')
+    #
+    def find_in_table_column(column, search_value)
+      (1..get_row_count).each do |row|
+        return row if get_table_cell(row, column) == search_value
+      end
+      nil
+    end
+
+    # Populate the specified row of this table object with the associated data from a Hash passed as an
+    # argument. Data values must be in the form of a String for textfield and select list controls. For checkbox
+    # and radio buttons, data must either be a Boolean or a String that evaluates to a Boolean value (Yes, No, 1,
+    # 0, true, false)
+    #
+    # @param data [Hash] column numbers and associated data to be entered
+    # @example
+    #   data = { 1 => 'Dr.',
+    #            2 => 'Evangeline',
+    #            3 => 'Devereaux',
+    #            4 => 'MD',
+    #            5 => 'Family Practice'
+    #          }
+    #   clinicians_table.populate_table_row(3, data)
+    #
+    def populate_table_row(row, data)
+      wait_until_exists(2)
+      data.each do |column, data_param|
+        unless data_param.blank?
+          if data_param == '!DELETE'
+            set_table_cell(row, column, '')
+          else
+            set_table_cell(row, column, data_param)
+          end
+        end
+      end
+    end
+
+    # Click in the specified column header in a table object.
+    #
+    # @param column [Integer] column number
+    # @example
+    #   list_table.click_header_column(3)
+    #
+    def click_header_column(column)
+      column_count = get_column_count
+      raise "Column #{column} exceeds number of columns (#{column_count}) in table header #{object_ref_message}" if column > column_count
+      case @locator_type
+      when :xpath
+        set_alt_locator("#{@locator}//#{@table_header}/#{@header_row}/#{@header_column}[#{column}]")
+      when :css
+        set_alt_locator("#{@locator} #{@table_header} > #{@header_row} > #{@header_column}:nth-of-type(#{column})")
+      end
+      click if exists?
+      clear_alt_locator
+    end
+
+    def get_header_column(column)
+      column_count = get_column_count
+      raise "Column #{column} exceeds number of columns (#{column_count}) in table header #{object_ref_message}" if column > column_count
+      case @locator_type
+      when :xpath
+        set_alt_locator("#{@locator}//#{@table_header}/#{@header_row}/#{@header_column}[#{column}]")
+      when :css
+        set_alt_locator("#{@locator} #{@table_header} > #{@header_row} > #{@header_column}:nth-of-type(#{column})")
+      end
+      value = get_value(:all) if exists?(:all)
+      clear_alt_locator
+      value
+    end
+
+    def get_header_columns
+      columns = []
+      column_count = get_column_count
+      (1..column_count).each do |column|
+        case @locator_type
+        when :xpath
+          set_alt_locator("#{@locator}//#{@table_header}/#{@header_row}/#{@header_column}[#{column}]")
+        when :css
+          set_alt_locator("#{@locator} #{@table_header} > #{@header_row} > #{@header_column}:nth-of-type(#{column})")
+        end
+        columns.push(get_value(:all)) if exists?(:all)
+      end
+      clear_alt_locator
+      columns
+    end
+
+    def is_table_row_expanded?(row, column)
+      row_count = get_row_count
+      raise "Row #{row} exceeds number of rows (#{row_count}) in table #{object_ref_message}" if row > row_count
+      column_count = get_column_count
+      raise "Column #{column} exceeds number of columns (#{column_count}) in table #{object_ref_message}" if column > column_count
+      set_table_cell_locator(row, column)
+      case @locator_type
+      when :xpath
+        set_alt_locator("#{@alt_locator}/#{@tree_expand}")
+      when :css
+        set_alt_locator("#{@alt_locator} > #{@tree_expand}")
+      end
+      expanded = true
+      expanded = false if exists?
+      clear_alt_locator
+      expanded
+    end
+
+    def expand_table_row(row, column)
+      unless is_table_row_expanded?(row, column)
+        set_table_cell_locator(row, column)
+        case @locator_type
+        when :xpath
+          set_alt_locator("#{@alt_locator}/#{@tree_expand}")
+        when :css
+          set_alt_locator("#{@alt_locator} > #{@tree_expand}")
+        end
+        click if exists?
+        clear_alt_locator
+      end
+    end
+
+    def collapse_table_row(row, column)
+      if is_table_row_expanded?(row, column)
+        set_table_cell_locator(row, column)
+        case @locator_type
+        when :xpath
+          set_alt_locator("#{@alt_locator}/#{@tree_collapse}")
+        when :css
+          set_alt_locator("#{@alt_locator} > #{@tree_collapse}")
+        end
+        click if exists?
+        clear_alt_locator
+      end
+    end
+
+    def expand_all_table_rows(column)
+      row_count = get_row_count
+      column_count = get_column_count
+      raise "Column #{column} exceeds number of columns (#{column_count}) in table #{object_ref_message}" if column > column_count
+      row_count.downto(1) do |row|
+        expand_table_row(row, column)
+      end
+    end
+
+    def get_table_cell_locator(row, column)
+      case @locator_type
+      when :xpath
+        if @table_section.nil?
+          row_spec = "#{@locator}/#{@table_body}/#{@table_row}"
+          row_spec = "#{row_spec}[#{row}]"
+        else
+          row_spec = "#{@locator}/#{@table_body}/#{@table_section}"
+          row_spec = "#{row_spec}[#{row}]/#{@table_row}[1]"
+        end
+        column_spec = "/#{@table_column}[#{column}]"
+      when :css
+        if @table_section.nil?
+          row_spec = "#{@locator} > #{@table_body} > #{@table_row}"
+          row_spec = "#{row_spec}:nth-of-type(#{row})"
+        else
+          row_spec = "#{@locator} > #{@table_body} > #{@table_section}"
+          row_spec = "#{row_spec}:nth-of-type(#{row}) > #{@table_row}:nth-of-type(1)"
+        end
+        column_spec = " > #{@table_column}:nth-of-type(#{column})"
+      end
+      "#{row_spec}#{column_spec}"
+    end
+
+    private
+
+    def set_table_cell_locator(row, column)
+      set_alt_locator(get_table_cell_locator(row, column))
+    end
+
+    def find_table_cell(row, column)
+      set_table_cell_locator(row, column)
+      if exists?
+        click
+      else
+        puts "Could not find table cell at #{@alt_locator}"
+      end
+      saved_locator = @alt_locator
+      case @locator_type
+      when :xpath
+        set_alt_locator("#{saved_locator}//input")
+        set_alt_locator("#{saved_locator}//textarea") unless exists?
+      when :css
+        set_alt_locator("#{saved_locator} input")
+        set_alt_locator("#{saved_locator} textarea") unless exists?
+      end
+    end
+  end
+end