admin_module 0.1.4

data/lib/admin_module/pages/dc_detail_page.rb

@@ -0,0 +1,187 @@
+##############################################################################
+# File::    dc_detail_page.rb
+# Purpose:: DataClearing definition edit page for AdminModule
+#
+# Author::    Jeff McAffee 2015-04-02
+#
+##############################################################################
+require 'page-object'
+
+module AdminModule::Pages
+
+class DcDetailPage
+  include PageObject
+
+  #page_url(:get_dynamic_url)
+
+  #def get_dynamic_url
+  #  AdminModule.configuration.url(DcDetailPage)
+  #end
+
+  text_field(:name,
+             id: 'ctl00_cntPlh_txtName')
+
+  text_area(:description,
+            id: 'ctl00_cntPlh_txtDesc')
+
+  select_list(:decision_data,
+              id: 'ctl00_cntPlh_ddlDecision')
+
+  select_list(:conditions,
+              id: 'ctl00_cntPlh_ddlCondition')
+
+  select_list(:incomes,
+              id: 'ctl00_cntPlh_ddlIncome')
+
+  select_list(:assets,
+              id: 'ctl00_cntPlh_ddlAsset')
+
+  select_list(:expenses,
+              id: 'ctl00_cntPlh_ddlExpense')
+
+  select_list(:hud1_fields,
+              id: 'ctl00_cntPlh_ddlHUD1')
+
+  select_list(:payment_schedule,
+              id: 'ctl00_cntPlh_ddlPSchedule')
+
+
+  # DTS/UDF Tab
+  #
+
+  link(:dts_tab,
+        text: 'DTS/UDF')
+
+    select_list(:dts_available,
+                id: 'ctl00_cntPlh_tsSnapshotDTS_lstAvailable')
+
+    select_list(:dts_selected,
+                id: 'ctl00_cntPlh_tsSnapshotDTS_lstSelected')
+
+    button(:add_dts_button,
+                id: 'ctl00_cntPlh_tsSnapshotDTS_btnAdd')
+
+    button(:add_all_dts_button,
+                id: 'ctl00_cntPlh_tsSnapshotDTS_btnAddAll')
+
+    button(:remove_dts_button,
+                id: 'ctl00_cntPlh_tsSnapshotDTS_btnRemove')
+
+    button(:remove_all_dts_button,
+                id: 'ctl00_cntPlh_tsSnapshotDTS_btnRemoveAll')
+
+
+  button(:save_button,
+         id: 'ctl00_cntPlh_btnSave')
+
+  button(:cancel_button,
+         id: 'ctl00_cntPlh_btnCancel')
+
+  def get_definition_data
+    data = { name: self.name,
+              description: self.description,
+              delete_options: {
+                :decision_data          => false,
+                :conditions_with_images => false,
+                :incomes                => false,
+                :assets                 => false,
+                :expenses               => false,
+                :hud1_fields            => false,
+                :payment_schedule       => false,
+              }
+    }
+
+    data[:delete_options][:decision_data]           = true if self.decision_data == "Yes"
+    data[:delete_options][:conditions_with_images]  = true if self.conditions == "Yes"
+    data[:delete_options][:incomes]                 = true if self.incomes == "Yes"
+    data[:delete_options][:assets]                  = true if self.assets == "Yes"
+    data[:delete_options][:expenses]                = true if self.expenses == "Yes"
+    data[:delete_options][:hud1_fields]             = true if self.hud1_fields == "Yes"
+    data[:delete_options][:payment_schedule]        = true if self.payment_schedule == "Yes"
+
+    self.dts_tab
+    data[:dts] = get_selected_dts_options
+
+    data
+  end
+
+  def set_definition_data data
+    self.name = data[:name]
+    self.description = data[:description]
+
+    opts = data[:delete_options]
+    set_delete_option decision_data_element,    opts[:decision_data]
+    set_delete_option conditions_element,       opts[:conditions_with_images]
+    set_delete_option incomes_element,          opts[:incomes]
+    set_delete_option assets_element,           opts[:assets]
+    set_delete_option expenses_element,         opts[:expenses]
+    set_delete_option hud1_fields_element,      opts[:hud1_fields]
+    set_delete_option payment_schedule_element, opts[:payment_schedule]
+
+    self.dts_tab
+
+    set_dts_fields data[:dts]
+
+    self
+  end
+
+  def save
+    self.save_button
+  end
+
+  def set_name name
+    self.name = name
+
+    self
+  end
+
+private
+
+  include SelectListSyncable
+
+  def get_available_dts_options
+    vars = []
+    Nokogiri::HTML(@browser.html).css('#ctl00_cntPlh_tsSnapshotDTS_lstAvailable > option').each do |elem|
+      vars << elem.text
+    end
+    vars
+  end
+
+  def get_selected_dts_options
+    vars = []
+    Nokogiri::HTML(@browser.html).css('#ctl00_cntPlh_tsSnapshotDTS_lstSelected > option').each do |elem|
+      vars << elem.text
+    end
+    vars
+  end
+
+  def set_dts_fields data
+    sync_available_and_selected_lists get_available_dts_options,
+                                      dts_available_element,
+                                      get_selected_dts_options,
+                                      dts_selected_element,
+                                      add_dts_button_element,
+                                      remove_dts_button_element,
+                                      data
+  end
+
+  def assert_all_dts_fields_removed
+    raise "Unable to remove DTS fields" unless self.dts_selected_options.count == 0
+  end
+
+  def set_delete_option elem, value, name = ''
+    if !elem.visible?
+      $stdout << "The #{name} is not available for this definition." unless name.nil? || name.empty?
+      return
+    end
+
+    if value == true
+      elem.select('Yes')
+    else
+      elem.select('No')
+    end
+  end
+end
+
+end # module Pages
+

