Las disculpas al caso por desviarnos de la pregunta original correspondiente a este nodo.
Suponiendo siempre que se trabaja con impresoras matriciales epson lx-300 o similares
aca pego el codigo que imprime en una hoja 11pulgadas(alto) x 25 cm de (ancho) seccionadas por la mitad seria 5,5 pulgadas x 25cm de (ancho) es decir hojas troqueladas:
*//
*// IMPRESION DE RECIBOS, CONFIGURADO ESPECIFICAMENTE PARA EPSON LX-300 DEBERIA FUNCIONAR
*// EN CUALQUIER OTRA EPSON
*//
_Sprint=.F. &&.F. envia a archivo de texto, .T. a impresora
*//--------------------------------------------------------------------------------
*//
*// ACTIVACION DE LA IMPRESORA
*//
PUBLIC _cmbi, _csma, _cnor, _cbig, _eol, _logo1, _logo2, _npage, _cecn, _cdcn
_cecn=CHR(27)+CHR(69)
_cdcn=CHR(27)+CHR(70)
_cmbi=CHR(15)+CHR(14)
_csma=CHR(18)+CHR(15)
_cnor=CHR(18)
_cbig=CHR(18)+CHR(14)
_eol =CHR(13)+CHR(10)
SET CONSOLE OFF
IF !_Sprint
DELETE FILE [SALIDA.TXT]
SET PRINTER TO FILE [SALIDA.TXT] ADDITIVE
SET PRINTER ON TO PROMPT
ELSE
_printer=GETPRINTER()
IF EMPTY( _printer )
MESSAGEBOX( [PRINT CANCEL!], 64, [WARNING!] )
RELEASE _cmbi, _csma, _cnor, _cbig, _eol, _logo1, _logo2, _npage
RETURN .F.
ENDIF
SET PRINTER TO NAME (_printer)
ENDIF
SET DEVICE TO PRINTER
*//--------------------------------------------------------------------------------
DIMENSION _lin[3]
_lin[1]=""
_lin[2]=""
_lin[3]=""
*//
*// ENVIAMOS RECIBO A IMPRESORA
*//
??? _eol
??? _cbig+[* LIQUIDACION DE SALARIOS (Art.236CL) *]+_eol+_eol
??? _cmbi+[Empleador ]+"LOS PALITOS"+[ N. Patronal ]+" 0"+_eol
??? _cmbi+[Trabajador ]+STRTRAN("000000000"," ","0")+"-"+CPCONVERT(1252,437,"XXXXXXXXXXXXXXXXX")+_cnor+_eol
??? _cnor+[Periodo ]+"092010"+[ L.]+STRTRAN(" 0"," ","0")+_cnor+_eol+_eol
??? _csma+[ -------------------------------------------------------------------------------------------------------------------------------]+_eol
??? _csma+[ |DiasT|Salario B. |Sub Total |Horas Ext. |Comisiones |Otros ingr.|Total Sal. |Retenc. IPS|Otras Ret. |Total Desc.|Saldo |]+_eol
??? _csma+[ -------------------------------------------------------------------------------------------------------------------------------]+_eol
??? _csma+[ |]+STR(0,5,2)+[|]+TRANSFORM(0,"999 999 999")+[|]+TRANSFORM(0,"999 999 999")+[|]+SPACE(10)+[0|]+SPACE(10)+[0|]
??? TRANSFORM(0+0+0,"999 999 999")+[|]+TRANSFORM(0,"999 999 999")+[|]+TRANSFORM(0,"999 999 999")+[|]
??? TRANSFORM(0+0,"999 999 999")+[|]+TRANSFORM(0,"999 999 999")+[|]+TRANSFORM(0,"999 999 999")+[|]+_eol
??? _csma+[ -------------------------------------------------------------------------------------------------------------------------------]+_eol
??? _csma+[OBS: ]+CPCONVERT(1252,437,"ASÑLDKJFÑALSKJDFÑLKJ")+_eol
??? _csma+[Detalle Descuento: ]+TRANSFORM(0,"999 999 999")+_eol
*// ENVIO DE ANTICIPOS DETALLADOS
??? _csma+_lin[1]+_eol
??? _csma+_lin[2]+_eol
??? _csma+_lin[3]+_eol+_eol+_eol+_eol+_eol+_eol+_eol+_eol
??? [FECHA DE PAGO: ]+DTOC(DATE())
??? SPACE(54)+[...............................]+_eol
??? SPACE(80)+[ FIRMA ]+_eol+_eol+_eol+_eol+_eol+_eol
*// REINICIALIZA LA IMPRESORA
??? CHR(27)+[@]
_plineno=0
_pcolno =0
*//
*// ENVIAMOS RECIBO A IMPRESORA
*//
??? _eol
??? _cbig+[* LIQUIDACION DE SALARIOS (Art.236CL) *]+_eol+_eol
??? _cmbi+[Empleador ]+"LOS PALITOS"+[ N. Patronal ]+" 0"+_eol
??? _cmbi+[Trabajador ]+STRTRAN("000000000"," ","0")+"-"+CPCONVERT(1252,437,"XXXXXXXXXXXXXXXXX")+_cnor+_eol
??? _cnor+[Periodo ]+"092010"+[ L.]+STRTRAN(" 0"," ","0")+_cnor+_eol+_eol
??? _csma+[ -------------------------------------------------------------------------------------------------------------------------------]+_eol
??? _csma+[ |DiasT|Salario B. |Sub Total |Horas Ext. |Comisiones |Otros ingr.|Total Sal. |Retenc. IPS|Otras Ret. |Total Desc.|Saldo |]+_eol
??? _csma+[ -------------------------------------------------------------------------------------------------------------------------------]+_eol
??? _csma+[ |]+STR(0,5,2)+[|]+TRANSFORM(0,"999 999 999")+[|]+TRANSFORM(0,"999 999 999")+[|]+SPACE(10)+[0|]+SPACE(10)+[0|]
??? TRANSFORM(0+0+0,"999 999 999")+[|]+TRANSFORM(0,"999 999 999")+[|]+TRANSFORM(0,"999 999 999")+[|]
??? TRANSFORM(0+0,"999 999 999")+[|]+TRANSFORM(0,"999 999 999")+[|]+TRANSFORM(0,"999 999 999")+[|]+_eol
??? _csma+[ -------------------------------------------------------------------------------------------------------------------------------]+_eol
??? _csma+[OBS: ]+CPCONVERT(1252,437,"ASÑLDKJFÑALSKJDFÑLKJ")+_eol
??? _csma+[Detalle Descuento: ]+TRANSFORM(0,"999 999 999")+_eol
*// ENVIO DE ANTICIPOS DETALLADOS
??? _csma+_lin[1]+_eol
??? _csma+_lin[2]+_eol
??? _csma+_lin[3]+_eol+_eol+_eol+_eol+_eol+_eol+_eol+_eol
??? [FECHA DE PAGO: ]+DTOC(DATE())
??? SPACE(54)+[...............................]+_eol
??? SPACE(80)+[ FIRMA ]+_eol+_eol+_eol+_eol+_eol+_eol
*// REINICIALIZA LA IMPRESORA
??? CHR(27)+[@]
_plineno=0
_pcolno =0
*//-------------------------------------------------------------------------
*//
*// APAGADO DE IMPRESORA
*//
RELEASE _cmbi, _csma, _cnor, _cbig, _eol
SET PDSETUP TO
SET PRINTER OFF
SET DEVICE TO SCREEN
SET CONSOLE ON
SET PRINTER TO 'LPT1'
*//-------------------------------------------------------------------------
RETURN
Deberias bajarte el manual de referencia de epson alli por ejemplo te enseñan como setear la longitud de pagina en pulgadas es decir:
*por ejemplo mis facturas son 6pulgadas de largo
pulgadas=6
??? CHR(27)+"C"+CHR(0)+CHR(pulgadas)
??? "IMPRIMES UNAS LINEAS"+CHR(13)+CHR(10)
....
EJECT
* y deberia saltar exactamente a la siguiente pagina