--- loncom/interface/lonstatistics.pm 2004/02/12 22:23:30 1.96 +++ loncom/interface/lonstatistics.pm 2004/02/19 20:17:01 1.97 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstatistics.pm,v 1.96 2004/02/12 22:23:30 matthew Exp $ +# $Id: lonstatistics.pm,v 1.97 2004/02/19 20:17:01 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -65,15 +65,18 @@ use Apache::lonhomework; use Apache::loncommon; use Apache::loncoursedata; use Apache::lonhtmlcommon; +use Apache::lonmysql; +use Apache::lonlocal; +use Time::HiRes; +# +# Statistics Packages use Apache::lonproblemanalysis(); use Apache::lonsubmissiontimeanalysis(); use Apache::loncorrectproblemplot(); use Apache::lonproblemstatistics(); use Apache::lonstudentassessment(); use Apache::lonpercentage; -use Apache::lonmysql; -use Apache::lonlocal; -use Time::HiRes; +use Apache::lonstudentsubmissions(); ####################################################### ####################################################### @@ -1028,6 +1031,11 @@ sub CreateMainMenu { short_description => &mt('Display and analysis of submission times on assessments.'), }, + { internal_name => 'student_submission_reports', + name => &mt('Student Submission Reports'), + short_description => + &mt('Prepare Excel spreadsheets of student submissions.'), + }, { internal_name => 'correct_problems_plot', name => &mt('Correct Problems Plot'), short_description => @@ -1151,6 +1159,8 @@ sub handler { &Apache::lonproblemanalysis::BuildProblemAnalysisPage($r,$c); } elsif($GoToPage eq 'submissiontime_analysis') { &Apache::lonsubmissiontimeanalysis::BuildSubmissionTimePage($r,$c); + } elsif($GoToPage eq 'student_submission_reports') { + &Apache::lonstudentsubmissions::BuildStudentSubmissionsPage($r,$c); } elsif($GoToPage eq 'correct_problems_plot') { &Apache::loncorrectproblemplot::BuildCorrectProblemsPage($r,$c); } elsif($GoToPage eq 'student_assessment') {