Re: Vendor Invoices

[Herb R. <he...@bu...>]

On Mon, 19 Nov 2001, Dieter Simader wrote:

> There is a line missing in ir.pl
>
> edit bin/mozilla/ir.pl, after line 95 add
>
>   $form->{$key} = "$ref->{accno}--$ref->{description}";

Can you list a few lines before and after line 95 ?
...this just doesn't look right (ie $key = 'AP_paid' at line 95):

     91   foreach $key (keys %{ $form->{AP_links} }) {
     92     foreach $ref (@{ $form->{AP_links}{$key} }) {
     93       if ($form->{amount}{$ref->{accno}}) {
     94         if ($key eq 'AP_paid') {
     95           $form->{AP_paid} = $form->{amount}{$ref->{accno}};
     96           $form->{$key} = "$ref->{accno}--$ref->{description}";  # added
     97         }
     98       }
     99       $form->{"select$key"} .= "<option>$ref->{accno}--$ref->{description}\n";
    100     }
    101   }

Also is a similiar line needed in is.pl (at about line 129) ?

-- 
Herb Richter,
Toronto, Ontario
http://www.partsandservice.com