2001-11-22 06:23:56 +00:00
|
|
|
<?PHP // $Id$
|
|
|
|
|
|
|
|
include("../../config.php");
|
|
|
|
include("lib.php");
|
|
|
|
|
|
|
|
// Check that all the parameters have been provided.
|
|
|
|
|
|
|
|
require_variable($id); // Course Module ID
|
|
|
|
|
|
|
|
if (! $cm = get_record("course_modules", "id", $id)) {
|
|
|
|
error("Course Module ID was incorrect");
|
|
|
|
}
|
|
|
|
|
|
|
|
if (! $course = get_record("course", "id", $cm->course)) {
|
|
|
|
error("Course is misconfigured");
|
|
|
|
}
|
|
|
|
|
|
|
|
require_login($course->id);
|
|
|
|
|
|
|
|
if (!isteacher($course->id)) {
|
|
|
|
error("Sorry, only teachers can see this.");
|
|
|
|
}
|
|
|
|
|
|
|
|
if (! $survey = get_record("survey", "id", $cm->instance)) {
|
|
|
|
error("Survey ID was incorrect");
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
$ME = qualified_me()."?id=$id";
|
|
|
|
|
2002-08-12 17:54:00 +00:00
|
|
|
$strreport = get_string("report", "survey");
|
|
|
|
$strsurveys = get_string("modulenameplural", "survey");
|
|
|
|
$strsummary = get_string("summary", "survey");
|
|
|
|
$strscales = get_string("scales", "survey");
|
|
|
|
$strquestion = get_string("question", "survey");
|
|
|
|
$strquestions = get_string("questions", "survey");
|
|
|
|
$strdownload = get_string("download", "survey");
|
|
|
|
$strallscales = get_string("allscales", "survey");
|
|
|
|
$strallquestions = get_string("allquestions", "survey");
|
|
|
|
$strselectedquestions = get_string("selectedquestions", "survey");
|
|
|
|
$strseemoredetail = get_string("seemoredetail", "survey");
|
|
|
|
$strnotes = get_string("notes", "survey");
|
|
|
|
|
2002-12-30 05:13:43 +00:00
|
|
|
if (empty($action)) {
|
2001-11-22 06:23:56 +00:00
|
|
|
$display = "summary";
|
|
|
|
}
|
|
|
|
|
2002-12-30 05:13:43 +00:00
|
|
|
if (!empty($display)) { // Display the frame containing something.
|
2002-05-31 09:07:11 +00:00
|
|
|
add_to_log($course->id, "survey", "view report", "report.php?id=$cm->id", "$survey->id");
|
2002-08-12 17:54:00 +00:00
|
|
|
echo "<HEAD><TITLE>$course->shortname: $strreport: $survey->name</TITLE>\n";
|
|
|
|
echo "<FRAMESET ROWS=70,* BORDER=1> ";
|
|
|
|
echo " <FRAME NAME=reporttop SRC=\"report.php?action=top&id=$id\"> \n";
|
|
|
|
echo " <FRAMESET COLS=150,* BORDER=1> ";
|
|
|
|
echo " <FRAME NAME=reportmenu SRC=\"report.php?action=menu&id=$id\"> \n";
|
|
|
|
echo " <FRAME NAME=reportmain SRC=\"report.php?action=$display&id=$id\"> \n";
|
|
|
|
echo " </FRAMESET>\n";
|
2001-11-22 06:23:56 +00:00
|
|
|
echo "</FRAMESET>\n";
|
|
|
|
exit;
|
|
|
|
}
|
|
|
|
|
|
|
|
switch ($action) {
|
2002-08-12 17:54:00 +00:00
|
|
|
case "top":
|
|
|
|
if ($course->category) {
|
|
|
|
$navigation = "<A TARGET=_top HREF=\"../../course/view.php?id=$course->id\">$course->shortname</A> ->
|
|
|
|
<A TARGET=_top HREF=\"index.php?id=$course->id\">$strsurveys</A> ->
|
|
|
|
<A TARGET=_top HREF=\"view.php?id=$cm->id\">$survey->name</A> -> ";
|
|
|
|
} else {
|
|
|
|
$navigation = "<A TARGET=_top HREF=\"index.php?id=$course->id\">$strsurveys</A> ->
|
|
|
|
<A TARGET=_top HREF=\"view.php?id=$cm->id\">$survey->name</A> -> ";
|
|
|
|
}
|
|
|
|
print_header("$course->shortname: $survey->name", "$course->fullname", "$navigation $strreport");
|
|
|
|
break;
|
|
|
|
|
2001-11-22 06:23:56 +00:00
|
|
|
case "menu":
|
2002-08-12 17:54:00 +00:00
|
|
|
print_header();
|
|
|
|
echo "<P><FONT SIZE=2><A TARGET=reportmain HREF=\"report.php?action=summary&id=$id\">$strsummary</A></FONT></P>";
|
|
|
|
echo "<P><FONT SIZE=2><A TARGET=reportmain HREF=\"report.php?action=scales&id=$id\">$strscales</A></FONT></P>";
|
|
|
|
echo "<P><FONT SIZE=2><A TARGET=reportmain HREF=\"report.php?action=questions&id=$id\">$strquestions</A></FONT></P>";
|
|
|
|
echo "<P><FONT SIZE=2><A TARGET=reportmain HREF=\"report.php?action=students&id=$id\">$course->student:</A></FONT></P>";
|
2002-08-01 04:49:26 +00:00
|
|
|
if ($users = survey_get_responses($survey->id)) {
|
2001-11-22 06:23:56 +00:00
|
|
|
foreach ($users as $user) {
|
|
|
|
echo "<LI><FONT SIZE=1>";
|
|
|
|
echo "<A TARGET=reportmain HREF=\"report.php?action=student&student=$user->id&id=$id\">";
|
|
|
|
echo "$user->firstname $user->lastname";
|
|
|
|
echo "</A></FONT></LI>";
|
|
|
|
}
|
|
|
|
}
|
2002-08-12 17:54:00 +00:00
|
|
|
echo "<P><FONT SIZE=2><A TARGET=reportmain HREF=\"report.php?action=download&id=$id\">$strdownload</A></FONT></P>";
|
2001-11-22 06:23:56 +00:00
|
|
|
break;
|
|
|
|
|
|
|
|
case "summary":
|
2002-08-14 06:27:24 +00:00
|
|
|
print_header("$survey->name: $strsummary", "$strsummary - $strallscales");
|
2001-11-22 06:23:56 +00:00
|
|
|
|
2002-08-01 04:49:26 +00:00
|
|
|
if (survey_count_responses($survey->id)) {
|
2002-08-12 17:54:00 +00:00
|
|
|
echo "<P ALIGN=CENTER><A HREF=\"report.php?action=scales&id=$id\"><IMG HEIGHT=$SURVEY_GHEIGHT WIDTH=$SURVEY_GWIDTH tail\" BORDER=1 SRC=\"graph.php?id=$id&type=overall.png\"></A>";
|
2002-06-25 07:17:51 +00:00
|
|
|
} else {
|
2002-08-12 17:54:00 +00:00
|
|
|
echo "<P ALIGN=CENTER>".get_string("nobodyyet","survey")."</P>";
|
2002-06-25 07:17:51 +00:00
|
|
|
}
|
2001-11-22 06:23:56 +00:00
|
|
|
print_footer($course);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case "scales":
|
2002-08-14 06:27:24 +00:00
|
|
|
print_header("$survey->name: $strscales", "$strallscales");
|
2001-11-22 06:23:56 +00:00
|
|
|
|
2002-12-23 05:57:05 +00:00
|
|
|
$questions = get_records_list("survey_questions", "id", $survey->questions);
|
2001-11-22 06:23:56 +00:00
|
|
|
$questionorder = explode(",", $survey->questions);
|
|
|
|
|
|
|
|
foreach ($questionorder as $key => $val) {
|
|
|
|
$question = $questions[$val];
|
|
|
|
if ($question->type < 0) { // We have some virtual scales. Just show them.
|
|
|
|
$virtualscales = true;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
foreach ($questionorder as $key => $val) {
|
|
|
|
$question = $questions[$val];
|
|
|
|
if ($question->multi) {
|
|
|
|
if ($virtualscales && $question->type > 0) { // Don't show non-virtual scales if virtual
|
|
|
|
continue;
|
|
|
|
}
|
2002-08-12 17:54:00 +00:00
|
|
|
echo "<P ALIGN=center><A TITLE=\"$strseemoredetail\" HREF=report.php?action=questions&id=$id&qid=$question->multi>";
|
|
|
|
echo "<IMG HEIGHT=$SURVEY_GHEIGHT WIDTH=$SURVEY_GWIDTH BORDER=1
|
2001-11-22 06:23:56 +00:00
|
|
|
SRC=\"graph.php?id=$id&qid=$question->id&type=multiquestion.png\">";
|
|
|
|
echo "</A></P><BR>";
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
print_footer($course);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case "questions":
|
|
|
|
|
|
|
|
if ($qid) { // just get one multi-question
|
2002-12-23 05:57:05 +00:00
|
|
|
$questions = get_records_list("survey_questions", "id", $qid);
|
2001-11-22 06:23:56 +00:00
|
|
|
$questionorder = explode(",", $qid);
|
|
|
|
|
2002-08-14 06:13:20 +00:00
|
|
|
if ($scale = get_records("survey_questions", "multi", "$qid")) {
|
|
|
|
$scale = array_pop($scale);
|
2002-08-14 06:27:24 +00:00
|
|
|
print_header("$survey->name: $strquestions", "$scale->text - $strselectedquestions");
|
|
|
|
} else {
|
|
|
|
print_header("$survey->name: $strquestions", "$strselectedquestions");
|
2002-08-14 06:13:20 +00:00
|
|
|
}
|
|
|
|
|
2001-11-22 06:23:56 +00:00
|
|
|
} else { // get all top-level questions
|
2002-12-23 05:57:05 +00:00
|
|
|
$questions = get_records_list("survey_questions", "id", $survey->questions);
|
2001-11-22 06:23:56 +00:00
|
|
|
$questionorder = explode(",", $survey->questions);
|
|
|
|
|
2002-08-14 06:27:24 +00:00
|
|
|
print_header("$survey->name: $strquestions", "$strallquestions");
|
2001-11-22 06:23:56 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
foreach ($questionorder as $key => $val) {
|
|
|
|
$question = $questions[$val];
|
|
|
|
if ($question->type < 0) { // We have some virtual scales. DON'T show them.
|
|
|
|
$virtualscales = true;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
foreach ($questionorder as $key => $val) {
|
|
|
|
$question = $questions[$val];
|
|
|
|
|
|
|
|
if ($question->type < 0) { // We have some virtual scales. DON'T show them.
|
|
|
|
continue;
|
|
|
|
}
|
2002-12-23 10:18:51 +00:00
|
|
|
$question->text = get_string($question->text, "survey");
|
2001-11-22 06:23:56 +00:00
|
|
|
|
|
|
|
if ($question->multi) {
|
2002-12-23 10:18:51 +00:00
|
|
|
echo "<H3>$question->text:</H3>";
|
2001-11-22 06:23:56 +00:00
|
|
|
|
2002-12-23 05:57:05 +00:00
|
|
|
$subquestions = get_records_list("survey_questions", "id", $question->multi);
|
2001-11-22 06:23:56 +00:00
|
|
|
$subquestionorder = explode(",", $question->multi);
|
|
|
|
foreach ($subquestionorder as $key => $val) {
|
|
|
|
$subquestion = $subquestions[$val];
|
|
|
|
if ($subquestion->type > 0) {
|
2002-08-12 17:54:00 +00:00
|
|
|
echo "<P ALIGN=CENTER><A TITLE=\"$strseemoredetail\" HREF=\"report.php?action=question&id=$id&qid=$subquestion->id\">
|
2002-12-23 10:18:51 +00:00
|
|
|
<IMG HEIGHT=\"$SURVEY_GHEIGHT\" WIDTH=\"$SURVEY_GWIDTH\" BORDER=1 SRC=\"graph.php?id=$id&qid=$subquestion->id&type=question.png\"></A></P>";
|
2001-11-22 06:23:56 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
} else if ($question->type > 0 ) {
|
2002-08-12 17:54:00 +00:00
|
|
|
echo "<P ALIGN=CENTER><A TITLE=\"$strseemoredetail\" HREF=\"report.php?action=question&id=$id&qid=$question->id\">
|
2002-12-23 10:18:51 +00:00
|
|
|
<IMG HEIGHT=\"$SURVEY_GHEIGHT\" WIDTH=\"$SURVEY_GWIDTH\" BORDER=1 SRC=\"graph.php?id=$id&qid=$question->id&type=question.png\"></A></P>";
|
2001-11-22 06:23:56 +00:00
|
|
|
} else {
|
2002-12-23 10:18:51 +00:00
|
|
|
echo "<H3>$question->text:</H3>";
|
2002-12-23 05:57:05 +00:00
|
|
|
if ($aaa = survey_get_user_answers($survey->id, $question->id)) {
|
2001-11-22 06:23:56 +00:00
|
|
|
echo "<UL>";
|
|
|
|
foreach ($aaa as $a) {
|
|
|
|
echo "<LI>$a->firstname $a->lastname: $a->answer1";
|
|
|
|
}
|
|
|
|
echo "</UL>";
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
print_footer($course);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case "question":
|
|
|
|
if (!$question = get_record("survey_questions", "id", $qid)) {
|
|
|
|
error("Question doesn't exist");
|
|
|
|
}
|
2002-12-23 10:18:51 +00:00
|
|
|
$question->text = get_string($question->text, "survey");
|
2001-11-22 06:23:56 +00:00
|
|
|
|
2002-11-09 06:22:57 +00:00
|
|
|
$answers = explode(",", get_string($question->options, "survey"));
|
2001-11-22 06:23:56 +00:00
|
|
|
|
2002-08-14 06:27:24 +00:00
|
|
|
print_header("$survey->name: $strquestion", "$strquestion: $question->text");
|
2001-11-22 06:23:56 +00:00
|
|
|
|
|
|
|
|
2002-08-12 17:54:00 +00:00
|
|
|
$strname = get_string("name", "survey");
|
|
|
|
$strtime = get_string("time", "survey");
|
|
|
|
$stractual = get_string("actual", "survey");
|
|
|
|
$strpreferred = get_string("preferred", "survey");
|
|
|
|
|
|
|
|
echo "<TABLE ALIGN=center CELLPADDING=0 CELLSPACING=10><TR><TD> <TH align=left>$strname<TH align=left>$strtime<TH align=left>$stractual<TH align=left>$strpreferred</TR>";
|
2001-11-22 06:23:56 +00:00
|
|
|
|
2002-12-23 05:57:05 +00:00
|
|
|
if ($aaa = survey_get_user_answers($survey->id, $question->id)) {
|
|
|
|
foreach ($aaa as $a) {
|
|
|
|
echo "<TR>";
|
|
|
|
echo "<TD WIDTH=35>";
|
2002-12-23 09:39:26 +00:00
|
|
|
print_user_picture($a->userid, $course->id, $a->picture, false);
|
2002-12-23 05:57:05 +00:00
|
|
|
echo "</TD>";
|
2002-12-23 09:39:26 +00:00
|
|
|
echo "<TD><P><A HREF=\"report.php?id=$id&action=student&student=$a->userid\">$a->firstname $a->lastname</A></TD>";
|
2002-12-23 05:57:05 +00:00
|
|
|
echo "<TD><P>".userdate($a->time, "%d %B %Y, %I:%M %p")."</TD>";
|
|
|
|
echo "<TD BGCOLOR=\"$THEME->cellcontent\"><P>";
|
|
|
|
if ($a->answer1) {
|
|
|
|
echo "$a->answer1 - ".$answers[$a->answer1 - 1];
|
|
|
|
} else {
|
|
|
|
echo " ";
|
|
|
|
}
|
|
|
|
echo "</TD><TD BGCOLOR=\"$THEME->cellcontent\"><P>";
|
|
|
|
if ($a->answer2) {
|
|
|
|
echo "$a->answer2 - ".$answers[$a->answer2 - 1];
|
|
|
|
} else {
|
|
|
|
echo " ";
|
|
|
|
}
|
|
|
|
echo "</TD></TR>";
|
|
|
|
|
|
|
|
}
|
2001-11-22 06:23:56 +00:00
|
|
|
}
|
|
|
|
|
2002-12-23 05:57:05 +00:00
|
|
|
echo "</TABLE>";
|
2001-11-22 06:23:56 +00:00
|
|
|
|
|
|
|
print_footer($course);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case "students":
|
|
|
|
|
2002-08-12 17:54:00 +00:00
|
|
|
print_header("$survey->name: $course->student", get_string("analysisof", "survey", "$course->student"));
|
2001-11-22 06:23:56 +00:00
|
|
|
|
2002-08-01 04:49:26 +00:00
|
|
|
if (! $results = survey_get_responses($survey->id) ) {
|
2002-08-12 17:54:00 +00:00
|
|
|
notify(get_string("nobodyyet","survey"));
|
2001-11-22 06:23:56 +00:00
|
|
|
} else {
|
2002-08-01 04:49:26 +00:00
|
|
|
survey_print_all_responses($cm->id, $results);
|
2001-11-22 06:23:56 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
print_footer($course);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case "student":
|
|
|
|
if (!$user = get_record("user", "id", $student)) {
|
|
|
|
error("Student doesn't exist");
|
|
|
|
}
|
|
|
|
|
2002-12-23 09:39:26 +00:00
|
|
|
print_header("$survey->name: $user->firstname $user->lastname",
|
2002-08-12 17:54:00 +00:00
|
|
|
get_string("analysisof", "survey", "$user->firstname $user->lastname"));
|
2001-11-22 06:23:56 +00:00
|
|
|
|
|
|
|
if (isset($notes)) {
|
2002-08-01 04:49:26 +00:00
|
|
|
if (survey_get_analysis($survey->id, $user->id)) {
|
|
|
|
if (! survey_update_analysis($survey->id, $user->id, $notes)) {
|
2001-11-22 06:23:56 +00:00
|
|
|
notify("An error occurred while saving your notes. Sorry.");
|
2002-08-12 17:54:00 +00:00
|
|
|
} else {
|
|
|
|
notify(get_string("savednotes", "survey"));
|
2001-11-22 06:23:56 +00:00
|
|
|
}
|
|
|
|
} else {
|
2002-08-01 04:49:26 +00:00
|
|
|
if (! survey_add_analysis($survey->id, $user->id, $notes)) {
|
2001-11-22 06:23:56 +00:00
|
|
|
notify("An error occurred while saving your notes. Sorry.");
|
2002-08-12 17:54:00 +00:00
|
|
|
} else {
|
|
|
|
notify(get_string("savednotes", "survey"));
|
2001-11-22 06:23:56 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
print_heading("$user->firstname $user->lastname");
|
|
|
|
|
|
|
|
echo "<P ALIGN=CENTER>";
|
|
|
|
print_user_picture($user->id, $course->id, $user->picture, true);
|
|
|
|
echo "</P>";
|
|
|
|
|
|
|
|
// Print overall summary
|
2002-08-01 04:49:26 +00:00
|
|
|
echo "<P ALIGN=CENTER><IMG HEIGHT=$SURVEY_GHEIGHT WIDTH=$SURVEY_GWIDTH ALIGN=CENTER SRC=\"graph.php?id=$id&sid=$student&type=student.png\"></P>";
|
2001-11-22 06:23:56 +00:00
|
|
|
|
|
|
|
// Print scales
|
2002-12-23 05:57:05 +00:00
|
|
|
$questions = get_records_list("survey_questions", "id", $survey->questions);
|
2001-11-22 06:23:56 +00:00
|
|
|
$questionorder = explode(",", $survey->questions);
|
|
|
|
|
|
|
|
foreach ($questionorder as $key => $val) {
|
|
|
|
$question = $questions[$val];
|
|
|
|
if ($question->type < 0) { // We have some virtual scales. Just show them.
|
|
|
|
$virtualscales = true;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
foreach ($questionorder as $key => $val) {
|
|
|
|
$question = $questions[$val];
|
|
|
|
if ($question->multi) {
|
|
|
|
if ($virtualscales && $question->type > 0) { // Don't show non-virtual scales if virtual
|
|
|
|
continue;
|
|
|
|
}
|
2002-08-12 17:54:00 +00:00
|
|
|
echo "<P ALIGN=center><A TITLE=\"$strseemoredetail\" HREF=report.php?action=questions&id=$id&qid=$question->multi>";
|
|
|
|
echo "<IMG HEIGHT=$SURVEY_GHEIGHT WIDTH=$SURVEY_GWIDTH BORDER=1
|
2001-11-22 06:23:56 +00:00
|
|
|
SRC=\"graph.php?id=$id&qid=$question->id&sid=$student&type=studentmultiquestion.png\">";
|
|
|
|
echo "</A></P><BR>";
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2002-08-01 04:49:26 +00:00
|
|
|
if ($rs = survey_get_analysis($survey->id, $user->id)) {
|
2001-11-22 06:23:56 +00:00
|
|
|
$notes = $rs->notes;
|
|
|
|
} else {
|
|
|
|
$notes = "";
|
|
|
|
}
|
|
|
|
echo "<HR NOSHADE SIZE=1>";
|
|
|
|
echo "<CENTER>";
|
|
|
|
echo "<FORM ACTION=report.php METHOD=post NAME=form>";
|
2002-08-12 17:54:00 +00:00
|
|
|
echo "<H3>$strnotes:</H3>";
|
2001-11-22 06:23:56 +00:00
|
|
|
echo "<BLOCKQUOTE>";
|
|
|
|
echo "<TEXTAREA NAME=notes ROWS=10 COLS=60>";
|
|
|
|
p($notes);
|
|
|
|
echo "</TEXTAREA><BR>";
|
|
|
|
echo "<INPUT TYPE=hidden NAME=action VALUE=student>";
|
|
|
|
echo "<INPUT TYPE=hidden NAME=student VALUE=$student>";
|
|
|
|
echo "<INPUT TYPE=hidden NAME=id VALUE=$cm->id>";
|
2002-08-12 17:54:00 +00:00
|
|
|
echo "<INPUT TYPE=submit VALUE=\"".get_string("savechanges")."\">";
|
2001-11-22 06:23:56 +00:00
|
|
|
echo "</BLOCKQUOTE>";
|
|
|
|
echo "</FORM>";
|
|
|
|
echo "</CENTER>";
|
|
|
|
|
|
|
|
|
|
|
|
print_footer($course);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case "download":
|
2002-08-12 17:54:00 +00:00
|
|
|
print_header("$survey->name: $strdownload", "$strdownload");
|
|
|
|
|
|
|
|
$strdownloadinfo = get_string("downloadinfo", "survey");
|
|
|
|
$strdownloadexcel = get_string("downloadexcel", "survey");
|
|
|
|
$strdownloadtext = get_string("downloadtext", "survey");
|
2001-11-22 06:23:56 +00:00
|
|
|
|
2002-08-12 17:54:00 +00:00
|
|
|
echo "<P>$strdownloadinfo</P>";
|
2001-11-22 06:23:56 +00:00
|
|
|
|
2002-08-12 17:54:00 +00:00
|
|
|
echo "<H2 ALIGN=CENTER><A HREF=\"download.php?id=$id&type=xls\">$strdownloadexcel</A></H2>";
|
|
|
|
echo "<H2 ALIGN=CENTER><A HREF=\"download.php?id=$id&type=text\">$strdownloadtext</A></H2>";
|
2001-11-22 06:23:56 +00:00
|
|
|
|
|
|
|
print_footer($course);
|
|
|
|
break;
|
|
|
|
|
|
|
|
}
|
2002-06-25 07:10:01 +00:00
|
|
|
?>
|