Identificador de Regra

PAT-670ILORE01

Módulo: PAT - Patrimônio.

Finalidade: Disponibiliza via regra os principais campos da tela ao processar cada registro, para que o usuário consista as informações da forma que desejar.

Características: As variáveis disponibilizadas para regra são somente as que visíveis na tela durante a execução.
As variáveis com iniciais "PAT" + "TIPO (N,A,D)" + "G" são variáveis de campos de grade e serão disponibilizadas para regra somente quando estiverem visíveis na grade durante a execução. Ex: PATACodBem.

Tela: F670ILO

Transação: Não se aplica.

Regra:

Definir Alfa PATACodEsp;
Definir Alfa PATACtaRed;
Definir Data PATDDatFin;
Definir Data PATDDatFig;
Definir Data PATDDatIig;
Definir Data PATDDatIin;
Definir Alfa PATACodFil;
Definir Alfa PATACodCcu;
Definir Alfa PATAAltOfi;
Definir Alfa PATAAltGer;
Definir Numero PATNGSelBem;
Definir Alfa PATAGCodBem;
Definir Alfa PATAGDesBem;
Definir Data PATDGDatIin;
Definir Data PATDGNewDatIin;
Definir Data PATDGDatFin;
Definir Data PATDGNewDatFin;
Definir Data PATDGDatIig;
Definir Data PATDGNewDatIig;
Definir Data PATDGDatFig;
Definir Data PATDGNewDatFig;
Definir Numero PATNGFilLoc;
Definir Numero PATNGFilAqi;
Definir Numero PATNGCodEsp;
Definir Alfa PATAGCodCcu;
Definir Numero PATNGCtaRed;
Definir Alfa PATAGCodTns;
Definir Numero PATNGQtdItm;
Definir Numero PATNGCodTur;
Definir Data PATDGDatAqi;
Definir Data PATDGDatIcl;
Definir Data PATDGDatEnt;
Definir Alfa PATAGEspDoc;
Definir Numero PATNGCodFor;
Definir Alfa PATAGNomFor;
Definir Alfa PATAGCodSnf;
Definir Numero PATNGNumDoc;
Definir Numero PATNGVlrBas;
Definir Data PATDGDatGar;
Definir Data PATDGDatMan;



se (( PATDDatFin = 39202) e ( PATDDatFig = 39201) e ( PATDDatIig = 39174) e
( PATDDatIin = 39173) e ( PATACodFil = "1") e ( PATAAltOfi = "SIM" ) e
( PATAAltGer = "SIM" ) e ( PATNGSelBem = 1) e
( PATAGCodBem = "INFNOTEB0001-000") e ( PATNGFilLoc = 1) e ( PATNGFilAqi = 1) e
( PATNGCodEsp = 5) e ( PATAGCodCcu = "1101") e ( PATNGCtaRed = 6030) e
( PATAGCodTns = "90800") e ( PATNGQtdItm = 1) e ( PATDGDatAqi = 38138) e
( PATDGDatIcl = 38138) e ( PATDGDatEnt = 38138) e ( PATAGEspDoc = "1") e
( PATNGCodFor = 1) e ( PATAGCodSnf = "1A") e ( PATNGNumDoc = 123456) e
( PATNGVlrBas = 7576.8) e ( PATDGDatGar = 38868))
Mensagem(Erro,"Processamento não permitido!");

Variáveis Disponibilizadas: