Página 1 de 1
Função para Imprimir Estrutura de DBF
Enviado: 23 Jul 2020 17:03
por asimoes
Pessoal, alguém teria alguma função para listar para arquivo estrutura de dbf para arquivo ?
Função para Imprimir Estrutura de DBF
Enviado: 23 Jul 2020 18:19
por alxsts
Olá!
Você pede uma função mas lembrei do aplicativo feito pelo Pablo Cesar Arrascaeta: STRU - Lista estrutura dos arquivos dbfs. Lista a estrutura para arquivo, tela ou clipboard.
Neste link tem o projeto com os fontes, que talvez possa aproveitar:
Link para download (na seção de Downloads do fórum)
Função para Imprimir Estrutura de DBF
Enviado: 23 Jul 2020 18:30
por asimoes
alxsts escreveu:Olá!
Valeu, estava tentando acessar o link de downloads e não estou conseguindo.
Função para Imprimir Estrutura de DBF
Enviado: 23 Jul 2020 18:54
por JoséQuintas
Não entendi, dá pra criar fácil.
mais ou menos assim:
Código: Selecionar todos
SET ALTERNATE TO ( "arquivo.txt" )
SET ALTERNATE ON
aFileList := Directory( "*.dbf" )
FOR EACH cFileName IN aFileList
USE ( cFileName )
aStruList := dbStruct()
? cFileName
FOR EACH aField IN aStruList
? aField[ F_NOME ], aField[ F_TYPE ], aField[ F_LEN ], aField[ F_DEC ]
NEXT
NEXT
SET ALTERNATE OFF
SET ALTERNATE TO
Função para Imprimir Estrutura de DBF
Enviado: 23 Jul 2020 19:16
por alxsts
Olá!
Aqui funciona. É só clicar no link e já faz o download, apesar de a Seção Downloads do fórum estar com problema há tempos. Segue em anexo.