|
I am wondering if anyone has had any problems with
the .name script. I am using Net::SSLeay to connect
to our Gateway provider to charge credit cards,
without it leaving the actual page. It works great on
reg_system.cgi
but will not work right in the .name pre reg
script.
OpenSRS support said to ask on here, that maybe
someone would have some tips they could share.
Here is my problem.
If I use an existing profile to pre-register a
.name domain, it will work just fine, at least it will try to process the credit
card. If it is successful,
then it gives this message:
Registration ErrorThat is ONLY if I use an existing profile, from a
previously registered .name domain. It is in the TEST version. NOT
live.
I would appreciate any tips.
Let me go over this again. 2 problems. 1, if it's a
new profile, it just denies the card, it will not even attempt to charge it. So
I wonder if it is
Net::SSLeay since that is what is used to contact
the Gateway company to charge the card. It does do so if it's an existing
profile, but NOT
on a new one.
2nd is the error that I get if it's an existing
profile for .name. I get that error pasted above. If I use a NEW profile, and I
use card number
4111111111111111 I have it completely bypass the
charging of the card, that is why It don't give me the card declined error,
which it does without checking on a valid card.
thank you in advance for any advice you may
have.
Richard.
Just so you can see, here is what I
have:
AT: sub process_order {
AFTER
if (@list)
{
$data->{nameserver_list} = \@list; } else { $data->{use_default_nameservers} = 1; } my $xcp_request = { action => "sw_register", object => "domain", attributes => $data, }; my $register_results = $XML_Client->send_cmd( $xcp_request ); I put this:
# Begin Addition
my $testcharge = charge;
if($in{p_cc_num} ne "4111111111111111") {
if($testcharge == 0) { throw Exception "Register", "Sorry, Your card was denied. Please use a different card.\nSorry for any inconvenience this may cause.\n"; } } THEN this is the last of the code in that
subroutine and I think this is the command that registers the
domain...Therefore, I have the charge card call in the right spot, and it should
be the same for both, either the new profile, or existing profile.
unless
($register_results->{is_success})
{
throw Exception "Register","Error occured while was trying to process your order:<br>\n".$register_results->{response_text}; } my $id =
$register_results->{attributes}->{id};
my $x = sprintf ("%s processed with order \# %d.\n", $data->{domain}, $id); my %HTML; $HTML{status} = $x."<br>".$register_results->{response_text}; $HTML{partner_email} = $ADMIN_EMAIL; $HTML{CGI} = $cgi; $HTML{affiliate_id} = $in{affiliate_id}; print_form(template=>"$path_templates/thankyou.html",data=">\%HTML); } |
- RE: OpenSRS Support said to post this here.... POWERHOUSE
- RE: OpenSRS Support said to post this here.... Charles Daminato
