Histórico da Página

#--------------------------------------------#
 FUNCTION LOGIN_logix_checkCompanyUser_test()
#--------------------------------------------#
   DEFINE l_user    LIKE usuarios.usuario
   DEFINE l_company LIKE empresa.cod_empresa

   #Checagem de permissão do usuario ad02847 para a empresa 05, com controle de exibição de menssagem de erro em modo BATCH (1)
   IF LOGIN_logix_checkCompanyUser('ad02847','05',1) THEN]
	  CALL LOG_messageInfo("Usuário possui permissão para a empresa.","","")
   ELSE
      CALL log0030_exibe_ultima_mensagem()
   END IF
 END FUNCTION