version 1.36, 2021/05/04 18:47:36
|
version 1.37, 2021/06/15 20:52:26
|
Line 794 sub check_registered {
|
Line 794 sub check_registered {
|
'internal.sectionnums', |
'internal.sectionnums', |
'internal.crosslistings'],$cdom,$cnum); |
'internal.crosslistings'],$cdom,$cnum); |
my (@allcourses,%LC_code,%affiliates,%reply); |
my (@allcourses,%LC_code,%affiliates,%reply); |
&Apache::loncommon::get_institutional_codes(\%settings,\@allcourses,\%LC_code); |
&Apache::loncommon::get_institutional_codes($cdom,$cnum,\%settings,\@allcourses,\%LC_code); |
if (@allcourses > 0) { |
if (@allcourses > 0) { |
@{$affiliates{$cnum}} = @allcourses; |
@{$affiliates{$cnum}} = @allcourses; |
my $outcome = &Apache::lonnet::fetch_enrollment_query('updatenow',\%affiliates,\%reply,$cdom,$cnum); |
my $outcome = &Apache::lonnet::fetch_enrollment_query('updatenow',\%affiliates,\%reply,$cdom,$cnum); |