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

Diff for /loncom/interface/lonrequestcourse.pm between versions 1.4 and 1.5

version 1.4, 2009/08/05 23:44:52 version 1.5, 2009/08/06 00:49:31
Line 115  sub handler { Line 115  sub handler {
     my %trail = (      my %trail = (
                  crstype  => 'Course Request Action',                   crstype  => 'Course Request Action',
                  codepick => 'Category',                   codepick => 'Category',
                  courseinfo => 'Information',                   courseinfo => 'Description',
                  enrollment => 'Enrollment',                   enrollment => 'Enrollment',
                  personnel => 'Personnel',                   personnel => 'Personnel',
                  review => 'Review',                   review => 'Review',
Line 969  sub print_review { Line 969  sub print_review {
                              '<td>'.&Apache::lonlocal::locallocaltime($startenroll).'</td>'.                               '<td>'.&Apache::lonlocal::locallocaltime($startenroll).'</td>'.
                              '<td>'.&Apache::lonlocal::locallocaltime($endenroll).'</td>';                               '<td>'.&Apache::lonlocal::locallocaltime($endenroll).'</td>';
             $section_values = '<td>';              $section_values = '<td>';
               my $secinfo;
             if ($env{'form.sectotal'} > 0) {              if ($env{'form.sectotal'} > 0) {
                 for (my $i=0; $i<$env{'form.sectotal'}; $i++) {                  for (my $i=0; $i<$env{'form.sectotal'}; $i++) {
                     if ($env{'form.sec_'.$i}) {                      if ($env{'form.sec_'.$i}) {
                         $section_values .= $env{'form.secnum_'.$i};                          $secinfo .= '<tr><td>'.$env{'form.secnum_'.$i}.'</td><td>';
                         if ($env{'form.loncapasec_'.$i} ne '') {                          if ($env{'form.loncapasec_'.$i} ne '') {
                             $section_values .= ' => '.$env{'form.loncapasec_'.$i};                              $secinfo .= $env{'form.loncapasec_'.$i};
                           } else {
                               $secinfo .= &mt('None');
                         }                          }
                         $section_values .= '<br />';                          $secinfo .= '</td></tr>';
                     }                      }
                 }                  }
             }              }
               if ($secinfo) {
                   $section_values .= '<table class="LC_innerpickbox"><tr><th>'.
                                      &mt('Institutional section').'</th>'.
                                      '<th>'.&mt('LON-CAPA section').'</th></tr>'.$secinfo.
                                      '</table>';
               }
             $section_values .= '</td><td>';              $section_values .= '</td><td>';
               my $xlistinfo;
             if ($env{'form.crosslisttotal'}) {              if ($env{'form.crosslisttotal'}) {
                 for (my $i=0; $i<$env{'form.crosslisttotal'}; $i++) {                  for (my $i=0; $i<$env{'form.crosslisttotal'}; $i++) {
                     if ($env{'form.crosslist_'.$i}) {                      if ($env{'form.crosslist_'.$i}) {
                         if (ref($codetitles) eq 'ARRAY') {                          $xlistinfo .= '<tr><td>';
                             if (@{$codetitles} > 0) {                          if (ref($code_order) eq 'ARRAY') {
                                 foreach my $item (@{$codetitles}) {                              if (@{$code_order} > 0) {
                                     $section_values .= $env{'form.crosslist_'.$i.'_'.$item};                                  foreach my $item (@{$code_order}) {
                                       $xlistinfo .= $env{'form.crosslist_'.$i.'_'.$item};
                                 }                                  }
                             } else {  
                                 $section_values .= $env{'form.crosslist_'.$i.'_instsec'};  
                             }                              }
                         } else {  
                             $section_values .= $env{'form.crosslist_'.$i.'_instsec'};  
                         }                          }
                           $xlistinfo .= $env{'form.crosslist_'.$i.'_instsec'}.'</td><td>';
                         if ($env{'form.crosslist_'.$i.'_lcsec'}) {                          if ($env{'form.crosslist_'.$i.'_lcsec'}) {
                             $section_values .= ' => '.$env{'form.crosslist_'.$i.'_lcsec'};                                                          $xlistinfo .= $env{'form.crosslist_'.$i.'_lcsec'};
                           } else {
                               $xlistinfo .= &mt('None');
                         }                          }
                         $section_values .= '<br />';                          $xlistinfo .= '</td></tr>';
                     }                      }
                 }                  }
             }              }
               if ($xlistinfo) {
                   $section_values .= '<table class="LC_innerpickbox"><tr><th>'.
                                      &mt('Institutional course/section').'</th>'.
                                      '<th>'.&mt('LON-CAPA section').'</th></tr>'.$xlistinfo.
                                      '</table>';
               }
             $section_values .= '</td>';              $section_values .= '</td>';
         }          }
     }      }
Line 1085  sub print_review { Line 1101  sub print_review {
                   '<td>'.$owneremail.'</td>'.                    '<td>'.$owneremail.'</td>'.
                   '</tr></table>'."\n".                    '</tr></table>'."\n".
                   &Apache::lonhtmlcommon::row_closure().                    &Apache::lonhtmlcommon::row_closure().
                   &Apache::lonhtmlcommon::row_title(&mt('Information')).                    &Apache::lonhtmlcommon::row_title(&mt('Description')).
                   '<table class="LC_innerpickbox"><tr>'.$inst_headers.'</tr>'."\n".                    '<table class="LC_innerpickbox"><tr>'.$inst_headers.'</tr>'."\n".
                   '<tr>'.$inst_values.'</tr></table>'."\n".                    '<tr>'.$inst_values.'</tr></table>'."\n".
                   &Apache::lonhtmlcommon::row_closure().                    &Apache::lonhtmlcommon::row_closure().
Removed from v.1.4  
changed lines
  Added in v.1.5

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