Help for this page

Select Code to Download

Select or download this

my @reports = (
    [doc_request => [qw(T_Doc_Request N_Doc_Request X_Doc_Request)]],
...
        $cell_column = 0;
        $worksheet->write($i, $cell_column,  $section,$format1);
        $cell_column++;

Select or download this

        my $sth = $dbh->prepare($section);
        $sth->execute;
...
$sth->finish;
  }#end for section
}# end for report