##

     my @dept_loop;
     foreach my $dept (@dept) {
      push(@dept_loop, {DEPT => $dept}); 


%formparams = ( DEPT_LOOP => \@dept_loop,  );
 
# there are other elements i left out that are irrelvant.