Identificador de Regra

CTB-650CAJRE02

Módulo: CTB - Contabilidade.

Finalidade: Disponibilizar via regra os principais campos da tela antes de excluir, 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: F650CAJ

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") e ( CTBAAbgAfi = "1") e ( CTBAAbgGcc = "1") e
( CTBAAbgCta = "120") e ( CTBAFecCan = "N") e ( CTBALotFil = "S") e
( CTBACtaAju = "N") e ( CTBNCtaDeb = 120) e ( CTBNCtaCre = 60) e
( CTBANatOri = "C") e ( CTBAAjuOri = "N") e ( CTBAAjuCpa = "N") e
( CTBNCodHpd = 1001) e ( CTBDMesAno = 39203) e ( CTBDDatLct = 39222) e
( CTBACodMoeInd = "01") e ( CTBNVlrCotInd = 1) e ( CTBDDatMoeInd = 38928) e
( CTBNVlrCotCon = 1) e ( CTBDDatMoeCon = 38928))
Mensagem(Erro,"Processamento não permitido!");

Variáveis Disponibilizadas: