Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 15-12-2020
jose.ignacio.ve jose.ignacio.ve is offline
Miembro
 
Registrado: sep 2012
Posts: 79
Poder: 12
jose.ignacio.ve Va por buen camino
Impresora hasar f250 2ge

Hola colegas.
Desarrolle un sistema de facturación fiscal con impresora hasar f250 de segunda generación. El sistema esta funcionando bien siempre y cuando la impresora este conectada.. Me gustaría saber si alguien pudo hacer un servicio que ponga los ticket en cola de impresión hasta que la impresora vuelva a conectarse o algo similar.. o sea realizar la venta si la impresora no esta en servicio que ponga el ticket en una cola de impresión hasta que vuelva la conexion.
o alguna idea de como puedo solucionar ese tema?
adjunto el codigo del boton de imprimir

Código Delphi [-]
 try
        impresora.Conectar('192.168.0.120',80,2000,2000);
        respabrir:=impresora.AbrirDocumento(Tique);
        //impresora.ImprimirItem('Item a la venta...', 1, 100, Gravado, 21, ModoSumaMonto,
        // IIVariablePorcentual, 0, DisplayNo, ModoPrecioTotal, 1, '779123456789', '10',Unidad);
         fmodulo.ZQgetDetail.First;
         while(not fmodulo.ZQgetDetail.Eof) do
         begin
          descripcion:=fmodulo.ZQgetDetail['description'];
          cantidad:=fmodulo.ZQgetDetail['quantity'];
          precio:=fmodulo.ZQgetDetail['price'];
          codigo:=fmodulo.ZQgetDetail['barcode'];
          codigointerno:=fmodulo.ZQgetDetail['id']  ;
          descuento:=fmodulo.ZQgetDetail['discount'];
          impresora.ImprimirItem(descripcion,cantidad, precio, Gravado, 21, ModoSumaMonto,
           IIVariablePorcentual, 0, DisplayNo, ModoPrecioTotal, 1, codigo, codigointerno,Unidad);
           if(descuento>0)then
              begin
                impresora.ImprimirDescuentoItem('DESC. MAYOR',descuento,DisplayNo,ModoPrecioTotal);
              end;
          fmodulo.ZQgetDetail.Next;
         end;
        respcierre:=impresora.CerrarDocumento(0,'');
        fmodulo.Tsales.Active:=true;
        fmodulo.Tsales.Locate('id',fmodulo.ZQgetSaleActive['id'],[]);
        fmodulo.Tsales.Edit;
        fmodulo.Tsales['status']:='FINALIZADA';
        fmodulo.Tsales['updated_at']:=now();
        fmodulo.Tsales.Post;
        fmodulo.Tsales.Refresh;
        fmodulo.Tsales.Close;
        self.Close;
    except on E: Exception do
      begin
       ShowMessage('Impresora Sin conexión');
        ShowMessage('Error de Fiscal: ' + e.Message);
        ShowMessage('Error de Fiscal (ClassName): ' + e.ClassName);
      end;

Última edición por dec fecha: 16-12-2020 a las 13:19:24.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Impresora Hasar 2G Comando ConsultarEstado b_ernesto Impresión 2 08-12-2019 14:54:36
Facturas A y B en impresora fiscal Hasar SMH/P330 santiago14 Varios 1 30-04-2013 14:14:02
Recibo X con impresora Hasar SMH/P-330 santiago14 Varios 6 23-04-2013 19:15:44
Problema Impresora Hasar USB Inge022 Impresión 6 13-05-2011 19:20:21
Impresión de recibos en impresora de tickets fiscales Hasar Mauro® Impresión 1 27-10-2008 03:04:51


La franja horaria es GMT +2. Ahora son las 10:34:36.


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
Copyright 1996-2007 Club Delphi