SYS(2029) - Table Type Example

The following example opens the customer table in the testdata database.

CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'Data\testdata')
USE Customer     && Open customer table

CLEAR
DO CASE
   CASE SYS(2029) = '3'
      ? 'Previous versions of FoxPro'
   CASE SYS(2029) = '48'
      ? 'Visual FoxPro Table'
   CASE SYS(2029) = '67'
      ? 'dBASE IV SQL table, no memo fields'
   CASE SYS(2029) = '99'
      ? 'dBASE IV SQL System table with a memo field'
   CASE SYS(2029) = '131'
      ? 'FoxBASE+ table with a memo field'
   CASE SYS(2029) = '139'
      ? 'dBASE IV table with a memo field'
   CASE SYS(2029) = '203'
      ? 'dBASE IV SQL table with a memo field'
   CASE SYS(2029) = '245'
      ? 'Previous versions of FoxPro with a memo field'
ENDCASE