CLEAR CREATE CURSOR testlock (data I CHECK RW,RW L DEFAULT .T. CHECK CURVAL("RW")) APPEND BLANK REPLACE data WITH 1 REPLACE RW WITH .T. && NOW THE RW FIELD BECOME A STATIC FIELD REPLACE RW WITH .F. * every field with check RW become read only REPLACE data WITH 2 * rw can't return to .T. REPLACE RW WITH .T. ? DATA,RWthis is a deceptive solution, and every true ISO guy has to discard it