Identificador de Regra

definir Data CtlDData;

definir numero CtlNCodImr;

definir alfa CtlANumCco;

definir alfa CtlADocMov ;

definir numero CtlNTipDoc;

definir alfa CtlACgcCpf;

definir numero CtlNCxblpr;

definir numero CtlNSeqMov;

definir numero CtlNTotEnt;

definir numero CtlNTotSai;

definir numero CtlNSalMes;

definir alfa CtlANatSal;

definir alfa CtlATipPar;

definir numero CtlNCodEmp;

definir numero CtlNCodFil;

definir alfa CtlACodTpt;

definir alfa CtlNCodFor;

definir alfa CtlAHisMov;

definir alfa CtlATipReg;

definir alfa CtlACplMov;

definir alfa CtlACodCco;

se (CtlADocMov = "Titulo1"){

CtlNTipDoc = 6;

}

CtlAHisMov = CtlACgcCpf + " - " + CtlADocMov + " - " + CtlNCodFor + " - " + CtlACodTpt;