for ( outer_loop sets $x, $y)
{
 $row_data{id} = $x; $row_data{text} =$y;
 my @temp=@{gimmee_fields($x,$dbh)};
        foreach (@temp){
             push @{$row_data{fields}},{id=>${$_}{id},       
             text=>${$_}{text}};
        }
 foreach (@{$row_data{fields}}){
       my $subscribed=$fields_sth->fetchrow_array;
        ${$_}{value}="checked" if $subscribed;
   }
 push(@prof_loop, \%row_data);
}
page_out('template', professions=> \@prof_loop);

<TMPL_LOOP NAME=professions> 
 <a name="<TMPL_VAR NAME="id">"><TMPL_VAR NAME="text"></a>
 <TMPL_LOOP NAME=fields>
        <INPUT 
                TYPE=CHECKBOX 
                NAME="field_<TMPL_VAR NAME="id">" 
        <TMPL_VAR NAME="value">
                >
                <TMPL_VAR NAME="text">
   </TMPL_LOOP>
   </TMPL_LOOP>