--- loncom/enrollment/localenroll.pm 2006/02/10 02:38:46 1.14 +++ loncom/enrollment/localenroll.pm 2006/08/29 05:58:06 1.16 @@ -1,6 +1,6 @@ # functions to glue school database system into Lon-CAPA for # automated enrollment -# $Id: localenroll.pm,v 1.14 2006/02/10 02:38:46 raeburn Exp $ +# $Id: localenroll.pm,v 1.16 2006/08/29 05:58:06 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -204,8 +204,9 @@ sub get_sections { # (a) the institutional courseID (in the MSU case this is a concatenation of # semester code, department code, course number, and section number # e.g., fs03nop590001). -# (b) the course owner. This is the LON-CAPA username of the course coordinator -# assigned to the course when it is first created. +# (b) the course owner. This is the LON-CAPA username and domain of the course +# coordinator assigned to the course when it is first created, in the form +# username:domain # (c) the LON-CAPA domain that contains the course # ################################# @@ -417,6 +418,26 @@ sub manager_photo_update { } ############################### +# sub check_section +# +# Incoming data: three arguments (+ fourth optional argument) +# (a) $class - institutional class id (coursecode concatanated with section) +# (b) $owner - course owner (2.2 and later username:domain; pre-2.2 username) +# (c) $dom 0 domain of course +# (d) $dbh - optional database handle +# +# returns 1 parameter - $sectioncheck ('ok' or other value). +# Verifies that course owner has access to classlist for specific class +# according to institution's SIS. 'ok' if access available +############################### + +sub check_section { + my ($class,$owner,$dom,$dbh) = @_; + my $sectioncheck = 'ok'; + return $sectioncheck; +} + +############################### # sub AUTOLOAD # # Incoming data: none