Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 8b5bed7f

Von Sven Schöling vor etwa 4 Jahren hinzugefügt

  • ID 8b5bed7fe52952d9c09b3cc18ef483f6670a78d0
  • Vorgänger 6a74e5a2
  • Nachfolger e21e2190

Kreditorenbuchungen: Zahlungsbedingungen laden/speichern

Unterschiede anzeigen:

bin/mozilla/ap.pl
48 48 
use SL::DB::Currency;
49 49 
use SL::DB::Default;
50 50 
use SL::DB::Order;
51 
use SL::DB::PaymentTerm;
51 52 
use SL::DB::PurchaseInvoice;
52 53 
use SL::DB::RecordTemplate;
53 54 
use SL::DB::Tax;
......
252 253 
  $form->{transdate} = $form->{initial_transdate};
253 254 

  		




  254
  255
  
    
  if ($form->{vendor_id}) {


  		




  255
  
  
    
    my $last_used_ap_chart = SL::DB::Vendor->load_cached($form->{vendor_id})->last_used_ap_chart;


  		




  
  256
  
    
    my $vendor = SL::DB::Vendor->load_cached($form->{vendor_id});


  		




  
  257
  
    

  		




  
  258
  
    
    # set initial payment terms


  		




  
  259
  
    
    $form->{payment_id} = $vendor->payment_id;


  		




  
  260
  
    

  		




  
  261
  
    
    my $last_used_ap_chart = $vendor->last_used_ap_chart;


  		




  256
  262
  
    
    $form->{"AP_amount_chart_id_1"} = $last_used_ap_chart->id if $last_used_ap_chart;


  		




  257
  263
  
    
  }


  		




  258
  264
  
    

  		




  ......




  556
  562
  
    
  print $form->parse_html_template('ap/form_header', {


  		




  557
  563
  
    
    today => DateTime->today,


  		




  558
  564
  
    
    currencies => SL::DB::Manager::Currency->get_all_sorted,


  		




  
  565
  
    
    payment_terms => SL::DB::Manager::PaymentTerm->get_all_sorted(query => [ or => [ obsolete => 0, id => $::form->{payment_id}*1 ]]),


  		




  559
  566
  
    
  });


  		




  560
  567
  
    

  		




  561
  568
  
    
  $main::lxdebug->leave_sub();


  		




  ......




  656
  663
  
    

  		




  657
  664
  
    
  if (($form->{previous_vendor_id} || $form->{vendor_id}) != $form->{vendor_id}) {


  		




  658
  665
  
    
    IR->get_vendor(\%::myconfig, $form);


  		




  
  666
  
    

  		




  
  667
  
    
    my $vendor = SL::DB::Vendor->load_cached($form->{vendor_id});


  		




  
  668
  
    

  		




  
  669
  
    
    # reset payment to new vendor


  		




  
  670
  
    
    $form->{payment_id} = $vendor->payment_id;


  		




  
  671
  
    

  		




  659
  672
  
    
    if (($form->{rowcount} == 1) && ($form->{amount_1} == 0)) {


  		




  660
  
  
    
      my $last_used_ap_chart = SL::DB::Vendor->load_cached($form->{vendor_id})->last_used_ap_chart;


  		




  
  673
  
    
      my $last_used_ap_chart = $vendor->last_used_ap_chart;


  		




  661
  674
  
    
      $form->{"AP_amount_chart_id_1"} = $last_used_ap_chart->id if $last_used_ap_chart;


  		




  662
  675
  
    
    }


  		




  663
  676
  
    
  }


  		












  

    
      templates/webpages/ap/form_header.html
    
  





  242
  242
  
    
          <tr>


  		




  243
  243
  
    
           <th align="left">[% 'Notes' | $T8 %]</th>


  		




  244
  244
  
    
           <th align="left">[% 'Internal Notes' | $T8 %]</th>


  		




  
  245
  
    
           <th align="left">[% 'Payment Terms' | $T8 %]</th>


  		




  245
  246
  
    
          </tr>


  		




  246
  247
  
    
          <tr valign="top">


  		




  247
  248
  
    
           <td>


  		




  ......




  250
  251
  
    
           <td>


  		




  251
  252
  
    
            [% L.textarea_tag("intnotes", intnotes, wrap="soft", rows=textarea_rows, cols=50, readonly=readonly) %]


  		




  252
  253
  
    
           </td>


  		




  
  254
  
    
           <td>


  		




  
  255
  
    
             [% L.select_tag('payment_id', payment_terms, default=payment_id, title_key='description', with_empty=1, style="width: 250px") %]


  		




  
  256
  
    
           </td>


  		




  253
  257
  
    
          <tr>


  		




  254
  258
  
    
        </table>


  		




  255
  259
  
    
    </td>


  		












Auch abrufbar als:  Unified diff