SIGN Function

[ggauny@live.fr]

Code:

EXPORT OKDATE(J,M,A)
BEGIN
LOCAL J,M,A;


IF (SIGN(J) OR SIGN(M) OR SIGN(A))==0
 
THEN PRINT("Date ??")
ELSE PRINT("Date OK");
END;

END;

It is my progrm wrong.

Normaly if only one test is wrong than the date is wrong.