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.