conf/invoice_html

   1 <STYLE TYPE="text/css">
   2 .invoice { font-family: sans-serif; font-size: 10pt }
   3 .invoice_header { font-size: 10pt }
   4 .invoice_headerright TH { border-top: 2px solid #000000; border-bottom: 2px solid #000000 }
   5 .invoice_headerright TD { font-size: 10pt; empty-cells: show }
   6 .invoice_summary TH { border-bottom: 2px solid #000000 }
   7 .invoice_summary TD { font-size: 10pt; empty-cells: show }
   8 .invoice_longtable table { cellspacing: none }
   9 .invoice_longtable TH { border-top: 2px solid #000000; border-bottom: 1px solid #000000; padding-left: none; padding-right: none; font-size: 10pt }
  10 .invoice_desc TD { border-top: 2px solid #000000; font-weight: bold; font-size: 10pt }
  11 .invoice_desc_more TD { font-weight: bold; font-size: 10pt }
  12 .invoice_extdesc TD { font-size: 8pt }
  13 .invoice_totaldesc TD { font-size: 10pt; empty-cells: show }
  14 </STYLE>
  15
  16 <table class="invoice" bgcolor="#ffffff" WIDTH=625 CELLSPACING=8><tr><td>
  17
  18   <table class="invoice_header" width="100%">
  19     <tr>
  20      <td><img src="<%= $cid ? "cid:$cid" : "cust_bill-logo.cgi?invnum=$invnum;template=$template" %>"></td>
  21      <td align="left"><%= $returnaddress %></td>
  22       <td align="right">
  23         <table CLASS="invoice_headerright" cellspacing=0>
  24           <tr>
  25             <td align="center">
  26               Invoice&nbsp;date<BR>
  27               <B><%= $date %></B>
  28             </td>
  29             <td>
  30             </td>
  31             <td align="center">
  32               Invoice&nbsp;#<BR>
  33               <B><%= $invnum %></B>
  34             </td>
  35             <td>
  36             </td>
  37             <td align="center">
  38               Customer #<BR>
  39               <B><%= $custnum %></B>
  40             </td>
  41           </tr>
  42           <tr>
  43             <th>&nbsp;</th>
  44             <th colspan=3 align="center">
  45               <FONT SIZE="+3"><%= $notice_name ? substr($notice_name, 0, 1) : 'I' %></FONT><FONT SIZE="+2"><%= $notice_name ? uc(substr($notice_name, 1)) : 'NVOICE' %></FONT>
  46             </th>
  47             <th>&nbsp;</th>
  48           </tr>
  49         </table>
  50       </td>
  51     </tr>
  52
  53     <tr>
  54       <td>
  55       </td>
  56       <td align="left">
  57         <b><%= $payname %></b><BR>
  58         <%= join('<BR>', grep length($_), $company,
  59                                           $address1,
  60                                           $address2,
  61                                           "$city,&nbsp;$state&nbsp;&nbsp;$zip",
  62                                           $country,
  63                 )
  64         %>
  65       </td>
  66       <%= $ship_enable ? ('<td align="left">'.
  67                           join('<BR>',grep length($_), '<b>Service Address</b>',
  68                                                        $ship_company,
  69                                                        $ship_address1,
  70                                                        $ship_address2,
  71                                                        "$ship_city,&nbsp;$ship_state&nbsp;$ship_zip",
  72                                                        $ship_country,
  73                                                        ' ',
  74                                                        ' ',
  75                               ).
  76                            '</td><tr><td></td><td></td>'
  77                          )
  78                        : ''
  79       %>
  80       <td align="right">
  81         Terms: <%= $terms %><BR>
  82         <%= $po_line %>
  83       </td>
  84     </tr>
  85
  86   </table>
  87   <%= $summary %>
  88   <%=
  89       my $notfirst = 0;
  90       my $columncount = $unitprices ? 5 : 3;
  91       foreach my $section ( grep { !$summary || $_->{description} ne $finance_section } @sections ) {
  92         if ($section->{'pretotal'} && !$summary) {
  93           $OUT .= '</table>' if $notfirst;
  94           $OUT .=
  95             '<table width="100%"><tr><td>'.
  96             '<p align="right"><b><font size="+1">'.
  97             uc(substr($section->{'pretotal'},0,1)).
  98             '</font><font size="+0">'. uc(substr($section->{'pretotal'},1)).
  99             '</font></b>'.
 100             '<p>'.
 101             '</td></tr>';
 102         }
 103         unless ($section->{'summarized'}) {
 104           $OUT .= '</table>' if ( $notfirst || $section->{'pretotal'} && !$summary );
 105           $OUT .= '<table><tr><td>';
 106           if ($section->{'description'}) {
 107             $OUT .=
 108               '<p><b><font size="+1">'. uc(substr($section->{'description'},0,1)).
 109               '</font><font size="+0">'. uc(substr($section->{'description'},1)).
 110               '</font></b>'.
 111               '<p>';
 112           }else{
 113             $OUT .=
 114               '<p><b><font size="+1">C</font><font size="+0">HARGES</font></b>'.
 115               '<p>';
 116           }
 117           $OUT .= '</td></tr></table>';
 118
 119           $OUT .=
 120             '<table class="invoice_longtable" CELLSPACING=0 WIDTH="100%">'.
 121             '<tr>';
 122
 123           if ($section->{header_generator}) {
 124             my $header = &{$section->{header_generator}}();
 125             $OUT .= $header;
 126             $columncount = scalar(my @array = split /<\/th><th/i, $header);
 127           } else {
 128             $OUT .=  '<th align="center">Ref</th>'.
 129                      '<th align="left">Description</th>'.
 130                         ( $unitprices
 131                           ? '<th align="left">Unit Price</th>'.
 132                             '<th align="left">Quantity</th>'
 133                           : ''
 134                         ).
 135                       '<th align="right">Amount</th>';
 136           }
 137             $OUT .= '</tr>';
 138
 139           my $lastref = 0;
 140           foreach my $line (
 141             grep { ( scalar(@sections) > 1
 142                    ? $section->{'description'} eq $_->{'section'}->{'description'}
 143                    : 1
 144                  ) }
 145             @detail_items )
 146           {
 147             $OUT .=
 148               '<tr class="invoice_desc';
 149             if ( $section->{description_generator} ) {
 150               $OUT .= &{$section->{description_generator}}($line);
 151             } else {
 152               $OUT .=  ( ($line->{'ref'} && $line->{'ref'} ne $lastref) ? '' : '_more' ).
 153                        '">'.
 154                        '<td align="center">'.
 155                        ( $line->{'ref'} ne $lastref ? $line->{'ref'} : '' ). '</td>'.
 156                        '<td align="left">'. $line->{'description'}. '</td>'.
 157                        ( $unitprices
 158                            ? '<td align="left">'. $line->{'unit_amount'}. '</td>'.
 159                              '<td align="left">'. $line->{'quantity'}. '</td>'
 160                            : ''
 161                        ).
 162
 163                        '<td align="right">'. $line->{'amount'}. '</td>';
 164             }
 165             $OUT .= '</tr>';
 166             $lastref = $line->{'ref'};
 167             if ( @{$line->{'ext_description'} } ) {
 168               unless ( $section->{description_generator} ) {
 169                 $OUT .= '<tr class="invoice_extdesc"><td></td><td';
 170                 $OUT .= $unitprices ? ' colspan=3' : '';
 171                 $OUT .= '><table width="100%">';
 172               }
 173               foreach my $ext_desc ( @{$line->{'ext_description'} } ) {
 174                 $OUT .=
 175                   '<tr class="invoice_extdesc">'.
 176                     ( $section->{'description_generator'} ? '<td></td>' : '' ).
 177                     '<td align="left" '.
 178                          ( $ext_desc =~ /<\/?TD>/i ? '' : 'colspan=99' ). '>'.
 179                       '&nbsp;&nbsp;'. $ext_desc.
 180                     '</td>'.
 181                   '</tr>'
 182               }
 183               unless ( $section->{description_generator} ) {
 184                 $OUT .= '</table></td><td></td>';
 185               }
 186               $OUT .= '</tr>';
 187             }
 188           }
 189
 190
 191           if ($section->{'description'} || $multisection) {
 192             my $style = 'border-top: 3px solid #000000;'.
 193                         'border-bottom: 3px solid #000000;';
 194             $OUT .=
 195               '<tr class="invoice_totaldesc">'.
 196               qq(<td style="$style">&nbsp;</td>);
 197             if ($section->{total_generator}) {
 198               $OUT .= &{$section->{total_generator}}($section);
 199             } else {
 200               $OUT .= qq(<td align="left" style="$style").
 201                       ( $unitprices ? ' colspan=3>' : '>' ).
 202                       $section->{'description'}. ' Total </td>'.
 203                       qq(<td align="right" style="$style">).
 204                       $section->{'subtotal'}. '</td>';
 205             }
 206             $OUT .= '</tr>';
 207           }
 208         }
 209         if ($section->{'posttotal'}) {
 210           $OUT .= '<tr><td align="right" colspan='. $columncount. '>';
 211           $OUT .=
 212             '<p><font size="+1">'. $section->{'posttotal'}.
 213             '</font>'.
 214             '<p>';
 215           $OUT .= '</td></tr>';
 216         }
 217
 218         $notfirst++;
 219
 220       }
 221
 222       my $style = 'border-top: 3px solid #000000;';
 223       my $linenum = 0;
 224
 225       foreach my $line ( @total_items ) {
 226
 227         $style .= 'border-bottom: 3px solid #000000;'
 228           if ++$linenum == scalar(@total_items) - ( $balance_due_below_line ? 1 : 0 );
 229
 230         $OUT .=
 231           '<tr class="invoice_totaldesc">';
 232         if ($section->{total_line_generator}) {
 233           $OUT .= &{$section->{total_line_generator}}($line);
 234         } else {
 235           $OUT .= qq(<td style="$style">&nbsp;</td>).
 236                   qq(<td align="left" style="$style" colspan=").
 237                     ( $columncount - 2 ). '">'.
 238                     $line->{'total_item'}. '</td>'.
 239                   qq(<td align="right" style="$style">).
 240                     $line->{'total_amount'}. '</td>';
 241         }
 242         $OUT .= '</tr>';
 243
 244         $style='';
 245
 246       }
 247
 248     %>
 249   </table>
 250   <br><br>
 251
 252 <%= length($summary)
 253       ? ''
 254       : ( $smallernotes
 255             ? '<FONT SIZE="-1">'.$notes.'</FONT>'
 256             : $notes
 257         )
 258 %>
 259
 260   <hr NOSHADE SIZE=2 COLOR="#000000">
 261   <p align="center" <%= $smallerfooter ? 'STYLE="font-size:75%;"' : '' %>><%= $footer %>
 262
 263 </td></tr></table>