Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 03-02-2021
espinete espinete is offline
Miembro
 
Registrado: mar 2009
Posts: 233
Poder: 16
espinete Va camino a la fama
Gracias, keys. Iba por buen camino, pero solo estaba añadiendo la T: antes de TicketBAI y no en el "xmlns:T=" de después. Ni lo había visto

Qué curioso que haya que descomprimir el gzip dos veces. Por cierto, para descomprimirlo usando las librerías de Delphi yo uso este código:

Código Delphi [-]
procedure descomprimir(origen,destino:string);
var LInput, LOutput: TFileStream;
    DecompressionStream: TDecompressionStream;
begin
    LInput := TFileStream.Create(origen, fmOpenRead);
    LOutput := TFileStream.Create(destino, fmCreate);

    //Primera descompresión
    DecompressionStream := TDecompressionStream.Create(LInput, 15 + 16);  // 31 bit wide window = gzip only mode
    LOutput.CopyFrom(DecompressionStream, DecompressionStream.size);

    LOutput.Free;
    LInput.Free;
end;

Como hay que descomprimir dos veces, lo hago así:

Código Delphi [-]
        
    descomprimir('respuesta.gz','respuesta2.gz');
    descomprimir('respuesta2.gz','respuesta.xml');

Y ya luego borro los archivos temporales sobrantes.

Estoy intentando cargar la respuesta XML en el "IXMLLROEPJ240FacturasEmitidasConSGAltaRespuesta" importado, para trabajar "mejor" con las respuestas, pero no lo consigo:

Código Delphi [-]
var Alta240Respuesta : IXMLLROEPJ240FacturasEmitidasConSGAltaRespuesta;
    i : integer;
begin
        Alta240Respuesta := LROE_PJ_240_1_1_FacturasEmitidas_ConSG_AltaRespuesta_V1_0_1.LoadLROEPJ240FacturasEmitidasConSGAltaRe  spuesta('respuesta.xml');
        for i:=0 to Alta240Respuesta.Registros.Count-1 do
        begin
            with Alta240Respuesta.Registros.Registro[i] do
            begin
                memo2.Lines.Append(SituacionRegistro.EstadoRegistro);
                memo2.Lines.Append(SituacionRegistro.CodigoErrorRegistro);
                memo2.Lines.Append(SituacionRegistro.DescripcionErrorRegistro);
                memo2.Lines.Append('');
            end;
        end;
end;

El XML se carga en Alta240Respuesta, porque Alta240Respuesta.XML devuelve el contenido del XML, pero luego no puedo acceder a los valores. No encuentra nada.

No me preocupa mucho porque puedo simplemente cargar el XML en un XMLDocument y trabajar con eso, pero creo que sería más cómodo aprovechar el XML Data Binding, no?

Un saludo y gracias nuevamente. Ahora ya puedo obtener los errores detallados en las respuestas, así que a partir de ahora todo debería ser más sencillo.
Responder Con Cita
  #2  
Antiguo 03-02-2021
espinete espinete is offline
Miembro
 
Registrado: mar 2009
Posts: 233
Poder: 16
espinete Va camino a la fama
Problemas con la firma del TicketBAI

Hola de nuevo. Después de corregir algunos errores en el XML del TicketBAI, en la petición, formato del gzip, etc. ahora me devuelve este otro error:

FirmaElectronica: La firma no cumple los requisitos de la polÃ*tica de firma TicketBAI.(EPES: S ALGORITMO: rsa-sha256:2048 POLITICA: N CERTIFICADO_ADMITIDO: S )

He usado el código para firma que encontré en el foro, el que usa los componentes de SecureBlackBox 2020. (He suprimido la parte del código que uso para cargar el certificado):

Código Delphi [-]
procedure FirmarXML(archivo : string);
var
  CertificateStorage: TsbxCertificateStorage; 
  CertificateManager: TsbxCertificateManager;
  sbxXAdESSigner1 : TsbxXAdESSigner; 
  cert : TsbxCertificate;
  i : Integer;
