Identificador de Regra

CTB-650CONLC02

Módulo: CTB - Contabilidade.

Finalidade: Tem a finalidade de realizar a consistência via regra na exclusão dos lotes contábeis. Ao clicar no botão "Processar" com a opção "Excluir" ou "Excluir fisicamente" na tela F650PLT, o sistema executa a regra relacionada a este identificador e através das variáveis de retorno valida se deve ou não permitir a exclusão do lote selecionado.

Características: Quando não for permitido o processamento da exclusão do lote, têm-se a opção de retornar a mensagem que será apresentada ao usuário.

Tela: F650PLT

Transação: Não se aplica.

Regra:

@- Dados do Lote -@
Definir Numero VSCodEmp;
Definir Numero VSCodFil;
Definir Numero VSNumLot;
Definir Alfa VSOriLct;
@- Variáveis de Retorno do Identificador("CTB" - "650CONLC02") -@
Definir Alfa VSExcluirLote;
Definir Alfa VSMsgCon;

@- Verificar se o Lote pode ser excluído -@
VSMsgCon = "";
VSExcluirLote = "S";

ConverteParaMaiusculo(VSOriLct);
Se (VSOriLct <> "MAN") {
VSExcluirLote = "N";
VSMsgCon = "Este lote não tem Origem Manual e não deve ser Excluído!";
}

Se (VSCodFil = 1) {
VSExcluirLote = "N";
VSMsgCon = "Este lote pertence a Filial 1 e não deve ser Excluído!";
}

Variáveis Disponibilizadas:

Nome Tipo Observações Retorna Valor
VSCODEMP NÚMERO Código da empresa N
VSCODFIL NÚMERO Código da filial N
VSNUMLOT NÚMERO Número do lote N
VSORILCT ALFA Origem do lote N
VSEXCLUIRLOTE ALFA Excluir lote? S ou N N
VSMSGCON ALFA Mensagem que será apresentada ao usuário N

Atenção

Caso o parâmetro global LisVarReg esteja habilitado, a variável ListaVariaveis estará disponível em todos os identificadores de regras do sistema. O conteúdo desta variável lista os campos disponibilizados no identificador de regras em questão.

Não é aconselhada a ativação desse parâmetro global para o uso cotidiano. Esse recurso de listagem dos campos de identificadores auxilia a construção de regras e o Suporte para, por exemplo, depuração ou quando não houver acesso à documentação dos identificadores de regras.

Este artigo ajudou você?