diff options
| author | mark <mark> | 2012-02-03 20:24:47 +0000 |
|---|---|---|
| committer | mark <mark> | 2012-02-03 20:24:47 +0000 |
| commit | c8bf9e1f13a96ed4464afed8c81507686ac16058 (patch) | |
| tree | 9c6390239477402dda64151835c233c3367753b8 /FS/FS/Report/Table.pm | |
| parent | 2103a18a3be93d38f2c1e69bea14a2681e382007 (diff) | |
unbreak package churn report, fallout from #15393
Diffstat (limited to 'FS/FS/Report/Table.pm')
| -rw-r--r-- | FS/FS/Report/Table.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/FS/FS/Report/Table.pm b/FS/FS/Report/Table.pm index b5805e3..9d85b9d 100644 --- a/FS/FS/Report/Table.pm +++ b/FS/FS/Report/Table.pm @@ -546,12 +546,12 @@ sub cust_bill_pkg_discount { } -sub setup_pkg { shift->pkg_field( @_, 'setup' ); } -sub susp_pkg { shift->pkg_field( @_, 'susp' ); } -sub cancel_pkg { shift->pkg_field( @_, 'cancel'); } +sub setup_pkg { shift->pkg_field( 'setup', @_ ); } +sub susp_pkg { shift->pkg_field( 'susp', @_ ); } +sub cancel_pkg { shift->pkg_field( 'cancel', @_ ); } sub pkg_field { - my( $self, $speriod, $eperiod, $agentnum, $field ) = @_; + my( $self, $field, $speriod, $eperiod, $agentnum ) = @_; $self->scalar_sql(" SELECT COUNT(*) FROM cust_pkg LEFT JOIN cust_main USING ( custnum ) |