ISREADONLY( ) Function Example
CLOSE DATABASES OPEN DATABASE (HOME(2) + 'data\testdata') USE customer NOUPDATE && Open customer table read-only CLEAR ? ISREADONLY('customer') && Returns .T.