Identificador de Regra

EST-220LEIBA01

Módulo: EST - Estoques.

Finalidade: devolver para o sistema 5 variáveis a serem consistidas. Após o usuário informar um código de barras na tela, o sistema chama uma regra que consiste/valida o código lido e devolve para o sistema 5 variáveis. O conteúdo das variáveis determina o passo seguinte.

Exemplo:

1. a regra retornou um código de barras (VSBARRAS): o sistema faz uma busca na tabela de código de barras procurando por ele. Caso encontre, carrega a grade com o produto/derivação correspondente;
   
2. a regra retornou um código de produto (VSCODPRO): o sistema faz uma busca na tabela de derivações procurando por ele. Caso encontre, carrega a grade com a 1º derivação encontrada para esse produto;
   
3. a regra retornou um código de derivação (VSCODDER): o sistema faz uma busca na tabela de derivações procurando por ele. Caso encontre, carrega a grade com o 1º produto encontrado para essa derivação;
   
4. a regra retornou um código de lote (VSCODLOT): o sistema faz uma busca na tabela de saldo de lotes procurando por ele. Caso encontre, carrega a grade com o 1º produto encontrado que contenha esse lote e tenha saldo;
   
5. a regra retornou um código de quantidade (VSQTDITE): caso as opções a, b, c ou d retornem alguma informação para a grade, essa será a quantidade sugerida. Caso haja um item idêntico na grade, o sistema apenas faz a soma.

Características:

Tela: F220COI.

Transação: não se aplica.

Regra:

Definir numero VSCodEmp;
Definir data VSDatInv;
Definir alfa VSCodDep;
Definir numero VSNroCon;
Definir alfa VSNumDoc;
Definir alfa VSCodEan;
Definir alfa VSCodLiv;
Definir alfa VSCodBar;

@ RETORNO DA REGRA @
Definir alfa VSCodPro;
Definir alfa VSCodDer;
Definir alfa VSCodLot;
Definir numero VSQtdIte;
Definir alfa VSBarras;

se (VSCodBar = "12345")
     VSCodLot = "A";   

se (VSCodBar = "12346") 
     VSBarras = "12345"; 

se (VSCodBar = "12347") 
     VSCodPro = "FRS_TRA"; 

se (VSCodBar = "12345") 
     VSQtdIte = 11; 
senao VSQtdIte = 22; 

Variáveis disponibilizadas: