Para inaugurar esta parte do forum, vamos ao login… o início de qualquer sistema… eu costumo usar esse padrão… espero que possa ajudar alguém… pois é um dos assuntos que mais procurei no início e sempre tem alguém com dúvida!!
Crie uma aplicação tipo CONTROLE, nela crie doi campos (LOGIN E SENHA)!!
No evento “ONVALIDATE”, coloque o seguinte código (para buscar na sua tabela de usuários se o login existe!!):
//INICIO LOGIN
sc_reset_apl_status();
sc_reset_apl_conf();
sc_lookup(dslogin,“Select usrcodigo, usrnome from tb_usuarios where usrlogin=’{loglogin}’ and usrsenha=’{logsenha}’”);
if(empty({dslogin})) {
sc_error_message(“Login ou Senha inválido.”);
}else{
sc_apl_status(‘mnu_principal’,‘on’); //“destrava” o menu principal para o usuário logado
sc_apl_status(‘cns_usuarios_fil’,‘on’); //“destrava” a consulta de usuários para o usuário logado
sc_apl_status(‘frm_usuarios’,‘on’); //“destrava” o cadastro de usuários para o usuário logado
sc_apl_status(‘frm_parametros’,‘on’); //“destrava” os parametros para o usuário logado
}
//FIM LOGIN
Esse "sc_apl_status(’…’,‘on’); " habilita as aplicações para que o usuário consiga acessá-los… pois, em cada APLICAÇÃO, APLICAÇÃO -> CONFIGURAÇÃO, você pode marcar a opção “usar segurança” assim ninguem consegue acessar a APLICAÇÃO diretamente (sem logar), pois é apenas no “ONVALIDATE” do login que essas aplicações serão “liberadas”.
Se o usuário tentar usar direto a aplicação sem ter passado pela tela de Login… ele não permite o acesso!!
Também é possível habilitar a segurança nas aplicações pela ferramenta chamada “Edição Expressa” e habilitar a segurança para todas as aplicações (exceto o Login) de uma única vez.
Estudando o codigo do login acima, dá pra controlar também oq cada usuário pode acessar!