03-25-06 04:35 PM
Ken Mayer [dBVIPS] wrote
>
> You need to show us the code you're using ...
------
Hi Ken,
try the code below...
Roland
// Test: Bug with SET AUTONULLFIELDS?
clear
cAutonull = set("autonullfields")
SET AUTONULLFIELDS OFF
set database to; close tables
if _app.databases[1].tableExists("autonulltest")
_app.databases[1].dropTable("autonulltest")
endif
create table autonulltest (ID char(3), Name char(10))
insert into autonulltest (ID) values ('001')
insert into autonulltest (ID) values ('002')
use autonulltest excl
copy to autonulltest deli
set safety off
zap
set safety on
? "AUTONULLFIELDS is", set("autonullfields")
append from autonulltest deli
go top
if name = NULL
? "Bug: Table contains NULL value"
else
? "OK"
endif
close tables
SET AUTONULLFIELDS &cAutonull
[ Post a follow-up to this message ]
|