>SELECT CODE,DESC FROM MASTER; >WHERE LEN(ALLTRIM(STR(CODE)))=6 .AND. DESC LIKE SNAME; >ORDER BY DESC; >INTO cursor TEST15 ><pre> > >But in other forms if I use above commands then it show following error message ><pre> >Cursor name is already in use >>
* Need make uniquely-named copy of cursor in case another * invokation of the form wants to use it as well * ______________________________________________ lcTestCsr = "csr" + SYS(3) && gives you unique cursor name SELECT CODE,DESC FROM MASTER; WHERE LEN(ALLTRIM(STR(CODE)))=6 .AND. DESC LIKE SNAME; ORDER BY DESC; INTO cursor lcTestCsr Select DBF( lcTestCsr)Terry