Identificador de Regra

CTB-650AJURE00

Módulo: CTB - Contabilidade.

Finalidade: Disponibilizar via regra os principais campos da tela antes de processar, para que o usuário consista as informações da forma que desejar.

Características: As variáveis disponibilizadas para regra serão somente as que estiverem visíveis na tela durante a execução.

Tela: F650AJU

Transação: Não se aplica.

Regra:

Definir Numero CTBNCodAju;
Definir Alfa CTBADesAju;
Definir Alfa CTBAModAju;
Definir Alfa CTBABasAju;
Definir Alfa CTBAAbgFil;
Definir Alfa CTBAAbgAfi;
Definir Alfa CTBAAbgGcc;
Definir Alfa CTBAAbgCta;
Definir Alfa CTBAFecCan;
Definir Alfa CTBALotFil;
Definir Alfa CTBACtaAju;
Definir Numero CTBNCtaDeb;
Definir Numero CTBNCtaCre;
Definir Alfa CTBANatOri;
Definir Alfa CTBAAjuOri;
Definir Alfa CTBAAjuCpa;
Definir Numero CTBNCodHpd;
Definir Alfa CTBACplLct;
Definir Data CTBDMesAno;
Definir Data CTBDDatLct;
Definir Alfa CTBACodMoeInd;
Definir Numero CTBNVlrCotInd;
Definir Data CTBDDatMoeInd;
Definir Alfa CTBACodMoeVa1;
Definir Numero CTBNVlrCotVa1;
Definir Data CTBDDatMoeVa1;
Definir Alfa CTBACodMoeVa2;
Definir Numero CTBNVlrCotVa2;
Definir Data CTBDDatMoeVa2;
Definir Numero CTBNArrInt;
Definir Numero CTBNArrDec;
Definir Alfa CTBATipZer;
Definir Alfa CTBACodMoeCon;
Definir Numero CTBNVlrCotCon;
Definir Data CTBDDatMoeCon;

se (( CTBNCodAju = 1) e ( CTBAModAju = "I") e ( CTBABasAju = "M") e
( CTBAAbgFil = "1,2") e ( CTBAAbgGcc = "1,2") e ( CTBAAbgCta = "50") e
( CTBAFecCan = "S") e ( CTBALotFil = "S") e ( CTBACtaAju = "S") e
( CTBNCtaDeb = 50) e ( CTBNCtaCre = 60) e ( CTBANatOri = "S") e
( CTBAAjuOri = "A") e ( CTBAAjuCpa = "N") e ( CTBNCodHpd = 802) e
( CTBACplLct = "teste") e ( CTBDMesAno = 39113) e ( CTBDDatLct = 39139) e
( CTBACodMoeInd = "US$") e ( CTBNVlrCotInd = 3.4698) e ( CTBDDatMoeInd = 37989))
Mensagem(Erro,"Processamento não permitido!");

Variáveis Disponibilizadas: