loncom/interface/loncoursedata.pm - diff

Return to loncoursedata.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.194, 2013/03/01 04:58:08	version 1.196, 2015/03/10 02:45:56
Line 1251 sub ensure_current_data {	Line 1251 sub ensure_current_data {
}	}

my $student_id = &get_student_id($sname,$sdom);	my $student_id = &get_student_id($sname,$sdom);
	&get_students_groupids($student_id);
my @Result = &Apache::lonmysql::get_rows($student_table,	my @Result = &Apache::lonmysql::get_rows($student_table,
"student_id ='$student_id'");	"student_id ='$student_id'");
my $data = undef;	my $data = undef;
Line 1277 sub ensure_current_full_data {	Line 1278 sub ensure_current_full_data {
($sdom,$sname,$courseid.'.db',$getuserdir);	($sdom,$sname,$courseid.'.db',$getuserdir);
#	#
my $student_id = &get_student_id($sname,$sdom);	my $student_id = &get_student_id($sname,$sdom);
	&get_students_groupids($student_id);
my @Result = &Apache::lonmysql::get_rows($student_table,	my @Result = &Apache::lonmysql::get_rows($student_table,
"student_id ='$student_id'");	"student_id ='$student_id'");
my $updatetime;	my $updatetime;
Line 2298 sub CL_ROLE { return 13; }	Line 2300 sub CL_ROLE { return 13; }
sub CL_EXTENT { return 14; }	sub CL_EXTENT { return 14; }
sub CL_PHOTO { return 15; }	sub CL_PHOTO { return 15; }
sub CL_THUMBNAIL { return 16; }	sub CL_THUMBNAIL { return 16; }
	sub CL_AUTHORQUOTA { return 17; }
	sub CL_AUTHORUSAGE { return 18; }

sub get_classlist {	sub get_classlist {
my ($cdom,$cnum) = @_;	my ($cdom,$cnum) = @_;