Index: /trunk/tools/heather/queuesliceslap2.pl
===================================================================
--- /trunk/tools/heather/queuesliceslap2.pl	(revision 37460)
+++ /trunk/tools/heather/queuesliceslap2.pl	(revision 37461)
@@ -4,9 +4,11 @@
 
 
-#$label = "LAP.ThreePi.20130717";
-$label = "LAP.ThreePi.20130717.pole3";
-#$label = "LAP.ThreePi.20130717.pole3.CNP";
-
+$label1 = "LAP.ThreePi.20130717";
+$label2 = "LAP.ThreePi.20130717.pole3";
+$label3 = "LAP.ThreePi.20130717.pole3.CNP";
+#heather done bad things to segments and slices...
+@labels = ($label1, $label2, $label3);
 @segments = (0,1,2,3,4,5,6,7,8);
+#@segments=(0,1);
 @segments1 = ( -35, -22,-10,2,14,26,38,50,62);
 @segments2 = ( -22,-10,2,14,26,38,50,62,75);
@@ -14,5 +16,8 @@
 
 @slices = ("00","02","04","06","08","10","12","14","16","18","20","22");
- 
+@slices = ("00","02","04");
+
+foreach $label (@labels) {
+
 foreach $slice (@slices) {
    
@@ -21,6 +26,6 @@
     foreach $num (@segments) {
 
-	$dvodb = "LAP.PV2.20130717";
-	$minidvodb_group = "LAP.PV2.slice$slice.$segments[$num].cam";
+	$dvodb = "LAP.PV2.V2.20130717";
+	$minidvodb_group = "LAP.PV2.V2.slice$slice.$segments[$num].cam";
 	$dvodb_label = "$minidvodb_group";
 	$ra_min = $slice*15.0;
@@ -37,5 +42,6 @@
 
 }
-$com2 = "addtool -definebyquery  -label $label -set_dvodb $dvodb -set_minidvodb_group LAP.PV2.pole.cam -set_minidvodb -set_label LAP.PV2.pole.cam -stage cam -uncensored -ra_min 0 -ra_max 360 -decl_min 75 -decl_max 90 -dbname gpc1";
+$com2 = "addtool -definebyquery  -label $label -set_dvodb $dvodb -set_minidvodb_group LAP.PV2.V2.pole.cam -set_minidvodb -set_label LAP.PV2.V2.pole.cam -stage cam -uncensored -ra_min 0 -ra_max 360 -decl_min 75 -decl_max 90 -dbname gpc1";
 print "$com2\n";
 `$com2`;
+}
Index: /trunk/tools/heather/queuesliceslap2skycal.pl
===================================================================
--- /trunk/tools/heather/queuesliceslap2skycal.pl	(revision 37460)
+++ /trunk/tools/heather/queuesliceslap2skycal.pl	(revision 37461)
@@ -4,8 +4,8 @@
 
 
-#$label = "LAP.ThreePi.20130717";
-#$label = "LAP.ThreePi.20130717.pole3";
-$label = "LAP.ThreePi.20130717.pole3.CNP";
-
+$label1 = "LAP.ThreePi.20130717";
+$label2 = "LAP.ThreePi.20130717.pole3";
+$label3 = "LAP.ThreePi.20130717.pole3.CNP";
+@labels = ($label1,$label2,$label3);
 @segments = (0,1,2,3,4,5,6,7,8);
 @segments1 = ( -35, -22,-10,2,14,26,38,50,62);
@@ -14,5 +14,5 @@
 
 @slices = ("00","02","04","06","08","10","12","14","16","18","20","22");
- 
+foreach $label (@labels) { 
 foreach $slice (@slices) {
    
@@ -21,6 +21,6 @@
     foreach $num (@segments) {
 
-	$dvodb = "LAP.PV2.20130717";
-	$minidvodb_group = "LAP.PV2.slice$slice.$segments[$num].skycal";
+	$dvodb = "LAP.PV2.V2.20130717";
+	$minidvodb_group = "LAP.PV2.V2.slice$slice.$segments[$num].skycal";
 	$dvodb_label = "$minidvodb_group";
 	$ra_min = $slice*15.0;
@@ -36,6 +36,8 @@
     }
 
+
 }
-$com2 = "addtool -definebyquery  -label $label -set_dvodb $dvodb -set_minidvodb_group LAP.PV2.pole.skycal -set_minidvodb -set_label LAP.PV2.pole.skycal -stage skycal -uncensored -ra_min 0 -ra_max 360 -dec_min 75 -dec_max 90 -dbname gpc1";
+$com2 = "addtool -definebyquery  -label $label -set_dvodb $dvodb -set_minidvodb_group LAP.PV2.V2.pole.skycal -set_minidvodb -set_label LAP.PV2.V2.pole.skycal -stage skycal -uncensored -ra_min 0 -ra_max 360 -dec_min 75 -dec_max 90 -dbname gpc1";
 print "$com2\n";
 `$com2`;
+}