'.
- '
'.
- ''.&mt('Utilities').'
'. - '
'.
+ '
'.&mt('Management').'
'. + ''.
+ '
'.
+ '- '.
+ '
- '.&mt('Concept Test Contents').' '. + '
- '.&mt('Display the table of contents for your Concept Test.').' '. + '
- '.&mt('Assemble Concept Test').' '. + '
- '.&mt('If no students have attempted the Concept Test you will be able to modify it. You can also change the start and end date of the test itself.').' '. + '
- '.&mt('Enrollment and Student Activity').' '. + '
- '.&mt('Display or download a course roster, and view information about completion status and last login. You can also add new students, or change access dates for existing students.').'
- '.
+ '
- '.&mt("What's New?").' '. + '
- '.&mt('View information about changes in your Concept Test course.').' '. + '
- '.&mt('Prepare Printable Concept Test').' '. + '
- '.&mt('Create a PDF which you can send to a printer to create a hardcopy of the Concept Test.').' '. + '
- '.&mt('Concept Test Statistics').' '. + '
- '.&mt('After the closing date of the Concept Test you can view and download statistics for the test, as well as anonymized submission data.').' '; + if ($canreq) { + $output .= '
- '.&mt('Create New Test').' '. + '
- '. + &mt('Create a new Concept Test Course Container. Choose GCI questions to include in the test and upload a student roster.').' '; + } + $output .= '
'; } else { my $navtext = &mt('Table of Contents'); - if ($env{'request.role.domain'} eq 'gcitest') { + my $navdesc = &mt('Display Table of Contents for Geoscience Concept Inventory'); + if ($env{'request.role.domain'} =~ /^\w+citest$/) { $navtext = &mt('Display Test Contents'); + $navdesc = &mt('Display the table of contents for this Concept Test'); + } + my $navlink; + if ($env{'environment.remotenavmap'} eq 'on') { + $navlink = "javascript:gonav('/adm/navmaps');" + } else { + $navlink = '/adm/navmaps'; + } + $output .= + '
'.
+ '
'.&mt('Utilities').'
'. + ''.
+ '
';
+ if ($canreq) {
+ $output .= '- '.
+ '
- '.$navtext.' '. + '
- '. + ''.$navdesc.'
'.
+ '
';
+ }
+ $output .= '- '.
+ '
- '.$createtext.' '. + '
- '.&mt('Create a new Concept Test Course Container').'. '.&mt('Choose GCI questions to include in the test and upload a student roster.').'
'; + } + } elsif ($switcher || $canreq) { + $output .= '
'. + '
'.
+ '
';
- }
- if ($context eq 'gcinorole') {
- my $queued = &Apache::loncoursequeueadmin::queued_selfenrollment('notitle');
- if ($queued) {
- $output .= ''.&mt('Utilities').'
'. + ''.
+ '
';
+ if ($switcher) {
+ $output .= '';
}
- } else {
- $output.='- ';
+ if ($canreq) {
+ $output .= '
- '.$createtext.' '. + '
- '.&mt('Create a new Concept Test Course Container. Choose GCI questions to include in the test and upload a student roster.').'
'.
- '
'.&mt('Pending Enrollment Requests').'
'. - $queued. - ''; + } + } elsif ($context eq 'gcinorole') { + my $queued = &Apache::loncoursequeueadmin::queued_selfenrollment('notitle'); + if ($queued) { + $output .= + '
'.
+ '
';
}
- $output.='';
} else {
# calling rawconfig with "1" will evaluate mydesk.tab,
# even if there is no active remote control
@@ -1767,45 +1909,54 @@ sub utilityfunctions {
my $gcimenujs;
if ($custommenu) {
my %concepttests = &Apache::loncommon::existing_gcitest_courses('cc');
- my $managetesturl = '/adm/menu';
- my $createtesturl = '/adm/requestcourse';
+ my (@calls,%switchpage_call,%canrequest,%request_domains);
+ my $canreq = &Apache::lonnet::check_can_request($env{'user.domain'}.'test',
+ \%canrequest,\%request_domains);
+ if ($canreq) {
+ foreach my $call ('createtest','managetest') {
+ push(@calls,$call);
+ }
+ $switchpage_call{'managetest'} = '/adm/menu';
+ $switchpage_call{'createtest'} = '/adm/requestcourse';
+ if ($env{'request.course.id'}) {
+ $switchpage_call{'createtest'} = '/adm/roles?selectrole=1&cm=1&orgurl=%2fadm%2frequestcourse';
+ }
+ }
if (($env{'request.course.id'}) &&
- ($env{'course.'.$env{'request.course.id'}.'.domain'} eq 'gci')) {
+ ($env{'course.'.$env{'request.course.id'}.'.domain'} !~ /^\w+citest$/)) {
my @items = keys(%concepttests);
- if (@items== 1) {
+ if (@items==1) {
my $newrole = $items[0];
$newrole =~ s{_}{/};
- $managetesturl = '/adm/roles?selectrole=1&cc./'.$newrole.'=1';
+ $switchpage_call{'managetest'} = '/adm/roles?selectrole=1&cc./'.$newrole.'=1';
} else {
- $managetesturl = '/adm/roles?selectrole=1&cm=1&orgurl=%2fadm%2fmenu';
+ $switchpage_call{'managetest'} = '/adm/roles?selectrole=1&cm=1&orgurl=%2fadm%2fmenu';
}
}
- if ($env{'request.course.id'}) {
- $createtesturl = '/adm/roles?selectrole=1&cm=1&orgurl=%2fadm%2frequestcourse';
+ my %allnums = &Apache::loncommon::get_faculty_cnums();
+ my $udom = $env{'user.domain'};
+ if (ref($allnums{$udom}) eq 'HASH') {
+ foreach my $key (keys(%{$allnums{$udom}})) {
+ $switchpage_call{$key} = '/adm/roles?selectrole=1&'.
+ 'st./'.$udom.'/'.$allnums{$udom}->{$key}.'=1';
+ push(@calls,$key);
+ }
}
- $gcimenujs = <<"ENDCUSTOM";
-
+ if (@calls > 0) {
+ $gcimenujs = '
function switchpage(caller) {
- if (caller == 'review') {
- document.location.href = '/adm/roles?selectrole=1&st./gci/9615072b469884921gcil1=1';
- }
- if (caller == 'submit') {
- document.location.href = '/adm/roles?selectrole=1&st./gci/1H96711d710194bfegcil1=1';
- }
- if (caller == 'createtest') {
- document.location.href = '$createtesturl';
- }
- if (caller == 'managetest') {
- document.location.href = '$managetesturl';
- }
- if (caller == 'tutorial') {
- document.location.href = '/adm/roles?selectrole=1&st./gci/5422913620b814c90gcil1=1';
- }
-
+';
+ foreach my $call (@calls) {
+ $gcimenujs .= "
+ if (caller == '$call') {
+ document.location.href = '$switchpage_call{$call}';
+ }";
+ }
+ $gcimenujs .= '
return;
}
-
-ENDCUSTOM
+';
+ }
}
my $currenturl=&Apache::lonnet::clutter(&Apache::lonnet::fixversion((split(/\?/,$env{'request.noversionuri'}))[0]));
@@ -1865,12 +2016,6 @@ function go(url) {
}
}
-function gotop(url) {
- if (url!='' && url!= null) {
- top.location.href = url;
- }
-}
-
function gopost(url,postdata) {
if (url!='') {
this.document.server.action=url;