Identificador de Regra

CHA-909CBCIB01

Módulo: CHA - Chão de Fábrica.

Finalidade: O objetivo deste identificador é permitir que o código de barras lido na tela F909CIB seja interpretado, retornando para a tela os valores que serão utilizados para fazer o apontamento.

Tela: F909CIB

Transação: Não se aplica.

Regra:

Deve estar ligado a uma regra.

Exemplo:

Definir Alfa ChaACodBar;
Definir Alfa ChaACodOri;
Definir Numero ChaNNumOrp;
Definir Numero ChaNCodEtg;
Definir Numero ChaNSeqRot;
Definir Alfa ChaACodPro;
Definir Alfa ChaACodDer;
Definir Alfa ChaASeqLid;
Definir Numero ChaNQtdRe1;


Definir Cursor Cur_E900Oop;
Definir Data DataZero;

ChaACodOri = ChaACodBar;
ChaASeqLid = ChaACodBar;
CopiarAlfa(ChaACodOri, 1, 2); @ as duas primeiras posições são a Origem @
CopiarAlfa(ChaASeqLid, 3, 2); @ as duas últimas são o sequencial @
xEmpAtu = EmpAtu;
DataZero = 0;
@ vai buscar a última OP gerada para a origem, trazendo também o estágio/seq. roteiro e o o produto/derivação @
Cur_E900Oop.SQL "SELECT E900COP.NUMORP, E900OOP.CODETG, E900OOP.SEQROT, E900QDO.CODPRO, E900QDO.CODDER FROM \
E900COP , E900QDO , E900OOP WHERE \
E900COP.CODEMP = E900QDO.CODEMP AND \
E900COP.CODORI = E900QDO.CODORI AND \
E900COP.NUMORP = E900QDO.NUMORP AND \
E900COP.CODEMP = E900OOP.CODEMP AND \
E900COP.CODORI = E900OOP.CODORI AND \
E900COP.NUMORP = E900OOP.NUMORP AND \
E900COP.CODEMP = :xEmpAtu AND \
E900COP.CODORI = :ChaACodOri AND \
E900COP.SITORP IN ('A','L') AND \
E900OOP.DTRFIM = :DataZero \
ORDER BY E900COP.NUMORP DESC, E900OOP.CODETG, E900OOP.SEQROT ";
Cur_E900Oop.AbrirCursor();
Se (Cur_E900Oop.Achou)
inicio
ChaNNumOrp = Cur_e900OOP.NumOrp;
ChaNCodEtg = Cur_e900OOP.CodEtg;
ChaNSeqRot = Cur_e900OOP.SeqRot;
ChaACodPro = Cur_e900OOP.CodPro;
ChaACodDer = Cur_e900OOP.CodDer;
ChaNQtdRe1 = 1;
fim;
Senao
GeraLog("Código de barras inválido!");

Variáveis Disponibilizadas:

Nome Tipo Observações Retorna Valor
ChaACodBar ALFA Código de barras informado na tela N
ChaACodOri ALFA Código da origem S
ChaNNumOrp NÚMERO Número da O.P./O.S. S
ChaNCodEtg NÚMERO Código do estágio S
ChaNSeqRot NÚMERO Sequência do roteiro S
ChaACodPro ALFA Código do produto S
ChaACodDer ALFA Código da derivação S
ChaASeqLid ALFA Sequência lida S
ChaNQtdRe1 NÚMERO Quantidade lida de 1ª qualidade S
ChaNQtdRe2 NÚMERO Quantidade lida de 2ª qualidade S
ChaNQtdRe3 NÚMERO Quantidade lida de 3ª qualidade S
ChaNQtdRfg NÚMERO Quantidade lida de refugo 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ê?