&print_page_start;
if($query->param('submitted')) {
   $error_message = "";
   &validate_form;
   if($error_message eq "") {
	&submit_form_values;
   }
   else {

      print "<form><tr><td colspan=2 bgcolor=#FFFFFF><font face=Arial size=2 color=#FF0000>
	<br><b>\n" . $error_message . "</b></td></tr></form>\n";
   }
}
else {
   &set_initial_values;
   &print_form;
}
&print_page_end;