FOREACH value IN list1 WHILE value2 IN list2 IF value1 EQ value2 ASSIGN set = 1 BREAK END IF END WHILE IF set EQ 0 PRINT message END IF ASSIGN set = 0 END FOREACH