English
Español
Identificador de Regra
GER-000PEUSP01
Módulo: GER - Gerais.
Finalidade: Definir quais usuário podem enxergar a estrutura de determinados produtos.
Características: Muitas vezes é apenas passado o código do produto. A variável "VSCodMod" (código do modelo) só terá valor ao utilizar as telas "F700CMC, F700COM e F700DMP".
Tela: Produção
Transação: Não se aplica.
Regra:
Definir Alfa VCodEmp;
Definir Alfa VSCodOri;
Definir Alfa VScodFam;
Definir Alfa VSCodPro;
Definir Alfa VSCodDer;
Definir Numero VCodUsu;
Definir Alfa VSPermite;
Definir Cursor C075PRO;
EstaNulo(VSCodOri, VCodOri_Nulo);
Se (VCodOri_Nulo = 1)
Inicio
IntParaAlfa(CodEmp, VCodEmp);
C075PRO.SQL "SELECT CODORI FROM E075PRO WHERE CODEMP = :VCodEmp AND CODPRO = :VSCodPro";
C075PRO.AbrirCursor();
Se (C075PRO.Achou)
VSCodOri = C075PRO.CodOri;
C075PRO.FecharCursor();
Fim;
VSPermite = "S";
Se ((VCodUsu = 39) e (VSCodOri <> "40"))
VSPermite = "N";
Se ((VCodUsu = 40) e (VSCodOri <> "20"))
VSPermite = "N";
Variáveis Disponibilizadas:
| Nome | Tipo | Observações | Retorna Valor |
|---|---|---|---|
| VSCodOri | ALFA | Código da Origem | N |
| VSCodFam | ALFA | Código da Família | N |
| VSCodPro | ALFA | Código do Produto | N |
| VSCodDer | ALFA | Código da Derivação | N |
| VCodUsu | ALFA | Código do usuário logado | N |
| VSCodMod | ALFA | Código do modelo | N |
| VSPermite | ALFA | Variável de retorno S ou N q indica se permite ou não enxergar a estrutura do produto | 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
