Prasamsa/Mahesh:
Try this
LastNo := 0;
IF no.FINDSET THEN BEGIN
REPEAT
IF (LastNo > 0) AND (no.“Entry No.” <> (LastNo+1) THEN
AddError(text001);
LastNo := no.“Entry No.”;
UNTIL no.NEXT = 0;
You can’t use INCSTR on an integer field - only on text/code fields.