$dateagentlink .= ';agentnum='. $args{agentnum}
if length($agentname);
my $baselink = $args{p}. "search/cust_bill_pkg.cgi?$dateagentlink";
- my $creditlink = $p. "search/cust_credit_bill_pkg.html?$dateagentlink";
+ my $creditlink = $args{p}. "search/cust_credit_bill_pkg.html?$dateagentlink";
print $report <<EOF;
die "access denied"
unless $FS::CurrentUser::CurrentUser->access_right('Financial reports');
+#shit, all sorts of false laxiness w/tax_rate::geneate_liability_report
+
my $conf = new FS::Conf;
my $money_char = $conf->config('money_char') || '$';