Impresion PDF en espejo (Solucionado)
Posted: Mon Dec 03, 2018 3:18 pm
Estimados:
Tengo un problema al emitir un PDF desde el Preview con PRINT. Me sale en espejo como muestra la figura
El programa para emitir el reporte es el siguiente
Alguna pista del porque?
Gracias de antemano
Tengo un problema al emitir un PDF desde el Preview con PRINT. Me sale en espejo como muestra la figura
El programa para emitir el reporte es el siguiente
- Code: Select all Expand view
STATIC FUNCTION Recaudo(cEan,cNumRef,nImporte,dFechaMax)
LOCAL oPrn, oFont1, oFont2, oFont3
AddFontResource( "Bar25ifh.ttf" )
DEFINE FONT oFont1 NAME "TAHOMA" SIZE -24, 48 OF oPrn
DEFINE FONT oFont2 NAME "Arial" SIZE -24, 48 BOLD OF oPrn
PRINT oPrn NAME "Recaudo" PREVIEW
PAGE
@ 1.0, 1 PRINT TO oPrn TEXT "Codigo EAN:" ;
SIZE 3,.5 CM FONT oFont1 ALIGN "R"
@ 1.0, 4.1 PRINT TO oPrn TEXT cEan ;
SIZE 6,.5 CM FONT oFont2 ALIGN "L"
@ 1.5, 1 PRINT TO oPrn TEXT "Referencia:" ;
SIZE 3,.5 CM FONT oFont1 ALIGN "R"
@ 1.5, 4.1 PRINT TO oPrn TEXT cNumRef ;
SIZE 6,.5 CM FONT oFont2 ALIGN "L"
@ 2.0, 1 PRINT TO oPrn TEXT "Importe:" ;
SIZE 3,.5 CM FONT oFont1 ALIGN "R"
@ 2.0, 4.1 PRINT TO oPrn TEXT STR(nImporte,12,2) ;
SIZE 6,.5 CM FONT oFont2 ALIGN "L"
@ 2.5, 1 PRINT TO oPrn TEXT "Fecha pago:" ;
SIZE 3,.5 CM FONT oFont1 ALIGN "R"
@ 2.5, 4.1 PRINT TO oPrn TEXT DTOC(dFechaMax) ;
SIZE 6,.5 CM FONT oFont2 ALIGN "L"
ENDPAGE
ENDPRINT
oFont1:End() // Destroy the font object
oFont2:End() // Destroy the font object
RETURN NIL
Alguna pista del porque?
Gracias de antemano