>>create cursor c_words (Word C(240)) >>index on Word Tag Word && Might be an overkill? >> >>insert into c_words (Word) values ('TOOL') >>insert into c_words (Word) values ('MO-ISSUE') >> >>INSERT INTO psCursor(itemid, rellev, partno, descptn) ; >>Select 'x','1',cinbr,itdsc From getPSQuery Where itdsc Not in (select Word from C_Words)>>
Select getPSQuery Scan select badwordcursor locate for AT(badword,getPSQuery.itdsc)>0 if found() loop endif INSERT INTO psCursor(itemid, rellev, partno, descptn) ; values('x','1',getPSQuery.cinbr,getPSQuery.itdsc) Endscan