Identificador de Regra

CPA-501BAACT01

Módulo: CPA - Contas a Pagar.

Finalidade: Esse identificador tem a finalidade de dar a liberdade para o usuário fazer consistências nos campos disponibilizados na grade de títulos a aproveitar e na grade de títulos a baixar.

Características: Somente serão atribuídos a regra os títulos que estiverem marcados e a regra será executada antes de efetuar o processado da baixa. Primeiro serão executados os títulos da grade de "Créditos (Adiantamentos/Pagamentos indevidos/Devoluções) a Aproveitar" e depois os títulos da grade "Títulos a Baixar".

Variáveis:
VSBAATA = Títulos a aproveitar;
VSBAATB = Títulos a baixar;

Tela: F501BAA

Transação: Não se aplica.

Regra:

Definir Alfa VSBAAGrid;
Definir Alfa VSBAATACodTpt;
Definir Alfa VSBAATBCodTpt;

se (VSBAAGrid = "TitulosAproveitar")
inicio
se ((VSBAATACodTpt = "ADT") e (codusu = 1000000020))
GeraLog("Você não tem permissão para aproveitar títulos do tipo ADT na tela F501BAA.");
fim;
senao
se (VSBAAGrid = "TitulosBaixar")
inicio
se ((VSBAATBCodTpt = "DUP") e (codusu = 1000000020))
GeraLog("Você não tem permissão para baixar títulos do tipo DUP na tela F501BAA.");
fim;

Variáveis Disponibilizadas: