$self->{'s'}->param('username',$username);
$self->{'s'}->param('uid',$acct_user->{'userid'});
$self->{'s'}->param('account_code',$acct_user->{'account_code'});

$self->{'s'}->flush();
my $redirect = 1;
my $url = $self->{'cfg'}->param("www.dashboard") . '?CGISESSID=' . $self->{'s'}->id();
$html = $self->{'q'}->redirect(
             -uri => $url,
          -status => 303 );

print $self->{'s'}->header() unless($redirect);
print $html,"\n";