Identificador de Regra
VEN-120CNIUF01
Módulo: VEN - Vendas.
Finalidade: Permitir fazer consistências entre o novo item de pedido e o item de pedido original, quando o item de pedido é gerado pela consulta à tela de Últimos Faturamentos, através de botão específico na tela de pedidos agrupados. O item de pedido origem é o item que gerou o item da nota fiscal de saída. Os campos chave desse item são passados para a regra juntamente com os campos chave do item de pedido sendo gerado. Na regra, pode-se então efetuar as consistências necessárias aos dois itens de pedido (novo e de origem), como copiar campos de usuário, verificar dados, etc. Por padrão, o sistema já copia os campos de usuário, ficando a cargo da regra alterar, ajustar ou eliminar valores. O identificador é chamado para cada item de pedido a ser gerado baseado no que o usuário selecionou na tela de últimos faturamentos, e após o item novo ser gravado na base.
Tela: F141CUF
Transação: Não se aplica.
Regra:
/* Este exemplo demonstra a cópia de um campo
de usuário do item origem para o novo item */
Definir Numero VSCodEmp;
Definir Numero VSCodFil;
Definir Numero VSNumPed;
Definir Numero VSSeqIpd;
Definir Numero VSFilOri;
Definir Numero VSPedOri;
Definir Numero VSSeqOri;
Definir Numero VUSU_VLRTST;
Definir Cursor CUR_E120IPD;
VUSU_VLRTST = 0;
CUR_E120IPD.Sql "select USU_VLRTST
from E120IPD
where CODEMP = :VSCodEmp and
CODFIL = :VSFilOri and
NUMPED = :VSPedOri and
SEQIPD = :VSSeqOri";
CUR_E120IPD.AbrirCursor();
se (CUR_E120IPD.Achou)
VUSU_VLRTST = CUR_E120IPD.USU_VLRTST;
CUR_E120IPD.FecharCursor();
se (VUSU_VLRTST > 0)
ExecSql "update E120IPD
set USU_VLRTST = :VUSU_VLRTST,
USU_VLRTST2 = :VUSU_VLRTST
where CODEMP = :VSCodEmp and
CODFIL = :VSCodFil and
NUMPED = :VSNumPed and
SEQIPD = :VSSeqIpd";
Variáveis Disponibilizadas:
Nome | Tipo | Observações | Retorna Valor |
---|---|---|---|
VSCodEmp | ALFA | Código da empresa do pedido (válido para o item original como para o novo) | N |
VSCodFil | ALFA | Código da filial do item de pedido que está sendo gerado | N |
VSNumPed | ALFA | Número do pedido do item que está sendo gerado | N |
VSSeqIpd | ALFA | Seqüência do item de pedido que está sendo gerado | N |
VSFilOri | ALFA | Código da filial do item de pedido do último faturamento selecionado (filial de origem) | N |
VSPedOri | ALFA | Número do pedido do item do último faturamento selecionado (pedido de origem) | N |
VSSeqOri | ALFA | Sequência do item de pedido do último faturamento (item de origem) | N |
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.