Changeset 29213

Timestamp:

Sep 22, 2010, 4:05:18 PM (16 years ago)

Author:

rhenders

Message:

New method to return path to stack-stage cmf files for a given sky-id

File:

• trunk/ippToPsps/perl/ippToPsps/Gpc1Db.pm (modified) (1 diff)

trunk/ippToPsps/perl/ippToPsps/Gpc1Db.pm

@@ -8 +8 @@
 use ippToPsps::MySQLDb;
 our @ISA = qw(ippToPsps::MySQLDb);    # inherits from MySQLDb
+
+###########################################################################
+#
+# Returns path to stack-stage cmf files for this sky_id
+#
+###########################################################################
+sub getStackStageCmfs {
+    my ($self, $skyId) = @_;
+
+    my $query = $self->{_db}->prepare(<<SQL);
+    SELECT path_base
+        FROM staticskyResult
+        WHERE sky_id =  $skyId
+SQL
+
+    $query->execute;
+    return $query->fetchall_arrayref();
+}
 
 ###########################################################################