Page 1 of 1

IMPRIMIR EN 2 IMPRESORAS VALE/INFORME

PostPosted: Wed May 27, 2015 12:42 pm
by jbrita
Hola amigos, una consulta.
resulta que tengo 2 impresoras instalada una Epson miniPrinter y otra hp para imprimir informes, esta ultima la tengo predeterminada para los informes.
resulta que cuando imprimo un informe me lo muestra perfecto en tamaño carta. luego imprimo un vale en la impresora miniprinter de esta manera.

print oprint title "Impresion de Ticket " to "MINI EPSON"
if Empty( oPrInT:hDC )
return nil
endif

DEFINE FONT aFon2 NAME "COURIER NEW" SIZE 0,14 BOLD OF oPRINT
page
PAG:=1
Oprint:Cmsay(1.0,.2,"FERROPUERTO DE SONORA, ",AFON2)

EndPage
endprint
return nil

Tambien imprime perfecto, pero luego de imprimir el vale voy a ver el informe diario y me sale mal en tamaño miniprinter. ese es mi PROBLEMA

Saudos

Re: IMPRIMIR EN 2 IMPRESORAS VALE/INFORME

PostPosted: Wed May 27, 2015 3:38 pm
by karinha
Intenta asi:

Code: Select all  Expand view

        ResLinea := oPrn:nLogPixely()/2.54
        ResColun := oPrn:nLogPixelx()/2.54

        page

        PAG:=1

           Oprint:Cmsay( 1.0 * ResLinea, .2 * ResColun, "FERROPUERTO DE SONORA, ",AFON2)

        EndPage

        endprint