>*---------------------------------- >* Macro substitution >LPARAMETERS tcCodeList, tlSelectAll >* tcCodeList = ['111', '222'] >SELECT Test.code, Test.Desc ; > FROM Test ; > WHERE tlSelectAll OR Test.code IN (&tcCodeList) ; > INTO CURSOR result > >*---------------------------------- >* A cursor >CREATE CURSOR crsSelections (code C(3)) >INSERT INTO crsSelections VALUES('111') >INSERT INTO crsSelections VALUES('222') > >LPARAMETERS tcCursor, tlSelectAll >SELECT Test.code, Test.Desc ; > FROM Test ; > WHERE tlSelectAll OR Test.code IN (SELECT * FROM (tcCursor)) ; > INTO CURSOR result >>>
>>Code Desc >>111 Dog >>222 Cat >>333 Elephant >>444 Fish >>>>
>>LPARAMETERS taCodeList >>* taCodeList[1] = '111' >>* taCodeList[2] = '222' >> >>SELECT Test.code, Test.Desc ; >> FROM Test ; >> WHERE Test.code IN(taCodeList[1],taCodeList[2]) ; >> INTO CURSOR result >>>>