begin
  sbxXAdESSigner1 := TsbxXAdESSigner.Create(nil);
  sbxXAdESSigner1.InputFile := archivo;
  sbxXAdESSigner1.OutputFile := 'firmado.xml';

  {.....}

  sbxXAdESSigner1.SignatureType := cxstEnveloped;
  sbxXAdESSigner1.CanonicalizationMethod := cxcmCanon;
  sbxXAdESSigner1.HashAlgorithm := 'SHA256';
  sbxXAdESSigner1.XMLElement := '';  // Todo el documento
  sbxXAdESSigner1.EnableXAdES := True;
  sbxXAdESSigner1.XAdESVersion := xav132;
  sbxXAdESSigner1.XAdESForm := xafEPES;
  sbxXAdESSigner1.Config('SigPolicyID=https://ticketbai.eus/politicafirma'); 
  sbxXAdESSigner1.Config('SigPolicyHash=39D59C038EBB3B7DF6C61ED2F740B318F0C50F93ADCD35E26BE8FF8E76D21D  A8');
  sbxXAdESSigner1.Config('SigPolicyHashAlgorithm=SHA256');
  sbxXAdESSigner1.Config('SigPolicyURI=https://ticketbai.eus/politicafirma');

  try
    sbxXAdESSigner1.Sign();
  except
      MessageDlg('Error en el proceso de firma', mtError, [mbOK], 0);
  end;
end;


No sé si las URLs han cambiado y ahora son distintas. En la documentación he encontrado otra URL...

https://www.euskadi.eus/contenidos/i...irma_v_1_0.pdf

