--- loncom/metadata_database/LONCAPA/lonmetadata.pm	2012/03/15 21:54:58	1.37
+++ loncom/metadata_database/LONCAPA/lonmetadata.pm	2012/03/15 23:01:59	1.38
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonmetadata.pm,v 1.37 2012/03/15 21:54:58 www Exp $
+# $Id: lonmetadata.pm,v 1.38 2012/03/15 23:01:59 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -788,8 +788,8 @@ sub process_reseval_data {
             # $source is $cid\_$sec\_$stdno
             # $value is stat1=value&stat2=value&stat3=value,....
             #
-            my ($cid,$sec,$stdno)=split('&',$source);
-            my $crssec = $cid.'&'.$sec;
+            my ($cid,$sec,$stdno,$part,$instance)=split('&',$source);
+            my $datakey = $cid.'&'.$sec.'&'.$part.'&'.$instance;
             my @Data = split('&',$value);
             my %Statistics;
             while (my ($key,$value) = split('=',pop(@Data))) {
@@ -800,9 +800,9 @@ sub process_reseval_data {
             #
             # Only store the data if the number of students is greater
             # than the data already stored
-            if (! exists($DynamicData{$file}->{'stats'}->{$crssec}) ||
-                $DynamicData{$file}->{'stats'}->{$crssec}->{'stdno'}<$stdno){
-                $DynamicData{$file}->{'stats'}->{$crssec}=\%Statistics;
+            if (! exists($DynamicData{$file}->{'stats'}->{$datakey}) ||
+                $DynamicData{$file}->{'stats'}->{$datakey}->{'stdno'}<$stdno){
+                $DynamicData{$file}->{'stats'}->{$datakey}=\%Statistics;
             }
         }
     }
@@ -977,7 +977,7 @@ sub dynamic_metadata_storage {
     my $numstu = $data->{'num_students'};
     my $part = $data->{'part'};
     my $symb = $data->{'symb'};
-    my $key = $courseid.'&'.$sections.'&'.$numstu.'&'.$part.'___'.$symb.'___stats';
+    my $key = $courseid.'&'.$sections.'&'.$numstu.'&'.$part.'&'.$symb.'___stats';
     $Store{$key} =
         'course='.$courseid.'&'.
         'sections='.$sections.'&'.