rtml 1.2.2 → 2.0.0.alpha.1

data/app_generators/rtml/templates/rtml/app/helpers/beryl_helper.rb

@@ -1,72 +0,0 @@
-module BerylHelper
-  def integer_as_currency(integer)
-    integer = integer.to_i unless integer.kind_of? Fixnum
-    decimal = integer / 100.0
-    decimal = "#{decimal}0" if decimal.to_s =~ /\..$/
-    "$#{decimal}"
-  end
-  
-  def tid_for_transaction(trans)
-    if trans.hidden_data
-      trans.hidden_data[:tid] || state[:itid] || params[:itid]
-    else
-      state[:itid] || params[:itid]
-    end
-  end
-
-  def receipt_text(content)
-    if content.kind_of? Hash
-      controller.rtml_interface.content_of_view(content)
-    else
-      content.to_s.gsub(/\n/, '<br/>')
-    end
-  end
-
-  def left(r=nil, b=nil, &block)
-    align("left", r, b, &block)
-  end
-
-  def right(r=nil, b=nil, &block)
-    align("right", r, b, &block)
-  end
-
-  def align(a, r=nil, b=nil, &block)
-    b, r = r, b if r.kind_of?(Symbol)
-    c = case b
-      when :bold then " class='bold'"
-      when :small then " class='small'"
-      else ''
-    end
-    "<td align='#{a}'#{c}>#{r || yield}</td>"
-  end
-
-  def payment_keys
-    (((@transaction.payment_order.empty?) ?
-            @transaction.payment_data.keys :
-            @transaction.payment_order % @transaction.payment_data.keys) -
-      @transaction.payment_data.keys.select { |k| @transaction.payment_data[k].nil? })
-  end
-
-  def payment_value(key)
-    value = @transaction.payment_data[key]
-    # special cases
-    value = if value.kind_of?(Symbol) && @transaction.respond_to?(value)
-      @transaction.send(value)
-    elsif value.kind_of?(Proc)
-      value.call(@transaction)
-    else
-      value
-    end
-
-#    if value.blank?
-#      case key
-#        when :cashback, 'cashback'
-#          value = @transaction.amount_other
-#        when :total, 'total'
-#          value = (@transaction.amount.blank? ? 0 : @transaction.amount) +
-#                  (@transaction.amount_other.blank? ? 0 : @transaction.amount_other)
-#      end
-#    end
-    value
-  end
-end

data/app_generators/rtml/templates/rtml/app/helpers/beryl_tml_helpers/auth_result.rb

@@ -1,56 +0,0 @@
-Rtml.actions_for BerylController do
-  def auth_result
-    includes tml_stylesheet
-    layout tml_layout
-    allow_cache false
-    default_screen :result
-    string :owner => 'MERCHANT'
-    string :after_receipt => 'another_receipt'
-    string :signature_line => ''
-  
-    void = url_for(:action => "index", :only_path => true)
-    
-    #receipt = url_for(:action => "receipt", :only_path => true)
-    #void = url_for(:action => "index", :anchor => :void_trans, :only_path => true)
-
-    unless @transaction.auth_code.nil?
-      screen :result, :next => :receipt, :timeout => 3 do
-        timeout nil if @duplicate
-        set :owner => 'MERCHANT'
-        set :after_receipt => '#another_rcpt'
-        if controller.params[:transaction_type].to_s.downcase == 'debit'
-          set :signature_line => ''
-        else
-          set :signature_line => 'X__________________________'
-        end
-        
-        display "Transaction Approved<br/>Auth Code: #{@transaction.auth_code}"
-      end
-      
-      receipt :receipt, :next => 'tmlvar:after_receipt' do
-        display
-      end
-      
-      screen :another_rcpt do
-        set :after_receipt => "#complete"
-        set :signature_line => ''
-        set :owner => 'CUSTOMER'
-        display
-      end
-      
-      screen :complete, :next => (@transaction.hidden_data[:after_receipt] ||
-                                  url_for(:action => "index", :only_path => true))
-    else
-      screen :result, :next => :complete do
-        #set "decline_reason", :to => @transaction.message.to_s
-        code = @transaction.hidden_data
-        code = code[:response_code] if code
-        errmsg = "Transaction Declined"
-        errmsg = @transaction.hidden_data[:error_message] if @transaction.hidden_data and @transaction.hidden_data[:error_message]
-        display "#{errmsg}<br/>#{code} - #{@transaction.message}"
-      end
-
-      screen :complete, :next => void
-    end
-  end
-end

