Fórmulas de Crítica RM Labore<b> (Resolvido)</b>

[Sebastião Souza Junior]

Pessoal um recurso muito poderoso e pouco explorado no RM Labore é a criação de fórmula de crítica, com ele é possível cercar possíveis erros de cadastro e ficha Financeira que podem interferir direto na folha de pagamento e recolhimentos.Geralmente as fórmulas de crítica são muito simples de serem criadas (não dependem de implementações no sistema), mas seu benefício para o usuário é muito grande.

Que tal colocarmos aqui as fórmulas de crítica que criarmos?

A fórmula de Crítica abaixo retorna funcionários que estão sem rateio fixo cadastrado, muito útil para cliente com folha por centro de custo:

1 - Criar a senteça : C009.01

SELECT CHAPA AS CHAPAFUNC

FROM PFUNC

WHERE PFUNC.CHAPA NOT IN (SELECT CHAPA FROM PFRATEIOFIXO

WHERE PFRATEIOFIXO.CHAPA=:FRM_CHAPA)

AND PFUNC.CHAPA=:FRM_CHAPA

2 - Criar a fórmula de critica abaixo:

SE EXECSQL ('C009.01') = 1

ENTAO 'ERRO!!!Funcionário sem rateio fixo cadastrado, favor verificar'

SENAO ' '

FIMSE

[Fábio Maia]

Vale lembrar que o Help deste tópico não foi atualizado. Antigamente você cadastrava na Tabela Dinâmica INT 29 todas as mensagens e referenciava na fórmula que mensagem seria exibida.

Continuando de onde o Júnior parou :

Após criar as fórmulas, acesse o menu > Rotinas > Crítica da Folha.

Selecione o período a ser criticado ou deixe 0 para criticar a competência.

Um abraço a todos.

Fábio Maia

fabmaia*** Proibido uso de emails ***.com

[Fábio Maia]

Essa fórmula verifica funcionários com valores forçados (flag na PFPERFF):

Criar a sentença abaixo : C0010

SELECT VALORESFORCADOS AS CONTROLE

FROM PFPERFF

WHERE CHAPA =:FRM_CHAPA

AND NROPERIODO =:FRM_PERIODO

AND MESCOMP =:FRM_MES

AND ANOCOMP =:FRM_ANO

AND CODCOLIGADA =:FRM_COLIGADA

E depois esta fórmula : C0010

EXECSQL('C0010');

SE RESULTSQL('C0010','CONTROLE') = 1

ENTAO 'Funcionario com valores forçados no periodo atual'

SENAO ' '

FIMSE

Vale lembrar que para este caso, o parâmetro "Nro período" na tela de Geração das críticas não será utilizado já que a sentença usa o parâmetro NROPERIODO, preenchido com a Formula PERIODO (retorna o período atual na PPARAM )

Espero ter ajudado.

Fábio Maia

fabmaia*** Proibido uso de emails ***.com

[Rhicky]

Estou tentando criar uma fórmula para criticar se o valor de salário composto que o usuário cadastrou para um funcionário está correto. Para tanto, criei a fórmula abaixo:

SE (ARREDVALOR ((VALSALCOMP('0009') / 6) , 0)) = (ARREDVALOR (VALSALCOMP('0003'), 0)) ENTAO

''

SENAO

'1'

FIMSE

Porém não consigo fazer ela funcionar. Apesar dos valores retornados das fórmulas abaixo serem iguais. Na fórmula acima sempre retorna 1, porém o correto deveria ser vazio.

- (ARREDVALOR ((VALSALCOMP('0009') / 6) , 0))

- (ARREDVALOR (VALSALCOMP('0003'), 0))

O que está errado. Alguém pode ajudar ?

[Jair - Fórmula]

Ao criar a formula, usa aquela função de detalhar a formula que com o arquivo texto gerado vc conseguirá visualizar qual é o problema Rhicky.

[Jairo]

Sabe qual é a função ... ?

[Jair - Fórmula]

Na verdade escrevinhei errado, é opção e não função.

Quando se testa, tem a opção de Salvar ao executar o teste, e outra pra acompanhar a execução. Seria esta segunda opção.

[Sebastião Souza Junior]

