IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Jul 12, 2007, 12:49:19 PM (19 years ago)
Author:
Paul Price
Message:

Updating with new required command-line arguments for dependents.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/ippScripts/scripts/ipp_serial_detrend.pl

    r13937 r14170  
    6161                my $det_type = $item->{det_type};
    6262                my $exp_tag = $item->{exp_tag};
     63                my $exp_id = $item->{exp_id};
    6364                my $class_id = $item->{class_id};
    6465                my $uri = $item->{uri};
    … …  
    6768                my $reduction = $item->{reduction};
    6869
    69                 my $command = "$detrend_process_imfile --det_id $det_id --exp_tag $exp_tag --class_id $class_id --det_type $det_type --input_uri $uri --camera $camera --dbname $dbname";
     70                my $command = "$detrend_process_imfile --det_id $det_id --exp_tag $exp_tag --exp_id $exp_id --class_id $class_id --det_type $det_type --input_uri $uri --camera $camera --dbname $dbname";
    7071                $command .= " --reduction $reduction" if defined $reduction;
    7172                $command .= " --workdir $workdir" if defined $workdir;
    … …  
    9293    foreach my $item (@$list) {
    9394        my $exp_tag = $item->{exp_tag};
    94         my $camera = $item->{camera};
    95         my $det_id = $item->{det_id};
    96         my $det_type = $item->{det_type};
    97         my $workdir = $item->{workdir};
    98 
    99         my $command = "$detrend_process_exp --det_id $det_id --det_type $det_type --exp_tag $exp_tag --camera $camera --dbname $dbname";
     95        my $exp_id = $item->{exp_id};
     96        my $camera = $item->{camera};
     97        my $det_id = $item->{det_id};
     98        my $det_type = $item->{det_type};
     99        my $workdir = $item->{workdir};
     100
     101        my $command = "$detrend_process_exp --det_id $det_id --det_type $det_type --exp_tag $exp_tag --exp_id $exp_id --camera $camera --dbname $dbname";
    100102        $command .= " --workdir $workdir" if defined $workdir;
    101103        my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
    … …  
    230232            foreach my $item (@$list) {
    231233                my $exp_tag = $item->{exp_tag};
     234                my $exp_id = $item->{exp_id};
    232235                my $camera = $item->{camera};
    233236                my $det_id = $item->{det_id};
    … …  
    241244                my $reduction = $item->{reduction};
    242245
    243                 my $command = "$detrend_resid --det_id $det_id --iteration $iteration --exp_tag $exp_tag --class_id $class_id --det_type $det_type --camera $camera --input_uri $uri --mode $mode --dbname $dbname";
     246                my $command = "$detrend_resid --det_id $det_id --iteration $iteration --exp_tag $exp_tag --exp_id $exp_id --class_id $class_id --det_type $det_type --camera $camera --input_uri $uri --mode $mode --dbname $dbname";
    244247                $command .= " --reduction $reduction" if defined $reduction;
    245248                $command .= " --detrend $detrend" if defined $detrend;
    … …  
    268271    foreach my $item (@$list) {
    269272        my $exp_tag = $item->{exp_tag};
    270         my $camera = $item->{camera};
    271         my $det_id = $item->{det_id};
    272         my $iteration = $item->{iteration};
    273         my $det_type = $item->{det_type};
    274         my $workdir = $item->{workdir};
    275 
    276         my $command = "$detrend_reject_imfile --det_id $det_id --iteration $iteration --exp_tag $exp_tag --det_type $det_type --camera $camera --dbname $dbname";
     273        my $exp_id = $item->{exp_id};
     274        my $camera = $item->{camera};
     275        my $det_id = $item->{det_id};
     276        my $iteration = $item->{iteration};
     277        my $det_type = $item->{det_type};
     278        my $workdir = $item->{workdir};
     279
     280        my $command = "$detrend_reject_imfile --det_id $det_id --iteration $iteration --exp_tag $exp_tag --exp_id $exp_id --det_type $det_type --camera $camera --dbname $dbname";
    277281        $command .= " --workdir $workdir" if defined $workdir;
    278282        my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
Note: See TracChangeset for help on using the changeset viewer.