version 1.178, 2006/12/28 21:01:39
|
version 1.180, 2007/01/16 22:50:12
|
Line 1177 sub update_full_student_data {
|
Line 1177 sub update_full_student_data {
|
while (my ($key,$value) = each(%studentdata)) { |
while (my ($key,$value) = each(%studentdata)) { |
next if ($key =~ /^(\d+):(resource$|subnum$|keys:)/); |
next if ($key =~ /^(\d+):(resource$|subnum$|keys:)/); |
my ($transaction,$symb,$parameter) = split(':',$key); |
my ($transaction,$symb,$parameter) = split(':',$key); |
|
$symb = &unescape($symb); |
|
$parameter = &unescape($parameter); |
my $symb_id = &get_symb_id($symb); |
my $symb_id = &get_symb_id($symb); |
if ($parameter eq 'timestamp') { |
if ($parameter eq 'timestamp') { |
# We can deal with 'timestamp' right away |
# We can deal with 'timestamp' right away |
Line 1682 sub ensure_current_data {
|
Line 1684 sub ensure_current_data {
|
"student_id ='$student_id'"); |
"student_id ='$student_id'"); |
my $data = undef; |
my $data = undef; |
if (@Result) { |
if (@Result) { |
$updatetime = $Result[0]->[5]; # Ack! This is dumb! |
$updatetime = $Result[0]->[6]; # Ack! This is dumb! |
} |
} |
if ($modifiedtime > $updatetime) { |
if ($modifiedtime > $updatetime) { |
($status,$data) = &update_student_data($sname,$sdom,$courseid); |
($status,$data) = &update_student_data($sname,$sdom,$courseid); |
Line 1730 sub ensure_current_full_data {
|
Line 1732 sub ensure_current_full_data {
|
"student_id ='$student_id'"); |
"student_id ='$student_id'"); |
my $updatetime; |
my $updatetime; |
if (@Result && ref($Result[0]) eq 'ARRAY') { |
if (@Result && ref($Result[0]) eq 'ARRAY') { |
$updatetime = $Result[0]->[6]; |
$updatetime = $Result[0]->[7]; |
} |
} |
if (! defined($updatetime) || $modifiedtime > $updatetime) { |
if (! defined($updatetime) || $modifiedtime > $updatetime) { |
$status = &update_full_student_data($sname,$sdom,$courseid); |
$status = &update_full_student_data($sname,$sdom,$courseid); |