BDE - criando db de texto (txt) |
Top Previous Next |
|
Crie um arquivo (.SCH) para armazenar a estrutura de seu arquivo texto, por exemplo:
'meuarquivotexto.txt' contém os registros sem delimitadores com os campos CODIGO, NOME, TELEFONE:
001José da Silva (065)666-2324 002João BlaBlaBla (011)222-2222 003Fulano de Tal (021)333-3333 004Ciclano NhecoNheco(031)444-4444
Crie um "meuarquivotexto.SCH" contendo a estrutura:
[MEUARQUIVOTEXTO] Filetype=Fixed Field1=Codigo,Char,03,00,00 Field2=Nome,Char,19,00,03 Field3=Fone,Char,13,00,22
Onde: "[MEUARQUIVOTEXTO]" -> nome do arquivo TXT referênciado nessa estrutura; "Filetype=Fixed" -> Informa que o arquivo esta no formato SDF "Field1...Field2..." -> Correspondem aos campos. Tem que informar o NOME do campo, TIPO (CHAR, FLOAT, NUMBER, BOOL, LONGINT, DATE...), TAMANHO, NÚMERO DE DECIMAIS e COLUNA onde começa o campo.
No projeto : ============ Insira uma TTable (tbOrigem) ligada ao arquivo texto e mude a propriedade TableType para ttASCII e outra TTable (tbDestino) ligada ao arquivo que receberá os registros. Mantenha as TTables fechadas.
No TBatchMove informe os valores para DESTINATION e SOURCE , respectivamente tbDestino e tbOrigem. Para efetuar a importação, execute o método "EXECUTE" do TBatchMove. |