Changeset 34597 for trunk/pstamp/scripts

Timestamp:

Oct 25, 2012, 11:52:19 AM (14 years ago)

Author:

bills

Message:

add new header words for request version 2

File:

• trunk/pstamp/scripts/psmkreq (modified) (3 diffs)

trunk/pstamp/scripts/psmkreq

@@ -31 +31 @@
 my ($unconvolved, $use_imfile_id, $no_wait);
 
+my $action = 'PROCESS';
+my $username = 'null';
+my $email = 'null';
 my $default_size = 100;
 my $job_type     = 'stamp';
@@ -96 +99 @@
 
     # new columns for version 2
+    'action=s'          => \$action,
+    'usernam=s'         => \$username,
+    'email=s'           => \$email,
     'survey=s'          => \$survey_name,
     'release=s'         => \$release,
@@ -229 +235 @@
 
 my ($tdf, $table_def_name) = tempfile ("/tmp/tabledef.XXXX", UNLINK => !$save_temps);
-print $tdf "$req_name 2\n";
+print $tdf "$req_name 2 $action $username $email\n";
 my $rownum = 0;
 foreach my $row (@$rows) {