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">I</FONT><FONT SIZE="+2">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       foreach my $section ( grep { !$summary || $_->{description} ne $finance_section } @sections ) {
  90         if ($section->{'pretotal'} && !$summary) {
  91           $OUT .=
  92             '<table width="100%"><tr><td>'.
  93             '<p align="right"><b><font size="+1">'.
  94             uc(substr($section->{'pretotal'},0,1)).
  95             '</font><font size="+0">'. uc(substr($section->{'pretotal'},1)).
  96             '</font></b>'.
  97             '<p>'.
  98             '</td></tr></table>';
  99         }
 100         unless ($section->{'summarized'}) {
 101           $OUT .= '<table><tr><td>';
 102           if ($section->{'description'}) {
 103             $OUT .=
 104               '<p><b><font size="+1">'. uc(substr($section->{'description'},0,1)).
 105               '</font><font size="+0">'. uc(substr($section->{'description'},1)).
 106               '</font></b>'.
 107               '<p>';
 108           }else{
 109             $OUT .=
 110               '<p><b><font size="+1">C</font><font size="+0">HARGES</font></b>'.
 111               '<p>';
 112           }
 113           $OUT .= '</td></tr></table>';
 114
 115           $OUT .=
 116             '<table class="invoice_longtable" CELLSPACING=0 WIDTH="100%">'.
 117             '<tr>'.
 118               '<th align="center">Ref</th>'.
 119               '<th align="left">Description</th>'.
 120               ( $unitprices
 121                   ? '<th align="left">Unit Price</th>'.
 122                     '<th align="left">Quantity</th>'
 123                   : ''
 124                 ).
 125               '<th align="right">Amount</th>'.
 126             '</tr>';
 127
 128           my $lastref = 0;
 129           foreach my $line (
 130             grep { ( scalar(@sections) > 1
 131                    ? $section->{'description'} eq $_->{'section'}->{'description'}
 132                    : 1
 133                  ) }
 134             @detail_items )
 135           {
 136             $OUT .=
 137               '<tr class="invoice_desc'.
 138                 ( ($line->{'ref'} && $line->{'ref'} ne $lastref) ? '' : '_more' ).
 139                 '">'.
 140                 '<td align="center">'.
 141                 ( $line->{'ref'} ne $lastref ? $line->{'ref'} : '' ). '</td>'.
 142                 '<td align="left">'. $line->{'description'}. '</td>'.
 143                 ( $unitprices
 144                     ? '<td align="left">'. $line->{'unit_amount'}. '</td>'.
 145                       '<td align="left">'. $line->{'quantity'}. '</td>'
 146                     : ''
 147                 ).
 148
 149                 '<td align="right">'. $line->{'amount'}. '</td>'.
 150               '</tr>'
 151             ;
 152             $lastref = $line->{'ref'};
 153             if ( @{$line->{'ext_description'} } ) {
 154               $OUT .= '<tr class="invoice_extdesc"><td></td><td';
 155               $OUT .= $unitprices ? ' colspan=3>' : '>';
 156               $OUT .= '<table width="100%">';
 157               foreach my $ext_desc ( @{$line->{'ext_description'} } ) {
 158                 $OUT .=
 159                   '<tr class="invoice_extdesc">'.
 160                     '<td align="left" '.
 161                          ( $ext_desc =~ /<\/?TD>/i ? '' : 'colspan=99' ). '>'.
 162                       '&nbsp;&nbsp;'. $ext_desc.
 163                     '</td>'.
 164                   '</tr>'
 165               }
 166               $OUT .= '</table></td><td></td></tr>';
 167             }
 168           }
 169
 170
 171           if (scalar(@sections) > 1) {
 172             my $style = 'border-top: 3px solid #000000;'.
 173                         'border-bottom: 3px solid #000000;';
 174             $OUT .=
 175               '<tr class="invoice_totaldesc">'.
 176                 qq(<td style="$style">&nbsp;</td>).
 177                 qq(<td align="left" style="$style").
 178                   ( $unitprices ? ' colspan=3>' : '>' ).
 179                   $section->{'description'}. ' Total </td>'.
 180                 qq(<td align="right" style="$style">).
 181                   $section->{'subtotal'}. '</td>'.
 182               '</tr>'
 183           ;
 184           }
 185         }
 186         if ($section->{'posttotal'}) {
 187           $OUT .= '<tr><td align="right" colspan=5>';
 188           $OUT .=
 189             '<p><font size="+1">'. $section->{'posttotal'}.
 190             '</font>'.
 191             '<p>';
 192           $OUT .= '</td></tr>';
 193         }
 194
 195       }
 196
 197       my $style = 'border-top: 3px solid #000000;';
 198       my $linenum = 0;
 199
 200       foreach my $line ( @total_items ) {
 201
 202         $style .= 'border-bottom: 3px solid #000000;'
 203           if ++$linenum == scalar(@total_items);
 204
 205         $OUT .=
 206           '<tr class="invoice_totaldesc">'.
 207             qq(<td style="$style">&nbsp;</td>).
 208             qq(<td align="left" style="$style").
 209             ( $unitprices ? ' colspan=3>' : '>' ).
 210               $line->{'total_item'}. '</td>'.
 211             qq(<td align="right" style="$style">).
 212               $line->{'total_amount'}. '</td>'.
 213           '</tr>'
 214         ;
 215
 216         $style='';
 217
 218       }
 219
 220     %>
 221   </table>
 222   <br><br>
 223
 224 <%= length($summary) ? '' : $notes %>
 225
 226   <hr NOSHADE SIZE=2 COLOR="#000000">
 227   <p align="center"><%= $footer %>
 228
 229 </td></tr></table>