>Hi All
>
>Suppose I have this situation
>
>

>use (_samples+'data\customer') in 0 Shared Alias Table1
>Create Cursor Table2 (p_name c(20))
>
>? IsTable("table1") && Return .T.
>? IsTable("table2") && Return .F.
>
>Procedure IsTable(tcTableName)
>    *** What is the function?
>Endpr
>

>
>What is the best way of telling that Table1 is "TABLE" and Table2 is "CURSOR"

(1)
IsTable = !empty(cursorgetprop('DataBase', m._alias)) and inlist(Cursorgetprop('SourceType', m._alias), DB_SRCTABLE)

(2)
IsView =  !empty(cursorgetprop('DataBase', m._alias)) and !inlist(Cursorgetprop('SourceType', m._alias), DB_SRCTABLE)

(3) otherwise
IsCursor

ps: justext(dbf()) returns TMP for both a cursor and a view

&& excerpt form foxpro.h
*-- Source Types for CursorGetProp()
#DEFINE DB_SRCLOCALVIEW         1
#DEFINE DB_SRCREMOTEVIEW        2
#DEFINE DB_SRCTABLE             3