print "</table>" . NEWLINE;
     print "</td>" . NEWLINE;
     print "</tr>" . NEWLINE;
     print "</table>" . NEWLINE;
     print "</form>" . NEWLINE;
 }
 # ----------------------------------------------------------------------------------
 # Environment Table
 # ----------------------------------------------------------------------------------
 print "<br>" . NEWLINE;
 print "<form method=post action='{$page}?order_by={$order_by}&amp;order_dir={$order_dir}'>" . NEWLINE;
 print "<input type=hidden name=table value=project_manage_environment>" . NEWLINE;
 print "<table class=hide70>" . NEWLINE;
 print "<tr>" . NEWLINE;
 print "<td>" . NEWLINE;
 $rows_environments = project_get_environments($selected_project_id, $order_by, $order_dir, $page_number);
 print "<input type=hidden name='order_dir' value='{$order_dir}'>";
 print "<input type=hidden name='order_by' value='{$order_by}'>";
 print "</td>" . NEWLINE;
 print "</tr>" . NEWLINE;
 print "</table>" . NEWLINE;
 print "</form>" . NEWLINE;
 if ($rows_environments) {
     print "<table class='width70' rules=cols>" . NEWLINE;
     print "<tr>" . NEWLINE;
     html_tbl_print_header(lang_get('environment'), ENVIRONMENT_NAME, $order_by, $order_dir, "{$page}?page_number={$page_number}", $page_number);
     if ($project_manager) {
         html_tbl_print_header(lang_get('edit'));
         html_tbl_print_header(lang_get('delete'));
     }
     print "\n</tr>" . NEWLINE;
print "<td class='form-data-l'>" . NEWLINE;
print "<textarea rows='5' cols='40' name='test_run_comments'>" . session_validate_form_get_field("test_run_comments", $row_comments) . "</textarea>" . NEWLINE;
print "</td>" . NEWLINE;
print "</tr>" . NEWLINE;
# Duration
print "<tr>" . NEWLINE;
#print"<td class='form-lbl-r'>". lang_get('duration') ."</td>". NEWLINE;
print "<td class='form-lbl-r'>" . lang_get('time_to_run_test') . "</td>" . NEWLINE;
print "<td class='form-data-l'><input type='text' size='3' name='duration' value='" . session_validate_form_get_field("duration") . "'>&nbsp; " . lang_get('in_minutes') . "</td>" . NEWLINE;
print "</tr>" . NEWLINE;
# Environment
print "<tr>" . NEWLINE;
print "<td class='form-lbl-r'>" . lang_get('environment') . "</td>" . NEWLINE;
print "<td class='form-data-l'>" . NEWLINE;
print "<select name='environment' size=1>" . NEWLINE;
$rows_environments = project_get_environments($project_id);
foreach ($rows_environments as $row_environment) {
    $list[$row_environment[ENVIRONMENT_NAME]] = $row_environment[ENVIRONMENT_NAME];
}
$list[""] = "";
html_print_list_box_from_key_array($list, session_validate_form_get_field("environment", $row_env));
print "</select>" . NEWLINE;
print "</td>" . NEWLINE;
print "</tr>";
# OS
print "<tr>" . NEWLINE;
print "<td class=form-lbl-r>" . lang_get('os') . "</td>" . NEWLINE;
print "<td class='form-data-l'>" . NEWLINE;
print "<select name='os' size=1>" . NEWLINE;
$os = results_get_os();
html_print_list_box_from_array($os, session_validate_form_get_field("os", $row_os));