projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix several UI nits in FCC 477 report configuration, #24047
[freeside.git]
/
FS
/
FS
/
Report
/
FCC_477.pm
diff --git
a/FS/FS/Report/FCC_477.pm
b/FS/FS/Report/FCC_477.pm
index
ff29d19
..
f5d6a06
100644
(file)
--- a/
FS/FS/Report/FCC_477.pm
+++ b/
FS/FS/Report/FCC_477.pm
@@
-4,14
+4,13
@@
use base qw( FS::Report );
use strict;
use vars qw( @upload @download @technology @part2aoption @part2boption
%states
use strict;
use vars qw( @upload @download @technology @part2aoption @part2boption
%states
- $DEBUG
);
use FS::Record qw( dbh );
use Tie::IxHash;
use Storable;
);
use FS::Record qw( dbh );
use Tie::IxHash;
use Storable;
-$DEBUG = 0;
+
our
$DEBUG = 0;
=head1 NAME
=head1 NAME
@@
-305,6
+304,7
@@
sub report {
unless $class->can($method);
my $statement = $class->$method(%opt);
unless $class->can($method);
my $statement = $class->$method(%opt);
+ warn $statement if $DEBUG;
my $sth = dbh->prepare($statement);
$sth->execute or die $sth->errstr;
$sth->fetchall_arrayref;
my $sth = dbh->prepare($statement);
$sth->execute or die $sth->errstr;
$sth->fetchall_arrayref;