Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision c6a4a05a

Von Wulf vor fast 13 Jahren hinzugefügt

  • ID c6a4a05a9ad2ae02dafff463fa7b49ce41d2ae2f
  • Vorgänger 676c7dc0
  • Nachfolger 8003c3b1

Fix fuer Bug 1765

Dienstleistungen koennen nun auch Lieferanten haben.

Unterschiede anzeigen:

SL/IC.pm
497 497
  }
498 498

  
499 499
  # insert makemodel records
500
  unless ($form->{item} eq 'service') {
501 500
    my $lastupdate = '';
502 501
    my $value = 0;
503 502
    for my $i (1 .. $form->{makemodel_rows}) {
......
521 520
        do_query($form, $dbh, $query, @values);
522 521
      }
523 522
    }
524
  }
525 523

  
526 524
  # insert taxes
527 525
  foreach my $item (split(/ /, $form->{taxaccounts})) {
bin/mozilla/invoice_io.pl
205 205
    my $numrows    = ++$form->{rowcount};
206 206
    my $subroutine = "display_row";
207 207

  
208
    if ($form->{item} eq 'part') {
209

  
208
    if ($form->{item} =~ /(part|service)/) {
210 209
      #set preisgruppenanzahl
211 210
      $numrows    = $form->{price_rows};
212 211
      $subroutine = "price_row";
......
231 230
      $numrows    = ++$form->{assembly_rows};
232 231
      $subroutine = "assembly_row";
233 232
    }
234
    if ($form->{item} eq 'service') {
235
      $numrows    = $form->{price_rows};
236
      $subroutine = "price_row";
237

  
238
      &{$subroutine}($numrows);
239

  
240
      $numrows = 0;
241
    }
242 233

  
243 234
    # create rows
244 235
    &{$subroutine}($numrows) if $numrows;

Auch abrufbar als: Unified diff