English
Español
Identificador de Regra
ENG-700RETCB01
Módulo: ENG - Engenharia Produto.
Finalidade: Retornar número da última combinação gerada para um agrupametos de modelos com a mesma referência.
Tela: Geração de Combinações
Transação: Não se aplica.
Regra:
Definir alfa VSCodMod;
Definir alfa VSCodFam;
Definir alfa VSCodFamAux;
Definir alfa VSCodModAux;
Definir numero VPosStr;
Definir numero VCodCbn;
Definir Cursor Cur_E700CBN;
PosicaoAlfa("-", VSCodMod, VPosStr);
Se (VPosStr > 1)
CopiarAlfa(VSCodMod, 0, VPosStr-1);
VCodCbn=0;
VCodEmp = CodEmp;
VSCodFamAux = VSCodFam;
VSCodModAux = " E700CBN.CODMOD LIKE '" + VSCodMod + "%'";
Cur_E700CBN.SQL"SELECT E700CBN.CODCBN FROM E700CBN,E700MOD WHERE E700CBN.CODEMP=:VCodEmp \
AND E700CBN.CODEMP = E700MOD.CODEMP \
AND E700CBN.CODMOD = E700MOD.CODMOD \
AND E700MOD.CODFAM = :VSCodFamAux AND \
__Inserir(:VSCodModAux) \
ORDER BY 1 DESC";
Cur_E700CBN.AbrirCursor();
Se(Cur_E700CBN.Achou)
VCodCbn=Cur_E700CBN.CodCbn;
Cur_E700CBN.FecharCursor();
VCodCbn=VCodCbn+1;
Variáveis Disponibilizadas:
| Nome | Tipo | Observações | Retorna Valor |
|---|---|---|---|
| VSCodMod | ALFA | Código do Modelo | N |
| VSCodFam | ALFA | Código da Família | N |
| VCodCbn | ALFA | Código da Combinação | 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.
English
Español
