[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.19 and 1.23

version 1.19, 2008/10/30 17:45:25 version 1.23, 2010/01/14 17:20:52
Line 98  sub BuildSurveyReportsPage { Line 98  sub BuildSurveyReportsPage {
         #          #
         $r->print('<hr />');          $r->print('<hr />');
         $r->print('<h4>'.          $r->print('<h4>'.
                   &Apache::lonlocal::locallocaltime(time).','.                    &Apache::lonlocal::locallocaltime(time).', '.
                   &Apache::lonstatistics::section_and_enrollment_description().                    &Apache::lonstatistics::section_and_enrollment_description().
                   '</h4>');                    '</h4>');
         $r->rflush();          $r->rflush();
Line 211  sub SurveyProblemSelector { Line 211  sub SurveyProblemSelector {
         $Str .= '<tr><td>'.          $Str .= '<tr><td>'.
             '<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><span class="LC_nobreak">'.
             '<label for="'.$id.'">'.$problem->{'res'}->compTitle.' ('.$problem->{'seq'}->compTitle.')'.'</label>'.              '<label for="'.$id.'">'.$problem->{'res'}->compTitle.' ('.$problem->{'seq'}->compTitle.')'.'</label>'.
             ('&nbsp;'x2).              ('&nbsp;'x2).
             '<a target="preview" href="'.$link.'">'.&mt('View survey').'</a>'.'</td></tr>'.$/;              '<a target="preview" href="'.$link.'">'.&mt('View survey').'</a></span></td></tr>'.$/;
     }      }
     $Str .= '</table>';      $Str .= '</table>';
     return $Str;      return $Str;
Line 339  sub make_text_report { Line 339  sub make_text_report {
     } else {      } else {
         $r->print('<p class="LC_warning">'          $r->print('<p class="LC_warning">'
                  .&mt('There is no essay or string response data to output for this survey.')                   .&mt('There is no essay or string response data to output for this survey.')
                  .'</h2>');                   .'</p>');
     }      }
     $r->rflush();      $r->rflush();
     return;      return;
Line 569  sub make_HTML_report { Line 569  sub make_HTML_report {
                             sprintf("%.2f",$count/$total*100).'%</td>'.                              sprintf("%.2f",$count/$total*100).'%</td>'.
                         &Apache::loncommon::end_data_table_row().$/;                          &Apache::loncommon::end_data_table_row().$/;
                 }                  }
                 $Str .= &Apache::loncommon::start_data_table_row().                  $Str.='<tr>'
                     '<th>'.&mt('Foil Name').'</th>'.                       .'<td colspan="3">'
                     '<th>'.&mt('Text').'</th>'.                       .&Apache::loncommon::start_data_table()
                     '<th>'.&mt('Freq').'</th>'.                       .&Apache::loncommon::start_data_table_header_row()
                     '<th>'.&mt('Percent').'</th>'.                       .'<th>'.&mt('Foil Name').'</th>'
                     &Apache::loncommon::end_data_table_row().$/.                       .'<th>'.&mt('Text').'</th>'
                     $tmp;                       .'<th>'.&mt('Frequency').'</th>'
                        .'<th>'.&mt('Percent').'</th>'
                        .&Apache::loncommon::end_data_table_header_row().$/
                        .$tmp
                        .&Apache::loncommon::end_data_table()
                        .'</td></tr>';
             }              }
             $Str.= &Apache::loncommon::end_data_table().'<hr />';              $Str.= '</table>';
             $r->print($Str);              $r->print($Str);
             $r->rflush();              $r->rflush();
         }          }
Line 653  sub CreateInterface { Line 658  sub CreateInterface {
         $prob_checkbox .= 'checked="checked" ';          $prob_checkbox .= 'checked="checked" ';
     }      }
     $prob_checkbox .= 'value="true" />';      $prob_checkbox .= 'value="true" />';
     $Str .= '<td align="right" valign="top">'.      $Str .=
         '<label><b>'.          '<td valign="top">'
         &mt('Show problem [_1]',$prob_checkbox).'</b></label><br />'.         .'<label>'
         '<label><b>'.         .$prob_checkbox.&mt('Show problem')
         '</td>';         .'</label>'
          .'</td>';
     #      #
     $Str .= &Apache::loncommon::end_data_table_row();      $Str .= &Apache::loncommon::end_data_table_row();
     $Str .= &Apache::loncommon::end_data_table();      $Str .= &Apache::loncommon::end_data_table();
Removed from v.1.19  
changed lines
  Added in v.1.23

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