httemplate/search/report_receivables.cgi

   1 <!-- mason kludge -->
   2 <%
   3
   4 my $user = getotaker;
   5
   6 print header('Current Receivables Report Results');
   7
   8 open (REPORT, "freeside-receivables-report -v $user |");
   9
  10 print '<PRE>';
  11 while(<REPORT>) {
  12   print $_;
  13 }
  14 print '</PRE>';
  15
  16 print '</BODY></HTML>';
  17
  18 %>
  19