1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

  2. Anuncie Aqui ! Entre em contato fdantas@4each.com.br

Importar dados de um arquivo em excel e gravar no banco

Discussão em 'Outros/Diversos' iniciado por noellen, Fevereiro 19, 2010.

  1. noellen

    noellen Equipe de Suporte Moderador Equipe de Suporte

    Olá, segue anexado um exemplo para importar os dados de um arquivo .xls e gravar no banco de dados. :roll:

    Arquivos Anexados:

  2. lucianosantana

    lucianosantana Sem Pontuação

    Ola,

    vc tem um exemplo com importando arquivo .txt?
  3. eriutoncharles

    eriutoncharles Membro Participativo

    Olá, boa tarde!!

    Desculpas a intromissão... mas veja se te ajuda:

    Código:
     def temp-table tt-teste field Codigo as int field descricao as char.
    
    input from c:\temp\teste.txt.
        Repeat.  
        create tt-teste. 
        import delimiter ";" tt-teste no-error. 
        end.
    input close.
    
    /* Exemplo de ler o arquivo importado e inserir em uma TabelaX os Dados da Tabela Temporária tt-Teste importada do arquivo */
    FOR EACH tt-teste.
       
    find tabelaX /*Tabela do Seu Banco ...*/ WHERE TabelaX.Codigo = tt-Teste.Codigo NO-ERROR.
    IF NOT AVAIL Tabelax THEN DO:
       CREATE TabelaX.
       ASSIGN TabelaX.Codigo       = tt-teste.Codigo
                   TabelaX.Descricao = tt-Teste.Descricao.
    END.
    END.
    
    Detalhe: É Sempre bom importar primeiro para uma tabela temporária(tt) antes de inserir o registro direto no banco... porque ai você tem como tratar... limpar os dados vindos do arquivo... e coisa e tals...

    Espero ter ajudado!!
    Um Abraço,
    Eriuton Charles
  4. lucianosantana

    lucianosantana Sem Pontuação

    Ola amigo,

    eu ate que consegui desse forma mas quando vc dar um disp na ttable ela apresenta o ultimo registro vazio. Eu fazer uma importação para hcm seria o historico de situação o produto ate tem um programa o fp6660 mas quando faço o layout para importar ele me reporta erro de ano, fiz de tudo abrir FO para totvs e eles me pedem para falar com a consultoria.
  5. muertebr

    muertebr Membro Participativo

    Você deve sempre dar um "Enter" no final do txt, e fazer o seu código desconsiderar quando for 0 (int), ou em branco(char) os registros.
    Caso a ultima linha não tenha um enter, ele não vai importar a mesma.

Compartilhe esta Página