Help for this page

Select Code to Download

Select or download this

sub getLoggedOn_user_id {
  my ($dbh,$query) = @_;
  my $session = CGI::Session->load(
...
  );
  return $session->param("user_id");
}

Select or download this
$userid_1 = manageusers::getLoggedOn_user_id($dbh,$q);