Ver Mensaje Individual
  #2  
Antiguo 15-12-2020
Avatar de mRoman
mRoman mRoman is offline
Miembro
 
Registrado: nov 2003
Posts: 599
Reputación: 21
mRoman Va por buen camino
Cita:
Empezado por jose.ignacio.ve Ver Mensaje
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;
Veo q conectas la impresora por medio de un IP, tengo duda si los documentos enviados, estando apagada la impresora, los deje en la cola...no recuerdo bien si esto es posible. Me ha pasado con impresoras de matriz (conectadas localmente a la PC), que están imprimiendo y por alguna razón -papel atorado por ejemplo- tengo que apagarla y al encenderla sigue imprimiendo...desde el principio o donde se quedó, ya no recuerdo....pero asi como dices tu, creo q no.

Porque motivo la impresora no estaría en servicio?
__________________
Miguel Román

Afectuoso saludo desde tierras mexicanas....un aguachile?, con unas "cetaseas" bien "muertas"?, VENTE PUES !!

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