>ATAGINFO(laTag) >FOR lnTag = 1 to ALEN(laTag,1) > lcProgram = lcProgram + ' index on ' + laTag[lnTag,3] + ' tag ' + laTag[lnTag,1] +; > ' '+laTag[lnTag,2]+CR >NEXT >