data/app_generators/rtml/templates/rtml/app/helpers/beryl_tml_helpers/common.rb

@@ -1,19 +0,0 @@
-Rtml.actions_for BerylController do
-  hide_action :tml_layout, :tml_stylesheet
-  
-  def build_menu
-    super
-    # examples:
-    #  menu_item :sale
-    #  menu_item :refund
-    #  menu_item :sale_with_cashback, :next_screen => :sale_cb, :position => 1
-  end
-  
-  def tml_layout
-    File.join("rtml", "/beryl_#{color_display? ? "color" : "mono"}")
-  end
-
-  def tml_stylesheet
-    File.join("/stylesheets/rtml", "/beryl_#{color_display? ? "color" : "mono"}.css")
-  end
-end

data/app_generators/rtml/templates/rtml/app/helpers/beryl_tml_helpers/index.rb

@@ -1,82 +0,0 @@
-Rtml.actions_for BerylController do
-  def index
-    controller.expires_at { 8.hours.from_now }
-
-    on :cancel => :idle
-    default_screen :init
-    cache true
-    layout tml_layout
-    includes tml_stylesheet
-    if request.headers['REQUEST_URI'] != url_for(:action => 'index', :only_path => false)
-      includes url_for(:action => 'index')
-    end
-    add_features!
-
-    screen :init, features.init(self, :idle) do
-    end
-  
-    screen :idle, :next => :enter_amount do |scr|
-      avs_screen = ((feature_config.sale.address_verification > 0) ? :avs_zip : :submit_data)
-      scr.set 'submit_to' => url_for(:action => 'sale')
-      scr.set 'title' => ['tmlvar:transaction_type', '+', ' Sale']
-      scr.set 'screens.after_swipe' => '#enter_amount',
-          'screens.emv.exit_point' => avs_screen.to_screen_ref
-      scr.set 'confirm.accept' => avs_screen.to_screen_ref
-      scr.set 'confirm.reject' => '#enter_amount'
-      scr.on :menu => :main_menu, :cancel => :idle
-      scr.on :f3 => :main_menu
-      scr.layout nil
-            
-      scr.build :tform do |tform|
-        tform.baddata :max => 3, :next => :idle.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 controller.feature_config.common.emv_support
-          tform.build :name => :card, :parser => 'icc_emv', :parser_params => 'init_app'
-        end
-        tform.prompt do |prompt| prompt.display end
-      end
-      #scr.display
-    end
-    
-    screen :main_menu, embedded_app do
-      on 1 => :menu_credit,       # CREDIT CARD
-         2 => :menu_debit,        # DEBIT CARD
-#         3 => :construction, # EBT
-#         4 => :construction, # REPRINT
-#         5 => :construction, # REPORTS
-#         6 => :construction, # SETTLE
-         0 => embedded_app,
-         'menu' => :admin
-      set :title => "Main Menu"
-      display
-    end
-
-    screen :admin, :on_cancel => :main_menu do
-      on 1 => :about, 2 => embedded_app
-      display
-    end
-
-    screen :about, :admin do
-      on :cancel => :admin
-      layout nil
-      display
-    end
-    
-    for scrn in ['credit', 'debit']
-      screen "menu_#{scrn}" do |scr|
-        scr.on :cancel => :main_menu
-        scr.assert
-        if scrn == 'debit'
-          only = { :only => [ :sale, :return ] }
-          scr.on feature_events(only) unless feature_events(only).empty?
-        else scr.on feature_events unless feature_events.empty?
-        end
-        scr.set :transaction_type => scrn.to_s.titleize
-        scr.set :title => "#{scrn.titleize} Menu"
-        scr.display
-      end
-    end
-  end
-end

