Verificar a consistência de um arquivo externo indexado.
BADINDEX ()
Retorna verdade (.T.), quando não existir coerência entre o arquivo de dados e seu arquivo de índice, de um arquivo tipo I e X.
Caso contrário, retorna falso (.F.), indicando a exata relação entre
dados e índice.
Quando BADINDEX() retornar verdadeiro (.T.), indicando que o arquivo de índice está incorreto, é aconselhável utilizar o comando REINDEX para corrigi-lo.
O exemplo a seguir demonstra a utilização desta função.
PROG
USE *
agenda I LEN(60)
tel_num n10 KEY
nome u20
endereco u30
ENDUSE
IF BADINDEX ()
? "Reindexando arquivo agenda"
REINDEX
ENDIF