version 1.5, 2003/07/23 19:26:01
|
version 1.6, 2003/09/29 16:33:41
|
Line 5
|
Line 5
|
my %dateTypeHash = ('open_date' => "opening date", |
my %dateTypeHash = ('open_date' => "opening date", |
'due_date' => "due date", |
'due_date' => "due date", |
'answer_date' => "answer open date", |
'answer_date' => "answer open date", |
'tries' => 'number of tries' |
'tries' => 'number of tries', |
|
'weight' => 'problem weight' |
); |
); |
my %levelTypeHash = ('whole_course' => "all problems in the course", |
my %levelTypeHash = ('whole_course' => "all problems in the course", |
'map' => 'the selected folder', |
'map' => 'the selected folder', |
Line 90
|
Line 91
|
<choice computer="due_date" nextstate="CHOOSE_DATE">Set a <b>due date</b></choice> |
<choice computer="due_date" nextstate="CHOOSE_DATE">Set a <b>due date</b></choice> |
<choice computer="answer_date" nextstate="CHOOSE_DATE">Set an <b>answer open date</b></choice> |
<choice computer="answer_date" nextstate="CHOOSE_DATE">Set an <b>answer open date</b></choice> |
<choice computer="tries" nextstate="CHOOSE_TRIES">Set the <b>number of tries</b></choice> |
<choice computer="tries" nextstate="CHOOSE_TRIES">Set the <b>number of tries</b></choice> |
|
<choice computer="weight" nextstate="CHOOSE_WEIGHT">Set the <b>problem weight</b></choice> |
</choices> |
</choices> |
</state> |
</state> |
|
|
<state name="CHOOSE_TRIES" title="Set Number of Tries"> |
<state name="CHOOSE_WEIGHT" title="Set Problem Weight"> |
|
<eval>return 'What weight should be set for ' . |
|
&{$helper->{DATA}->{'levelType'}}() |
|
. '?<br />'; |
|
</eval> |
|
<string nextstate="CHOOSE_STUDENT_LEVEL" variable="WEIGHT"> |
|
<validator>if ($val !~ /^[1234567890]+(\.[1234567890]+)?$/) { |
|
return '"' . $element->getValue() . '" is not '. |
|
'an acceptable weight. Weight must be a positive number. ';} |
|
return undef; |
|
</validator> |
|
</string> |
|
</state> |
|
|
|
<state name="CHOOSE_TRIES" title="Set Problem Tries"> |
<eval>return 'How many tries should be set for ' . |
<eval>return 'How many tries should be set for ' . |
&{$helper->{DATA}->{'levelType'}}() |
&{$helper->{DATA}->{'levelType'}}() |
. '?<br />'; |
. '?<br />'; |
Line 101
|
Line 117
|
<string nextstate="CHOOSE_STUDENT_LEVEL" variable="TRIES"> |
<string nextstate="CHOOSE_STUDENT_LEVEL" variable="TRIES"> |
<validator>if ($val !~ /^[1234567890]+$/) { |
<validator>if ($val !~ /^[1234567890]+$/) { |
return '"' . $element->getValue() . '" is not '. |
return '"' . $element->getValue() . '" is not '. |
'an acceptable number of tries. Tries must be a postive number ' . |
'an acceptable number of tries. Tries must be a positive number ' . |
'with no decimal point.';} |
'with no decimal point.';} |
return undef; |
return undef; |
</validator> |
</validator> |