- $cref->{_date} . "\tCredit #" . $cref->{crednum} . ", (Balance \$" .
- $cref->{credited} . ") by " . $cref->{otaker} . " - " .
+ $cref->{_date} . "\t" .
+ ($credited ?
+ (qq!<A HREF="! . popurl(2). qq!edit/cust_credit_bill.cgi?!. $cref->{crednum} . qq!">!) :
+ "") .
+ "Credit #" .
+ $cref->{crednum} . ", (Balance \$" .
+ $credited . ")" . ($credited ? "</A>" : "") .