conf/invoice_template

   1
   2                                  Invoice
   3                                  { substr("Page $page of $total_pages          ", 0, 19); } { use Date::Format; time2str("%x", $date); }  FS-{ $invnum; }
   4
   5
   6 Ivan Kohler
   7 1339 Hayes St.
   8 San Francisco, CA  94117
   9
  10
  11 { $address[0]; }
  12 { $address[1]; }
  13 { $address[2]; }
  14 { $address[3]; }
  15 { $address[4]; }
  16 { $address[5]; }
  17
  18 {
  19   join("\n",
  20     map {
  21       my ( $desc, $price ) = @{$_};
  22       "  ". substr( $desc. " "x65, 0, 65). " ". substr( $price. " "x11, 0, 11);
  23     } invoice_lines(31)
  24   );
  25 }
  26
  27  -=> Freeside - open-source billing for ISPs - http://www.sisd.com/freeside <=-