<% my $user = getotaker; print header('Current Receivables Report Results'); open (REPORT, "freeside-receivables-report -v $user |"); print '

';
while() {
  print $_;
}
print '

'; print ''; %>