my $noteshandler = $dbh->prepare($notessql); $noteshandler->execute($id, $version); while ( my @note = $noteshandler->fetchrow_arrayref() ) { push ( @noteslist, $note[0]); } $attrHashListRef->[$index]->{VALUE} = \@noteslist; #### ###begin OUTER Table containing part list and selected part info $data .= $cgi->start_table({}); ###begin row in OUTER table. $data .= $cgi->start_Tr({}); ###Left most cell in OUTER table. Contains PartList. $data .= $cgi->td({-valign=>'top'}, renderPartListView($cgi)); ###begin Right cell in OUTER table. Contains Header and selected ###part info. $data .= $cgi->start_td({-valign=>'top' }); ###begin INNER table containing header and view $data .= $cgi->start_table({}); ###Top ROW on INNER table. Containing header $data .= $cgi->Tr({}, $cgi->td({}, pageHeader($cgi, $lca_dbm, $am))); ###begin bottom ROW on INNER table. Containing selected part $data .= $cgi->start_Tr({-width => 20, -style => 'white-space:wrap'}); $data .= $cgi->td({-valign=>'top'}, renderPartReadView($cgi, $lca_dbm, $am) ###end bottom ROW on INNER table. Containing selected part $data .= $cgi->end_Tr({}); ###end INNER table containing header and view $data .= $cgi->end_table(); ###end Right cell in OUTER table. $data .= $cgi->end_td({}); ###end row in OUTER table. $data .= $cgi->end_Tr(); ###end OUTER Table containing part list and selected part info $data .= $cgi->end_table(); $logger->info("Exiting renderView"); return $data;