VALIDATION ERROR
Posted: August 29th, 2019, 12:34 am
Dears,
I would like you to help me with a problem that is presented to me, which I will try to explain in detail,
I'm working on a template with validation on it, that if I enter data in the first part the same person re-enters them and if you make a mistake shows you a message where I specify that there is error and in turn tells you the number of errors that com and when you complete a number of errors it will close.
I have the following syntax for normal entry in the first part :
PROC FNAME
If $ = " " then
errmsg ("El campo Primer Nombre no debe quedar vacio");
move FNAME;
endif;
if DFNAME<>"" |validando = 1 then
move DFNAME;
else
validando=0;
errores=0;
endif;
and for the validation of the same variable I have the following:
PROC DFNAME
PostProc
if $<>FNAME then
errores=errores+1;
if errores > 9 then
errmsg("Es la decima vez que se equivoca. \nLa plantilla se cerrara.");
stop(1);
else
errmsg("Inconsistencia en datos.\nCantidad de errores: %d.",errores);
reenter FNAME;
endif;
endif;
but it presents me with the following error message: unable to 'reenter FNAME' -target-item field is a skipped field {in Var DFNAME}
I HOPE YOU CAN HELP ME
THANKS
I would like you to help me with a problem that is presented to me, which I will try to explain in detail,
I'm working on a template with validation on it, that if I enter data in the first part the same person re-enters them and if you make a mistake shows you a message where I specify that there is error and in turn tells you the number of errors that com and when you complete a number of errors it will close.
I have the following syntax for normal entry in the first part :
PROC FNAME
If $ = " " then
errmsg ("El campo Primer Nombre no debe quedar vacio");
move FNAME;
endif;
if DFNAME<>"" |validando = 1 then
move DFNAME;
else
validando=0;
errores=0;
endif;
and for the validation of the same variable I have the following:
PROC DFNAME
PostProc
if $<>FNAME then
errores=errores+1;
if errores > 9 then
errmsg("Es la decima vez que se equivoca. \nLa plantilla se cerrara.");
stop(1);
else
errmsg("Inconsistencia en datos.\nCantidad de errores: %d.",errores);
reenter FNAME;
endif;
endif;
but it presents me with the following error message: unable to 'reenter FNAME' -target-item field is a skipped field {in Var DFNAME}
I HOPE YOU CAN HELP ME
THANKS