Detalle con un GET (RESUELTO)

[Armando]

Hola Amigos del foro:

Tengo la siguiente situación con este código, a ver si me explico

Code: Select all  Expand view

        REDEFINE GET aGets[01] VAR oPrd:NUM ID 101 OF oDlg UPDATE;
           WHEN lAppend;
           PICTURE "@ZK 9999999999999";
           VALID ValNum(oBrw,aGets);
           MESSAGE "Número de producto"
 

El tema es el siguiente. Cuando se llenan los 13 dígitos, de forma automática
sale del GET y el foco se ubica en el siguiente GET.

Hay forma de que no salga del GET aunque se hayan llenado los 13 dígitos
hasta que se oprima la tecla RETURN?

Saludos

[FranciscoA]

Hola Armando, mira si este post te ofrece alguna solucion. ( ES_WANTRETURN )
viewtopic.php?f=3&t=18350&p=96243&hilit=wantreturn&sid=de248c1e08597ede02712580c30ddb2c#p96243

[Armando]

Francisco:

Muchas gracias, lo intentaré.

Saludos

[nageswaragunupudi]

This behavior of Get depends on the global setting

Code: Select all  Expand view

SET CONFIRM ON|OFF   // default OFF
 

This is a Clipper/(x)Harbour setting.

So please set

Code: Select all  Expand view

SET CONFIRM ON
 

in the beginning of the program.
Then the Get will exit only when the user enters <Enter> or <Tab> key.

[Armando]

Mr. Rao:

Thanks a lot

Regards