[ic] Displaying results of a successful credit card transaction

[Stefan Hornburg]

On Thu, 12 Jun 2003 10:51:02 -0700
Scott Goodman <scott@idearesource.com> wrote:

> >
> >
> >Scott Goodman [scott@idearesource.com] wrote:
> >  
> >
> >>I'm trying to find out how to get access to the contents of the
> >$result >hash returned by the payment modules. My receipt page needs
> >to display >the bank approval code, transaction id, and some other
> >things returned >by the payment processor.  I've tried this on the
> >receipt after poking >in the source for the pyament modules, but
> >nothing is displayed:>
> >>
> >>    [calc]
> >>        $Tag->uneval( { ref => $Session->{payment_result} );
> >>    [/calc]
> >>
> >>
> >>    
> >>
> >Perhaps you need a UserTag that you can call like this:
> >
> >    [payment-result key="auth-code"]
> >
> >Well, today's your lucky day...
> >
> >    UserTag payment_result Order key
> >    UserTag payment_result Routine <<EOR
> >    sub {
> >        my $key = shift;
> >        my $result = $::Session->{payment_result} || return undef;
> >
> >        return ($result->{$key} || $result->{"pop.$key"});
> >    }
> >    EOR
> >
> >  
> >
> Thanks Kevin,
> 
> I'm not sure, but it seems the contents of $::Session are not
> available after  the completion of the order, on the receipt page.
> I've tried adding some debug logging to your tag and $::Session or 
> $::Session->{payment_result} is undefined. Is something missing?

In a catalog user tag you need to remove ::, so $Session instead
of $::Session.

Ciao
	Racke



-- 
LinuXia Systems => http://www.linuxia.de/
Expert Interchange Consulting and System Administration
ICDEVGROUP => http://www.icdevgroup.org/
Interchange Development Team