Impresora Fiscal Epson LX-300F
Hola Gente.
Les cuento un poco. Hace bastante he trabajado con impresoras Hasar y realmente son espectaculares. Muy claros los manuales, claros las funciones del OCX y un par de consultas que hice desde la pagina, me respondieron espectacularmente a mi mail. El tema es que tengo que hacerlo para una LX-300F de Epson. Utilizo el OCX y no paso del encabezado. Aclaro que es un engendro, por que?, Es una aplicacion Web, que devuelve un XML en cual levanto en Delphi y mando a imprimir a la impresora fiscal. Aca les dejo el codigo de delphi y abajo el ejemplo del XML, que por ahi es donde le estoy errando.
Este es el XML <?xml version="1.0"?> <!DOCTYPE COMPROBANTE> <COMPROBANTE> <TIPO>FAC</TIPO> <LETRA>B</LETRA> <COPIAS>1</COPIAS> <COMPRADOR> <IVA>R</IVA> <NOMBRE1>Lesca Carlos</NOMBRE1> <NOMBRE2></NOMBRE2> <TIPODOC>CUIT</TIPODOC> <NRODOC>23171793149</NRODOC> <DOMICILIO1>UN DOMICILIO</DOMICILIO1> <DOMICILIO2>OTRO DOM</DOMICILIO2> <DOMICILIO3>EXTRA</DOMICILIO3> </COMPRADOR> <FACTURAS_AFECTADAS> <FAC1></FAC1> <FAC2></FAC2> </FACTURAS_AFECTADAS> <REMITOS> <REM1></REM1> <REM2></REM2> </REMITOS> <ITEMS> <ITEM CANTIDAD="1" PRECIOUNITARIO="11" IVA="10.5" TIPO="M">DESCRIPCION 01</ITEM> <ITEM CANTIDAD="2" PRECIOUNITARIO="12" IVA="10.5" TIPO="M">DESCRIPCION 02</ITEM> </ITEMS> <PAGOS> <PAGO IMPORTE="100" TIPO="T">DESCRIPCION</PAGO> <PAGO IMPORTE="10" TIPO="D">DESCRIPCION</PAGO> </PAGOS> </COMPROBANTE> Mil Gracias a todos. |
Cual es el error ?
En que momento acurre ? Es por un estado de la impresora o es de programacion ? Hasta donde llega el comprobante ? Abre la factura ? Imprime una venta ? O es que no cierra ? Mandá mas datos para poder saber que pasa !! :confused: ______________ Saludos. |
Cita:
creo que el resto esta respondido porque no abre el comprobante directamente. Aprobecho y pregunto otra cosa. El tema de los descuentos cuando se hace el pago. Va el importe y el tipo es "D". Eso va antes de un tipo "T" que es el pago?, o es indistinto, porque estuve haciendo algunas pruebitas por otro lado (batch directo) y logre que imprima pero me da error en ese punto. El error es que no puede realizar la impresion del pago/descuento. Muchas gracias nuevamente. |
Proba poniendo I en el campo 7 si es Responsable Inscripto, si estas en modo entrenamiento es obligatorio este campo.
Si es factura B poné a un consumidor final F en el campo 8. Estos son los errores que veo, yo no utilizo el OCX pero debe haber alguna forma de que te devuelva una respuesta mas amplia que verdadero o falso, el protocolo informa el campo que está mal en la respuesta. Además no te olvides que se debe hacer un cierre Z después de 24 hs de abierta la jornada fiscal, si no se hace la impresora da error a todos los comandos. Una vez ingresado un pago 'T' no se aceptan mas descuentos 'D' ni recargos 'R' Espero haberte sido de utilidad. ______________ Saludos. |
Probá cambiando de parametro xq no soporta ticket
Te comento que yo estoy usando ese controlador y pude facturar pero no poniendo T sino F
if modelo = 'TM' then TipoComprobante := 'T' // Ticket en esta linea yo pondria 'F' de factura. Fijate si asi te funciona. sino busca otro hilo que hice yo donde hay un ejemplo completo de una impresion de factura A. Si queres imprimir Ticket este controlador no lo soporta. fijate en el pruf y vas a ver que lo tenes deshabilitado para ese modelo. Un abrazo y suerte!! |
urgente por favor ocx
buenas estoy realizando un programa de facturacion hasta ahora he trabajando con impresoras BMC FISCALES y me ha funcionado todo bien, pero tengo un cliente con una epson Lx300F nesecito los controladores ocx y los dll para cargarlos a mi programa en delphis 6, pero no los consigo, me conecte a la epson y me inscribi pero no me envian los drivers solo dice que enviaran un link para que los baje pero nunca llega, podrias facilitarme los ocx y dll POR FAVOR Y SI FUERA POSIBLE UN EJEMPLO EN CODIGO DE UNA FACTURA FISCAL, GRACIAS POR ADELANTADO.:D
|
Hola Luis
Yo trabajé hace un tiempo con esos controladores. Recuerdo que me fue complicado conseguir la dll pero la encontré en la web. (Voy a ver si encuentro la info y te la envío) Lo que si te puedo dejar es un ejemplo de como crear el objeto e instanciarlo para poder hacer una factura A pruebaControlador := CreateComObject( CLASS_PrinterFiscal ) as _PrinterFiscalDisp; pruebaControlador.PortNumber := 1; pruebaControlador.BaudRate := '9600'; ///Factura A/// //esto abre la factura PruebaControlador.OpenInvoice('F', 'C', 'A', '1', 'P', '12', 'I', 'I', 'Nombre1', '-', 'CUIT', '33708116828', 'N', 'DomComprador1', 'DomComprador2', 'DomComprador3', '001', '001', 'C'); //imprime un item PruebaControlador.SendInvoiceItem('Descripcion', '1000', '1', '21', 'M', '1', '0', 'DescripExt1', 'DescripExt2', 'DescripExt3', '10.50', '0'); //cierra la factura PruebaControlador.CloseInvoice('f', 'A', 'se cerro sin problemas'); |
Mas info y dirección de contacto.. espero ayude..
Hola!
Acá encontré la dirección que yo contactaba y acá te pego un ejemplo de lo que me respondieron para nota de crédito. De ésta manera ya tienes un ejemplo de factura A y de Nota de Crédito (No soy de responder muy seguido porque no estoy trabjando mas en desarrollo, pero en cuanto pueda entraré de nuevo para ver como te fue) usted consultó: Estoy programando sobre un controlador epson lx-300f+ y no se que funcion usar para hacer una nota de credito ni que parametros pasarle. les escribo a este lugar q es solo para impresoras porque no encontré un grupo para controladores ni este modelo. espero puedan responderme a la brevedad. muchas gracias es por esta consulta que le envío un ejemplo para realizar notas de credito. ABRIR NOTA DE CREDITO abrenotacredito = Me.PrinterFiscal1.OpenInvoice("F", "C", "A", "1", "F", "17", "I", "I", "Nombre comercial 1", "Nombre comercial 2", "CUIT", "30614104712", "N", "Domicilio 1", "Domicilio 2", "Domicilio 3", "Remitos 1", "Remitos 2", "C") ENVIAR ITEM PARA NOTA DE CREDITO item = Me.PrinterFiscal1.SendInvoiceItem("Descripcion 1", "00001000", "00000000200", "2100", "M", "00000", "00000000", "Descripcion 1", "Descripcion 2", "Descripcion 3", "0000", "000000000000000") CERRAR NOTA DE CREDITO cierraticket = Me.PrinterFiscal1.CloseInvoice("N", "A", "") Ante cualquier otra consulta no dude en volver a comunicarse con nosotros. Saludos cordiales, Atte. Maximiliano Aringoli Soporte Técnico EPSON ARGENTINA S.R.L. 011-5167-0300 soporte_tecnico_argentina@epson.com.ar :) |
Gracias
muchas gracias por sus ayuda, ya epson me envio los ocx y dll, voy a subirlos a mi espacio para ponerlos a la dispocision de los programadores delphis, enm cuanto lo tenga envio la direscion
:D:D |
Ayuda
Hola, me puedes facilitar el ocx y dll para delphi por favor ?, necesito imprimir en una impresora fiscal epson y necesito esos ocx ya que solo aparecen para vb6 y tambien por favor si me puedes enviar un ejemplo de como hacer una impresion, gracias de antemano...
Cita:
|
La franja horaria es GMT +2. Ahora son las 01:19:03. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi