Identificador de Regra

Definir numero ComNCodEmp;
Definir numero ComNCodFil;
Definir numero ComNCodFor;
Definir alfa ComACodPro;
Definir numero ComNPrdPro;
Definir numero ComNForNfc;
Definir numero ComNNumNfc;
Definir alfa ComACodSnf;

Inicio
Se ((ComNCodEmp = 5) e (ComNCodFil = 1) e (ComNCodFor = 1) e (ComACodPro = "SOJ01")) {
ComNPrdPro = 0;
ComNForNfc = 1;
ComNNumNfc = 1;
ComACodSnf = "1A";
}


Se ((ComNCodEmp = 5) e (ComNCodFil = 1) e (ComNCodFor = 2) e (ComACodPro = "SOJ02")) {
ComNPrdPro = 1;
ComNForNfc = 2;
ComNNumNfc = 1;
ComACodSnf = "1A";
}

Fim;