rtml 1.2.2

data/app_generators/rtml/templates/rtml/app/views/rtml/rtml_app/_default_header.html.erb

@@ -0,0 +1,12 @@
+<style>
+   body { font-family: Arial, Helvetica, sans-serif; }
+   span.filename { font-weight: bold; font-style: italic; }
+   #uml_div { text-align: center; }
+   #sidebar { float: right; border:1px inset #ccc; padding:1em; margin-left:1em; margin-bottom:1em; }
+   #form_helpers th, td { border:1px inset #ccc; }
+   #form_helpers td { vertical-align:bottom; font-family: "Courier New", Courier; }
+   #form_helpers td sup { font-weight:bolder; }
+   .code { font-family: "Courier New", Courier; white-space:pre;}
+   .section { font-size:150%; display:block; }
+</style>
+<%=javascript_include_tag :defaults%>

data/app_generators/rtml/templates/rtml/app/views/rtml/rtml_app/_default_production.html.erb

@@ -0,0 +1,8 @@
+<p>
+   <h2 style='display:inline;'>RTML</h2> is active
+   and the TML is available at the usual location.
+</p>
+<p>
+   If you don't know what any of that meant, then you probably don't belong here. Try
+   <%=link_to "here", '/'%> instead.
+</p>

data/app_generators/rtml/templates/rtml/app/views/rtml/rtml_app/charts.html.erb

@@ -0,0 +1,14 @@
+<%
+  url = []
+  @screens.each do |scr|
+    scr.next.variants.each do |cond,nextid|
+			left = yuml_for_screen(scr)
+			cond = yuml_conditions_for(cond)
+			right = yuml_for_screen(@screens.find(nextid) || format_for_yuml(nextid))
+			url << "[#{left}]-#{cond}>[#{right}]"
+		end
+  end
+  url = "http://yuml.me/diagram/scruffy/class/#{url.join(", ")}"
+%>
+<%=url%>
+<img src='<%=url%>' />

data/app_generators/rtml/templates/rtml/app/views/rtml/tml_app/do_tml_redirect.rtml.erb

@@ -0,0 +1,7 @@
+<%=tml_document do |doc|
+	doc.cache false
+
+	doc.screen :tmlredir do |scr|
+		scr.next_screen h(@redirect_to)
+	end
+end%>

data/app_generators/rtml/templates/rtml/app/views/rtml/tml_app/get_terminal_info.rtml.erb

@@ -0,0 +1,26 @@
+<%=tml_document do
+	cache false
+	on :cancel => embedded_app
+
+	screen :gather_data do
+		submit do
+			target url_for(params)
+			on_error :submit_err
+			cache :deny
+			
+			[ :datetime, :datetime_start, :itid, :model, :os, :part_number,
+				:serial_number ].each do |var|
+				get_variable "terminal.#{var}"
+			end
+		end
+	end
+
+	screen :submit_err do
+		next_screen :gather_data
+		display <<-end_tml
+			<br/><br/>
+			Error initializing session state data. See logs for more details.<br/>
+			<getvar name='err.baddata_reason' />
+		end_tml
+	end
+end%>

data/app_generators/rtml/templates/rtml/app/views/rtml/tml_app/rescue_action_in_public.rtml.erb

@@ -0,0 +1,9 @@
+<%=tml_document do
+	#on :cancel => embedded_app
+
+	screen :error, :next => '/index.tml' do
+		display <<-end_tml
+  			<p>Could not complete transaction. Please try again.</p>
+			end_tml
+	end
+end%>

data/app_generators/rtml/templates/rtml/app/views/rtml/tml_app/rescue_action_locally.rtml.erb

