DO CASE * CASE Order By Cust CASE ThisForm.optOrderBy.optOrderByCust.Value = 1 STORE "Cust, OrdDate, Invoice, Prodct" TO mOrderBy * CASE Order By Product CASE ThisForm.optOrderBy.optOrderByProduct.Value = 1 STORE "Prodct, OrdDate, Cust, Invoice" TO mOrderBy ENDCASE SELECT * ; FROM InvHist ; INTO ARRAY arrInvHist2 ; ORDER BY mOrderByWould appreciate any help if somebody knows of a way to do accomplish this (or something akin to it). TIA, Chuck.