[RESOLVIDO] Importação de Arquivos

Discussão em 'EMS , HCM e Totvs 11' iniciado por Marcos Vinicius, Junho 26, 2012.

Status do Tópico:
Não esta aberto para novas mensagens.
  1. Marcos Vinicius

    Marcos Vinicius Sem Pontuação

    Bom dia!

    Pessoal,

    Vocês poderiam me ajuda a fazer um programa de importação para um arquivo .csv ou .xls? Sou novo na área Datasul e meus conhecimentos são limitados, exportei uma tabela de uma Base e tenho que fazer a importação da mesma para uma outra Base que está zerada, não deu para fazer o Dump / Load pois tive que exportar com algumas condições regras.

    No aguardo e desde já agradecido.
  2. eriutoncharles

    eriutoncharles Membro Participativo

    Bom dia !

    .csv é separado por vírgula se não me engano, ou tem uma opção de salvar .csv separado por vírgula no excel, ai você faz uma Temp-Table (tt) e então importa ela pra seu banco novo.

    Ex:
    Código:
    DEF TEMP-TABLE tt-Teste LIKE Banco.Tabela.
    /* Aqui você criou uma tt exatamente igual a do banco.tabela */
    /* Então as colunas que serão importadas teriam que ser exatamente iguaias as do banco*/
    /* Caso não tenha exportado todas as Colunas, tens que criar a TT na Mão.. Ex
    DEF TEMP-TABLE tt-Teste FIELD blaba AaS INT FIELD bbb as CHAR ... Cada Campo Exatamente Como estaria no arquivo */
    
    input from C:\teste.csv.
        Repeat.  
        create tt-Teste. 
        import delimiter ";" tt-Teste no-error. 
        end.
    input close.
    
    Agora é só ler a tt e Inserir os Dados na tabela Oficial.

    Código:
    FOR EACH tt-Teste.
    CREATE banco.TabelaOficial.
    ASSIGN banco.TabelaOficial.Campo = Tt-Teste.Campo.
    
    
    E por ai vai.
    Deu Pra Sacar?


    Espero ter Ajudado,
    Eriuton Charles
  3. Marcos Vinicius

    Marcos Vinicius Sem Pontuação

    Obrigado pela ajuda Charles, foi de muita valia, e desculpe pela demora do agradecimento.
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página