Incidente

No processo de geração de Rateios, quando a forma do rateio da transação é definida como Rateio manual, a tela de rateio é aberta nos processos que envolvem rateio, porém o sistema permite fechar a tela de rateio sem informação dos campos necessários, deixando-o em branco e finalizando o processo sem inconsistências.

Causa
Este incidente pode ocorrer, pois quando a forma do rateio é definida como Rateio Manual entende-se que fica a critério do usuário fazer os preenchimentos das contas e centro de custo de acordo, permitindo assim, inclusive seguir o processo sem nenhuma informação.

Solução
Para que o sistema bloqueie o fechamento da tela de rateio sem as informações inseridas adequadamente, realize os passos a seguir:

1. Acesse a tela NF098REG - Cadastros / Identificadores e parâmetros / Identificador de Regras (Cadastro de Identificador de Regras);

2.  Cadastre e ative o identificador de regras GER-000PRRAT01. Clique aqui para acessar a documentação deste identificador;

3. Desenvolva e vincule uma Regra para que ocorra consistência caso a tela seja fechada sem as informações, barrando o processo.

Observação

Abaixo segue um exemplo de regra que poderá ser utilizado junto a este identificador de regras:

definir numero VSCONTAFINLINHA;
definir alfa VSTipoRegra;
definir alfa VSCCUSTOLINHA;
definir numero VSSequencia;
definir alfa VSAbreTelaViaRegra;
definir alfa VSRATEIOALTERADO;
definir numero VSCONTAFINLINHA;
definir alfa VSORIGEM;
definir alfa VSOPERACAORATEIO;
definir alfa VSCHAVEORIGEM;
Definir Alfa vValorAlfa;
Definir Alfa vMensagem;
Definir Alfa VSTransacao;
Definir Alfa VSCCustoLinha;
Definir Numero VSContaCtbLinha;

Se (VSValorBase = 0)
Cancel;

Se (VSTipoRegra="RECALCULA")
inicio
TotalRateado(0,0,0,0,"",vValorNumero);
Se(vValorNumero=0)
inicio
VSAbreTelaViaRegra="SIM";
Mensagem(retorna,"É necessário informar rateio[&OK]");
fim
fim
Se (VSTipoRegra="RECALCULALINHA")
inicio
Se (VSCONTAFINLINHA = 0)
inicio
VSAbreTelaViaRegra="SIM";
Mensagem(retorna,"É necessário informar a conta financeira[&OK]");
fim
fim
Senao
Se (VSTipoRegra="TELA")
inicio
TotalRateado(0,0,0,0,"",vValorNumero);
Se(vValorNumero=0)
Mensagem(erro,"É necessário informar rateio!");
fim
Senao
Se (VSTipoRegra="TELALINHA")
inicio
Se (VSCONTAFINLINHA = 0)
Mensagem(erro,"É necessário informar a conta financeira!");
fim;

Importante

A regra disponibilizada acima é apenas um exemplo de regra. Você deverá adaptar a regra conforme a sua necessidade.