Index: openacs-4/packages/authorize-gateway/lib/one.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/authorize-gateway/lib/one.adp,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/authorize-gateway/lib/one.adp	1 Sep 2008 23:00:43 -0000	1.1
@@ -0,0 +1 @@
+@response_reason_text@ @avs_text@
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
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/authorize-gateway/lib/one.tcl	1 Sep 2008 23:00:43 -0000	1.1
@@ -0,0 +1,15 @@
+# presents log results for one transaction
+
+# Authenticate the user
+set user_id [auth::require_login]
+
+# Check for admin privileges
+set package_id [ad_conn package_id]
+set admin_p [ad_permission_p $package_id admin]
+
+# get transaction log comments. 
+db_1row get_transaction_comments "select response_reason_text, avs_code
+      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]
Index: openacs-4/packages/authorize-gateway/lib/one.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/authorize-gateway/lib/one.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/authorize-gateway/lib/one.xql	1 Sep 2008 23:00:43 -0000	1.1
@@ -0,0 +1,10 @@
+<?xml version="1.0"?>
+<queryset>
+  <fullquery name="get_transaction_commnets">      
+    <querytext>
+      select response_reason_text, avs_code
+      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')
+    </querytext>
+  </fullquery>
+</queryset>