Duvida OUTPUT STREAM com acentuação

Discussão em 'Progress 4GL' iniciado por jc01, Março 31, 2015.

  1. jc01

    jc01 Membro Participativo

    Rodando o seguinte trecho de código:

    Código:
    DEF STREAM st.
 
OUTPUT STREAM st TO c:\arquivo.txt.
 
PUT STREAM st UNFORMATTED "acentuação".
 
OUTPUT STREAM st CLOSE.
    No arquivo de saída acaba gerando uns caracteres "estranhos" no lugar do "ç". Já tentei colocar CONVERT TARGET "iso8859-1" mas não resolveu.

    Como gerar a saída pro txt sem esses problemas de acentuação?
    jc01, Março 31, 2015
    #1
  2. Eilleen

    Eilleen Membro Ativo

    Boa tarde.
    Testa esse exemplo... ;)

    Código:
    DEFINE VARIABLE vTexto AS CHARACTER   NO-UNDO INITIAL "abcçã:!@#".


vTexto = CODEPAGE-CONVERT(vTexto, "ISO8859-1", "IBM850").

OUTPUT TO c:\temp\testeTexto.txt APPEND.

PUT vTexto SKIP.

OUTPUT CLOSE.
    Eilleen, Março 31, 2015
    #2
  3. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    eu pessoalmente prefiro OUTPUT TO C:\Temp\Arquivo.txt NO-CONVERT

    Porque o NO-CONVERT é universal e ele levará a informação do mesmo jeito que é visto no EMS.
    rafael.andrade, Março 31, 2015
    #3
  4. jc01

    jc01 Membro Participativo

    Eilleen, testei seu código e realmente funciona, porém optei pela solução do nosso amigo Rafael por eu achar mais simples.
    Obrigado a ambos pela ajuda.
    jc01, Abril 1, 2015
    #4
    Eilleen curtiu isso.

Compartilhe esta Página