cNameNome de índice novo, distinto da tabela no TOPCONN.
AdvPL GuiaDBCreateIndex( <cName>, <cExprKey>, [bExprKey], [lUnique] ) --> NilCria um índice para a tabela ou view do contexto.
DBCreateIndex recebe nome e expressão da chave, com bloco e unicidade opcionais. A documentação alerta que um índice de mesmo nome pode ser substituído e que a operação fecha índices, escolhe a nova ordem e reposiciona registros. O bloco deve refletir o valor da chave, não retornar a string que contém a expressão. O arquivo comunitário analisado usa um bloco que devolve cIndice; não o reproduzimos como modelo de chave executável. O fragmento exige índice novo e tabela própria compatível com a RDD. EDTRB identifica exclusivamente uma tabela própria de teste, já aberta com a estrutura e os direitos necessários; os exemplos não se destinam a tabelas padrão. (TOTVS, s.d., ref. 1)
DBCreateIndex( <cName>, <cExprKey>, [bExprKey], [lUnique] ) --> NilcNameNome de índice novo, distinto da tabela no TOPCONN.
cExprKeyExpressão da chave em texto.
bExprKeyExpressão executável equivalente.
lUniqueControle de índice único; conferir semântica da RDD.
Nil; não é um indicador lógico de sucesso.
#Include "Protheus.ch"
User Function Ed329()
// ED_NEWIDX deve estar livre; EDTRB tem campo ED_COD e uso proprio.
If Select("EDTRB") > 0
EDTRB->(DBCreateIndex("ED_NEWIDX", "ED_COD", {|| ED_COD}, .F.))
EndIf
Return NilPropõe criar o índice e alterar a ordem do contexto de teste; não é operação neutra de consulta. Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
© 2026 Usina.BR. Todos os direitos reservados. TOTVS, Protheus, Microsiga e seus respectivos logotipos são marcas de seus titulares. O AdvPL Guia é independente e utiliza citações limitadas, atribuídas e justificadas por finalidade educativa. Consulte os Termos de Uso. Termos de Uso
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.