Meu relatório não imprime em tela em TXT

Bom dia Pessoal!
Fiz um relatório mas ele imprime em arquivo, imprime em papel, mas não imprime em tela tipo em txt
o código é esse será que tem algum erro nele, ou é no txt mesmo, se alguém puder me ajudar desde já agradeço.



/*-----------------------------------------------------------------------------
** Programa: FRCCP034
** Data....: Maio/2012
** Empresa.: FRAME MADEIRAS ESPECIAIS LTDA
** Objetivo: Lote Múltiplo
** Versao..: 2.06.00.000
------------------------------------------------------------------------------*/
{include/i-prgvrs.i frcp034 2.04.00.000}
/*{include/tt-edit.i}
{include/pi-edit.i}*/

/*definição TEMP-TABLE*/

define temp-table tt-param no-undo
field destino as integer
field arquivo as char format "x(35)"
field usuario as char format "x(12)"
field data-exec as date
field hora-exec as integer
field classifica as integer
field desc-classifica as char format "x(40)"
field modelo-rtf as char format "x(35)"
field l-habilitaRtf as LOG
FIELD it-codigo-ini LIKE ITEM.it-codigo
FIELD it-codigo-fim LIKE ITEM.it-codigo.

define temp-table tt-digita no-undo
field ordem as integer format ">>>>9"
field exemplo as character format "x(30)"
index id ordem.

DEFINE TEMP-TABLE tt-item
FIELD codigo LIKE ITEM.it-codigo
FIELD descricao as character format "x(40)" /*LIKE ITEM.desc-item*/
FIELD lote LIKE ITEM.lote-multipl
FIELD situacao LIKE ITEM.cod-obsoleto
FIELD peso-l LIKE ITEM.peso-liquido
FIELD peso-b LIKE ITEM.peso-bruto.


def temp-table tt-raw-digita
field raw-digita as raw.

def input parameter raw-param as raw no-undo.
def input parameter table for tt-raw-digita.

create tt-param.
raw-transfer raw-param to tt-param.

{include\i-rpvar.i}
{utp\ut-glob.i}

/*definição VAR*/
DEF VAR h-acomp AS HANDLE.
DEF VAR numero AS CHAR NO-UNDO.

ASSIGN c-programa = "FRCP034"
c-versao = "2.04"
c-revisao = "000"
c-titulo-relat = "Lote Múltiplo"
c-sistema = "EMS"
c-empresa = "FRAMEPORT".
{include\i-rpcab.i}

DEFINE VARIABLE i-cont-imp AS INTEGER FORMAT ">" NO-UNDO.

run utp/ut-acomp.p persistent set h-acomp.
run pi-inicializar in h-acomp(input "Gerando Relatório...").

{include/i-rpout.i}.

/*Definições de Frames:*/

VIEW FRAME f-cabec.
VIEW FRAME f-rodape.

/*Lógica*/

FOR EACH ITEM NO-LOCK WHERE
ITEM.it-codigo >= tt-param.it-codigo-ini AND
ITEM.it-codigo <= tt-param.it-codigo-fim:

RUN pi-acompanhar IN h-acomp(INPUT "Cod: " + STRING(ITEM.it-codigo)).


CREATE tt-item.
ASSIGN tt-item.codigo = ITEM.it-codigo
tt-item.descricao = ITEM.desc-item
tt-item.lote = ITEM.lote-multipl
tt-item.situacao = ITEM.cod-obsoleto
tt-item.peso-l = ITEM.peso-liquido
tt-item.peso-b = ITEM.peso-bruto.


FOR EACH tt-item
BREAK BY tt-item.codigo:

disp tt-item.codigo column-label "Código"
tt-item.descricao column-label "Descrição"
tt-item.lote column-label "Lote Múltiplo"
tt-item.situacao column-label "Situação"
tt-item.peso-l column-label "Peso Liquido"
tt-item.peso-b column-label "Peso Bruto"
with STREAM-IO width 200 frame f-ord down no-box.
END.
END.
/*{include/i-rpclo.i &STREAM="stream str-rp"} */
{include/i-rpclo.i}
RUN pi-finalizar IN h-acomp.
RETURN "OK":U.

O notepad chega a ser aberto? em branco?

Não nem o bloco de notas abre!

A máquina onde não abre é 32 ou 64 bits?

BLZ o problema era na interface do relatório fiz um novo porque era simples só um filtro, e funcionou acho que faltava alguma include valeu
a força.

Blz....abç!