nRow, nColFila y columna donde se coloca el campo. Con PIXEL, las coordenadas parten de la esquina superior izquierda del componente padre.
Guía AdvPL@ <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.
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.
@ <nRow>, <nCol> GET [<oGet> VAR] <uVar> [OF <oWnd>] [PICTURE <cPict>] [VALID <cbValid>] [WHEN <cbWhen>] [READONLY] [PASSWORD]nRow, nColFila y columna donde se coloca el campo. Con PIXEL, las coordenadas parten de la esquina superior izquierda del componente padre.
oGet VARVariable que recibe el objeto TGet. Cuando se informa, VAR debe preceder a la variable editada.
uVarVariable de carácter, numérica o de fecha cuyo valor se muestra y edita.
OF oWndDiálogo, panel, folder u otro contenedor propietario del GET. OF es recomendado.
PICTURE cPictMáscara que controla el formato y la edición del valor.
VALID cbValidValidación ejecutada al perder el foco; debe devolver .T. para permitir la salida.
WHEN cbWhenCondición evaluada durante el cambio de foco para determinar si el campo puede recibirlo.
ON CHANGE cbChangeAcción ejecutada cuando cambia el contenido editable.
READONLYPermite foco, selección y copia, pero impide la edición.
PASSWORDOculta visualmente los caracteres escritos con asteriscos.
SIZE · FONT · COLOR · PIXELPersonalizan dimensiones, fuente, colores y sistema de coordenadas.
#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
ReturnPICTURE transforma la entrada según la máscara y VALID impide la salida mientras el código esté vacío.
#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
ReturnREADONLY permite consultar y copiar el usuario sin modificarlo; PASSWORD oculta visualmente la contraseña durante la edición.
© 2026 Usina.BR. Todos os direitos reservados. TOTVS, Protheus, Microsiga e seus respectivos logotipos são marcas de titularidade da TOTVS S.A. AdvPL é uma linguagem de programação desenvolvida pela TOTVS. O AdvPL Guia é um projeto independente, sem vínculo, representação, patrocínio ou afiliação com a TOTVS S.A., suas franquias ou representantes.