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

Diff for /loncom/enrollment/localenroll.pm between versions 1.33 and 1.35

version 1.33, 2009/02/20 13:59:20 version 1.35, 2009/06/11 20:09:25
Line 41  described at http://www.lon-capa.org. Line 41  described at http://www.lon-capa.org.
   
 =over  =over
   
 =back  
   
 =cut  =cut
   
 package localenroll;  package localenroll;
Line 381  sub instcode_format () { Line 379  sub instcode_format () {
     return $outcome;      return $outcome;
 }  }
   
   =pod
   
   =item possible_instcodes()
   
   Gather acceptable values for institutional categories to use in course creation request form for official courses.
   
    requires four arguments:
    domain ($dom)
    reference to array of titles ($codetitles)
    reference to hash of abbreviations used in categories ($cat_titles).
    reference to hash of arrays specifying sort order used in category titles ($cat_order).
   
    e.g., 
    @{$codetitles} = ("Year","Semester","Department","Number");
   
    %{$$cat_titles{'Semester'}} = (
                      fs => 'Fall',
                      ss => 'Spring',
                      us => 'Summer');
   
    @{$$cat_order{'Semester'}} = ('ss','us','fs');
   
    returns 1 parameter: 'ok' if no processing errors.
   
   =cut
   
   sub possible_instcodes {
       my ($dom,$codetitles,$cat_titles,$cat_order) = @_;
       @{$codetitles} = ();
       %{$$cat_titles{'Semester'}} = ();
       @{$$cat_order{'Semester'}} = ('ss','us','fs');
       ($$cat_titles{'Department'},$$cat_order{'Department'}) = &get_all_depts($dom);
       ($$cat_titles{'Year'},$$cat_order{'Year'}) = &get_possible_years($dom);
       return 'ok';
   }
   
   
   
 =pod  =pod
   
Line 401  sub instcode_format () { Line 436  sub instcode_format () {
      existing photo, photo was found to be missing from institution's       existing photo, photo was found to be missing from institution's
      data store, photo used is same as before, or photo was        data store, photo used is same as before, or photo was 
      deleted from storage on LON-CAPA server housing student's       deleted from storage on LON-CAPA server housing student's
      information, no student ID was available.        information, no student/employee ID was available. 
                                 
  (e) $action: the type of action needed. (e.g., update, delete);   (e) $action: the type of action needed. (e.g., update, delete);
  (f) $students: a reference to a hash with the keys set to student    (f) $students: a reference to a hash with the keys set to student 
Removed from v.1.33  
changed lines
  Added in v.1.35

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