version 1.33, 2009/02/20 13:59:20
|
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 |
|
|
Line 401 sub instcode_format () {
|
Line 480 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 |