-Section/Group:
-
-
-For User
-
-or ID
-
-at Domain
-
+$sections
+$groups
+
+$lt{'fu'}
+
+$lt{'oi'}
+
+$lt{'ad'}
+$chooseopt
-
-
-
-
-ENDHEAD
+ENDMENU
+}
- $r->print(''.$message.'
Sort list by ');
- $r->print('');
-# ----------------------------------------------------------------- Start Table
- my $coursespan=$csec?8:5;
- $r->print(<
- |
-Any User |
-ENDTABLEHEAD
- if ($uname) {
- $r->print("User $uname at Domain $udom | ");
+sub displaymenu {
+ my ($r,$allparms,$allparts,$pscat,$psprt,$keyorder)=@_;
+ $r->print(''.&mt('Select Parameters to View').' | '.
+ &mt('Select Parts to View').' |
---|
');
+ &parmmenu($r,$allparms,$pscat,$keyorder);
+ $r->print(' | ');
+ &partmenu($r,$allparts,$psprt);
+ $r->print(' |
');
+}
+
+sub mapmenu {
+ my ($r,$allmaps,$pschp,$maptitles)=@_;
+ $r->print(''.&mt('Select Enclosing Map or Folder').' ');
+ $r->print('
---|
|
-Resource Level |
-in Course |
-ENDTABLETWO
- if ($csec) {
- $r->print("in Section/Group $csec | ");
+ $r->print("");
+}
+
+sub levelmenu {
+ my ($r,$alllevs,$parmlev)=@_;
+ $r->print(''.&mt('Select Parameter Level').
+ &Apache::loncommon::help_open_topic('Course_Parameter_Levels').' ');
+ $r->print('
---|