Problemas com compilação

Discussão em 'Progress 4GL' iniciado por lima, Maio 25, 2010.

  1. lima

    lima Membro Participativo

    Bom dia galera,

    estou tentando compilar programas via editor, porém, preciso salvar em uma temp-table os erros ocorridos na compilação de cada arquivo, para que posteriormente possa exportar estes erros para um txt.

    Segue código:

    DO entry-num = 1 TO NUM-ENTRIES(sources):
    COMPILE VALUE(ENTRY(entry-num, sources)) SAVE NO-ERROR.
    IF COMPILER:ERROR THEN DO:
    OUTPUT TO "compile.msgs" APPEND.
    CREATE tt-erro.
    ASSIGN tt-erro.error-file = COMPILER:FILE-NAME.
    tt-erro.ERROR-COLun = COMPILER:GET-MESSAGE(entry-num).

    OUTPUT CLOSE.
    END.
    END.

    sources é a lista de arquivos que irão ser compilados

    Muito obrigado.
    lima, Maio 25, 2010
    #1
  2. mcarril

    mcarril Membro Participativo

    Porque criar a temp-table ? Você não consegue usar o PUT direto ?
    Qual é o problema com o seu código ?
    mcarril, Maio 25, 2010
    #2

Compartilhe esta Página