@@ -0,0 +1,42 @@
+<%=tml_document do
+	on :cancel => embedded_app
+	cache false
+    default_screen :error
+
+	screen :error, :next => '/index.tml' do
+        clean_params = request.parameters.clone
+        clean_params.delete("action")
+        clean_params.delete("controller")
+
+        request_dump = clean_params.empty? ? 'None' : clean_params.inspect.gsub(',', ",\n")
+
+		concat <<-end_tml
+			<display>
+                <h1>#{h @exception.class} in
+                    #{h request.parameters["controller"].capitalize if request.parameters["controller"]}##{
+                      h request.parameters["action"]}
+                </h1>
+                <br/>
+                <h2>Message: #{h(@exception ? @exception.message : "")}</h2>
+                <br/>
+                #{link_to "Retry Request", controller.params} |
+                #{link_to "Restart Application", "/index.tml"} |
+                #{link_to "Configuration", embedded_app}
+                <br/><br/>
+                <pre>RAILS_ROOT: #{defined?(RAILS_ROOT) ? RAILS_ROOT : "unset"}</pre>
+                <br/>
+                <div id="traces">
+                    #{@exception ? @exception.application_backtrace.select { |i| not(i =~ /lib\/ruby\/gems/) }.collect { |i| h(i) }.join("<br/>\n") : ""}
+                </div>
+                <br/>
+
+                <h2>Request</h2>
+                Parameters: <pre>#{h request_dump}</pre>
+                <br/>
+
+                <h2>Response</h2>
+                Headers: <pre>#{h(response ? response.headers.inspect.gsub(',', ",\n") : 'None')}</pre>
+            </display>
+		end_tml
+	end
+end%>

data/app_generators/rtml/templates/rtml/components/rtml/features/common.rb

