OUTPUT para a impressora, caractere especial

Impressão direto para impressora sai desconfigurado os acentos.

Quando eu envio alguns palavras direto para a impressora sai desconfigurado, se envio para o arquivo sai correto.


Segue o codigo.

DEFINE STREAM diskfile.

/* OUTPUT STREAM my_stream TO value("c:\temp\teste.txt") */
/* CONVERT TARGET "UTF-8". */
/* . */

/*OUTPUT {&STREAM} */
/* OUTPUT STREAM diskfile TO VALUE("c:\temp\teste.txt") */
OUTPUT STREAM diskfile TO VALUE ("PRINTER")
PAGE-SIZE 0
NO-CONVERT /*CONVERT SOURCE "UTF-8" TARGET "ISO8859-1"*/ /*CONVERT TARGET tip_imprsor.cod_pag_carac_conver*/ .

/* PUT STREAM my_stream CONTROL 'após, título, observação, liquidação' NULL. */


PUT STREAM diskfile CONTROL 'após, título, observação, liquidação' .
OUTPUT STREAM diskfile CLOSE.