Exportar Arquivos em quantidades (blocos) fixos de linhas.

Ir em baixo

Exportar Arquivos em quantidades (blocos) fixos de linhas. Empty Exportar Arquivos em quantidades (blocos) fixos de linhas.

Mensagem  Miro em Qui 20 Ago - 12:17

Para exportar um arquivo para um TXT (ou outro formato) em blocos fixos de linhas.  Por exemplo: você quer dividir o arquivo ACL em vários arquivos TXT de 500 linhas.  O nome automático dos arquivos será composto de um parte padrão (fixa) e uma parte composta por uma numeração sequencial.

* COUNT para saber a quantidade de linhas (COUNT1)
* divido COUNT1 por 500 (vQtdeArq) para ter a quantidade de arquivos que iremos gerar
* vArq uso para dar o nome sequencial dos arquivos.

OPEN Tabela
COUNT
vQtdeArq = COUNT1 / 500,00
vArq = 1

EXPORT FIELDS ALL ASCII QUALIFIER "" TO "C:Testes ArbutusEXPORT_%vArq%.TXT" FIRST 500

DO .sEXPORT WHILE vQtdeArq > 1

RETURN


PROCEDURE sEXPORT

vArq = vArq + 1

EXPORT FIELDS ALL ASCII QUALIFIER "" TO "C:Testes ArbutusEXPORT_%vArq%.TXT" NEXT 500

vQtdeArq = vQtdeArq - 1

RETURN

Miro

Mensagens : 110
Data de inscrição : 24/02/2012

http://www.it-tech.com.br

Voltar ao Topo Ir em baixo

Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum