summaryrefslogtreecommitdiff
path: root/httemplate/search/unapplied_cust_pay.html
blob: f5c2bf0f993a7cdb252af4e154c567aaccedc80e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
<& elements/cust_main_dayranges.html,
                 #'title'       => 'Prepaid Balance Aging Summary', #???
                 'title'       => 'Unapplied Payments Aging Summary',
                 'range_sub'   => \&unapplied_payments,
&>
<%init>

die "access denied"
  unless $FS::CurrentUser::CurrentUser->access_right('Financial reports');

</%init>
<%once>

sub unapplied_payments {
  my($start, $end, $cutoff) = @_;

  FS::cust_main->unapplied_payments_date_sql( $start, $end, 
          'cutoff' => $cutoff,
  );
}

</%once>