Ocorrência

Ao realizar o Cadastro de um Usuário SESMT, através da rotina MDTA070, é apresentado o error log: "InterFunctionCall: cannot find function A640TESTOK in AppMap on {|x| Self:lActive  .and. A640TESTOK()                                                }(MSMGETPR.PRW)"

Ambiente

TOTVS RH - TOTVS RH (Linha Protheus) - Medicina e Segurança do Trabalho - Todas as versões

Causa

Este erro ocorre devido à utilização indevida da função A640TESTOK retirada do Repositório

Solução

Como a alteração que exclui a função A640TESTOK ocorreu durante a existência da versão 12.1.17, as versões seguintes iniciaram sem esta funcionalidade no Dicionário, portanto não há Dicionários Diferenciais que excluam esta função em versões superiores à 12.1.17, desta forma é necessário:

1. Acessar o Módulo de Configurador;

2. Acessar a rotina em Base de Dados/Dicionário/Base de Dados;

3. Acessar a tabela TMK como Alterar;

4. Procurar dentre os campos da tabela TMK, na propriedade "Modo Edição" (X3_WHEN), os que utilizam a função A640TESTOK e excluir o uso dessa função;

5. Salvar as alterações realizadas no Configurador;

6. Verificar que a rotina executa corretamente.