Index: trunk/Ohana/src/perl/src/mktreport
===================================================================
--- trunk/Ohana/src/perl/src/mktreport	(revision 116)
+++ trunk/Ohana/src/perl/src/mktreport	(revision 117)
@@ -8,9 +8,9 @@
 @photcodes = split (" ", `filtnames list`);
 
-@list = `transearch -offset`;
+@list = `photsearch -trans -offset`;
 
 # the lines from transearch look like this:
 # R 2001/04/15,00:00:00  -0.032 26.259  0.004  0.040 -0.090 B_L92 V_L92 5 15 elixir
-#      (date)             (dZP) (ZPo)   (sigma)
+#      (date)             (ZP)  (ZPo)   (sigma)
 
 @dates = ();
@@ -33,5 +33,5 @@
 	$name1 = "ZPo$i";
 	$name2 = "dZP$i";
-	$$name1{$date} = $words[2];
+	$$name1{$date} = $words[2] - $words[3];
 	$$name2{$date} = $words[4];
 	next LIST;