Identificador de Regra

EST-210VADUP01

Módulo: EST - Estoques.

Finalidade: Este identificador tem como objetivo validar se já existe movimentação de estoque com os parâmetros passados para o identificador de regras.

Regra:

definir numero EstNCodEmp;
definir Alfa EstACodPro;
definir Alfa EstACodDer;
definir Alfa EstACodDep;
definir data EstDDatMov;
definir numero EstNNumDoc;
definir Alfa EstACodTns;

definir Alfa EstARetorno;

Definir Cursor Cur_E210MVP;

EstARetorno = "";

Cur_E210MVP.SQL "SELECT CODPRO \
FROM E210MVP \
WHERE CODEMP = :EstNCodEmp \
AND CODPRO = :EstACodPro \
AND CODDER = :EstACodDer \
AND CODDEP = :EstACodDep \
AND DATMOV = :EstDDatMov \
AND NUMDOC = :EstNNumDoc \
AND CODTNS = :EstACodTns";
Cur_E210MVP.AbrirCursor();

Se (Cur_E210MVP.Achou) EstARetorno = "Movimentação já cadastrada";

Cur_E210MVP.FecharCursor();

Variáveis Disponibilizadas:

Nome Tipo Observações Retorna Valor
EstNCodEmp Número Código da empresa N
EstACodPro Alfa Código do Produto Movimentado N
EstACodDer Alfa Código da derivação do produto movimentado N
EstACodDep Alfa Código do depósito movimentado N
EstDDatMov Data Data da movimentação do estoque N
EstNNumDoc Número Número de documento base da movimentação N
EstACodTns Alfa Código da transação de movimentação de estoque N
EstARetorno Alfa Deve retornar alguma String para não duplicar o registro S

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ê?