X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Finvoice_io.pl;h=b4290feb246d29964bafd4d09a5d8382030e62cf;hb=fe73e0d261229f181e8133283b530509773d2151;hp=97bb8fdb8ab852a39ed356b978ae7a98a66bb6a5;hpb=9035c75520b38a06de076b53689f82c228b3d22c;p=kivitendo-erp.git diff --git a/bin/mozilla/invoice_io.pl b/bin/mozilla/invoice_io.pl index 97bb8fdb8..b4290feb2 100644 --- a/bin/mozilla/invoice_io.pl +++ b/bin/mozilla/invoice_io.pl @@ -661,46 +661,50 @@ sub display_form { # } &form_header; - my $numrows = ++$form->{rowcount}; - my $subroutine = "display_row"; + { + no strict 'refs'; - if ($form->{item} eq 'part') { + my $numrows = ++$form->{rowcount}; + my $subroutine = "display_row"; - #set preisgruppenanzahl - $numrows = $form->{price_rows}; - $subroutine = "price_row"; + if ($form->{item} eq 'part') { - &{$subroutine}($numrows); + #set preisgruppenanzahl + $numrows = $form->{price_rows}; + $subroutine = "price_row"; - $numrows = ++$form->{makemodel_rows}; - $subroutine = "makemodel_row"; - } - if ($form->{item} eq 'assembly') { - $numrows = $form->{price_rows}; - $subroutine = "price_row"; + &{$subroutine}($numrows); + + $numrows = ++$form->{makemodel_rows}; + $subroutine = "makemodel_row"; + } + if ($form->{item} eq 'assembly') { + $numrows = $form->{price_rows}; + $subroutine = "price_row"; - &{$subroutine}($numrows); + &{$subroutine}($numrows); - $numrows = ++$form->{makemodel_rows}; - $subroutine = "makemodel_row"; + $numrows = ++$form->{makemodel_rows}; + $subroutine = "makemodel_row"; - # create makemodel rows - &{$subroutine}($numrows); + # create makemodel rows + &{$subroutine}($numrows); - $numrows = ++$form->{assembly_rows}; - $subroutine = "assembly_row"; - } - if ($form->{item} eq 'service') { - $numrows = $form->{price_rows}; - $subroutine = "price_row"; + $numrows = ++$form->{assembly_rows}; + $subroutine = "assembly_row"; + } + if ($form->{item} eq 'service') { + $numrows = $form->{price_rows}; + $subroutine = "price_row"; - &{$subroutine}($numrows); + &{$subroutine}($numrows); - $numrows = 0; - } + $numrows = 0; + } - # create rows - &{$subroutine}($numrows) if $numrows; + # create rows + &{$subroutine}($numrows) if $numrows; + } &form_footer;