--- loncom/interface/lonquickgrades.pm 2011/06/03 01:07:22 1.100 +++ loncom/interface/lonquickgrades.pm 2011/06/04 19:49:28 1.101 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Quick Student Grades Display # -# $Id: lonquickgrades.pm,v 1.100 2011/06/03 01:07:22 www Exp $ +# $Id: lonquickgrades.pm,v 1.101 2011/06/04 19:49:28 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -36,6 +36,7 @@ use Apache::lonlocal; use Apache::lonnet; use Apache::grades; use Apache::loncoursedata; +use Apache::lonstudentassessment; sub handler { my $r = shift; @@ -90,6 +91,39 @@ sub real_handler { my $udom; my $stdid; if ($cangrade) { + $r->print("
'.&mt('Sections').''. + &Apache::loncommon::help_open_topic("Chart_Sections"). + ' | '. + ''.&mt('Groups').''. + ' | '. + ''.&mt('Student Data').''. + &Apache::loncommon::help_open_topic("Chart_Student_Data"). + ' | '. + ''.&mt('Access Status').''. + &Apache::loncommon::help_open_topic("Chart_Enrollment_Status"). + ' | '. + ''.&mt('Output Format').''. + &Apache::loncommon::help_open_topic("Chart_Output_Formats"). + ' | |
'."\n". + &Apache::lonstatistics::SectionSelect('Section','multiple',5). + ' | '. + &Apache::lonstatistics::GroupSelect('Group','multiple',5). + ' | '. + &Apache::lonstatistics::StudentDataSelect('StudentData','multiple',5,undef). + ' | '."\n". + &Apache::lonhtmlcommon::StatusOptions(undef,undef,5). + ' | '."\n". + &Apache::lonstudentassessment::CreateAndParseOutputSelector(). + ' | '. + ''. + ' |
'.&mt('Full Name: [_1]',&Apache::loncommon::plainname($uname,$udom)).'
'); }