nTopCoordenada superior del browse dentro del contenedor.
Guía AdvPLBrGetDDB():New( <nTop>, <nLeft>, <nBottom>, <nRight>, ... ) --> oBrowseCrea una grilla/browse de datos con registros en filas e información en columnas.
BrGetDDB crea un objeto visual de tipo grilla para mostrar registros de un área de datos en filas y columnas. En el ejemplo oficial, la rutina abre SA1, crea el browse dentro de un diálogo, agrega columnas con TCColumn y utiliza bloques de código para personalizar acciones como edición y eliminación.
BrGetDDB():New( <nTop>, <nLeft>, <nBottom>, <nRight>, ... ) --> oBrowsenTopCoordenada superior del browse dentro del contenedor.
nLeftCoordenada izquierda del browse dentro del contenedor.
nBottomCoordenada inferior del browse.
nRightCoordenada derecha del browse.
oWndVentana o diálogo donde se crea el componente.
cAliasAlias usado por el browse, como SA1 en el ejemplo.
BrGetDDB():New( <nTop>, <nLeft>, <nBottom>, <nRight>, ... ) --> oBrowsenTopNuméricoObligatorioPosição superior do componente.
nLeftNuméricoObligatorioPosição esquerda do componente.
nBottomNuméricoObligatorioPosição inferior do componente.
nRightNuméricoObligatorioPosição direita do componente.
oWndObjetoOpcionalContainer visual, normalmente um diálogo.
cAliasCaractereOpcionalAlias da tabela/área de trabalho a exibir.
oBrowse: objeto browse criado.
oBrowse:AddColumn( TCColumn():New( <cTitle>, <bData>, ... ) ) -->cTitleCaractereObligatorioTítulo exibido no cabeçalho da coluna.
bDataBloco de códigoObligatorioBloco que retorna o valor da célula, como { || SA1->A1_COD }.
#Include "TOTVS.ch"
User Function BrGetDDB()
Local oDlg
Local oBrowse
DEFINE DIALOG oDlg TITLE "Exemplo BrGetDDB" ;
FROM 180, 180 TO 550, 700 PIXEL
DbSelectArea("SA1")
oBrowse := BrGetDDB():New( ;
1, 1, 260, 184, , , , oDlg, , , , , , , , , , , , ;
.F., "SA1", .T., , .F., , , )
oBrowse:bCustomEditCol := {|x, y, z| U_EditLine(x, y, z)}
oBrowse:bDelete := {|| ConOut("bDelete")}
oBrowse:AddColumn(TCColumn():New("Código", {|| SA1->A1_COD}, , , , "LEFT", , .F., .F., , , , .F.))
oBrowse:AddColumn(TCColumn():New("Loja", {|| SA1->A1_LOJA}, , , , "LEFT", , .F., .F., , , , .F.))
oBrowse:AddColumn(TCColumn():New("Nome", {|| SA1->A1_NOME}, , , , "LEFT", , .F., .F., , , , .F.))
ACTIVATE DIALOG oDlg CENTERED
Return
User Function EditLine(x, y, z)
ApMsgStop("editLine")
Return .T.Crea un diálogo con una grilla basada en el alias SA1 y tres columnas: Código, Tienda y Nombre.
Desarrollado con Usina Docs · Alpha
© 2026 Usina.BR. Todos los derechos reservados. TOTVS, Protheus, Microsiga y sus respectivos logotipos son marcas de sus titulares. Guía AdvPL es independiente y utiliza citas limitadas, atribuidas y justificadas por fines educativos. Consulta los Términos de Uso. Términos de Uso
Comentarios
Todavía no hay comentarios aprobados.
Inicia sesión con Google o Microsoft para comentar.