loncom/interface/loncoursedata.pm - diff

Return to loncoursedata.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.192, 2011/10/03 13:11:39	version 1.193.6.1, 2015/03/10 05:13:11
Line 58 use Digest::MD5();	Line 58 use Digest::MD5();

=pod	=pod

=head 2 make_into_hash	=head2 make_into_hash

Turn a colon separated string into a hash and return a reference	Turn a colon separated string into a hash and return a reference
to it. Numbering from 0 even elements are keys and odd elements	to it. Numbering from 0 even elements are keys and odd elements
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;