Power Builder - PB y lenguaje EPL2-impresoras Termicas

alguien ha trabajado en la codificación de etiquetas para una impresora en mi caso zeba tlp2844 que utilitza el lenguaje EPL2?
Uitilizo el siguiente codigo como ejemplo de prueba y la impresora no me interpreta nada, lo escribe como si fuera texto y he probado diferentes combinacions y ... nada. Alguien puede ayudarme? Gracias

PrintSetPrinter("Zebra TLP2844~twinspool~tLPT1:")

Job = PrintOpen()

print(job, "~010")
print(Job,"N" + "~010")
print(Job,"A50,50,0,2,1,1,N"+"Example 2" + "~010")
print(Job,"A50,100,0,3,1,1,N"+"Example 3"+ "~010")
print(Job,"A50,150,0,4,1,1,N"+"Example 4"+ "~010")
print(Job,"A50,200,0,5,1,1,N"+"EXAMPLE 5"+ "~010")
print(Job,"A50,300,0,3,2,2,R"+"Example 6"+ "~010")
print(Job,"P1" + "~010")
PrintClose(Job)

Si lo pruebo desde fuera funciona correctamente, por tanto es problema del powerbuilder pero no se el que le falla.

Agradeceria cualquier consejo, ejemplo y/o ayuda

Gloria

Ya intentaste probar con PrintSend ( Job , 'Cadena')

Pruebalo y si sigues teniendo problemas escribeme directamente.

Hola Carlos,

Probé ya con printsend y no consigo nada, podrias mandarme un trozo de codigo de ejemplo aunque el puerto sea el COM1.
Probe incluso con la impresora generica pero sigo sin solución.
Me urge.
Gracias

Hola,
me encuentro con el mismo problema. Conseguiste una solución al mismo?
SI es así te agradecerías me dijeras como solucionarlo.
Gracias.

Saludos.
Yo tenia la misma problematica, la solucione utilizando Api's de Windows para imprimir directamente en la impresora zebra y me funciono aqui les mando un ejemplo, espero les sirva a muchos de los que esten en esta situacion:

Local External Functions:
protected:

function integer OpenPrinter ( string pPrinterName, ref ulong phPrinter, long pDefault ) Library "winspool.drv" ALIAS FOR "OpenPrinterA"
function integer ClosePrinter ( ulong phPrinter ) Library "winspool.drv"
Function integer EndDocPrinter (Long hPrinter) library "winspool.drv"
Function integer EndPagePrinter (Long hPrinter) library "winspool.drv"
Function integer StartDocPrinter (Long hPtinter, Long Level, DocInfo pDocInfo) library "winspool.drv" ALIAS FOR "StartDocPrinterA"
Function integer StartPagePrinter (Long hPrinter) library "winspool.drv"
Function integer WritePrinter (Long hPrinter, String pBuf, Long cdBuf, ref Long pcWritten) library "winspool.drv"

(El Siguiente codigo puede localizarse en el evento click del boton imprimir o como gusten)

String ls_cadena, ls_printer
long ll_null, ll_pos
ulong ll_printer
Boolean ll_bol
integer ll_ret,l_doc
docinfo mydocinfo
setnull(ll_null)
ls_printer=PrintGrande

ll_ret = OpenPrinter(ls_printer,ll_printer,0)
if ll_ret = 0 then
messagebox("","Error")
else
mydocinfo.pdocname="bARcODE"
setnull(ls_cadena)
mydocinfo.poutputfile=ls_cadena
mydocinfo.pdatatype=ls_cadena
l_doc=StartDocPrinter(ll_printer,1,Mydocinfo)
StartPagePrinter(ll_printer)
ls_cadena=""
ls_cadena= ls_cadena + "q3000"+char(10)
ls_cadena= ls_cadena + "N"+char(10)
ls_cadena= ls_cadena + "A220,5,0,2,1,2,R,~"XXXXXX~"" +char(10)
ls_cadena= ls_cadena + "A200,43,0,2,1,1,N,~"XXXX~"" +char(10)
ls_cadena= ls_cadena + "P1" +char(10)
ll_ret=WritePrinter(ll_printer,ls_cadena,len(ls_cadena),ll_null)
ll_ret=EndPagePrinter(ll_printer)
ll_ret=EndDocPrinter(ll_printer)
ll_ret = ClosePrinter(ll_printer)
end if

*/////////
docinfo es una estructura

Esto es solo una muestra, funciona correctamente para la impresion de codigos de barras asi como de texto en las etiquetas.

Saludos desde mexico.