*Проверка наличия в строковой переменной КАЖДОГО из слов заданной фразы. 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. * Тестовая фраза (алгоритм будет давать сбой при наличии во фразе некоторых зарезервированных слов SPSS (NOT, AND и др., так как нельзя создать переменные с такими именами) - примеч. перев. !findstr THIS TESTS NOTHING.