Usina BRGuía AdvPL
Ingresar
← Todos los temas
COMANDOPublicado

@ ... GET

@ <nRow>, <nCol> GET [<oGet> VAR] <uVar> [OF <oWnd>] [PICTURE <cPict>] [VALID <cbValid>] [WHEN <cbWhen>] [READONLY] [PASSWORD]

Crea un campo TGet para editar valores de carácter, numéricos o de fecha en una interfaz AdvPL.

Interfaz visualGETTGetEntrada de datosValidaciónComandos
01 · DESCRIPCIÓN GENERAL

Descripción general

El comando @ ... GET crea un control de entrada vinculado a una variable AdvPL de carácter, numérica o de fecha. Durante la compilación se traduce al constructor New() de la clase TGet. La entrada puede utilizar máscara PICTURE, validación de salida, condición de habilitación y eventos de cambio, además de los modos de solo lectura y contraseña.

02 · SINTAXIS

Sintaxis

@ <nRow>, <nCol> GET [<oGet> VAR] <uVar> [OF <oWnd>] [PICTURE <cPict>] [VALID <cbValid>] [WHEN <cbWhen>] [READONLY] [PASSWORD]

Parámetros

nRow, nCol
NuméricoObligatorio

Fila y columna donde se coloca el campo. Con PIXEL, las coordenadas parten de la esquina superior izquierda del componente padre.

oGet VAR
ObjetoOpcional

Variable que recibe el objeto TGet. Cuando se informa, VAR debe preceder a la variable editada.

uVar
Caractere, numérico ou dataObligatorio

Variable de carácter, numérica o de fecha cuyo valor se muestra y edita.

OF oWnd
ObjetoOpcional

Diálogo, panel, folder u otro contenedor propietario del GET. OF es recomendado.

PICTURE cPict
CaractereOpcional

Máscara que controla el formato y la edición del valor.

VALID cbValid
LógicoOpcional

Validación ejecutada al perder el foco; debe devolver .T. para permitir la salida.

WHEN cbWhen
LógicoOpcional

Condición evaluada durante el cambio de foco para determinar si el campo puede recibirlo.

ON CHANGE cbChange
EventoOpcional

Acción ejecutada cuando cambia el contenido editable.

READONLY
CláusulaOpcional

Permite foco, selección y copia, pero impide la edición.

PASSWORD
CláusulaOpcional

Oculta visualmente los caracteres escritos con asteriscos.

SIZE · FONT · COLOR · PIXEL
CláusulasOpcional

Personalizan dimensiones, fuente, colores y sistema de coordenadas.

03 · EJEMPLO PRÁCTICO

Entrada con máscara y validación

#Include "TOTVS.ch"

User Function ExGetCliente()
    Local oDlg
    Local oGetCodigo
    Local cCodigo := Space(6)

    Define Dialog oDlg Title "Identificación del cliente" ;
        From 100, 100 To 260, 520 Pixel

    @ 18, 20 Say "Código:" Of oDlg Pixel
    @ 16, 65 Get oGetCodigo Var cCodigo ;
        Picture "@!" Size 90, 12 Of oDlg Pixel ;
        Valid !Empty(AllTrim(cCodigo))

    Activate Dialog oDlg Centered
Return
Resultado esperado

PICTURE transforma la entrada según la máscara y VALID impide la salida mientras el código esté vacío.

04 · EJEMPLO PRÁCTICO

Campos de contraseña y solo lectura

#Include "TOTVS.ch"

User Function ExGetAcesso()
    Local oDlg
    Local cUsuario := "OPERADOR"
    Local cSenha := Space(20)

    Define Dialog oDlg Title "Acesso" ;
        From 0, 0 To 220, 480 Pixel

    @ 15, 20 Say "Usuário:" Of oDlg Pixel
    @ 13, 70 Get cUsuario Size 100, 12 ;
        Of oDlg Pixel ReadOnly

    @ 45, 20 Say "Senha:" Of oDlg Pixel
    @ 43, 70 Get cSenha Size 100, 12 ;
        Of oDlg Pixel Password ;
        Valid !Empty(AllTrim(cSenha))

    Activate Dialog oDlg Centered
Return
Resultado esperado

READONLY permite consultar y copiar el usuario sin modificarlo; PASSWORD oculta visualmente la contraseña durante la edición.

BUENAS PRÁCTICAS
  • Incluye TOTVS.ch para que el compilador reconozca el comando.
  • Inicializa uVar con el tipo correcto antes de crear el componente.
  • Utiliza una PICTURE compatible con el tipo y el formato esperado.
  • Utiliza VALID para validar la salida, WHEN para controlar la entrada y ON CHANGE para reaccionar durante la edición.
  • Utiliza oGet VAR solo cuando necesites propiedades o métodos después de la creación.
  • Prefiere PIXEL, aunque GET también acepta PIXELS según la documentación.
  • Prefiere OF para identificar explícitamente el contenedor propietario.
ERRORES COMUNES
  • Cuando se informa un objeto, omitir VAR invalida la declaración.
  • VALID y WHEN deben devolver valores lógicos.
  • Una PICTURE incompatible con el tipo puede restringir o mostrar el valor incorrectamente.
  • PASSWORD solo oculta la visualización; no sustituye almacenamiento seguro, cifrado ni controles de acceso.
  • ON CHANGE puede ejecutarse muchas veces durante la escritura; mantén la acción ligera.
  • Sin OF, el campo se asocia a la ventana o diálogo activo.

Contenido relacionado

REFERENCIAS
  1. TOTVS. @ ... GET. TDN. Creado por Julio Wittwer; última modificación el 29 de mayo de 2019.
  2. TOTVS. TGet:New — constructor utilizado por el comando. TDN.
  3. TOTVS. Pictures de formato y edición en AdvPL. TDN.
  4. Guía de referencia de eADVPL. Sin autor identificado, creada el 28 de julio de 2005. Sección relacionada: p. 13–14. Referencia histórica; sintaxis verificada prioritariamente con una fuente actual.
Estado
Publicado
Página creada el
Última revisión el
Idioma original
Portugués
Revisión
Usina.BR