...pero incluso añadiendo esa URL y su correspondiente HASH (que he calculado en https://www.fileformat.info/tool/hash.htm), me devuelve el mismo error.

Como los errores que devuelve Bizkaia son muy ambiguos, no sé si el problema es ese o es otro, la verdad.

Última edición por Neftali [Germán.Estévez] fecha: 04-02-2021 a las 08:40:01. Razón: Añadir TAGs al código Delphi
Responder Con Cita
  #3  
Antiguo 03-02-2021
juramisa juramisa is offline
Miembro
 
Registrado: abr 2007
Posts: 54
Poder: 18
juramisa Va por buen camino
Hola

Código Delphi [-]
sbxXAdESSigner1.Config('SigPolicyHash=39D59C038EBB3B7DF6C61ED2F740B318F0C50F93ADCD35E26BE8FF8E76D21D A8');
tienes que fijarte en el valor que se publica en https://www.batuz.eus/es/documentacion-tecnica

Cita:
Firma electrónica TicketBAI 1.0.Documento de especificaciones para la firma electrónica de los ficheros del software garante TicketBAI 1.0. El Hash SHA256 de este documento es el siguiente, el cual se deberá incluir obligatoriamente en la firma electrónica de los ficheros de alta y de anulación de operación con software garante TicketBAI: Quzn98x3PMbSHwbUzaj5f5KOpiH0u8bvmwbbbNkO9Es=
Convertimos ese valor // Quzn98x3PMbSHwbUzaj5f5KOpiH0u8bvmwbbbNkO9Es=
de base64 a HEX
// 42ECE7F7CC773CC6D21F06D4CDA8F97F928EA621F4BBC6EF9B06DB6CD90EF44B

Este es el valor actual
Código Delphi [-]
sbxXAdESSigner1.Config('SigPolicyHash=42ECE7F7CC773CC6D21F06D4CDA8F97F928EA621F4BBC6EF9B06DB6CD90EF4  4B');
Responder Con Cita
  #4  
Antiguo 04-02-2021
Avatar de elcharlie
elcharlie elcharlie is offline
Miembro
 
Registrado: mar 2013
Ubicación: Bilbao
Posts: 174
Poder: 12
elcharlie Va por buen camino
Buenos días:
¿Alguien sabe cuando va a publicarse la información de TBai de Araba? Estamos a 4 de Febrero y no encuentro nada, ¿alguien sabe algo?
Responder Con Cita
  #5  
Antiguo 04-02-2021
espinete espinete is offline
Miembro
 
Registrado: mar 2009
Posts: 233
Poder: 16
espinete Va camino a la fama
Gracias, juramisa.

Había probado esa cadena pero en minúsculas, supongo que por eso me daba el error.

De Araba no se sabe nada. Yo envié hace un par de semanas un email solicitando información a las tres direcciones de email (una para cada provincia) y solo me han respondido de Bizkaia (responden bastante rápido) y de Gipuzkoa.
Responder Con Cita
  #6  
Antiguo 25-02-2021
naglro naglro is offline
Registrado
 
Registrado: feb 2021
Posts: 2
Poder: 0
naglro Va por buen camino
Hola compañeros,

Os escribo después de leer las 22 páginas del foro porque tengo una herramienta de facturación online que he creado yo mismo y me llevo semanas investigando sobre cómo implementar Ticketbai pero no consigo encauzar el tema. No soy programador y la aplicación la he hecho con herramientas de nocode (no me abucheéis porfa que me encanta la programación pero no consigo aprender porque se me hace muy complicada).

A ver si me podéis comentar algo porque estoy buscando la forma de poder firmar las facturas que emito a través de la aplicación y que cumplan el tema de Ticketbai pero me he encontrado con que no sé cómo lanzar algo que firme el XML.

Por lo que he leído, el proceso de creación de factura consiste en crear el fichero XML y luego firmarlo. Ahora, qué librería de firma electrónica puedo utilizar? Podría utilizar algo que ya haga factura-e y adaptarlo?

Mi idea es montar un servidor que cuente con la aplicación que pueda firmar las facturas y que luego me las devuelva a la herramienta a través de una API pero para ello primero entiendo que necesito una librería a la que llamar. He buscado en github pero no encuentro ninguna.

A ver si me podéis comentar algo porque como no soy programador estoy súper perdido aún leyendo todo lo que habéis comentado.

Muchas gracias de antemano y espero que estéis teniendo una buena tarde/noche.
Responder Con Cita
  #7  
Antiguo 25-02-2021
Emiliopm Emiliopm is offline
Miembro
 
Registrado: jun 2013
Ubicación: Huelva
Posts: 14
Poder: 0
Emiliopm Va por buen camino
Buenas, nosotros tenemos gran parte desarrollada, y al igual el resto de compañeros, así pues, si lo consideras oportuno, podríamos colaborar.

Eso si, estas cosas en github, con la de horas que nos ha llevado a todos, ojalá me equivoque, no se si lo encontraras .
Responder Con Cita
  #8  
Antiguo 06-03-2021
yaedev yaedev is offline
Miembro
 
Registrado: ene 2020
Posts: 23
Poder: 0
yaedev Va por buen camino
Cita:
Empezado por naglro Ver Mensaje
Hola compañeros,

Os escribo después de leer las 22 páginas del foro porque tengo una herramienta de facturación online que he creado yo mismo y me llevo semanas investigando sobre cómo implementar Ticketbai pero no consigo encauzar el tema. No soy programador y la aplicación la he hecho con herramientas de nocode (no me abucheéis porfa que me encanta la programación pero no consigo aprender porque se me hace muy complicada).

A ver si me podéis comentar algo porque estoy buscando la forma de poder firmar las facturas que emito a través de la aplicación y que cumplan el tema de Ticketbai pero me he encontrado con que no sé cómo lanzar algo que firme el XML.

Por lo que he leído, el proceso de creación de factura consiste en crear el fichero XML y luego firmarlo. Ahora, qué librería de firma electrónica puedo utilizar? Podría utilizar algo que ya haga factura-e y adaptarlo?

Mi idea es montar un servidor que cuente con la aplicación que pueda firmar las facturas y que luego me las devuelva a la herramienta a través de una API pero para ello primero entiendo que necesito una librería a la que llamar. He buscado en github pero no encuentro ninguna.

A ver si me podéis comentar algo porque como no soy programador estoy súper perdido aún leyendo todo lo que habéis comentado.

Muchas gracias de antemano y espero que estéis teniendo una buena tarde/noche.
Hola,

Yo también he empezado a buscar si ya hay algo hecho, pero ya doy por sentado que será algo de pago, y es lógico. Pero al menos encontrar algo asequible . En mi caso me pasa que tengo muy pocos clientes que les vaya a afectar el ticket bai, y no me sale a cuenta la inversión de horas con lo que luego voy a facturar. Para las microempresas o autónomos que tenemos muy pocos clientes afectados nos es un problemón gordo.

Por ahora lo único que he visto es que hay alguna que otra empresa desarrolladora que ya está poniendo en su catálogo de productos una solución API para Ticket BAI. Esto está super bien porque da igual el lenguaje de programación que uses. Tu mandas el fichero con los datos de la factura a través de la API, ésta realiza todo el proceso y luego la API te devuelve el QR y otros datos. Evidentemente son de pago, aunque en sus webs no he visto los precios. Por ahora espero a ver que vayan saliendo más empresas que vean filón de negocio en esto, y empiecen a comercializar soluciones y que alguna sea asequible para los que vayamos a manejar pocos usuarios.

Si alguien de aquí ofrece algo de esto sería interesante saber. Ya sean servicios de API, librerías, etc.

Un saludo
Responder Con Cita
Respuesta



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
SII -Nuevo sistema de la Agencia Tributaria española de envío de datos vía Webservice newtron Internet 3557 Hace 3 Semanas 17:42:47
Como utilizar la ayuda del nuevo Sistema Operativo gluglu Humor 3 24-09-2007 09:39:05
Aplicacion Agencia De Viajes ArdiIIa Varios 9 20-01-2007 16:49:53
El Vasco Aguirre Al González La Taberna 5 26-05-2006 09:22:28
Microsoft ha lanzado su nuevo sistema operativo DarkByte Humor 0 25-01-2004 09:21:14


La franja horaria es GMT +2. Ahora son las 01:35:39.


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