Index: trunk/ippToPsps/perl/exposureSummary.pl
===================================================================
--- trunk/ippToPsps/perl/exposureSummary.pl	(revision 29999)
+++ trunk/ippToPsps/perl/exposureSummary.pl	(revision 30296)
@@ -86,17 +86,21 @@
 my $totalUnmerged = 0;
 my $totalMergeWorthy = 0;
+my $totalNotMergeWorthy = 0;
 my $totalProcessed = 0;
 my $totalOnDatastore = 0;
 my $totalLoadedToOdm = 0;
 my $totalLoadFailed = 0;
+my $totalMergeWorthy = 0;
 my $totalUnderObjIdLimit = 0;
 my $totalUnprocessed = 0;
 my $totalUnprocessedAvailableSmfs = 0;
-my $totalOdmFailures = 0;
+my $remainingOdmFailures = 0;
 my $totalUnprocessedMissingSmfs = 0;
+my $totalProcessedNotOnDatastore = 0;
 
 
 open (UNPRO, ">unprocessedExposures.txt") or print "* Problem opening data file for unprocessed exposures\n";
 open (ODMFAIL, ">odmFailures.txt") or print "* Problem opening data file for ODM failures\n";
+open (NOTONDATASTORE, ">notOnDatastore.txt") or print "* Problem opening data file for exposures not on datastore\n";
 
 if ($checkNeb) {
@@ -114,9 +118,15 @@
     if ($verbose) {print "$totalUnmerged | $expId \n"; }
 
+    # processed stuff
     if ($ippToPspsDb->isExposureProcessed($expId)) {
 
         $totalProcessed++;
 
-        if ($ippToPspsDb->isExposureAlreadyPublished($expId)) {
+        if (!$ippToPspsDb->isExposureAlreadyPublished($expId)) {
+
+            $totalProcessedNotOnDatastore++;
+            print NOTONDATASTORE "$expId\n";
+        }
+        else {
 
             $totalOnDatastore++;
@@ -126,20 +136,31 @@
                 $totalLoadedToOdm++;
 
-                if ($ippToPspsDb->didLoadFail($expId)) {
-
-                    $totalLoadFailed++;
+                if ($ippToPspsDb->isMergeWorthy($expId)) {
+
+                    $totalMergeWorthy++;
                 }
-                if ($ippToPspsDb->isMinObjIdUnderLimit($expId)) {
-
-                    $totalUnderObjIdLimit++;
-                }
+                # not mergeworthy
                 else {
 
-                    $totalOdmFailures++;
-                    print ODMFAIL "$expId\n";
+                    $totalNotMergeWorthy++;
+
+                    #if ($ippToPspsDb->didLoadFail($expId)) {
+
+                    #    $totalLoadFailed++;
+                    #}
+                    if ($ippToPspsDb->isMinObjIdUnderLimit($expId)) {
+
+                        $totalUnderObjIdLimit++;
+                    }
+                    else {
+
+                        $remainingOdmFailures++;
+                        print ODMFAIL "$expId\n";
+                    }
                 }
             }
         }
     }
+    # unprocessed stuff
     else {
 
@@ -181,4 +202,5 @@
 close(UNPRO);
 close(ODMFAIL);
+close(NOTONDATASTORE);
 if ($checkNeb) {
 
@@ -186,5 +208,4 @@
     close(NOTMISSSMF);
 }
-my $totalProcessedNotOnDatastore = $totalProcessed - $totalOnDatastore;
 my $totalOnDatastoreNotLoaded = $totalOnDatastore - $totalLoadedToOdm;
 print "***********************************************************\n";
@@ -205,7 +226,9 @@
 print "*       on datastore                         = $totalOnDatastore\n";
 print "*         not loaded to ODM                  = $totalOnDatastoreNotLoaded\n";
-print "*         loaded to ODM but rejected         = $totalLoadedToOdm\n";
-print "*           under -30 dec limit              = $totalUnderObjIdLimit\n";
-print "*           remaining ODM failures           = $totalOdmFailures\n";
+print "*         loaded to ODM                      = $totalLoadedToOdm\n";
+print "*           MergeWorthy                      = $totalMergeWorthy\n";
+print "*           not MergeWorthy                  = $totalNotMergeWorthy\n";
+print "*             under -30 dec limit            = $totalUnderObjIdLimit\n";
+print "*             remaining failures             = $remainingOdmFailures\n";
 print "*\n";
 print "***********************************************************\n";