version 1.14, 2006/05/31 12:57:26
|
version 1.15, 2006/06/27 21:28:21
|
Line 56 use strict;
|
Line 56 use strict;
|
#<!DOCTYPE text> |
#<!DOCTYPE text> |
#<class id="ss05ubw101"> |
#<class id="ss05ubw101"> |
# <title>Underwater Basket Weaving</title> |
# <title>Underwater Basket Weaving</title> |
|
# <crstype>Course</coursetype> |
# <coursecode>ss05ubw101</coursecode> |
# <coursecode>ss05ubw101</coursecode> |
# <coursehome>msul1</coursehome> |
# <coursehome>msul1</coursehome> |
# <coursedomain>msu</coursedomain> |
# <coursedomain>msu</coursedomain> |
Line 74 use strict;
|
Line 75 use strict;
|
# <nonstandard></nonstandard> |
# <nonstandard></nonstandard> |
# <topmap></topmap> |
# <topmap></topmap> |
# <firstres>nav</firstres> |
# <firstres>nav</firstres> |
|
# <crsquota>20</crsquota> |
# <clonecrs>466011437c34194msul1</clonecrs> |
# <clonecrs>466011437c34194msul1</clonecrs> |
# <clonedom>msu</clonedom> |
# <clonedom>msu</clonedom> |
# <showphotos></showphotos> |
# <showphotos></showphotos> |
Line 154 use strict;
|
Line 156 use strict;
|
# A value of 0 or blank is equivalent to an unchecked box or 'No' |
# A value of 0 or blank is equivalent to an unchecked box or 'No' |
# response. Dates are in format YYYY:MM:DD:HH:MM:SS (:separators required) |
# response. Dates are in format YYYY:MM:DD:HH:MM:SS (:separators required) |
# |
# |
# firstres can be nav, syl , or blank for "Navigate Contents", Syllabus, or |
# firstres can be nav, syl, or blank for "Navigate Contents", Syllabus, or |
# no entry respectively. |
# no entry respectively. |
|
# |
|
# crstype can be Course or Group |
|
# |
|
# crsquota is the total disk space permitted for course group portfolio files |
|
# in all course groups. |
|
# |
# For format of other parameters, refer to the interactive CCRS page |
# For format of other parameters, refer to the interactive CCRS page |
# and view how the equivalent parameter is displayed in the web form. |
# and view how the equivalent parameter is displayed in the web form. |
# |
# |
Line 241 sub parse_coursereqs {
|
Line 249 sub parse_coursereqs {
|
my $xlist = 0; |
my $xlist = 0; |
my $userkey = ''; |
my $userkey = ''; |
my $role = ''; |
my $role = ''; |
my @items = ('title','optional_id','coursecode','coursehome','reshome','nonstandard','adds','drops','topmap','firstres','clonecrs','clonedom','showphotos','setpolicy','setcontent','setkeys','keyauth','disresdis','disablechat','openall','notify_owner','notify_dc'); |
my @items = ('title','optional_id','coursecode','coursehome','reshome','nonstandard','adds','drops','topmap','firstres','clonecrs','clonedom','showphotos','setpolicy','setcontent','setkeys','keyauth','disresdis','disablechat','openall','notify_owner','notify_dc','crstype','crsquota'); |
my @dateitems = ('enrollstart','enrollend','accessstart','accessend'); |
my @dateitems = ('enrollstart','enrollend','accessstart','accessend'); |
my @useritems = ('autharg','authtype','firstname','generation','lastname','middlename','studentID'); |
my @useritems = ('autharg','authtype','firstname','generation','lastname','middlename','studentID'); |
my $p = HTML::Parser->new |
my $p = HTML::Parser->new |
Line 448 sub build_course {
|
Line 456 sub build_course {
|
ccuname => $$details{$num}{'owner'}, |
ccuname => $$details{$num}{'owner'}, |
ccdomain => $$details{$num}{'domain'}, |
ccdomain => $$details{$num}{'domain'}, |
cdescr => $$details{$num}{'title'}, |
cdescr => $$details{$num}{'title'}, |
|
crstype => $$details{$num}{'crstype'}, |
curl => $$details{$num}{'topmap'}, |
curl => $$details{$num}{'topmap'}, |
course_domain => $cdom, |
course_domain => $cdom, |
course_home => $$details{$num}{'coursehome'}, |
course_home => $$details{$num}{'coursehome'}, |
nonstandard => $$details{$num}{'nonstandard'}, |
nonstandard => $$details{$num}{'nonstandard'}, |
crscode => $$details{$num}{'coursecode'}, |
crscode => $$details{$num}{'coursecode'}, |
|
crsquota => $$details{$num}{'crsquota'}, |
clonecourse => $$details{$num}{'clonecrs'}, |
clonecourse => $$details{$num}{'clonecrs'}, |
clonedomain => $$details{$num}{'clonedom'}, |
clonedomain => $$details{$num}{'clonedom'}, |
crsid => $$details{$num}{'optional_id'}, |
crsid => $$details{$num}{'optional_id'}, |