n = adir( laFiles, "*.xml" ) for i = 1 to n xmltocursor( laFiles[i,1] ... ) copy to (laFiles[i,1]) type csv use endfor