>I would like to use multiple arguments for $ , but it returns error message:
>
>
>IF "DEPÓSITO" .or. "DEPOSITO" .or. "COMPROVANTE" .or. "PAGAMENTO" $ UPPER(emails.assunto ).and. EMPTY(emails.tipo)

Simpler to turn it around:

lFound=.f.
for i=1 to getwordcount(emails.assunto)
   lfound=lFound or inlist(upper(getwordnum(emails.assunto,i)), ;
      "DEPÓSITO", "DEPOSITO", "COMPROVANTE", "PAGAMENTO" )
   if lfound
      exit
   endif
endfor
return lFound

This could be made a bit shorter, maybe, and may need some tweaking (you may need an extra parameter for getw* functions - if .assunto can have punctuation, than the default space is not the only word delimiter, i.e. the code as is would not find "-deposito" or "comprovante,").