Temp-table

Discussão em 'Progress 4GL' iniciado por kikofr, Setembro 2, 2009.

  1. kikofr

    kikofr Membro Participativo

    Bom dia,

    Precisaria criar uma temp-table com todos os dados de uma tabela. Sei criar gerando a temp-table e percorrando a tabela que preciso dos dados e adicionando um a um na temp-table. Gostaria de ver se tens alguma forma de fazer isso automaticamente sem precisar percorrer todos os dados da tabela original.

    Exemplo de como eu faço atualmente.
    Código:
    DEF TEMP-TABLE tt-repres LIKE repres.
    FOR EACH repres.
        CREATE tt-repres.
        ASSIGN tt-repres.cod-rep = repres.cod-rep.
        .
        .
        .
    END.
    
    Obrigado desde já.
  2. af.dums

    af.dums Membro Ativo

    Sem percorrer a tabela original não existe...
    Mas vi que você usa o ASSIGN, pode usar o BUFFER-COPY.
    Código:
    def temp-table tt-repres no-undo like repres.
    for each repres no-lock:
        create tt-repres.
        buffer-copy repres to tt-repres.
    end.
    
    Ele irá copiar todos os valores de repres para tt-repres.

Compartilhe esta Página