version 1.477, 2009/11/05 18:10:37
|
version 1.478, 2009/11/06 10:14:12
|
Line 2197 ENDPARMSELSCRIPT
|
Line 2197 ENDPARMSELSCRIPT
|
|
|
# Display Unit 1 "General Parameters" |
# Display Unit 1 "General Parameters" |
if (!$pssymb) { |
if (!$pssymb) { |
#$r->print(&Apache::lonhtmlcommon::topic_bar (1,&mt('General Parameters'))); |
$r->print(&Apache::lonhtmlcommon::topic_bar (1,&mt('Resource Specification'))); |
$r->print('<div class="LC_Box">'); |
|
$r->print('<h4 class="LC_hcell">'.&mt('Resource Specification').'</h4>'); |
|
$r->print(<<COURSECONTENTSCRIPT); |
$r->print(<<COURSECONTENTSCRIPT); |
<script type="text/javascript"> |
<script type="text/javascript"> |
// <![CDATA[ |
// <![CDATA[ |
Line 2229 COURSECONTENTSCRIPT
|
Line 2227 COURSECONTENTSCRIPT
|
$r->print(&Apache::lonhtmlcommon::row_closure(1)); |
$r->print(&Apache::lonhtmlcommon::row_closure(1)); |
$r->print(&Apache::lonhtmlcommon::end_pick_box()); |
$r->print(&Apache::lonhtmlcommon::end_pick_box()); |
$r->print('</div>'); |
$r->print('</div>'); |
$r->print('</div>'); |
|
#Display Unit 2 "Select Parameter" |
#Display Unit 2 "Select Parameter" |
#$r->print(&Apache::lonhtmlcommon::topic_bar (2,&mt('Select Parameters'))); |
$r->print(&Apache::lonhtmlcommon::topic_bar (2,&mt('Parameter Specification'))); |
$r->print('<div class="LC_Box">'); |
|
$r->print('<h4 class="LC_hcell">'.&mt('Parameter Specification').'</h4>'); |
|
&displaymenu($r,\%allparms,\%allparts,\@pscat,\@psprt,\%keyorder); |
&displaymenu($r,\%allparms,\%allparts,\@pscat,\@psprt,\%keyorder); |
|
$r->print(&Apache::lonhtmlcommon::topic_bar (3,&mt('User Specification (optional)'))); |
} else { |
} else { |
|
# parameter screen for a single resource. |
my ($map,$id,$resource)=&Apache::lonnet::decode_symb($pssymb); |
my ($map,$id,$resource)=&Apache::lonnet::decode_symb($pssymb); |
my $title = &Apache::lonnet::gettitle($pssymb); |
my $title = &Apache::lonnet::gettitle($pssymb); |
$r->print(&mt('Specific Resource: [_1] ([_2])',$title,$resource). |
$r->print(&mt('Specific Resource: [_1] ([_2])',$title,$resource). |
'<input type="hidden" value="'.$pssymb.'" name="symb" />'. |
'<input type="hidden" value="'.$pssymb.'" name="symb" />'. |
'<br /><label><b>'.&mt('Show all parts').': <input type="checkbox" name="psprt" value="all"'. |
'<br /><label><b>'.&mt('Show all parts').': <input type="checkbox" name="psprt" value="all"'. |
($env{'form.psprt'}?' checked="checked"':'').' /></b></label><br />'); |
($env{'form.psprt'}?' checked="checked"':'').' /></b></label><br />'); |
|
$r->print(&Apache::lonhtmlcommon::topic_bar (3,&mt('User Specification (optional)'),'no_number')); |
} |
} |
$r->print('</div>'); |
|
#$r->print(&Apache::lonhtmlcommon::topic_bar (3,&mt('User Selection'))); |
|
$r->print('<div class="LC_Box">'); |
|
$r->print('<h4 class="LC_hcell">'.&mt('User Specification (optional)').'</h4>'); |
|
$r->print(&Apache::lonhtmlcommon::start_pick_box()); |
$r->print(&Apache::lonhtmlcommon::start_pick_box()); |
&usermenu($r,$uname,$id,$udom,$csec,$cgroup,$parmlev,\@usersgroups); |
&usermenu($r,$uname,$id,$udom,$csec,$cgroup,$parmlev,\@usersgroups); |
$r->print(&Apache::lonhtmlcommon::row_closure(1)); |
$r->print(&Apache::lonhtmlcommon::row_closure(1)); |
$r->print(&Apache::lonhtmlcommon::end_pick_box()); |
$r->print(&Apache::lonhtmlcommon::end_pick_box()); |
$r->print('</div>'); |
|
|
|
# parm selection is shown: display parm update button |
# parm selection is shown: display parm update button |
$r->print('<p>' |
$r->print('<p>' |
Line 2275 COURSECONTENTSCRIPT
|
Line 2268 COURSECONTENTSCRIPT
|
.'</a>' |
.'</a>' |
.'</p>' |
.'</p>' |
); |
); |
|
|
|
|
# Display Messages |
# Display Messages |
$r->print('<div>'.$message.'</div>'); |
$r->print('<div>'.$message.'</div>'); |