projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
make sure the customers tables for each agent line up with each other, too
[freeside.git]
/
httemplate
/
browse
/
part_referral.cgi
diff --git
a/httemplate/browse/part_referral.cgi
b/httemplate/browse/part_referral.cgi
index
a326bd2
..
581e01b
100755
(executable)
--- a/
httemplate/browse/part_referral.cgi
+++ b/
httemplate/browse/part_referral.cgi
@@
-64,10
+64,10
@@
foreach my $part_referral ( sort {
<%= $part_referral->refnum %></A></TD>
<TD><A HREF="<%= $p %>edit/part_referral.cgi?<%= $part_referral->refnum %>">
<%= $part_referral->referral %></A></TD>
<%= $part_referral->refnum %></A></TD>
<TD><A HREF="<%= $p %>edit/part_referral.cgi?<%= $part_referral->refnum %>">
<%= $part_referral->referral %></A></TD>
- <% for my $
after ( value
s %after ) {
+ <% for my $
period ( key
s %after ) {
$sth->execute( $part_referral->refnum,
$sth->execute( $part_referral->refnum,
- $today-$after,
- $today+$before{$
today
},
+ $today-$after
{$period}
,
+ $today+$before{$
period
},
) or die $sth->errstr;
my $number = $sth->fetchrow_arrayref->[0];
%>
) or die $sth->errstr;
my $number = $sth->fetchrow_arrayref->[0];
%>
@@
-83,16
+83,15
@@
foreach my $part_referral ( sort {
%>
<TR>
<TH COLSPAN=2>Total</TH>
%>
<TR>
<TH COLSPAN=2>Total</TH>
- <% for my $
after ( value
s %after ) {
- $sth->execute( $today-$after,
- $today+$before{$
today
},
+ <% for my $
period ( key
s %after ) {
+ $sth->execute( $today-$after
{$period}
,
+ $today+$before{$
period
},
) or die $sth->errstr;
my $number = $sth->fetchrow_arrayref->[0];
%>
<TD ALIGN="right"><%= $number %></TD>
<% } %>
</TR>
) or die $sth->errstr;
my $number = $sth->fetchrow_arrayref->[0];
%>
<TD ALIGN="right"><%= $number %></TD>
<% } %>
</TR>
- <TD></TD>
</TABLE>
</BODY>
</HTML>
</TABLE>
</BODY>
</HTML>