m.lcSQL = "REPORT FORM report1 FOR INLIST(Dependent.Classification" FOR m.i = 1 TO ALEN(array, 1) m.lcSQL = m.lcSQL + ", array[" + ALLTRIM(STR(m.i) + "]" NEXT m.lcSQL = m.lcSQL + ")" &lcSQL2) Do a SQL query against your table and a cursor. The cursor is created from the array:
CREATE CURSOR SQLCls (Classification C(25) APPEND FROM ARRAY laArray SELECT * ; FROM myTable ; WHERE Classification IN ; (SELECT Classification ; FROM SQLCls) ; INTO CURSOR RptFinal USE IN SQLCls REPORT FORM report1 USE IN RptFinalOf the two, I prefer the second option... it gives me more flexibility if I need to change/add stuff to the report cursor.