Edmar,
Você pode fazer o seguinte:
- Na tela de Login, após validar usuário/senha, grave em uma variável de sessão, o usuário e o tipo do usuário
- No evento Start da transação, leia a variável de sessão para uma variável comum
- Nas rules, você pode usar a regra:
AttUsuario = &UsuarioLogado if Insert and &TipoUsuarioLogado<>'Adm';
NoAccept(AttUsuario) if &TipoUsuarioLogado<>'ADM';