Nadya,
Why would you bother with what alias you have or what actual dbf is or even if it's a view or table. Simply in your default value or call routine supply a unique name ie: GetNextID('EMPLOYEE').

If you really need actual source one of these would do for you :

lnInUse = aused(arrOpen)
for ix = 1 to lnInUse
? alias(arrOpen[ix,1]),;
 cursorgetprop('SourceName',arrOpen[ix,1]), ;
 cursorgetprop('SourceType',arrOpen[ix,1]), ;
 cursorgetprop('Database',arrOpen[ix,1]),;
 dbf(arrOpen[ix,1])
endfor

Cetin