data/app_generators/rtml/templates/rtml/app/helpers/rtml/magcard_demo_helper.rb

@@ -1,2 +0,0 @@
-module Rtml::MagcardDemoHelper
-end

data/app_generators/rtml/templates/rtml/app/helpers/rtml/magcard_demo_tml_helpers/authorized.rb

@@ -1,10 +0,0 @@
-Rtml::actions_for Rtml::MagcardDemoController do
-  def authorized
-    layout tml_layout
-    includes :stylesheet, tml_stylesheet
-    
-    screen :main, :next => url_for(:action => 'index') do
-      display
-    end
-  end
-end

data/app_generators/rtml/templates/rtml/app/helpers/rtml/magcard_demo_tml_helpers/common.rb

@@ -1,20 +0,0 @@
-Rtml.actions_for Rtml::MagcardDemoController do
-  # Don't turn these methods into Rails or RTML actions
-  hide_action :build_menu, :tml_layout, :tml_stylesheet
-  
-  def build_menu
-    super
-    # examples:
-    #  menu_item :sale
-    #  menu_item :refund
-    #  menu_item :sale_with_cashback, :next_screen => :sale_cb, :position => 1
-  end
-  
-  def tml_layout
-    File.join("rtml", "/magcard_demo_#{color_display? ? "color" : "mono"}")
-  end
-
-  def tml_stylesheet
-    File.join("/stylesheets/rtml", "/magcard_demo_#{color_display? ? "color" : "mono"}.css")
-  end
-end

data/app_generators/rtml/templates/rtml/app/helpers/rtml/magcard_demo_tml_helpers/index.rb

@@ -1,33 +0,0 @@
-Rtml::actions_for Rtml::MagcardDemoController do
-  def index
-    on :cancel => embedded_app
-    default_screen :init
-    layout tml_layout
-    includes :stylesheet, tml_stylesheet
-
-    screen :init, :next => :main do
-      set 'payment.amount' => 0
-    end
-    
-    screen :main, :next => :enter_amount do
-      card :parser => :mag, :params => :read_data do
-        baddata :partial => 'error', :locals => { :message => 'Could not read card data!' }
-        prompt display
-      end
-    end
-    
-    screen :enter_amount, :next => :send_data do
-      display
-    end
-    
-    screen :send_data do
-      submit :target => url_for(:action => 'authorize'), :on_error => :submit_error do
-        get_transaction_variables # will automatically include all transaction-related TML variables
-      end
-    end
-    
-    screen :submit_error, :next => :init do
-      display :partial => 'error', :locals => { :message => 'Could not submit data!' }
-    end
-  end
-end

data/app_generators/rtml/templates/rtml/app/helpers/rtml/oe/btmlpa_helper.rb

@@ -1,2 +0,0 @@
-module Rtml::Oe::BtmlpaHelper
-end

data/app_generators/rtml/templates/rtml/app/helpers/rtml/oe/btmlpa_tml_helpers/auth_result.rb

@@ -1,23 +0,0 @@
-Rtml.actions_for Rtml::Oe::BtmlpaController do
-  def auth_result
-    includes tml_stylesheet
-    layout tml_layout
-    allow_cache false
-  
-    @receipt = url_for(:action => "receipt", :anchor => :rcpt_start, :only_path => true)
-    @void = url_for(:action => "index", :anchor => :void_trans, :only_path => true)
-
-    unless @transaction.auth_code.nil?
-      # was approved
-      screen :result, :next => @receipt, :timeout => 1 do
-        set "payment.auth_code", :to => @transaction.auth_code.to_s
-        display "Transaction Approved<br/>Auth Code: #{@transaction.auth_code}"
-      end
-    else
-      screen :result, :next => @void, :timeout => 10 do
-        set "decline_reason", :to => @transaction.message.to_s
-        display "Transaction Declined<br/>#{@transaction.message}"
-      end
-    end
-  end
-end

