>CREATE CURSOR alloweditems ( liik c(10))
>CREATE CURSOR artliik ( liik c(1))
>CREATE CURSOR toode ( f1 c(1))
>SYS(3055,2040)
>select * ;
>   from toode ;
>      left OUTER JOIN artliik ;
>        ON .f. ;
>   where .t. OR ;
>  (.f. AND artliik.liik in (select * from alloweditems ) )