Antonio/Daniel,
Estoy viendo como evitar que se introduzcan algunas letras o palabras en algunos GETs, esto para que no se pueda hacer el famoso "injection" y hacer validaciones en todos lados va a estar de locos !!
Viendo la clase creo que seria en el Metodo lValid, pero no quisiera hacer algo que podria ocasionar mas problemas que soluciones 
Podrian apoyarme en la modificacion/ajuste para lograr tal acometido.
Muchas Gracias
Saludos
Antonio/Daniel,
Alguna sugerencia ?
Raymundo,
Que palabras no quieres permitir ?
Puedes usar el VALID ó el ON CHANGE si quieres que nada más escribirlo ya lo rechaze, antes de intentar pasar a otro control.
aadd( aVpDts2Sav, { nKFol2Psd,aVtaDts[1],date(),cXOprTim,aVtaDts[ 4],aKurUsr[1], ;
  lbCapVta:aArrayData[nQ,1],lbCapVta:aArrayData[nQ,3],lbCapVta:aArrayData[nQ,4], ;
  lbCapVta:aArrayData[nQ,5],lbCapVta:aArrayData[nQ,6],lbCapVta:aArrayData[nQ,7], ;
  lbCapVta:aArrayData[nQ,8],cOprXStr,cObs2Sav } )
  NwInsReks( "VTASPSD", cVpFlds2Sav, aVpDts2Sav )
Y me regresa algo como esto :
INSERT INTO VTASPSD ( pidcns,poprt,poprd,poprx,pcstid,pitmusr,pitmid,pitmuntx,pitmuns,pitmdscp,pitmdsci,pitmunty,pitmimp,pitmdet,poprobs,cubx ) VALUES ( 110.00,1,'2010-07-30','10:50:51',756,'','VcYgeqVqz',0.00,1.00,0,0,0.00,0.0000,'{ ´VcYgeqVqz´, ´SYD RESORTE TRAS´, 0.00, 1.00, 0, 0, 0.00, 0.0000, ´F4304´, ´x4bclhiFZ´, 0, 1, 0, ´SYF4304´, 0, ´´, ´´, ´SYD´, ´RESORTE SUSPENSION/MISC´, ´5N3zfN1jT´, 0.00, 0, 0 }','',101 ) ;2da parte :
Hablando de palabras : CREATE USER, DELETE FROM, INSERT INTO, SHOW, etc, etc
PD : Al momento de escribir un mensaje de unas 15 lineas, llega el momento que la pantalla esta "brincando" cada letra que tecleo y "esconde" las ultimas linea, lo que hace dificil terminar el post.
Es normal ??
saludos
Raymundo,
Estas usando un GET ó un GET multilÃnea ?
Para textos de varias lÃneas debes usar un GET multilÃnea. Revisa samples\TestMemo.prg
Raymundo,
Para no tener que modificar cada GET podrias modificar el dato bChange de la clase, aunque eso afectará a todos tus GETs.
Otra opción es convertirlo en una CLASSDATA en vez de DATA.
No se si esto te puede servir para lo que necesitas
Antonio,
Hasta donde recuerdo todos son Gets "normalitos" pero deja checo por si puse algun multilinea.
Cierto, cualquier ajuste que pueda hacer afectaria a todos, pero principalmente quiero validar los tipo Character.
Acerca que si tal metodo o data o classdata ese es mi gran problema : No es mi fuerte el manejo de las clases y relacionados
Yo quisiera tener una "lista negra" de palabras y algunas letras en un arreglo y dentro de la clase justo antes de pasar al siguiente control, validar el contenido, si existe algo impedir que avanze, tal y como se hace con las fechas, aunque no se le ponga validacion alguna, no te permite el 30 de febrero 
Si consideras que daria mas problemas que soluciones, ni modo, me pongo a validar mis Gets manualmente ( principalmente aquellos que tienen una longitud considerable ).
Saludos
 xSetGet := Eval(::bSetGet)
 if ValType(xSetGet)='C' .and. "'" in xSetGet
  ...
 endifFernando,
Es exactamente lo que intento hacer, ese canijo apostrofe me ha dado muchos problemas 
Voy a aplicar lo que comentas para hacer unas pruebas y ver si ademas puedo "atrapar" las palabras que quiero evitar.
Muchas gracias por el tip.
Saludos