data/lib/admin_module/pages/guideline_page.rb

@@ -0,0 +1,35 @@
+##############################################################################
+# File::    guideline_page.rb
+# Purpose:: Guideline page for AdminModule
+#
+# Author::    Jeff McAffee 11/15/2013
+#
+##############################################################################
+require 'page-object'
+
+module AdminModule::Pages
+  class GuidelinePage
+    include PageObject
+
+    #page_url(:get_dynamic_url)
+
+    def get_dynamic_url
+      AdminModule.configuration.base_url + "/admin/decision/guideline.aspx"
+    end
+
+    link(:versions,
+          text: 'Versions')
+
+    button(:add_version_button,
+          id: 'cmdAddVersion')
+
+    def add_version
+      self.versions
+      self.add_version_button
+
+      # Return the next page object.
+      GuidelineVersionPage.new(@browser, false)
+    end
+  end
+end # module Pages
+

data/lib/admin_module/pages/guideline_version_page.rb

@@ -0,0 +1,140 @@
+##############################################################################
+# File::    guideline_version_page.rb
+# Purpose:: Guideline Versioning page for AdminModule
+# 
+# Author::    Jeff McAffee 11/15/2013
+# Copyright:: Copyright (c) 2013, kTech Systems LLC. All rights reserved.
+# Website::   http://ktechsystems.com
+##############################################################################
+require 'page-object'
+
+module AdminModule::Pages
+
+class GuidelineVersionPage
+  include PageObject
+
+  attr_reader :errors
+
+  #page_url(:get_dynamic_url)
+
+  def get_dynamic_url
+    AdminModule.configuration.url(GuidelineVersionPage)
+  end
+
+  file_field(:file_input,
+         id: 'ctl00_cntPlh_inputUpload')
+
+  text_area(:version_notes,
+        id: 'ctl00_cntPlh_txtVersionNotes')
+
+  button(:save,
+         id: 'ctl00_cntPlh_cmdSave')
+
+  div(:version_errors,
+        id: 'ctl00_cntPlh_ctlErrors_vsmErrors')
+
+  div(:add_version_page_errors,
+        id: 'vsmErrors')
+
+  table(:versions_table,
+        id: 'dgrVersions')
+
+  def errors
+    @errors ||= []
+  end
+
+  def upload(source_file, comments = nil)
+    # The file field (visible as a button) has a negative margin.
+    # We can't do anything with it (it's not 'visible') as it is,
+    # so we'll use JS to set the left margin to 0.
+    reposition_file_input
+
+    # Set the file to upload.
+    #file_input_element.set(source_file)  # The watir way...
+    self.file_input = source_file
+
+    if comments.nil?
+      comments = "auto upload"
+    end
+    self.version_notes = comments
+
+    reset_errors
+
+    self.save
+
+    capture_errors
+    verify_latest_version comments
+
+    # Return the url of the version guideline page.
+    self
+
+  rescue Timeout::Error => e
+      add_error 'Timeout occurred. Try adjusting the browser_timeout configuration option.'
+
+  rescue Exception => e
+      add_error e.message
+
+  ensure
+    raise_if_errors
+  end
+
+  def reposition_file_input
+    repos_script = <<EOS
+document.getElementsByTagName('input');
+p = document.getElementsByName('ctl00$cntPlh$inputUpload');
+if (p != null)
+{
+    p[0].style.marginLeft='0';
+}
+EOS
+
+    @browser.execute_script(repos_script)
+  end
+
+  def reset_errors
+    errors = []
+  end
+
+  def has_errors?
+    errors.size > 0
+  end
+
+  def add_error err_msg
+    errors << err_msg
+  end
+
+  def capture_errors
+    add_error(version_errors) unless (!version_errors? || version_errors.empty?)
+    add_error(add_version_page_errors) unless (!add_version_page_errors? || add_version_page_errors.empty?)
+  end
+
+  def raise_if_errors
+    if has_errors?
+      error = ''
+      errors.each { |err| error << err + "\n" }
+      raise error
+    end
+  end
+
+  def verify_latest_version comments
+    if !versions_table?
+      add_error("Version upload not completed. Did a timeout occur?") unless has_errors?
+      return
+    end
+
+    doc = Nokogiri::HTML(@browser.html)
+    # The specific version notes TD element:
+    #version_notes_row_1 = doc.css("#dgrVersions > tbody > tr:nth-child(2) > td:nth-child(13)")
+
+    # The entire 1st version row (TR) element:
+    version_row = doc.css("#dgrVersions > tbody > tr:nth-child(2)")
+
+    # We have to account for HTML encodings when comparing comments.
+    unless version_row.to_s.include?(CGI.escapeHTML(comments))
+      add_error("Version upload not completed. Comment not found.")
+    end
+  end
+end # class GuidelineVersionPage
+
+end # module Pages
+

