Descrição
VTDBBrowse - Monta um Browse com referência a uma tabela
|
Sintaxe
Parâmetros
| Par |
Nome |
Tipo |
Descrição |
Default |
Obg |
Ref |
| |
|
|
|
|
|
|
Retorno
Exemplo
#INCLUDE "TOTVS.CH"
#INCLUDE "APVT100.CH"
User Function VTDBBrowse()
Local aFields := {"CB8_PEDIDO","CB8_ITEM","CB8_ORDSEP"}
Local aSize := {6,2,7,12}
Local aHeader := {'PEDIDO','ITEM','ORD.SEP'}
Local ctop := CB8->(xFilial("CB8")+cOrdSep+cIten+cSequ+cProduto) //Não é seek. É string (chave)
Local cBottom := CB8->(xFilial("CB8")+cOrdSep+cIten+cSequ+cProduto)
Local nRecno := 00
nRecno := VTDBBrowse(3,0,VTMaxRow(),VTMaxCol(),"CB8",aHeader,aFields,aSize,,"'"+cTop+"'","'"+cBottom+"'")
Return( Nil )
Resultado
Informação Adicional
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