data/app_generators/rtml/templates/rtml/app/helpers/rtml/oe/btmlpa_tml_helpers/common.rb

@@ -1,23 +0,0 @@
-Rtml.actions_for Rtml::Oe::BtmlpaController do
-  before_filter :build_menu
-  
-  def build_menu
-    #super
-    menu_item :sale,          :partial => 'menu_sale'
-    menu_item :sale_cashback, :partial => 'menu_sale_cashback'
-    menu_item :refund,        :partial => 'menu_refund'
-    menu_item :reversal,      :partial => 'menu_reversal'
-    menu_item :duplicate,     :partial => 'menu_duplicate'
-    menu_item :examples,      :partial => 'menu_examples'
-    menu_item :other,         :partial => 'menu_other'
-    menu_item :about,         :partial => 'menu_about'
-  end
-  
-  def tml_layout
-    "rtml/oe/btmlpa_i#{color_display? ? "8550" : "5100"}"
-  end
-  
-  def tml_stylesheet
-    "/stylesheets/rtml/oe/btmlpa/i#{color_display? ? "8550" : "5100"}.css"
-  end
-end

data/app_generators/rtml/templates/rtml/app/helpers/rtml/oe/btmlpa_tml_helpers/dynamic.rb

@@ -1,11 +0,0 @@
-Rtml.actions_for Rtml::Oe::BtmlpaController do
-  def dynamic
-    on :cancel => embedded_app
-    layout tml_layout
-    includes tml_stylesheet
-    
-    screen :response, :next => url_for(:action => 'index', :anchor => @destination, :only_path => true), :timeout => 5 do
-      display @message.to_s
-    end
-  end
-end

data/app_generators/rtml/templates/rtml/app/helpers/rtml/oe/btmlpa_tml_helpers/icc.rb

