Diff for /loncom/enrollment/localenroll.pm between versions 1.34 and 1.37

version 1.34, 2009/03/09 01:58:52 version 1.37, 2009/08/18 20:08:38
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 281  sub validate_courseID { Line 279  sub validate_courseID {
   
 =pod  =pod
   
   =item validate_instcode()
   
   This is called when a request is being made for an official course.
   A check is made that the institutional code for which a course is
   is being requested is valid according to the institutional
   schedule of official classes.
   
   If the username of the course owner is provided, a more restrictive
   test is used, namely that the requestor is listed as instructor of
   record for the course in the institution's course schedule/database.
   
   A valid instcode is confirmed by returning 'valid'.
   In the case of a check for the instructor of record, the following can
   be returned:
   (a) valid  - the requestor is the recorded instructor - create the course
   (b) reject - the requestor should never be requesting this course, reject the
       request permanently
   (c) pending - the requestor is not the recorded instructor, but could
       become so after administrative action at the institution. Put the
       request ina queue and check localenroll:validate_instcode()
       periodically until the status changes to "valid".
   (d) approval - the request will be held pending review by a Domain Coordinator.
   (e) error  (followed by the error condition);  
   
   validate_instcode takes five arguments -
    (a) the LON-CAPA domain that will contain the course
    (b) the institutional code (in the MSU case this is a concatenation of
    semester code, department code, and course number, e.g., fs03nop590.
    (c) an optional institutional username for the course owner.
    (d) an optional comma-separated list of institutional affiliations of 
        the course owner.
    (e) an optional comma-separated list of institutional sections included in
        the course request
   
   =cut
   
   sub validate_instcode {
       my ($dom,$instcode,$owner,$inststatuslist,$instseclist) = @_;
       my $outcome = '';
       return $outcome;
   }
   
   =pod
   
 =item create_password()  =item create_password()
   
  This is called when the authentication method set for the automated    This is called when the authentication method set for the automated 
Line 381  sub instcode_format () { Line 423  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
   

Removed from v.1.34  
changed lines
  Added in v.1.37


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