Yo utilizo la funcion Used()
- Code: Select all Expand view
IF(aMesa_1->(Used() ), Select("aMesa_1"),dbUseArea( .T., , "Mesa_1", "aMesa_1", .T. ) )
Saludos.
Jose
IF(aMesa_1->(Used() ), Select("aMesa_1"),dbUseArea( .T., , "Mesa_1", "aMesa_1", .T. ) )
@ 3.2, 9 GET oGet3 VAR nImp1 PICTURE "999,999.99" SIZE 40, 12 COLOR "B+/W/" FONT fntArial RIGHT UPDATE
cHasta := cGetFile32("*.Dbf","Seleccione el archivo actual de expedientes",1,".\Archivos")