select I.id, I.Department, I.Category, I.item, I.descrip, ; inlist(proper(I.MatrixItem),'Yes','1','True','T') as i_matrix, ; upper(MatrixTemplate) as MTemplate, GLNumber as gl_no, UserDefined as user_code, ; Barcode, UPC, inlist(DirectPricing,'Yes','1','True','T') as set_price, ; iif(len(PriceType)=0 or PriceType ='0',1,4) as price_cols, ; Price as monday_0, dp_set_id, cast(PriceCalculationType as I) as daily_pric, AddTax as add_tax, ; Tax_Rate, Tax_Rate_B, upper(Vendor1) as Vendor1, upper(Vendor2) as Vendor2, ; VendorPartNumber as vpartno, ReorderPoint as reorder_pt, TargetQty as target_qty, ; pr_ctr_1, 1 as split_type, 100 as pcsplit_1, ; UserDefinedText1 as i_text_1, UserDefinedText2 as i_text_2, I.subclass, I.Season ; from csrItems I where id not in (select id from csrDups) into cursor csrItems READWRITEThe csrItems originally is created with the long field names using CREATE CURSOR command. Now I'm selecting fields from into a readwrite cursor.