Index: openacs-4/packages/ezic-gateway/lib/one.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ezic-gateway/lib/one.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ezic-gateway/lib/one.adp 2 Sep 2008 06:40:01 -0000 1.1 @@ -0,0 +1 @@ +@response_reason_text@ @avs_text@ Index: openacs-4/packages/ezic-gateway/lib/one.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ezic-gateway/lib/one.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ezic-gateway/lib/one.tcl 2 Sep 2008 06:40:01 -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 ezic_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 [ezic_gateway.expand_avs $avs_code] Index: openacs-4/packages/ezic-gateway/lib/one.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ezic-gateway/lib/one.xql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/ezic-gateway/lib/one.xql 2 Sep 2008 06:40:01 -0000 1.1 @@ -0,0 +1,10 @@ + + + + + select response_reason_text, avs_code + from ezic_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') + + +