Power Builder - FIND

ls_buscar_string = 'Match(String(cte_nombre), ".' + TRIM(This.text) + '")'

ls_buscar_string=  trim(ls_buscar_string)

ll_fila_encontrada = dw_1.Find(ls_buscar_string,1, dw_1.RowCount())

String ls_cad

ls_cad = Trim(This.Text)

if Len(ls_cad) = 0 then

	dw_datos.SetFilter("")

	dw_datos.Filter()

else

	ls_cad = ReempChar(ls_cad,'*','%')

	if Left(ls_cad,1)  <> '%' then ls_cad = '%' + ls_cad

	if Right(ls_cad,1) <> '%' then ls_cad = ls_cad + '%'

	ls_cad = Upper(ls_cad)

	ls_cad = "Upper(" + is_ini+"_Nombre) Like '" + ls_cad + "'"

	dw_datos.SetFilter(ls_cad)

	dw_datos.Filter()

end if

if dw_datos.rowcount() > 0 then

	dw_datos.SelectRow(0,False)

	dw_datos.SelectRow(1,True)

end if