httemplate/edit/payment_gateway.html

   1 <% include("/elements/header.html","$action Payment gateway", menubar(
   2   'View all payment gateways' => $p. 'browse/payment_gateway.html',
   3 )) %>
   4
   5 <% include('/elements/error.html') %>
   6
   7 <FORM ACTION="<%popurl(1)%>process/payment_gateway.html" METHOD=POST>
   8 <INPUT TYPE="hidden" NAME="gatewaynum" VALUE="<% $payment_gateway->gatewaynum %>">
   9 Gateway #<% $payment_gateway->gatewaynum || "(NEW)" %>
  10
  11 <% ntable('#cccccc', 2, '') %>
  12
  13 <TR>
  14   <TH ALIGN="right">Gateway: </TH>
  15   <TD>
  16 % if ( $payment_gateway->gatewaynum ) {
  17
  18
  19       <% $payment_gateway->gateway_module %>
  20       <INPUT TYPE="hidden" NAME="gateway_module" VALUE="<% $payment_gateway->gateway_module %>">
  21 % } else {
  22
  23
  24       <SELECT NAME="gateway_module" SIZE=1>
  25 % foreach my $module ( qw(
  26 %             2CheckOut
  27 %             AuthorizeNet
  28 %             BankOfAmerica
  29 %             Beanstream
  30 %             Capstone
  31 %             Cardstream
  32 %             CashCow
  33 %             CyberSource
  34 %             eSec
  35 %             eSelectPlus
  36 %             Exact
  37 %             iAuthorizer
  38 %             Ingotz
  39 %             InternetSecure
  40 %             Interswitchng
  41 %             IPaymentTPG
  42 %             IPPay
  43 %             Iridium
  44 %             Jettis
  45 %             LinkPoint
  46 %             MerchantCommerce
  47 %             Network1Financial
  48 %             OCV
  49 %             OpenECHO
  50 %             PayConnect
  51 %             PayflowPro
  52 %             PaymenTech
  53 %             PaymentsGateway
  54 %             PayPal
  55 %             PlugnPay
  56 %             PPIPayMover
  57 %             Protx
  58 %             PXPost
  59 %             SecureHostingUPG
  60 %             Skipjack
  61 %             StGeorge
  62 %             SurePay
  63 %             TCLink
  64 %             TransactionCentral
  65 %             TransFirsteLink
  66 %             Vanco
  67 %             viaKLIX
  68 %             VirtualNet
  69 %             WesternACH
  70 %           ) ) {
  71 %
  72
  73           <OPTION VALUE="<% $module %>"><% $module %>
  74 % }
  75
  76       </SELECT>
  77 % }
  78
  79
  80   </TD>
  81 </TR>
  82
  83 <TR>
  84   <TH ALIGN="right">Username: </TH>
  85   <TD><INPUT TYPE="text" NAME="gateway_username" VALUE="<% $payment_gateway->gateway_username %>"></TD>
  86 </TR>
  87
  88 <TR>
  89   <TH ALIGN="right">Password: </TH>
  90   <TD><INPUT TYPE="text" NAME="gateway_password" VALUE="<% $payment_gateway->gateway_password %>"></TD>
  91 </TR>
  92
  93 <TR>
  94   <TH ALIGN="right">Action: </TH>
  95   <TD>
  96     <SELECT NAME="gateway_action" SIZE=1>
  97 % foreach my $action (
  98 %                              'Normal Authorization',
  99 %                              'Authorization Only',
 100 %                              'Authorization Only, Post Authorization',
 101 %                            ) {
 102 %
 103
 104         <OPTION VALUE="<% $action %>"<% $action eq $payment_gateway->gateway_action ? ' SELECTED' : '' %>><% $action %>
 105 % }
 106
 107     </SELECT>
 108   </TD>
 109 </TR>
 110
 111 <TR>
 112   <TH ALIGN="right">Options: (Name/Value pairs, one element per line)</TH>
 113   <TD>
 114     <TEXTAREA ROWS="5" NAME="gateway_options"><% join("\r", $payment_gateway->options ) %></TEXTAREA>
 115   </TD>
 116 </TR>
 117
 118 </TABLE>
 119
 120 <BR><INPUT TYPE="submit" VALUE="<% $payment_gateway->gatewaynum ? "Apply changes" : "Add gateway" %>">
 121     </FORM>
 122
 123 <% include('/elements/footer.html') %>
 124
 125 <%init>
 126
 127 die "access denied"
 128   unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
 129
 130 my $payment_gateway;
 131 if ( $cgi->param('error') ) {
 132   $payment_gateway = new FS::payment_gateway ( {
 133     map { $_, scalar($cgi->param($_)) } fields('payment_gateway')
 134   } );
 135 } elsif ( $cgi->keywords ) {
 136   my($query) = $cgi->keywords;
 137   $query =~ /^(\d+)$/;
 138   $payment_gateway = qsearchs( 'payment_gateway', { 'gatewaynum' => $1 } );
 139 } else { #adding
 140   $payment_gateway = new FS::payment_gateway {};
 141 }
 142 my $action = $payment_gateway->gatewaynum ? 'Edit' : 'Add';
 143 #my $hashref = $payment_gateway->hashref;
 144
 145 </%init>