NEW FILE. DATA LIST / TESTVAR (A50). BEGIN DATA THIS IS A TEST CASE THIS TESTS NOTHING THIS END DATA. DEFINE !findstr (!POS !CMDEND). !DO !j !IN (!1). !LET !tempstr = !QUOTE(!j). COMPUTE !j=INDEX(TESTVAR,!tempstr)>0. !DOEND. EXECUTE. !ENDDEFINE. !findstr THIS TESTS NOTHING .