Index: openacs-4/packages/authorize-gateway/lib/one.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/authorize-gateway/lib/one.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/authorize-gateway/lib/one.tcl	1 Sep 2008 23:00:43 -0000	1.1
+++ openacs-4/packages/authorize-gateway/lib/one.tcl	4 Sep 2008 12:31:17 -0000	1.2
@@ -12,4 +12,8 @@
       from authorize_gateway_result_log 
       where transaction_id = :transaction_id and amount = :amount and (substr(txn_attempted_type,1,9) = 'AUTH_ONLY' or substr(txn_attempted_type,1,12) = 'AUTH_CAPTURE')"
 
-set avs_text [authorize_gateway.expand_avs $avs_code]
+# decode left most avs_code. Second character is card CVV2/CVC2/CID code response
+set avs_text [authorize_gateway.expand_avs [string range $avs_code 0 0]]
+
+set code_text "CID: [string range $avs_code 1 1]"
+