1 <%= $url = "$selfurl?session=$session_id;action="; ''; %>
2 <%= include('header', ($inbound ? 'Received calls' : 'Dialed calls' ) .
4 Date::Format::time2str('%b %o %Y', $beginning).
6 Date::Format::time2str('%b %o %Y', $ending)
11 $OUT .= qq!<FONT SIZE="+1" COLOR="#ff0000">$error</FONT><BR><BR>!;
17 <%= if ($previous < $beginning) {
18 $OUT .= qq!<A HREF="${url}view_cdr_details;svcnum=$svcnum;beginning=!;
19 $OUT .= qq!$previous;ending=$beginning">Previous period</A>!;
24 <TD WIDTH="50%" ALIGN="right">
25 <%= if ($next > $ending) {
26 $OUT .= qq!<A HREF="${url}view_cdr_details;svcnum=$svcnum;beginning=!;
27 $OUT .= qq!$ending;ending=$next">Next period</A>!;
34 <TABLE BGCOLOR="#cccccc">
36 <%= $space = '<TD> </TD>';
38 map { '<TH ALIGN="right">'.$_.'</TH>' }
46 foreach my $usage ( @usage ) {
49 map { "<TD>$_</TD>" } @{$usage}
58 <%= include('footer') %>