*---------------------------------- * 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 >>