set payip for all payment types
authorivan <ivan>
Sat, 12 Nov 2005 01:22:47 +0000 (01:22 +0000)
committerivan <ivan>
Sat, 12 Nov 2005 01:22:47 +0000 (01:22 +0000)
FS/FS/cust_main.pm

index d131af9..54d5698 100644 (file)
@@ -2275,6 +2275,13 @@ sub realtime_bop {
               : $invoicing_list[0];
 
   my %content = ();
+
+  my $payip = exists($options{'payip'})
+                ? $options{'payip'}
+                : $self->payip;
+  $content{customer_ip} = $payip
+    if length($payip);
+
   if ( $method eq 'CC' ) { 
 
     $content{card_number} = $payinfo;
@@ -2306,12 +2313,6 @@ sub realtime_bop {
                            : $self->payissue;
     $content{issue_number} = $payissue if $payissue;
 
-    my $payip          = exists($options{'payip'})
-                           ? $options{'payip'}
-                           : $self->payip;
-    $content{customer_ip} = $payip
-      if length($payip);
-
     $content{recurring_billing} = 'YES'
       if qsearch('cust_pay', { 'custnum' => $self->custnum,
                                'payby'   => 'CARD',