Lines 220-229
sub _get_columns {
Link Here
|
220 |
$tablehash{'__first__'} = $first; |
220 |
$tablehash{'__first__'} = $first; |
221 |
push @columns, \%tablehash; |
221 |
push @columns, \%tablehash; |
222 |
while ( my $data = $sth->fetchrow_arrayref() ) { |
222 |
while ( my $data = $sth->fetchrow_arrayref() ) { |
223 |
my %temphash; |
223 |
my $forbidden = Koha::Report->new->check_columns( undef, $data ); |
224 |
$temphash{'name'} = "$tablename.$data->[0]"; |
224 |
unless ($forbidden) { |
225 |
$temphash{'description'} = $columns->{$tablename}->{$data->[0]}; |
225 |
my %temphash; |
226 |
push @columns, \%temphash; |
226 |
$temphash{'name'} = "$tablename.$data->[0]"; |
|
|
227 |
$temphash{'description'} = $columns->{$tablename}->{ $data->[0] }; |
228 |
push @columns, \%temphash; |
229 |
} |
227 |
} |
230 |
} |
228 |
$sth->finish(); |
231 |
$sth->finish(); |
229 |
return (@columns); |
232 |
return (@columns); |
230 |
- |
|
|