Bug Fixing : GetNextSeq did not pass through innerloop parameters.
authorhdl <hdl>
Thu, 12 Jul 2007 10:01:20 +0000 (10:01 +0000)
committerhdl <hdl>
Thu, 12 Jul 2007 10:01:20 +0000 (10:01 +0000)
C4/Serials.pm

index ed6edc7..f4de27e 100644 (file)
@@ -972,7 +972,8 @@ sub GetNextSeq {
   $newlastvalue3=$val->{setto3} if ($newlastvalue3>$val->{whenmorethan3}); # reset counter if needed.
   $calculated =~ s/\{Z\}/$newlastvalue3/g;
     
-  return ( $calculated, $newlastvalue1, $newlastvalue2, $newlastvalue3 );
+  return ( $calculated, $newlastvalue1, $newlastvalue2, $newlastvalue3 ,
+           $newinnerloop1, $newinnerloop2, $newinnerloop3);
 }
 
 =head2 GetSeq