Bom dia pessoal, estou tendo dificuldades na validação do usuario, fiz todos os passos coloquei segurança em todas as aplicações, cadastrei o usuario dei toda permissão porem ele mostra mensagem de usuario sem permissão de acesso, segue codigo abaixo:
sc_reset_apl_status();
sc_reset_apl_conf();
$varsenha = sc_encode({txt_senha});
$vartxtlogin = sc_sql_injection({txt_login});
sc_lookup(rstusu,“select usucod from tbl_usuarios where usulogin=$vartxtlogin and ususenha=’$varsenha’”);
if(empty({rstusu}))
{
sc_erro_mensagem(“Usuário / Senha Inválido”);
}
else
{
$varusucod = {rstusu[0][0]};
sc_lookup(rstgrupo,“select distinct
tbl_grupo_x_direitos.aplinome,tbl_grupo_x_direitos.grupodireito from tbl_grupo_x_direitos INNER JOIN tbl_grupo_x_usuarios ON
tbl_grupo_x_usuarios.grupousucod = tbl_grupo_x_direitos.grupousucod WHERE tbl_grupo_x_usuarios.usucod = $varusucod”);
if (empty({rstgrupo}))
{
sc_error_message("Usuário não tem permissões definidas, Acesso negado");
}
else
{
foreach({rstgrupo}as $grupo)
{
$aplicativo = $grupo[0];
$direito = $grupo[1];
sc_apl_conf($aplicativo,"insert","off");
sc_apl_conf($aplicativo,"update","off");
sc_apl_conf($aplicativo,"delete","off");
$propriedade = "";
for($i=0;$i<strlen($direito);$i++)
{
if (substr($direito,$i,1)== "I")
{
$propriedade="insert";
$valor="on";
}
if (substr($direito,$i,1)== "A")
{
$propriedade="updade";
$valor="on";
}
if (substr($direito,$i,1)== "D")
{
$propriedade="delete";
$valor="on";
}
if (substr($direito,$i,1)== "T")
{
sc_apl_conf($aplicativo,"insert","on");
sc_apl_conf($aplicativo,"update","on");
sc_apl_conf($aplicativo,"delete","on");
}
if(rtrim($propriedade)!="")
{
sc_apl_conf($aplicativo,$propriedade,$valor) ;
}
}
}
}
}
será que podem me ajudar, se alguem tiver algum codigo já pronto eu agradeço.