@@ -0,0 +1,303 @@
+class Rtml::Features::Common < ::Rtml::Feature
+  entry_point :none
+  
+  def self.configure
+    config.option :receipt_header => { :partial => 'receipt_header' }
+    config.option :receipt_footer => { :partial => 'receipt_footer' }
+    config.option :receipt_agreement => { :partial => 'receipt_agreement' }
+    config.option :emv_support => true
+    config.option :fraud_check => 3 # 1 = verify card number; 2 = enter last 4 digits; 3 = both
+    config.option :card_code_verification => true
+    config.option :card_imprint => true
+    config.option :allow_keyed_debit => false #allow user to manually enter debit number
+    config.option :confirm_amount => true
+    config.option :submit_variables => []
+    config.option :cashback => true, :min_sale_amount => 1, :max_sale_amount => nil,
+                  :min_cashback_amount => 0, :max_cashback_amount => nil,
+                  :sale_limits_cashback => true
+    config.option :debit_encryption_type => :dukpt3des
+    config.menu = false
+  end
+  
+  def init(scr)
+    scr.set 'title' => ['tmlvar:transaction_type', '+', ' ']
+    scr.set 'card.input_type'     => 3,  'card.parser.type' => '',
+               'card.pan'            => '', 'card.expiry_date' => '2007/01/01',
+               'card.effective_date' => '', :manual_entry => 0,
+               :prompt_for_cashback  => 1, :skip_fraud_check => 0, 'card.cvv.value' => '',
+               'card.cvv.reason_skipped' => ''
+    scr.card :parser => :mag, :params => :clean do |card|
+      card.baddata "<getvar name='err.baddata_reason' />: <getvar name='err.description' />"
+    end
+  end
+  
+  def to_tml
+    document.process_block do |doc|
+      doc.strings 'confirm.accept', 'confirm.reject'
+      doc.string 'submit_to'
+      doc.string 'submit_err' => '#submit_err'
+      doc.string 'screens.after_swipe'
+      doc.string 'screens.emv.exit_point'
+      doc.string :fraud_check, :format => 'n*' if config.fraud_check > 0
+      doc.string :transaction_type
+      doc.string 'card.cvv.value'
+      doc.string 'card.cvv.reason_skipped'
+      doc.string :title
+      doc.string 'key_card_prompt'
+      doc.integer :prompt_for_cashback
+      doc.integer :manual_entry
+      doc.integer :total_amount
+      doc.integer :skip_fraud_check
+
+      if config.emv_support
+        document.supports_emv :entry_point => :emv_start,  :exit_point => 'tmlvar:screens.emv.exit_point',
+                              :on_abort    => :trans_abort,:on_reject  => :trans_reject
+      end
+      
+      doc.screen :enter_amount, :next => :confirm_sale do |scr|
+        scr.on :cancel => :trans_abort
+        scr.next_screen :check_cb, :if => 'tmlvar:transaction_type contains Debit' if config.cashback
+        scr.display
+      end
+        
+      doc.screen :confirm_sale, 'tmlvar:confirm.accept' do |scr|
+        scr.on :cancel => 'tmlvar:confirm.reject'
+        scr.display if config.confirm_amount
+      end
+      
+      if config.cashback
+        doc.screen :check_cb, :confirm_sale do 
+          next_screen :ask_cashback, :if => 'tmlvar:prompt_for_cashback == 1'
+        end
+        doc.screen :ask_cashback, :next => :conf_debit do
+          set 'payment.amount_other' => 0
+          display
+        end
+        doc.screen :enter_cashbk, :check_cb_amt do display end
+          
+        doc.screen :check_cb_amt, :conf_debit do |scr|
+          if config.sale_limits_cashback
+            scr.next_screen :enter_cashbk, :if => "tmlvar:payment.amount_other > tmlvar:payment.amount"
+          end
+        end
+        
+        doc.screen :conf_debit do
+          set :total_amount => 'tmlvar:payment.amount + tmlvar:payment.amount_other'
+          display
+        end
+      end
+      
+      doc.screen :swipe_card do |scr|#, :next => :fraud_check do |scr|
+        scr.on :cancel => :trans_abort
+        scr.next :risk_mgmt
+        scr.set 'fraud_check' => '' if config.fraud_check > 0
+        scr.set 'card.input_type'  => 1, 'payment.trans_type'   => 'debit',
+            'payment.amount'   => 0, 'payment.amount_other' => 0,
+            'oebr.submit_mode' => ''
+        scr.set 'card.pan' => '' # wipes out the 'NA' assigned by the 'mag clean' parser
+        scr.on :menu => :start_enter
+        scr.set :manual_entry => 0
+        for i in 0..9; scr.on i => "enter_card_#{i}" end
+        
+        scr.build :tform do |tform|
+          tform.baddata :max => 3, :next => :start_enter.to_screen_ref do
+            table :border => 2, :class => 'warning' do; tr { td { span { getvar :name => 'err.baddata_reason' } } } end
+          end
+          tform.build :name => :card, :parser => 'mag', :parser_params => 'read_data'
+          if config.emv_support
+            tform.build :name => :card, :parser => 'icc_emv', :parser_params => 'init_app'
+          end
+          tform.prompt do |prompt|
+            message = "Please slide "
+            message.concat "/ insert " if config.emv_support
+            message.concat "<getvar name='key_card_prompt' /> "
+            message.concat "card"
+            prompt.display :locals => { :message => message }
+          end
+        end
+      end
+      
+      for i in 0..9
+        doc.screen "enter_card_#{i}", :chk_entr_crd do
+          set 'card.pan' => i.to_s
+        end
+      end
+      
+      doc.screen :start_enter, :chk_entr_crd do |scr|
+        scr.set 'card.pan' => '' # wipes out the 'NA' assigned by the 'mag clean' parser
+      end
+
+      doc.screen :chk_entr_crd do |scr|
+        scr.next_screen :enter_card
+        scr.next_screen :no_entr_crd, :if => 'tmlvar:transaction_type contains Debit' unless config.allow_keyed_debit
+      end
+      
+      unless config.allow_keyed_debit
+        doc.screen :no_entr_crd, :next => :swipe_card, :timeout => 3, :on_cancel => :back do display end
+      end
+      
+      doc.screen :enter_card do |scr|
+        scr.set :manual_entry => 1
+        scr.set 'card.input_type'  => 3
+        scr.on :cancel => :trans_abort
+        scr.set 'card.cvv.value' => ''
+        scr.set 'card.cvv.reason_skipped' => ''
+        scr.next :enter_expiry
+        scr.display
+      end
+      
+      doc.screen :enter_expiry, :risk_mgmt do |scr|
+        scr.on :cancel => :trans_abort
+        scr.display
+      end
+      
+      ## RISK MANAGEMENT
+      doc.screen :risk_mgmt, :next => (config.root.common.emv_support ? :emv_start : :trans_reject) do
+        next_screen :mg_risk_mgmt, :if => "tmlvar:card.parser.type == mag"
+        next_screen :mg_risk_mgmt, :if => "tmlvar:card.input_type == 3"
+        #display "risk_mgmt"
+      end
+      
+      doc.screen :debit_pin, :submit_data2 do |scr|#:rsk_mgt_done do |scr|
+        scr.build :tform do |tform|
+          tform.baddata do "<getvar name='err.baddata_reason'/>" end
+          tform.pinentry :prompt => 'Enter PIN:', :type => config.debit_encryption_type
+        end
+      end
+      
+      doc.screen :mg_risk_mgmt, :next => :rsk_mgt_done do
+        next_screen :trans_reject, :if => "tmlvar:card.parser.verdict == reject"
+        #next_screen :debit_pin, :if => 'tmlvar:transaction_type contains Debit'
+        card :parser => 'mag', :params => 'risk_mgmt' do
+          baddata "<getvar name='err.baddata_reason'/>"
+          baddata_options :max => 1, :next => :trans_abort
+          #prompt "mg_risk_mgmt"
+        end
+      end
+      
+      doc.screen :rsk_mgt_done, :frd_chk_pass do |scr|
+        scr.next_screen :frd_chk_pass, :if => "tmlvar:skip_fraud_check == 1"
+        #scr.display "<getvar name='card.parser.verdict' />"
+        unless config.card_code_verification
+          #if config.card_imprint then scr.next_screen :card_imprint, :if => "tmlvar:manual_entry == 1"
+          #else
+            scr.next_screen :fraud_check, :if => "tmlvar:manual_entry == 1"
+          #end
+        else
+          scr.next_screen :enter_cvv, :if => "tmlvar:manual_entry == 1"
+        end
+        scr.next_screen :frd_chk_pass, :if => 'tmlvar:transaction_type contains Debit'
+      end
+      ##
+
+      if config.card_code_verification
+        nxt = ((config.card_imprint) ? :card_imprint : :fraud_check)
+        doc.screen :enter_cvv, :enter_cvv2 do
+          next_screen nxt, :if => "tmlvar:transaction_type contains Debit"
+#          next_screen nxt, :if => "tmlvar:skip_fraud_check == 1"
+        end
+        doc.screen :enter_cvv2, :check_cvv do on :cancel => :trans_abort; display end
+        doc.screen :check_cvv, nxt do
+          next_screen :cvv_skipped, :if => 'tmlvar:card.cvv.value == '
+        end
+        doc.screen :cvv_skipped, :chk_cvv_rsn do on :cancel => :trans_abort; display end
+        doc.screen :chk_cvv_rsn, nxt do
+          next_screen :cvv_skipped, :if => "tmlvar:card.cvv.reason_skipped == "
+        end
+      end
+      
+      if config.card_imprint
+        doc.screen :card_imprint, :next => :fraud_check, :timeout => 3, :on_cancel => :trans_abort do display end
+      end
+      
+      doc.screen :fraud_check do |scr|
+        scr.next :frd_chk_pass if config.fraud_check == 0
+        scr.next :frd_chk_pass, :if => "tmlvar:manual_entry == 1"
+        scr.next :fraud_check0 if config.fraud_check > 0
+      end
+      
+      doc.screen :fraud_check0 do |scr|
+        scr.next :fraud_check1 if config.fraud_check == 1 || config.fraud_check == 3
+        scr.next :fraud_check2 if config.fraud_check == 2
+        scr.next :frd_chk_pass, :if => 'tmlvar:manual_entry == 0'
+      end
+      
+      if [1,3].include? config.fraud_check
+        doc.screen :fraud_check1 do |scr|
+          scr.on :cancel => :trans_abort
+          scr.next :frd_chk_ver1
+          scr.display
+        end
+        
+        doc.screen :frd_chk_ver1 do |scr|
+          scr.on :cancel => :trans_abort
+          scr.next :frd_chk_pass if config.fraud_check == 1
+          scr.next :fraud_check2 if config.fraud_check == 3
+          #scr.next :frd_chk_fail
+          #scr.next :frd_chk_pass, :if => "tmlvar:fraud_check == tmlvar:card.pan" if config.fraud_check == 1
+          #scr.next :fraud_check2, :if => "tmlvar:fraud_check == tmlvar:card.pan" if config.fraud_check == 3
+        end
+      end
+      if [2,3].include? config.fraud_check
+        doc.screen :fraud_check2 do |scr|
+          scr.on :cancel => :trans_abort
+          scr.next :frd_chk_ver2
+          scr.display
+        end
+        
+        doc.screen :frd_chk_ver2 do |scr|
+          scr.next :frd_chk_fail
+          scr.next :frd_chk_pass, :if => "tmlvar:card.pan contains tmlvar:fraud_check" 
+        end
+      end
+      
+      if config.fraud_check > 0
+        doc.screen :frd_chk_fail, :next => :trans_abort, :on_cancel => :trans_abort do |scr| scr.display end
+      end
+      
+      doc.screen :submit_data, :submit_data2 do |scr|
+        scr.next_screen :debit_pin, :if => 'tmlvar:transaction_type contains Debit'
+      end
+      
+      doc.screen :submit_data2 do |scr|
+        scr.set 'oebr.submit_mode'  => 'tmlvar:card.parser.verdict',
+            'payment.auth_code' => ''
+        scr.submit :target => 'tmlvar:submit_to', :on_error => :submit_err do |s|
+          s.get_transaction_variables
+          s.get_variable :transaction_type
+          s.get_variable :manual_entry
+          s.get_variables 'card.cvv.value', 'card.cvv.reason_skipped'
+          config.submit_variables.each do |v|
+            s.get_variable v
+          end
+        end
+      end
+      
+      doc.screen :submit_err, :next => :trans_abort do
+        if ENV['RAILS_ENV'] == 'production'
+          timeout 3
+          display "Transaction Failed.  Please try again."
+        else
+          display "Error: <getvar name='err.baddata_reason' /><br/><getvar name='err.description' />"
+        end
+      end
+
+      doc.screen :invalid_exp, :trans_abort do
+        display
+      end
+      
+      doc.screen :frd_chk_pass, :next => 'tmlvar:screens.after_swipe'
+      doc.screen :trans_reject, :next => restart_app, :timeout => 3, :on_cancel => restart_app do display end
+      doc.screen :trans_abort,  :next => restart_app, :timeout => 3, :on_cancel => restart_app do
+        #next_screen :menu_debit, :if => "tmlvar:transaction_type contains Debit"
+        display
+      end
+      
+      doc.screen :trans_close,  :next => restart_app do
+        next_screen :remove_card, :if => "tmlvar:card.input_type == 2"
+      end
+      
+      doc.screen :remove_card, :next => restart_app, :on_cancel => restart_app do display end
+    end
+  end
+end

