[BACK]Return to lonsurveyreports.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface / statistics

Diff for /loncom/interface/statistics/lonsurveyreports.pm between versions 1.8 and 1.12

version 1.8, 2005/04/07 06:56:24 version 1.12, 2006/05/05 20:03:43
Line 206  sub SurveyProblemSelector { Line 206  sub SurveyProblemSelector {
             '<input type="radio" name="problemchoice" id="'.$id.'" '.              '<input type="radio" name="problemchoice" id="'.$id.'" '.
                    'value="'.$value.'" '.$checked.'/>'.'</td>'.                     'value="'.$value.'" '.$checked.'/>'.'</td>'.
             '<td><nobr>'.              '<td><nobr>'.
             '<label for="'.$id.'">'.$problem->{'res'}->compTitle.'('.$problem->{'seq'}->compTitle.')'.'</lablel>'.              '<label for="'.$id.'">'.$problem->{'res'}->compTitle.'('.$problem->{'seq'}->compTitle.')'.'</label>'.
             ('&nbsp;'x2).              ('&nbsp;'x2).
             qq{<a target="preview" href="$link">view</a>}.'</td></tr>'.$/;              qq{<a target="preview" href="$link">view</a>}.'</td></tr>'.$/;
     }      }
Line 483  sub make_HTML_report { Line 483  sub make_HTML_report {
             $Str .= '<tr>'.              $Str .= '<tr>'.
                 '<td><b>'.&mt('Total').'</b></td>'.                  '<td><b>'.&mt('Total').'</b></td>'.
                 '<td>'.$data->{'_count'}.'</td>'.                  '<td>'.$data->{'_count'}.'</td>'.
                 '<td>'.&mt('Part [_1], Response [_2]',$partid,$respid).'</td>'.                  '<td>'.&mt('Part [_1], Response [_2]',
      $resource->part_display($partid),$respid).'</td>'.
                 '</tr>';                  '</tr>';
             if (exists($data->{'responses'}) &&               if (exists($data->{'responses'}) && 
                 ref($data->{'responses'}) eq 'ARRAY') {                  ref($data->{'responses'}) eq 'ARRAY') {
Line 605  sub CreateInterface { Line 606  sub CreateInterface {
         $output_selector.= '>'.$output_format->{'text'}.'</option>'.$/;          $output_selector.= '>'.$output_format->{'text'}.'</option>'.$/;
     }      }
     $output_selector .= '</select>'.$/;      $output_selector .= '</select>'.$/;
     $Str .= &Apache::lonhtmlcommon::breadcrumbs      $Str .= &Apache::lonhtmlcommon::breadcrumbs('Student Submission Reports');
         (undef,'Student Submission Reports');  
     $Str .= '<p>';      $Str .= '<p>';
     $Str .= '<table cellspacing="5">'."\n";      $Str .= '<table cellspacing="5">'."\n";
     $Str .= '<tr>';      $Str .= '<tr>';
     $Str .= '<th>'.&mt('Sections').'</th>';      $Str .= '<th>'.&mt('Sections').'</th>';
       $Str .= '<th>'.&mt('Groups').'</th>';
     $Str .= '<th>'.&mt('Enrollment Status').'</th>';      $Str .= '<th>'.&mt('Enrollment Status').'</th>';
     $Str .= '<th>'.&mt('Output Format').'</th>';      $Str .= '<th>'.&mt('Output Format').'</th>';
     $Str .= '<th>'.'&nbsp;'.'</th>';      $Str .= '<th>'.'&nbsp;'.'</th>';
Line 620  sub CreateInterface { Line 621  sub CreateInterface {
     $Str .= &Apache::lonstatistics::SectionSelect('Section','multiple',5);      $Str .= &Apache::lonstatistics::SectionSelect('Section','multiple',5);
     $Str .= '</td>';      $Str .= '</td>';
     #      #
       $Str .= '<td align="center">'."\n";
       $Str .= &Apache::lonstatistics::GroupSelect('Group','multiple',5);
       $Str .= '</td>';
       #
     $Str .= '<td align="center">';      $Str .= '<td align="center">';
     $Str .= &Apache::lonhtmlcommon::StatusOptions(undef,undef,5);      $Str .= &Apache::lonhtmlcommon::StatusOptions(undef,undef,5);
     $Str .= '</td>';      $Str .= '</td>';
Removed from v.1.8  
changed lines
  Added in v.1.12

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>