Article ID: 137951
Article Last Modified on 3/24/2000
CREATE DATABASE Test1
CREATE TABLE tbl1 (one c(3) CHECK !EMPTY(one) ;
ERROR 'error message here')
ALTER TABLE tbl1 ALTER COLUMN one SET CHECK myrule() NOVALIDATE
The procedure myrule may look as follows:
PROCEDURE myrule
IF EMPTY(one)
=MESSAGEBOX('The -one- FIELD CAN NOT BE EMPTY',0,'MY APPLICATION')
ENDIF
After the table is browsed and CTRL+Y is pressed, the customized dialog box
will appear with the new title.
Additional query words: VFoxWin fixlist3.00b buglist3.00
Keywords: kbbug kbfix KB137951