X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fpayment_gateway.html;h=2840df35bc52e8110d0a94b0ef46f4fecbe52a33;hb=92aedddd3684167abb60cd3f1d77bbc156c592e6;hp=a618ecd26d8ef6a85303d269d0371bc76481c076;hpb=3293939238bdff4fabbfe32e5b685764e6db3717;p=freeside.git

diff --git a/httemplate/edit/payment_gateway.html b/httemplate/edit/payment_gateway.html
index a618ecd26..2840df35b 100644
--- a/httemplate/edit/payment_gateway.html
+++ b/httemplate/edit/payment_gateway.html
@@ -1,135 +1,160 @@
-%
-%
-%my $payment_gateway;
-%if ( $cgi->param('error') ) {
-%  $payment_gateway = new FS::payment_gateway ( {
-%    map { $_, scalar($cgi->param($_)) } fields('payment_gateway')
-%  } );
-%} elsif ( $cgi->keywords ) {
-%  my($query) = $cgi->keywords;
-%  $query =~ /^(\d+)$/;
-%  $payment_gateway = qsearchs( 'payment_gateway', { 'gatewaynum' => $1 } );
-%} else { #adding
-%  $payment_gateway = new FS::payment_gateway {};
-%}
-%my $action = $payment_gateway->gatewaynum ? 'Edit' : 'Add';
-%#my $hashref = $payment_gateway->hashref;
-%
-%
-
-
-<% include("/elements/header.html","$action Payment gateway", menubar(
-  'Main Menu' => $p,
-  'View all payment gateways' => $p. 'browse/payment_gateway.html',
-)) %>
-% if ( $cgi->param('error') ) { 
-
-<FONT SIZE="+1" COLOR="#ff0000">Error: <% $cgi->param('error') %></FONT>
-% } 
-
-
-<FORM ACTION="<%popurl(1)%>process/payment_gateway.html" METHOD=POST>
-<INPUT TYPE="hidden" NAME="gatewaynum" VALUE="<% $payment_gateway->gatewaynum %>">
-Gateway #<% $payment_gateway->gatewaynum || "(NEW)" %>
-
-<% ntable('#cccccc', 2, '') %>
-
-<TR>
-  <TH ALIGN="right">Gateway: </TH>
-  <TD>
-% if ( $payment_gateway->gatewaynum ) { 
-
-
-      <% $payment_gateway->gateway_module %>
-      <INPUT TYPE="hidden" NAME="gateway_module" VALUE="<% $payment_gateway->gateway_module %>">
-% } else { 
-
-
-      <SELECT NAME="gateway_module" SIZE=1>
-% foreach my $module ( qw(
-%             2CheckOut
-%             AuthorizeNet
-%             BankOfAmerica
-%             Beanstream
-%             Capstone
-%             Cardstream
-%             CashCow
-%             CyberSource
-%             eSec
-%             eSelectPlus
-%             Exact
-%             iAuthorizer
-%             IPaymentTPG
-%             Jettis
-%             LinkPoint
-%             MerchantCommerce
-%             Network1Financial
-%             OCV
-%             OpenECHO
-%             PayConnect
-%             PayflowPro
-%             PaymentsGateway
-%             PXPost
-%             SecureHostingUPG
-%             Skipjack
-%             StGeorge
-%             SurePay
-%             TCLink
-%             TransactionCentral
-%             TransFirsteLink
-%             VirtualNet
-%           ) ) {
-%        
-
-          <OPTION VALUE="<% $module %>"><% $module %>
-% } 
-
-      </SELECT>
-% } 
-
-
-  </TD>
-</TR>
-
-<TR>
-  <TH ALIGN="right">Username: </TH>
-  <TD><INPUT TYPE="text" NAME="gateway_username" VALUE="<% $payment_gateway->gateway_username %>"></TD>
-</TR>
-
-<TR>
-  <TH ALIGN="right">Password: </TH>
-  <TD><INPUT TYPE="text" NAME="gateway_password" VALUE="<% $payment_gateway->gateway_password %>"></TD>
-</TR>
-
-<TR>
-  <TH ALIGN="right">Action: </TH>
-  <TD>
-    <SELECT NAME="gateway_action" SIZE=1>
-% foreach my $action ( 
-%                              'Normal Authorization',
-%                              'Authorization Only',
-%                              'Authorization Only, Post Authorization',
-%                            ) {
-%      
-
-        <OPTION VALUE="<% $action %>"<% $action eq $payment_gateway->gateway_action ? ' SELECTED' : '' %>><% $action %>
-% } 
-
-    </SELECT>
-  </TD>
-</TR>
-
-<TR>
-  <TH ALIGN="right">Options: (Name/Value pairs, one element per line)</TH>
-  <TD>
-    <TEXTAREA ROWS="5" NAME="gateway_options"><% join("\r", $payment_gateway->options ) %></TEXTAREA>
-  </TD>
-</TR>
-
-</TABLE>
-
-<BR><INPUT TYPE="submit" VALUE="<% $payment_gateway->gatewaynum ? "Apply changes" : "Add gateway" %>">
-    </FORM>
-  </BODY>
-</HTML>
-
+<% include( 'elements/edit.html',
+            'table'          => 'payment_gateway',
+            'name_singular'  => 'Payment gateway',
+            'viewall_dir'    => 'browse',
+            'fields'         => $fields,
+            'field_callback' => $field_callback,
+            'labels'         => {
+                                  'gatewaynum'           => 'Gateway',
+                                  'gateway_namespace'    => 'Gateway type',
+                                  'gateway_module'       => 'Gateway',
+                                  'gateway_username'     => 'Username',
+                                  'gateway_password'     => 'Password',
+                                  'gateway_action'       => 'Action',
+                                  'gateway_options'      => 'Options (Name/Value pairs, <BR>one element per line)',
+                                  'gateway_callback_url' => 'Callback URL',
+                                },
+          )
+%>
+
+
+<SCRIPT TYPE="text/javascript">
+% my $json = JSON->new->canonical;
+  var modulesForNamespace = <% $json->encode(\%modules_for_namespace) %>;
+  function changeNamespace(what) {
+    var ns = what.value;
+    var select_module = document.getElementById('gateway_module');
+    select_module.options.length = 0;
+    for (var x in modulesForNamespace[ns]) {
+      var o = document.createElement('option');
+      o.value = o.text = modulesForNamespace[ns][x];
+      select_module.add(o, null);
+    }
+  }
+</SCRIPT>
+
+<%init>
+
+die "access denied"
+  unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
+
+my %modules =  (
+  '2CheckOut'             => 'Business::OnlinePayment',
+  'AuthorizeNet'          => 'Business::OnlinePayment',
+  'BankOfAmerica'         => 'Business::OnlinePayment', #deprecated?
+  'Beanstream'            => 'Business::OnlinePayment',
+  'Capstone'              => 'Business::OnlinePayment',
+  'Cardstream'            => 'Business::OnlinePayment',
+  'CashCow'               => 'Business::OnlinePayment',
+  'CyberSource'           => 'Business::OnlinePayment',
+  'eSec'                  => 'Business::OnlinePayment',
+  'eSelectPlus'           => 'Business::OnlinePayment',
+  'eWayShared'            => 'Business::OnlineThirdPartyPayment',
+  'ElavonVirtualMerchant' => 'Business::OnlinePayment',
+  'Exact'                 => 'Business::OnlinePayment',
+  'iAuthorizer'           => 'Business::OnlinePayment',
+  'Ingotz'                => 'Business::OnlinePayment',
+  'InternetSecure'        => 'Business::OnlinePayment',
+  'Interswitchng'         => 'Business::OnlineThirdPartyPayment',
+  'IPaymentTPG'           => 'Business::OnlinePayment',
+  'IPPay'                 => 'Business::OnlinePayment',
+  'Iridium'               => 'Business::OnlinePayment',
+  'Jettis'                => 'Business::OnlinePayment',
+  'Jety'                  => 'Business::OnlinePayment',
+  'LinkPoint'             => 'Business::OnlinePayment',
+  'MerchantCommerce'      => 'Business::OnlinePayment',
+  'Network1Financial'     => 'Business::OnlinePayment',
+  'OCV'                   => 'Business::OnlinePayment',
+  'OpenECHO'              => 'Business::OnlinePayment',
+  'PayConnect'            => 'Business::OnlinePayment',
+  'PayflowPro'            => 'Business::OnlinePayment',
+  'Paymentech'            => 'Business::BatchPayment',
+  'PaymenTech'            => 'Business::OnlinePayment',
+  'PaymentsGateway'       => 'Business::OnlinePayment',
+  'PayPal'                => 'Business::OnlinePayment',
+  #'PaySystems'            => 'Business::OnlinePayment',
+  'PlugnPay'              => 'Business::OnlinePayment',
+  'PPIPayMover'           => 'Business::OnlinePayment',
+  'Protx'                 => 'Business::OnlinePayment', #now SagePay
+  'PXPost'                => 'Business::OnlinePayment',
+  'SagePay'               => 'Business::OnlinePayment',
+  'SecureHostingUPG'      => 'Business::OnlinePayment',
+  'Skipjack'              => 'Business::OnlinePayment',
+  'StGeorge'              => 'Business::OnlinePayment',
+  'SurePay'               => 'Business::OnlinePayment',
+  'TCLink'                => 'Business::OnlinePayment',
+  'TransactionCentral'    => 'Business::OnlinePayment',
+  'TransFirsteLink'       => 'Business::OnlinePayment',
+  'Vanco'                 => 'Business::OnlinePayment',
+  'viaKLIX'               => 'Business::OnlinePayment',
+  'VirtualNet'            => 'Business::OnlinePayment',
+  'WesternACH'            => 'Business::OnlinePayment',
+  'WorldPay'              => 'Business::OnlinePayment',
+);
+
+my %modules_for_namespace;
+for (keys %modules) {
+  $modules_for_namespace{$modules{$_}} ||= [];
+  push @{ $modules_for_namespace{$modules{$_}} }, $_;
+}
+
+my @actions = (
+                'Normal Authorization',
+                'Authorization Only',
+                'Authorization Only,Post Authorization',
+              );
+
+my $fields = [
+               {
+                 field               => 'gateway_namespace',
+                 type                => 'select',
+                 options             => [ qw(
+                   Business::OnlinePayment
+                   Business::BatchPayment
+                   Business::OnlineThirdPartyPayment
+                 ) ],
+                 labels       => {
+                   'Business::OnlinePayment' => 'Direct',
+                   'Business::BatchPayment'  => 'Batch',
+                   'Business::OnlineThirdPartyPayment'  => 'Hosted',
+                 },
+                 onchange => 'changeNamespace',
+               },
+               {
+                 field    => 'gateway_module',
+                 type     => 'select',
+                 options  => [ sort { lc($a) cmp lc ($b) } keys %modules ],
+               },
+               'gateway_username',
+               'gateway_password',
+               {
+                 field    => 'gateway_action',
+                 type     => 'select',
+                 options  => \@actions,
+               },
+               {
+                 field    => 'gateway_callback_url',
+                 type     => 'text',
+                 size     => 40,
+               },
+               {
+                 field               => 'gateway_options',
+                 type                => 'textarea',
+                 rows                => '8',
+                 cols                => '40', 
+                 curr_value_callback => sub { my($cgi, $object, $fref) = @_;
+                                              join("\r", $object->options );
+                                            },
+               },
+             ];
+
+my $field_callback = sub {
+  my ($cgi, $object, $field_hashref ) = @_;
+  if ($object->gatewaynum) {
+    if ( $field_hashref->{field} =~ /gateway_(module|namespace)/ ) {
+      $field_hashref->{type} = 'fixed';
+    }
+  }
+};
+
+</%init>