Problema: Como desmarcar coletivamente determinado módulo para os colaboradores.

Quando ocorre / onde se aplica: Colaboradores > Ficha Cadastral > Empregados > aba Indicação Módulos.
Solução: Deverá executar o comando abaixo na ferramenta de banco de dados:

UPDATE R034MDL SET INDCON = 'N' WHERE NUMEMP = X AND TIPCOL = Y AND CODMOD = Z
Onde: X se refere ao número da Empresa;
Y se refere ao Tipo de Colaborador;
Z se refere ao código do módulo (Ex: Captura Ponto é 14, Gestão do Ponto é 15);


Caso mesmo assim esteja considerando colaboradores indevidos ao módulo, deve-se executar o comando para inserir os registros de colaboradores que não existem na R034MDL, com CODMOD = X e INDCON = 'N'.

Segue abaixo um exemplo de regra que deleta todos os colaboradores da R034MDL e em seguida insere Todos com o módulo desmarcado - sem a indicação do módulo:

ExecSQL delete from r034mdl where codmod = X;

definir cursor xcur;

xcur.sql select numemp, tipcol, numcad from r034fun order by 1,2,3;

xcur.abrircursor();
enquanto (xcur.achou) {
xnumemp = xcur.numemp;
xtipcol = xcur.tipcol;
xnumcad = xcur.numcad;
ExecSQL insert into r034mdl (numemp, tipcol, numcad, codmod, indcon) values (:xnumemp, :xtipcol, :xnumcad, X, 'N');
xcur.proximo();
}

OBS 1: Trocar X pelo código do módulo. Ex: Captura Ponto = 14, Gestão Ponto = 15
OBS 2: Caso o módulo seja o 15 (Gestão Ponto), além dos procedimentos acima, deve-se também fazer um UPDATE na R034FUN para deixar o campo GESPON = 'N'.