Identificador de Regra

VEN-120LIBER03

Módulo: VEN - Vendas.

Finalidade: Executado para cada observação do pedido selecionado na grade de observações, no momento do processamento. O mesmo só funciona na liberação de pedidos bloqueados por área da empresa, ou seja, não funciona para liberar pedidos quando é utilizado o bloqueio simples do pedido ou o bloqueio pelo ASGQ.

Características:

• Esta regra está sendo executada dentro de uma transação, se houver algum erro no trajeto será efetuado o ROLLBACK, diferentemente da regra VEN-120LIBER02.
  Ela contém todas as variáveis existentes na LIBER02 e as variáveis de área.
• Esse identificador não é acionado quando a liberação de pedido ocorre através do web service com.senior.g5.co.mcm.ven.pedidos@liberarPedidosBloqueados.
• O identificador de regras VEN-120LIBER03 é executado para cada observação registrada no pedido, permitindo a validação individual de cada uma. É o resultado da análise dessas observações que indica se o pedido será liberado ou reprovado. Como o identificador VEN-120LIBER03 é executado durante essa análise, o valor da variável VSPedAca será sempre "L", indicando que está sendo efetuada a análise de liberação do pedido, e não necessariamente a sua liberação ou reprovação. Para verificar o estado da observação que está sendo consistida, deve-se consultar a variável VSLibInfApr.
• Caso seja necessário validar individualmente cada pedido, utilize o identificador de regras VEN-120LIBER02.
• Caso seja necessário validar a finalização do processo, seja ela reprovação ou liberação, utilize o identificador de regras VEN-120LIBER04.

Tela: F120LIB

Transação: Não se aplica.

Regra:

@Mantem as variaveis do identificador VEN-120LIBER02 acrescentando as variaveis da área de cada liberação@
Definir Numero VSCodEmp;
Definir Numero VSCodFil;
Definir Numero VSNumPed;
Definir Numero VSCodRep;
Definir Alfa VSPedAca;
Definir Numero VSLibSeqObs;
Definir Alfa VSLibAreObs;
Definir Alfa VSLibAprRpr;
Definir Alfa VSLibInfApr;

Definir Alfa AlfaNumPed;
Definir Alfa AlfaMensagem;

IntParaAlfa(VSNumPed, AlfaNumPed);
AlfaMensagem = "O pedido que voce está desbloqueando é o n. "+ AlfaNumPed +" que foi bloqueado pela área: "+ VSLibAreObs;

Se ((VSLibInfApr = "A") E (VSLibAprRpr = "I"))
Mensagem(retorna, AlfaMensagem);

Variáveis Disponibilizadas: