version 1.167, 2007/10/10 00:02:19
|
version 1.169, 2007/11/06 04:39:19
|
Line 486 sub build_url {
|
Line 486 sub build_url {
|
my ($base, $fields)=@_; |
my ($base, $fields)=@_; |
my $url; |
my $url; |
$url = $base.'?'; |
$url = $base.'?'; |
foreach my $key(keys(%$fields)) { |
foreach my $key (keys(%$fields)) { |
$url.=$key.'='.$$fields{$key}.'&'; |
$url.=&escape($key).'='.&escape($$fields{$key}).'&'; |
} |
} |
$url =~ s/&$//; |
$url =~ s/&$//; |
return $url; |
return $url; |
Line 1473 sub course_select_row {
|
Line 1473 sub course_select_row {
|
my ($title,$formname,$totcodes,$codetitles,$idlist,$idlist_titles, |
my ($title,$formname,$totcodes,$codetitles,$idlist,$idlist_titles, |
$css_class) = @_; |
$css_class) = @_; |
my $output = &row_title($title,$css_class); |
my $output = &row_title($title,$css_class); |
$output .= qq| |
$output .= &course_selection($formname,$totcodes,$codetitles,$idlist,$idlist_titles); |
|
$output .= &row_closure(); |
|
return $output; |
|
} |
|
|
|
sub course_selection { |
|
my ($formname,$totcodes,$codetitles,$idlist,$idlist_titles) = @_; |
|
my $output = qq| |
<script type="text/javascript"> |
<script type="text/javascript"> |
function coursePick (formname) { |
function coursePick (formname) { |
for (var i=0; i<formname.coursepick.length; i++) { |
for (var i=0; i<formname.coursepick.length; i++) { |
Line 1546 sub course_select_row {
|
Line 1553 sub course_select_row {
|
$output .= '</tr></table><br />'; |
$output .= '</tr></table><br />'; |
} |
} |
} |
} |
$output .= '<input type="radio" name="coursepick" value="specific" onclick="coursePick(this.form);opencrsbrowser('."'".$formname."'".','."'".'dccourse'."'".','."'".'dcdomain'."'".','."'".'coursedesc'."','','1'".')" />'.&mt('Pick specific course(s):').' '.$courseform.' <input type="text" value="0" size="4" name="coursetotal" /><input type="hidden" name="courselist" value="" />selected.<br />'."\n"; |
$output .= '<input type="radio" name="coursepick" value="specific" onclick="coursePick(this.form);opencrsbrowser('."'".$formname."','dccourse','dcdomain','coursedesc','','1'".')" />'.&mt('Pick specific course(s):').' '.$courseform.' <input type="text" value="0" size="4" name="coursetotal" /><input type="hidden" name="courselist" value="" />selected.<br />'."\n"; |
$output .= &row_closure(); |
|
return $output; |
return $output; |
} |
} |
|
|