'; } } my $style = 'border-top: 3px solid #000000;'; my $linenum = 0; foreach my $line ( @total_items ) { $style .= 'border-bottom: 3px solid #000000;' if ++$linenum == scalar(@total_items); $OUT .= ''. qq(). qq('. qq('. '' ; $style=''; } %>
<%= $ship_enable ? ('' ) : '' %>
"> <%= $returnaddress %>
Invoice date
<%= $date %>
Invoice #
<%= $invnum %>
Customer #
<%= $custnum %>
  INVOICE  
<%= $payname %>
<%= join('
', grep length($_), $company, $address1, $address2, "$city, $state  $zip", $country, ) %>
'. join('
',grep length($_), 'Service Address', $ship_company, $ship_address1, $ship_address2, "$ship_city, $ship_state $ship_zip", $ship_country, ' ', ' ', ). '
Terms: <%= $terms %>
<%= $po_line %>

CHARGES

<%= ( $unitprices ? ''. '' : '' ) %> <%= foreach my $line ( @detail_items ) { $OUT .= ''. ''. ''. ( $unitprices ? ''. '' : '' ). ''. '' ; if ( @{$line->{'ext_description'} } ) { $OUT .= '' : '>'; $OUT .= '
Ref DescriptionUnit PriceQuantityAmount
'. $line->{'ref'}. ''. $line->{'description'}. ''. $line->{'unit_amount'}. ''. $line->{'quantity'}. ''. $line->{'amount'}. '
'; foreach my $ext_desc ( @{$line->{'ext_description'} } ) { $OUT .= ''. ''. '' } $OUT .= '
  '. $ext_desc. '

 ' : '>' ). $line->{'total_item'}. '). $line->{'total_amount'}. '


<%= $notes %>

<%= $footer %>