changes required to add plate type FINAL_PICK

htgt · Feb 21, 2013 · 5032f2b · 5032f2b
1 parent 850bcf2
commit 5032f2b
Show file tree

Hide file tree

Showing 3 changed files with 11 additions and 10 deletions.
diff --git a/lib/LIMS2/Model/Constants.pm b/lib/LIMS2/Model/Constants.pm
@@ -24,10 +24,10 @@ const our %PROCESS_PLATE_TYPES => (
     create_di              => [qw( DESIGN )],
     int_recom              => [qw( INT )],
     cre_bac_recom          => [qw( INT )],
-    '2w_gateway'           => [qw( POSTINT FINAL )],
-    '3w_gateway'           => [qw( POSTINT FINAL )],
+    '2w_gateway'           => [qw( POSTINT FINAL FINAL_PICK)],
+    '3w_gateway'           => [qw( POSTINT FINAL FINAL_PICK)],
     dna_prep               => [qw( DNA )],
-    recombinase            => [qw( FINAL XEP POSTINT )],
+    recombinase            => [qw( FINAL FINAL_PICK XEP POSTINT )],
     first_electroporation  => [qw( EP )],
     second_electroporation => [qw( SEP )],
     clone_pick             => [qw( EP_PICK SEP_PICK XEP_PICK )],
@@ -79,7 +79,7 @@ const our %PROCESS_INPUT_WELL_CHECK => (
     },
     rearray  => { number => 1 },
     dna_prep => {
-        type   => [qw( FINAL )],
+        type   => [qw( FINAL FINAL_PICK )],
         number => 1,
     },
     clone_pick => {

diff --git a/lib/LIMS2/Model/Util/ComputeAcceptedStatus.pm b/lib/LIMS2/Model/Util/ComputeAcceptedStatus.pm
@@ -14,11 +14,12 @@ use LIMS2::Exception::Implementation;
 # process type, and/or pipeline.
 
 my %HANDLER_FOR = (
-    DESIGN  => \&has_recombineering_pass,
-    INT     => \&has_sequencing_pass,
-    POSTINT => \&has_sequencing_pass,
-    FINAL   => \&has_sequencing_pass,
-    DNA     => \&has_dna_pass,
+    DESIGN     => \&has_recombineering_pass,
+    INT        => \&has_sequencing_pass,
+    POSTINT    => \&has_sequencing_pass,
+    FINAL      => \&has_sequencing_pass,
+    FINAL_PICK => \&has_sequencing_pass,
+    DNA        => \&has_dna_pass,
 );
 
 sub compute_accepted_status {

diff --git a/lib/LIMS2/WebApp/Controller/User/QC.pm b/lib/LIMS2/WebApp/Controller/User/QC.pm
@@ -497,7 +497,7 @@ sub create_plates :Path('/user/create_plates') :Args(0){
 	$c->stash->{qc_run_id} = $run_id;
 	$c->stash->{plate_type} = $c->req->param('plate_type');
 
-	$c->stash->{plate_types}   = [ qw(INT POSTINT FINAL) ];
+	$c->stash->{plate_types}   = [ qw(INT POSTINT FINAL FINAL_PICK) ];
 
 	unless ($run_id){
 		$c->flash->{error_msg} = "No QC run ID provided to create plates";