1 <%= include('header', ($inbound ? 'Received calls' : 'Dialed calls' ) .
3 Date::Format::time2str('%b %o %Y', $beginning).
5 Date::Format::time2str('%b %o %Y', $ending)
10 $OUT .= qq!<FONT SIZE="+1" COLOR="#ff0000">$error</FONT><BR><BR>!;
17 $ahref = qq!<A HREF="${url}view_cdr_details;svcnum=$svcnum;!;
18 $ahref = qq!inbound=1;! if $inbound;
19 if ($previous < $beginning) {
21 qq!beginning=$previous;ending=$beginning">Previous period</A>!;
27 <TD WIDTH="50%" ALIGN="right">
29 if ($next > $ending) {
30 $OUT .= $ahref. qq!beginning=$ending;ending=$next">Next period</A>!;
38 <TABLE BGCOLOR="#cccccc">
40 <%= $space = '<TD> </TD>';
42 map { '<TH ALIGN="right">'.$_.'</TH>' }
50 foreach my $usage ( @usage ) {
53 map { "<TD>$_</TD>" } @{$usage}
62 <%= include('footer') %>