data/lib/admin_module/pages/guidelines_page.rb

@@ -0,0 +1,59 @@
+##############################################################################
+# File::    guidelines_page.rb
+# Purpose:: Guidelines page for AdminModule
+#
+# Author::    Jeff McAffee 11/15/2013
+#
+##############################################################################
+require 'page-object'
+
+module AdminModule::Pages
+
+class GuidelinesPage
+  include PageObject
+
+  page_url(:get_dynamic_url)
+
+  def get_dynamic_url
+    AdminModule.configuration.base_url + "/admin/decision/guidelines.aspx"
+  end
+
+  select_list(:guidelines,
+              id: 'ctl00_cntPlh_ctlGuidelines_lstItems')
+
+  button(:modify,
+         id: 'ctl00_cntPlh_ctlGuidelines_btnModify')
+
+  button(:version_all_button,
+         text: 'Version All')
+
+  def get_guidelines
+    gdl_list = []
+    Nokogiri::HTML(@browser.html).css("select#ctl00_cntPlh_ctlGuidelines_lstItems>option").each do |elem|
+      gdl_list << elem.text
+    end
+
+    gdl_list
+  end
+
+  def open_guideline(gdl_name)
+    #guidelines_options # List of option text
+    guidelines_element.select gdl_name
+    self.modify
+
+    # Return the next page object.
+    GuidelinePage.new(@browser, false)
+  end
+
+  def version_all
+    version_all_button
+
+    # Return the next page object.
+    GuidelinesVersionAllPage.new(@browser, false)
+  end
+
+
+end
+
+end # module Pages
+

data/lib/admin_module/pages/guidelines_version_all_page.rb

@@ -0,0 +1,116 @@
+##############################################################################
+# File::    guidelines_version_all_page.rb
+# Purpose:: Guidelines Version All page for AdminModule
+#
+# Author::    Jeff McAffee 2014-03-17
+#
+##############################################################################
+require 'page-object'
+
+module AdminModule::Pages
+
+class GuidelinesVersionAllPage
+  include PageObject
+
+  attr_reader :errors
+
+  #page_url(:get_dynamic_url)
+
+  def get_dynamic_url
+    AdminModule.configuration.base_url + "/admin/decision/versionAllGuideline.aspx"
+  end
+
+  select_list(:guidelines_available,
+              id: 'ctl00_cntPlh_tsGuidelines_lstAvailable' )
+
+  select_list(:guidelines_selected,
+              id: 'ctl00_cntPlh_tsGuidelines_lstSelected' )
+
+  button(:add_guideline_button,
+         id: 'ctl00_cntPlh_tsGuidelines_btnAdd' )
+
+  text_area(:version_notes,
+        id: 'ctl00_cntPlh_txtVersionAllNotes')
+
+  button(:save_button,
+         id: 'ctl00_cntPlh_cmdSave')
+
+  button(:cancel_button,
+         id: 'ctl00_cntPlh_cmdCancel')
+
+  div(:version_errors,
+        id: 'ctl00_cntPlh_ctlErrors_vsmErrors')
+
+  def errors
+    @errors ||= []
+  end
+
+  def get_guidelines
+    gdl_list = []
+    Nokogiri::HTML(@browser.html).css("select#ctl00_cntPlh_tsGuidelines_lstAvailable>option").each do |elem|
+      gdl_list << elem.text
+    end
+
+    gdl_list
+  end
+
+  def version(gdl_names, comments = nil)
+    gdl_names = Array(gdl_names)
+
+    if comments.nil?
+      comments = "auto version"
+    end
+    self.version_notes = comments
+
+    reset_errors
+
+    # Add guidelines to be versioned to the selected area.
+    gdl_names.each do |gdl|
+      guidelines_available_element.select(gdl)
+      self.add_guideline_button
+    end
+
+    self.save_button
+
+    capture_errors
+
+    # Return the url of the version guideline page.
+    current_url
+
+  rescue Timeout::Error => e
+      add_error 'Timeout occurred. Try adjusting the browser_timeout configuration option.'
+
+  rescue Exception => e
+      add_error e.message
+
+  ensure
+    raise_if_errors
+  end
+
+  def reset_errors
+    errors = []
+  end
+
+  def has_errors?
+    errors.size > 0
+  end
+
+  def add_error err_msg
+    errors << err_msg
+  end
+
+  def capture_errors
+    add_error(version_errors) unless (!version_errors? || version_errors.empty?)
+  end
+
+  def raise_if_errors
+    if has_errors?
+      error = ''
+      errors.each { |err| error << err + "\n" }
+      raise error
+    end
+  end
+end # class GuidelinesVersionAllPage
+
+end # module Pages
+