% my ($custnum, $name) = split(':', pop @customers, 2);
% my $link = $p. 'rt/Ticket/Display.html?id='. $ticketmap{$tr_id}.
% '#txn-'. $tr_id;
% my ($custnum, $name) = split(':', pop @customers, 2);
% my $link = $p. 'rt/Ticket/Display.html?id='. $ticketmap{$tr_id}.
% '#txn-'. $tr_id;