hello, i am beginer of progress, when i tried to make a dynamic query i got error in my query due to the use of can-find keyword inside the  so how i ensure that

the existance of related field isin other table or not ? if there is one to many relationship is there. the code is like that.

  def var xtest   as handle   no-undo.
  def var v-query-test as char no-undo.

  create query xtest. 
  xtest:set-buffers(buffer xsrequest:handle,buffer xsrcomment:handle).
 
v-query-test = "for each xsrequest no-lock where xsrequest.xpren = 1 
    AND ( xsrequest.xpmon = 1)
    and ( xsrequest.xprvn = 2 or xsrequest.xprvn = 4)
    and ( xsrequest.xsrtn = 1 or xsrequest.xsrtn = 2)
    and ( xsrequest.xstac = '1000' or xsrequest.xstac = '2000' or xsrequest.xstac = '8000')
    and ( xsrequest.xsrpn = 1 or xsrequest.xsrpn = 4)
    and ( xsrequest.xsrecassign = 'kacharya' or xsrequest.xsrecassign = 'PSTAdmin')
    and ( xsrequest.xsreccreator = 'PSTAdmin')
    AND ( xsrequest.xsrettitle CONTAINS 'svn'
     OR   xsrequest.xsrem CONTAINS 'svn'
     OR  CAN-FIND(FIRST  xsrcomment where xsrequest.xsretid = xsrcomment.xsretid  AND xsrcomment.xsrctcomment MATCHES 'svn')
        )" .


   message v-query-test VIEW-AS ALERT-BOX.
  xtest:query-prepare(v-query-test). 
                                          
                                                                                         
  xtest:query-open().
 
  repeat while not xtest:query-off-end:
    xtest:get-next().

   
    DISP xsrequest.xsretid  .

  end.
xtest:query-close().
delete object xtest.