#!/usr/bin/perl # # Source File: likert_rep_wall_104.pl # $Header$ print "<HTML>\n"; print "<HEAD></HEAD>\n"; print "<FRAMESET frameborder=0 rows=\"60,*\">\n"; print "\t<FRAME noresize scrolling=\"no\" name=\"rptindx003\" frameborder=0 src=\"$urlroot/likert_wall_A_104.pl?lang=$SESSION{'lang'}&tid=$SESSION{'tid'}&frm=1&rptno=$FORM{'rptno'}\">\n"; print "\t<FRAMESET frameborder=0 cols=\"230,*\">\n"; print "\t\t<FRAME name=\"rpttidx003\" frameborder=0 src=\"$urlroot/likert_wall_A_104.pl?lang=$SESSION{'lang'}&tid=$SESSION{'tid'}&frm=0\">\n"; print "\t\t<FRAME name=\"rptdtl003\" frameborder=0 src=\"$urlroot/likert_wall_A_104.pl?lang=$SESSION{'lang'}&tid=$SESSION{'tid'}&frm=0\">\n"; print "\t</FRAMESET>\n"; print "</FRAMESET>\n"; print "</HTML>\n"; 1 ;