LOCAL i, aCursors[1]

AMEMBERS(aCursors, oForm.DataEnvironment, 2)

WITH oForm.DataEnvironment
     .CloseTables()

     FOR i = 1 to ALEN(aCursors)
         WITH EVAL("." + aCursors[i])
              IF .BaseClass = "Cursor"
                 .CursorSouce = "foo"
                 .DataBase    = "d:\allfoopath\allfoo.dbc"
              ENDIF
         ENDWITH
     ENDFOR

     IF .AutoOpenTables
        .OpenTables()
     ENDIF

ENDWITH