Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 922f961c

Von G. Richardson vor mehr als 6 Jahren hinzugefügt

  • ID 922f961cb091c49dbc02693faf50382ceb9cd5a2
  • Vorgänger 1d1f3140

Änderungen HP Design

Unterschiede anzeigen:

bin/mozilla/ir.pl
415 415 

  		




  416
  416
  
    
  setup_ir_action_bar();


  		




  417
  417
  
    

  		




  
  418
  
    
  $form->{ALL_DELIVERY_TERMS} = SL::DB::Manager::DeliveryTerm->get_all_sorted(); # moved to here from sub form_footer


  		




  
  419
  
    

  		




  418
  420
  
    
  $form->header();


  		




  419
  421
  
    

  		




  420
  422
  
    
  print $form->parse_html_template("ir/form_header", \%TMPL_VAR);


  		




  ......




  466
  468
  
    
  foreach my $item (@{ $form->{taxaccounts_array} }) {


  		




  467
  469
  
    
    if ($form->{"${item}_base"}) {


  		




  468
  470
  
    
      if ($form->{taxincluded}) {


  		




  469
  
  
    
        $form->{"${item}_total"} = $form->round_amount( ($form->{"${item}_base"} * $form->{"${item}_rate"}


  		




  470
  
  
    
                                                                                 / (1 + $form->{"${item}_rate"})), 2);


  		




  
  471
  
    
        $form->{"${item}_total"} = $form->round_amount( ($form->{"${item}_base"} * $form->{"${item}_rate"} / (1 + $form->{"${item}_rate"})), 2);


  		




  471
  472
  
    
        $form->{"${item}_netto"} = $form->round_amount( ($form->{"${item}_base"} - $form->{"${item}_total"}), 2);


  		




  472
  
  
    
      } else {


  		




  
  473
  
    
      } 


  		




  
  474
  
    
      else {


  		




  473
  475
  
    
        $form->{"${item}_total"} = $form->round_amount( $form->{"${item}_base"} * $form->{"${item}_rate"}, 2);


  		




  474
  476
  
    
        $form->{invtotal} += $form->{"${item}_total"};


  		




  475
  477
  
    
      }


  		




  ......




  521
  523
  
    
    $totalpaid += $form->{"paid_$i"};


  		




  522
  524
  
    
  }


  		




  523
  525
  
    

  		




  524
  
  
    
  $form->{ALL_DELIVERY_TERMS} = SL::DB::Manager::DeliveryTerm->get_all_sorted();


  		




  
  526
  
    
  # $form->{ALL_DELIVERY_TERMS} = SL::DB::Manager::DeliveryTerm->get_all_sorted(); # moved to sub form_header


  		




  525
  527
  
    

  		




  526
  528
  
    
  print $form->parse_html_template('ir/form_footer', {


  		




  527
  529
  
    
    is_type_credit_note => ($form->{type} eq "credit_note"),


  		












Auch abrufbar als:  Unified diff