@@ -1,384 +0,0 @@
-Rtml.actions_for Rtml::Oe::BtmlpaController do
-	def icc
-    @assert  = url_for :only_path => true, :action => :index, :anchor => :assert
-    @abort   = url_for :only_path => true, :action => :index, :anchor => :trans_abrt
-    @index   = url_for :only_path => true, :action => :index
-    @reject  = url_for :only_path => true, :action => :index, :anchor => :reject_trans
-    @receipt = url_for :only_path => true, :action => :receipt #, :anchor => :rcpt_start #:receipt
-    @void    = url_for :only_path => true, :action => :index, :anchor => :void_trans
-    @compl_txn = url_for :only_path => true, :action => :index, :anchor => :compl_txn
-    
-    @data_dump = %Q`<getvar name="err.baddata_reason"/>
-            <br/>
-            <br/>
-            err.high = <getvar name="err.code.high"/> <br/>
-            err.low  = <getvar name="err.code.low"/><br/>
-            card.emv.apdu_list: <getvar name="card.emv.apdu_list"/>`
-    
-	  on :cancel => :index, :error => :eror_scr
-    strings :txt_cvm, :app_item, :app_sel_mode, :app_list, :app, :aid, :app_status, :sep, :aid_list,
-            'btmlpa.emv.selection_list', 'btmlpa.emv.selected_item'
-    integers :index, :count
-    layout tml_layout
-    
-    # Copy an application into the list of applications to be displayed
-    tml_document.concat <<-end_tml
-      <screen id="copy_app1" next="#copy_app2">
-        <setvar name="app" lo="tmlvar:card.emv.app_list" op="item" ro="tmlvar:index" />
-        <strtemplate name="app_item" format="%1%2: %3">
-          <getvar name="sep" />
-          <getvar name="index" format="^00" />
-          <getvar name="app" />
-        </strtemplate>
-      </screen>
-    end_tml
-
-    multiple_screens do
-      # If card requires cardholder confirmation, display the list
-      # else, check if there are several applications or only a single one
-      check_apps :next => @assert do
-        set :count, :lo => "tmlvar:card.emv.app_status_list", :op => "number"
-        next_screen :man_app_sel, :if => "tmlvar:card.emv.selected_app == manual"
-        next_screen :chk_multi, :if => ["tmlvar:card.emv.selected_app", "==", ""]
-      end
-      
-      # Check if there are several applications or only a single one.
-      # If there are several applications, display the list for manual selection, even if not required (best practice)
-      # If there is only a single one, try to select it automatically
-      chk_multi :next => :man_app_sel do
-        next_screen :auto_app_sel, :if => "tmlvar:count == 1"
-      end
-      
-      # Enable automatic application selection
-      auto_app_sel :next => :final_select, :timeout => 1 do
-        set 'btmlpa.emv.txn_app', :to => "tmlvar:card.emv.app_list"
-        set :app_sel_mode, :to => "auto"
-        set "card.emv.selected_app", :to => ""
-        display "Auto Selection"
-      end
-      
-      # Enable cardholder manual application selection
-      man_app_sel :next => @assert, :timeout => 1 do
-        set :app_sel_mode, :to => 'manual'
-        next_screen :prepare_list, :if => ["card.emv.app_list", "!=", ""]
-        display "Manual Selection"
-      end
-    
-      # Building an application list for user selection
-      prepare_list :next => @assert do
-        set [ :sep, :app_list, :aid_list, "btmlpa.emv.selection_list" ], :to => ""
-        set :index, :to => 0
-        set :count, :lo => "tmlvar:card.emv.app_status_list", :op => "number"
-        next_screen :check_status, :if => "tmlvar:count >= 0"
-      end
-    
-      # Copy the active applications into the list to be displayed. Inactive applications
-      # are just skipped.
-      check_status :next => @assert do
-        set :app_status, :to => ["tmlvar:card.emv.app_status_list", "item", "tmlvar:index"]
-        next_screen :copy_app1, :if => "tmlvar:app_status == active"
-        next_screen :loop_app, :if => "tmlvar:app_status == inactive"
-      end
-    
-      copy_app2 :next => :loop_app do
-        set "btmlpa.emv.selection_list", :to => "tmlvar:btmlpa.emv.selection_list + tmlvar:app_item"
-        set :app => "tmlvar:sep + tmlvar:app"
-        set :app_list => "tmlvar:app_list + tmlvar:app"
-        set :aid => %W(tmlvar:card.emv.aid_list item tmlvar:index)
-        set :aid => "tmlvar:sep + tmlvar:aid"
-        set :aid_list => "tmlvar:aid_list + tmlvar:aid"
-        set :sep => ";"
-      end
-    
-      # Increment the index for application status check process
-      loop_app :next => :check_status do
-        set :index, :to => "tmlvar:index + 1"
-        next_screen :select_first, :if => "tmlvar:index == tmlvar:count"
-      end
-    
-      # Check whether the list of available applications is empty or not
-      select_first :next => :rej_no_app do
-        set :count, :lo => "tmlvar:app_list", :op => "number"
-        next_screen :show_app_lst, :if => "tmlvar:count >= 0"
-      end
-    
-      # If none of the applications are active, abort the transaction
-      rej_no_app :next => @abort do
-        display "All applications are inactive.<br/>Transaction will be rejected."
-      end
-    
-      # Show the list of available applications for cardholder selection
-      show_app_lst :on_cancel => @abort do
-        set "btmlpa.emv.selected_item", :to => %W(tmlvar:btmlpa.emv.selection_list item 0)
-        next_screen @assert
-        next_screen :select_aid1, :if => ["tmlvar:btmlpa.emv.selected_item","!=",""]
-        display <<-end_tml
-          <form>
-            <div class="title"><span class="title">Select ICC Application:</span></div>
-            <div class="menu"><input type="list" name="btmlpa.emv.selected_item"
-                     value="tmlvar:btmlpa.emv.selection_list"
-                     rows="4" width="100%" multiple="no" /></div>
-          </form>
-        end_tml
-      end
-    
-      # Based on cardholder selection, fill the card.emv.selected_aid
-      select_aid1 :on_cancel => @index, :timeout => 1 do
-        set 'btmlpa.emv.selected_item', :lo => "tmlvar:btmlpa.emv.selected_item",
-                                        :op => :format, :format => 'nn'
-        set :index, :to => "tmlvar:btmlpa.emv.selected_item"
-        set 'card.emv.selected_app' => ""
-        set 'card.emv.selected_aid' => %W(tmlvar:aid_list item tmlvar:index)
-        set 'btmlpa.emv.txn_aid' => "tmlvar:card.emv.selected_aid"
-        set 'btmlpa.emv.txn_app' => %W(tmlvar:app_list item tmlvar:index)
-        next_screen @assert
-        next_screen :final_select, :if => [ "tmlvar:card.emv.selected_aid", "!=", "" ]
-        display "<getvar name='btmlpa.emv.txn_app' /><br/><getvar name='btmlpa.emv.txn_aid' /><br/>"
-      end
-    
-      # Final application selection and initialization after application auto/manual choice
-      final_select :next => :chk_resel do
-        card :parser => :icc_emv, :params => :final_select do
-          baddata "Fail 01: #{@data_dump}" do
-            max 1
-            next_screen @abort
-          end
-        end
-      end
-    
-      # Ensure the final selection was OK. If not, the application list will be re-displayed
-      # If application selection was OK, go to PIN check
-      # Else, try to select another one
-      chk_resel :next => :icc_get_cvm do
-        next_screen :dsp_selfld, :if => "tmlvar:err.code.low == -32817"
-        next_screen :dsp_selfld, :if => "tmlvar:err.code.low == -4380"
-      end
-    
-      ###############################################
-      # These screens are not used by the BTMLPA. They can be used to safely cancel an initiated transaction.
-      # This can be used, for example, to read the customer name from an EMV card after the application selection,
-      # but to correctly stop the transaction from gouing further. This cancellation should not be required for
-      # normal EMV transaction.
-      cncltran :next => :dspcncl do
-        card :parser => :icc_emv, :params => :cancel do
-          baddata "<getvar name='err.baddata_reason' />", :max => 1, :next => @abort
-        end
-      end
-    
-      dspcncl :next => @abort do
-        display %Q`
-          The transaction has been canceled.<br/>
-          Cardholder name = <getvar name='card.cardholder_name' /><br/>
-          AAC = <getvar name='card.emv.aac' />
-        `
-      end
-      ###############################################
-    
-      # If final application selection failed, prompt the cardholder for another
-      # application selection if a list was previously displayed
-      dsp_selfld :next => :auto_app_sel do
-        next_screen :man_app_sel, :if => "tmlvar:app_sel_mode == manual"
-        display %Q`
-          Fail 02: 
-          #{@data_dump}<br/>
-          app: <getvar name="card.emv.app_list"/><br/>
-          status: <getvar name="card.emv.app_status_list"/>
-        `
-      end
-    
-      # icc screen analyses card verification method
-      icc_get_cvm :next => :chksign do
-        card :parser => :icc_emv, :params => :get_cvm do
-          baddata "Fail 03: #{@data_dump}" do
-            max 1
-            next_screen @abort
-          end
-        end
-      end
-    
-      chksign :next => :chkcvm do
-        set :txt_cvm, :to => ''
-        next_screen :set_sign, :if => "tmlvar:card.emv.signature == 1"
-      end
-    
-      set_sign :next => :chkcvm do
-        set :txt_cvm, :lo => " + SIGNATURE"
-      end
-    
-      chkcvm :next => @assert do
-        variants "tmlvar:card.parser.verdict == reject" => @reject,
-                 "tmlvar:card.parser.cvm == pin"        => :enter_pin,
-                 "tmlvar:card.parser.cvm == pin_online" => :online_cvm,
-                 "tmlvar:card.parser.cvm == no_cv"      => :cv_no_cv,
-                 "tmlvar:card.parser.cvm == "  => :icc_rsk_mgmt
-      end
-    
-      # Empty form, just to set the cvr
-      online_cvm :next => :bypass_cvm, :timeout => 1 do
-        display "ONLINE PIN <getvar name='txt_cvm' />"
-      end
-    
-      bypass_cvm :next => :icc_get_cvm do
-        set 'card.parser.cvr', :to => 'bypassed'
-      end
-    
-      cv_no_cv :next => :icc_get_cvm, :timeout => 1 do
-        set 'card.parser.cvr', :to => 'ok'
-        display "NO CVM <getvar name='txt_cvm' />"
-      end
-    
-      enter_pin :on_cancel => :cvr_no_pin, :timeout => 1, :next => @assert do
-        next_screen :enterpin, :if => "tmlvar:card.emv.last_attempt == 0"
-        next_screen :enterpinlast, :if => "tmlvar:card.emv.last_attempt == 1"
-        display "Offline PIN <getvar name='txt_cvm' />"
-      end
-    
-      # If user presses cancel, we should present him the next card verification method
-      enterpin :on_cancel => :cvr_no_pin, :next => :verify_pin do
-        concat <<-end_tml
-          <tform>
-            <baddata max="1" next="#{@abort}">
-              #{layout.to_tml { %Q`
-                  <getvar name="err.baddata_reason"/><br/>
-                  err.high = <getvar name="err.code.high"/> <br/>
-                  err.low  = <getvar name="err.code.low"/><br/>
-              `} }
-            </baddata>
-            <!-- calls SSA for secure PIN entry -->
-            <pinentry type="icc" prompt="Enter PIN" />
-          </tform>
-        end_tml
-      end
-    
-      cvr_no_pin :next => :icc_get_cvm do
-        set "card.parser.cvr", :to => "failed"
-      end
-    
-      enterpinlast :timeout => 3, :on_cancel => :cvr_no_pin, :next => :pinlast do
-        display "Last Try."
-      end
-    
-      pinlast :on_cancel => :cvr_no_pin, :next => :verify_pin do
-        concat <<-end_tml
-          <tform>
-            <baddata next="#{@abort}">
-              #{layout.to_tml { %Q` <getvar name="err.baddata_reason"/><br/> `} }
-            </baddata>
-            <!-- calls SSA for secure PIN entry -->
-            <pinentry type="icc" prompt="Enter PIN" />
-          </tform>
-        end_tml
-      end
-    
-      #Verifies PIN
-      verify_pin :next => @assert do
-        variants "tmlvar:card.parser.verdict == reject" => @reject,
-                 "tmlvar:card.parser.cvr == ok" => :icc_get_cvm,
-                 "tmlvar:card.parser.cvr == ok_msg" => :pin_ok_msg,
-                 "tmlvar:card.parser.cvr == failed" => :wrong_pin,
-                 "tmlvar:card.parser.cvr == pin_tries" => :wrong_pin
-        card :parser => :icc_emv, :params => :verify do
-          baddata %Q`<getvar name="err.baddata_reason"/><br/>
-                      err.high = <getvar name="err.code.high"/> <br/>
-                      err.low  = <getvar name="err.code.low"/>` do
-            max 1; next_screen @abort
-          end
-        end
-      end
-    
-      #Notifies that user entered correct PIN
-      pin_ok_msg :timeout => 1, :on_cancel => :icc_get_cvm, :next => :icc_get_cvm do
-        display "PIN OK"
-      end
-    
-      # Notifies that user entered incorrect PIN
-      wrong_pin :timeout => 1, :on_cancel => :icc_get_cvm, :next => @assert do
-        variants "tmlvar:card.parser.cvr == failed" => :enter_pin,
-                 "tmlvar:card.parser.cvr == pin_tries" => :icc_get_cvm
-        display "Incorrect PIN"
-      end
-      
-      # Perform the risk management.
-      # The "icc_emv" parser will:
-      #   analyze amount and transaction type;
-      #   analyze previous submission attempt ("oebr.econn" value);
-      #   update "card.parser.verdict" variable;
-      #   fill "card.parser.reject_reason" variable, if necessary.
-      icc_rsk_mgmt :next => :chk_verdict do
-        set 'btmlpa.emv.txn_aid', :to => "tmlvar:card.emv.aid"
-        set 'payment.txn_date' => 'tmlvar:terminal.datetime'
-        set 'payment.auth_code' => ''
-        set 'payment.auth_resp_code' => ''
-        
-        card :parser => :icc_emv, :params => :risk_mgmt do
-          baddata "Fail 04: #{@data_dump}" do
-            max 1; next_screen @abort
-          end
-        end
-      end
-    
-      chk_verdict :next => @assert do
-        set 'oebr.submit_mode', :to => "tmlvar:card.parser.verdict"
-        variants "tmlvar:card.parser.verdict == reject" => :off_rej,
-                 "tmlvar:card.parser.verdict == offline" => :off_comp,
-                 "tmlvar:card.parser.verdict == online" => :icc_submit
-      end
-    
-      off_rej :next => @abort, :timeout => 1 do
-        display " REJECTED "
-      end
-    
-      off_comp :next => :icc_submit, :timeout => 1 do
-        display " TRANSACTION PROCESSED OFFLINE"
-      end
-    
-      # Submits transaction data to host
-      icc_submit :next => @receipt do
-        set 'card.expiry_date', :to => '2010/12/31'
-        set 'oebr.submit_mode', :to => 'tmlvar:card.parser.verdict'
-        submit :target => url_for(:action => "auth"), :on_error => :icc_conn_fld do
-          get_variables :transid, :currency_code, 'oebr.submit_mode', 'oebr.time_zone',
-                        'payment.trans_type', 'payment.amount', 'payment.amount_other', 'payment.txn_date',
-                        'card.pan', 'card.issue_number', 'card.expiry_date', 'card.cardholder_name',
-                        'card.effective_date', 'card.input_type', 'card.mag.iso2_track',
-                        'card.emv.aid', 'card.emv.aip', 'card.emv.auc', 'card.emv.atc', 'card.emv.aac',
-                        'card.emv.tc', 'card.emv.arqc', 'card.emv.iad', 'card.emv.tvr', 'card.emv.unumber'
-        end
-      end
-    
-      # This screen is used when the host is unreachable
-      icc_conn_fld :next => @assert do
-        next_screen :con_fld_onln, :if => "tmlvar:oebr.submit_mode == online"
-        next_screen :con_fld_ofln, :if => "tmlvar:oebr.submit_mode == offline"
-      end
-    
-      con_fld_onln :next => :icc_rsk_mgmt, :timeout => 2 do
-        display "HOST IS UNREACHABLE"
-      end
-    
-      con_fld_ofln :next => :off_rej, :timeout => 2 do
-        display "OFFLINE TRANSACTION POOL IS FULL"
-      end
-    
-      # Screen which may be referred to by dynamic responses
-      icc_tc_aac :on_cancel => @abort, :next => @void do
-        set 'oebr.submit_mode', :to => 'offline'
-        next_screen @receipt, :if => ['tmlvar:card.emv.tc', '!=', '']
-        submit :target => url_for(:action => 'auth_icc_2'),
-               :on_error => url_for(:action => 'index', :anchor => :compl_txn) do
-          get_variables 'card.emv.aac', 'card.emv.tc'
-          get_variable 'transid'
-        end
-      end
-    
-      error_scr do
-        display <<-end_tml
-            code-low: <getvar name="err.code.low"/> <br/>
-            code-high: <getvar name="err.code.high"/> <br/>
-            baddata_reason: <getvar name="err.baddata_reason"/> <br/>
-            descr: <getvar name="err.description"/> <br/>
-        end_tml
-      end
-    end
-  end
-end