Cabeçalho

VTaBrowse

Autor: Eurai Criado: 29/09/2024 Atualizado: 25/04/2025 ACD

Postagem

Descrição

VTaBrowse - Monta um Browse com referência a um Array

Sintaxe

VTaBrowse( )

Parâmetros

Par	Nome	Tipo	Descrição	Default	Obg	Ref

Retorno

Retorno	Tipo	Descrição

Exemplo

#INCLUDE "TOTVS.CH"
#INCLUDE "APVT100.CH"

User Function VTaBrowse()
Local aPrdUni	:= {}

	aAdd(aPrdUni,{D0S_CODPRO,D0S_LOTECT})

	aCab  := {RetTitle("D0S_CODPRO"),RetTitle("D0S_LOTECT")}
	aSize := {TamSx3("D0S_CODPRO")[1],TamSx3("D0S_LOTECT")[1]}
	VTaBrowse(1,0,(VTMaxRow()-1),VTMaxCol(),aCab,aPrdUni,aSize)

Return( Nil )

Resultado

Informação Adicional

Gostou? Compartilhe com seus amigos e deixe um comentário! 😎