data/app_generators/rtml/templates/rtml/components/rtml/features/force.rb

@@ -0,0 +1,46 @@
+class Rtml::Features::Force < ::Rtml::Feature
+  entry_point :force
+  
+  def self.configure
+    #config.option :min_sale_amount => 1, :max_sale_amount => nil
+    config.option :address_verification => 1 # 0: off, 1: on w/ZIP, 2: on w/Address + Zip
+    config.option :requires_approval => true
+    config.order = 3
+  end
+
+  def initialize
+    super
+    config.root.common.submit_variables << "approval_code"
+  end
+
+  def to_tml
+    document.process_block do |doc|
+      doc.string :approval_code
+
+      doc.screen :force, :swipe_card do
+        set 'submit_to' => url_for(:action => 'force_sale')
+        set 'title' => {:lo => 'Force Sale'}
+        set 'screens.after_swipe' => '#enter_amount',
+            'screens.emv.exit_point' => '#submit_data'
+        set 'confirm.accept' => '#do_force'
+        set 'confirm.reject' => '#enter_amount'
+        set :skip_fraud_check => 1
+      end
+
+      doc.screen :do_force, (config.requires_approval ? :frc_aprvl : :submit_data)
+      
+      if config.requires_approval
+        doc.screens do
+          frc_aprvl :frc_chk_aprv do on :cancel => :trans_abort; display end
+          frc_bad_aprv :frc_aprvl do on :cancel => :frc_aprvl; display end
+        end
+
+        doc.screen :frc_chk_aprv, :submit_data do |scr|
+        end
+#        doc.screen :frc_chk_aprv, :frc_bad_aprv do |scr|
+#          scr.next_screen :submit_data, :if => ["tmlvar:approval_code","==",config.approval_code] 
+#        end
+      end
+    end
+  end
+end