Rick você está querendo fazer uma fórmula de crítica???

[Rhicky]

Sim, isso mesmo, Sebastião...

Tendo em vista que na parametrização que criei, defini que o cliente deve cadastrar a hora-aula, o DSR 1/6 e a HA 5% no cadastro de salário composto de cada funcionário... desejo criar uma fórmula de crítica que verifique se o valor dos eventos acima mencionados foram cadastrados corretamente.

Estou tentando criar porém não estou conseguindo fazer os arredondamentos dos cálculos utilizando as funções: ARRED e ARREDVALOR.

Acredito que terei que fazer essa consulta no SQL e retornar o resultado dela na fórmula, porém mesmo utilizando as funções: EXECSQL e RESULTSQL não estou conseguindo retornar o resultado da consulta SQL.

Pode me ajudar ?

[Sebastião Souza Junior]

Me explica por favor o que esão os eventos 0009 e 0003

[Rhicky]

Sebastião,

Já consegui fazer a rotina de crítica. Porém, informo que a mesma só foi possível via instrução SQL mesmo, porque foi a única forma que encontrei para arredondar os valores, pois ao utilizar as funções ARRED e ARREDVALOR não consegui arredondar conforme necessitava.

Obrigado.

[Sebastião Souza Junior]

Legal Rick, quando for assim avisa para gente fechar o tópico assim ninguém mas perde tempo com ele. Seria bacana você colocar a solução para compartilhar com todos também.

[Sebastião Souza Junior]

Tópico Resolvido.

O mesmo foi marcado como resolvido por não haver mais nada a resolver.

Qualquer coisa, alguma dúvida ou questionamento sobre o assunto, pode postar novamente que analisaremos, ou se preferir, favor entrar em contato com a administração ou moderação, através do link: Administradores e Moderadores

Se preferir, mande um email para admin@forumrm.com.br

[Sebastião Souza Junior]

E ai Rick, qual foi a solução?

[Rhicky]

Utilizei a função ROUND do SQL. Dessa forma consegui arredondar o valor conforme eu precisava. A instrução SQL ficou assim:

SELECT ROUND(valor, 2) AS 'DSR'

FROM PFSALCMP

WHERE CODEVENTO = 0003 AND CHAPA =:FRM_CHAPA

[Sebastião Souza Junior]

Ah legal, e a fórmula de crítica como ficou?

[Jairo]

Legal ...

É isso aí ... vamos compartilhar informações !!!

Valeu Gente !!!

[Sebastião Souza Junior]

Oi Rick, não esquece da gente não, quanto mais soluções cada um puder contribuir aqui melhor...

[Rhicky]

Sebastião,

Conforme seu pedido, segue abaixo a fórmula que utilizei vinculada à instrução SQL:

EXECSQL('BASEDSRPROF');

SE VALSALCOMP('0100') > 0 ENTAO

SE RESULTSQL('BASEDSRPROF' , 'DSR') = (ARREDVALOR (VALSALCOMP('0100'), 0)) ENTAO

''

SENAO

'ERRO - Funcionário com cadastro incorreto no valor do evento: 0100 - DSR 1/6 PROFESSOR.'

FIMSE

SENAO

''

FIMSE

Abraços... t+

[Jairo]

Valeu Rhicky ...

[Sebastião Souza Junior]

Isso ai Rick, assim que se faz, obrigado!

[Leandro Peixoto]

Prezados Foristas,

Estou necessitanto criar uma crítica para que forneça uma mensagem de Aviso no momento em que a admissão for cadastrada caso o campo seja preenchido incorreto. Aqui na empresa utilizamos o RM Vitae e todas as admissões são provenientes de requisições cadastradas, ou seja, substituição e aumento de quadro. No cadastro temos um campo, PFUNC.MOTIVOADMISSAO, que no nosso caso deve coincidir com a requisição cadastrada. Ou seja se o motivo for substituição deve ser proveniente de uma requisição de substituição e da mesma forma se o motivo for aumento de quandro deve ser proveniente de uma requisição de aumento de quadro.

Vi que nos parametros do labore tem um campo para o cadastro de uma formula de crítica de cadastro e alí que queria colocar essa formula criada para eliminar essa anomalia de motivos incorretos.