SELECT CUSTOMER GO TOP SCAN luCustID = Customer_id SELECT * FROM product WHERE customer_id = luCustID INTO CURSOR temp GO TOP _VFP.DataToClip STRTOFILE( _ClipText, luCustID + ‘.txt’ ) ENDSCAN