TICKET BAI (TicketBAI); Nuevo sistema de la Agencia Tributaria del Pais Vasco

[rauljgp]

Empezado por keys

En principio siempre te van a dejar enviar factura de fechas anteriores, pero tendrás que justificar en hacienda por que. Por ejemplo si el cliente se queda sin internet, se lo tiene que notificar a hacienda y cuando vuelva a tener conexión enviar todas las atrasadas.

bueno, pues ya he visto en el listado de errores que una factura anterior a hoy puede causar rechazo, con tanto pdf y tanta historia al final uno no sabe ya:



errores que causan rechazo (está en la web de ticketbai de Guipúzcoa, es que no me deja esto pegar enlaces):

Deben aparecer todos los datos obligatorios sin datos erróneos
(NumFactura no vacÍo, FechaExpedicionFactura no superior a hoy, Signature y
NumFacturaAnterior, SignatureValueFirmaFacturaAnterior cuando se informe el elemento
ncadenamientoFacturaAnterior, LicenciaTBAI formato correcto)

en pruebas a mí me coló la factura que me dio error, pero en producción me temo que no colará ni una.

[keys]

Hola a todos.

Estoy firmando los xml con SecureBlackBox y delphi. Funciona bien, pero tengo un caso de un cliente que cuando llamo a

CertificateStorage.Open('system://currentuser@localhost/?store=MY');

Para acceder a los certificados del sistema. El programa se cierra. ¿Alguien tiene alguna pista?

[elcharlie]

Empezado por keys

Hola a todos.

Estoy firmando los xml con SecureBlackBox y delphi. Funciona bien, pero tengo un caso de un cliente que cuando llamo a

CertificateStorage.Open('system://currentuser@localhost/?store=MY');

Para acceder a los certificados del sistema. El programa se cierra. ¿Alguien tiene alguna pista?

Yo lo hago como tú y no he tenido problema, me da a mi, que sin saberlo bien, puede ser un tema de permisos. Prueba a ejecutar el programa como administrador. Con suerte, quizás sea eso.

[HerensugeBeltz]

Empezado por keys

Hola a todos.

Estoy firmando los xml con SecureBlackBox y delphi. Funciona bien, pero tengo un caso de un cliente que cuando llamo a

CertificateStorage.Open('system://currentuser@localhost/?store=MY');

Para acceder a los certificados del sistema. El programa se cierra. ¿Alguien tiene alguna pista?

Prueba a abrirlo como sólo lectura:
Open("system://currentuser@localhost/?store=MY&readonly=1")

[Neftali [Germán.Estévez]]

Empezado por keys

Estoy firmando los xml con SecureBlackBox y delphi. Funciona bien, pero tengo un caso de un cliente que cuando llamo a
CertificateStorage.Open('system://currentuser@localhost/?store=MY');
Para acceder a los certificados del sistema. El programa se cierra. ¿Alguien tiene alguna pista?

Yo estoy usandolo de esta forma y tampoco me da problemas.

Código Delphi [-]
WinStorage.SystemStores.BeginUpdate;
  try
    WinStorage.SystemStores.Clear;
    WinStorage.SystemStores.Add('MY');
    WinStorage.AccessType := aAccessType;
  finally
    WinStorage.SystemStores.EndUpdate;
  end;

SecureBlackbox 16.0.326

SecureBlackbox 16.0.326

[keys]

Empezado por Neftali [Germán.Estévez]

Yo estoy usandolo de esta forma y tampoco me da problemas.

Código Delphi [-]
WinStorage.SystemStores.BeginUpdate;
  try
    WinStorage.SystemStores.Clear;
    WinStorage.SystemStores.Add('MY');
    WinStorage.AccessType := aAccessType;
  finally
    WinStorage.SystemStores.EndUpdate;
  end;

SecureBlackbox 16.0.326

SecureBlackbox 16.0.326

Lo primero gracias a todos. Lo de ejecutar como administrador ya lo había probado, aunque estoy con el usuario administrador.

Para neftali. si accedes asi ¿como le dices luego al componente de firma cual es el certificado? yo lo hago asi.

Código Delphi [-]
if CertificateStorage.Opened then
     CertificateStorage.Close(True);

  //Este es el punto donde el programa se cierra
  CertificateStorage.Open('system://currentuser@localhost/?store=MY');

  encontrado := False;

 //Aqui busco el certificado con el que firmar
  for i := 0 to CertificateStorage.Certificates.Count - 1 do
  begin
    cert := CertificateStorage.Certificates[i];
    if bintostr(cert.SerialNumber) = el_firmante.r_Nombre_firma then
     begin
       sbxXAdESSigner1.SigningCertificate := cert;
       encontrado := True;
       Break;
     end;
  end;


  if not Encontrado then
   begin //mostrar error
      Mensaje(nil, 'No se encuentra la firma');
      exit;
   end;

  sbxXAdESSigner1.SigningCertificate := cert;

 //Continuo con el resto de la firma

Solo me queda probar el programa que indica juramisa, aunque el autofirmacommanline funciona bien y probar como solo lectura como dice HerensugeBeltz. Esto lo haré a lo largo de la mañana cuando pueda conectarme con el cliente.

Esta claro que es un problema de su ordenador ya que el programa esta corriendo en mas de 100 usuarios y esta funcionando correctamente.

Pasar un buen día TicketBAI.

[Neftali [Germán.Estévez]]

Empezado por keys

Para neftali. si accedes asi ¿como le dices luego al componente de firma cual es el certificado? yo lo hago asi.

Nosotros guardamos el HASH del certificado.
Con ese procedimiento cargas los certificados disponibles usando la clase TElWinCertStorage.
Aquí hay un ejemplo de cómo acceder a esa clase. Está en VB, pero verás que es muy parecido al código que he puesto yo.

Desde esa clase puedes acceder a los certificados y obtener elementos de la clase TElX509Certificate.

[rci]

Buenas tardes, a ver si lo he entendido bien, para utilizar el entorno de pruebas de batuz que se puso en marcha recientemente, a parte ser necesaria una inscripción previa de la empresa desarrolladora, también debemos utilizar los certificados de pruebas y especificar unos datos del obligado tributario ficticios que nos proporcionará batuz.


Por lo tanto no podemos poner nuestro programa a un cliente final nuestro y dejarlo en entorno de pruebas batuz para que envie con su certificado y sus datos de obligado tributario, para ir probando antes de pasar al entorno real a partir del 1 de enero del 2022 (período voluntario)


pues si es así pierde toda la gracia ese entorno de pruebas...



Es así o me equivoco?


Muchas gracias

[sEngine]

Como haceis para coger la respuesta de Bizkaia desde delphi?

La respuesta me da esto

Código Delphi [-]
#$1F'�'#8#8#0#0#0#0#0'�5251550_peticion_Resp.xml'#0'�T]��0'#$14'}�W0�k��+:Ȏâ�;�k�j��'#4'��.'#$10'�����'#5'E���)�p�9����'#6'�a'#$1F'��_�'#5'e�@�[����g'#1'�7'#3'u�'#$18'5'#$D'U'#$11#$12'�'#1#$E'YL'#6'�;'#$11'��0c��'#$7F'��:ӗvG'#$1B'a_�'#$1C#$B'''  ��'#6'X�,�����3"��@�'#2'2��C�@�J��>B�ݮ�a�~�H*К�=�dC�'#$1B'ʳ(k�����'#8'�#2'��'#$17'�j5'#$14'xL'#$1B'{�'''#$1C#$1F'�<��'#5'$d'#$16'46��'#4'm�P�BJ7�黄��'#$18'-�T'#$13'%�5'#1'I'#$1F',��'#$1A'��aIY'#$1D'�'#0'�'#0'�'#8'J��M�O��jkm�)㊊'#$17'�'#$D#$E#$0602'S/��W��0y'#$1E'Y�^��4�wo�,�'#$13'�'#9#9'C'#$1A'01a���'#$C#$7F'��̧8��_����r�]'#$1A'��'#$1F#$11'��N��x''�;'#$7F'm���r���'#$12'3s�'#7'c>b�Ĕ'#$13'AbynՈ�[\�ڝ��73g'#$14'��w��;��֨:Q '#1'�ּk|�'#$05F5'�SnJ'#$15'9���r�'#$19#$C'����J�"w��s'#0'�tM��o'#$1D#$7F'<��%v'#$18'5�))(��'#$14'�r�  �&iT'#$10'�'#$1E'�V%�^����'#$13#$12'd�'#$15#$17'��⣳���=�'#$1B'�'#2'�'#$1B'�'#$1C'�On�u''s�#��9'#$11'  l�9�%��Q'#7'�d?im�z���pM�?<��'#$F'�)|'#$10'['#5#0#0

y no se como guardarlo en un archivo, ya que siempre me esta diciendo que es un archivo erroneo.
He probado con estas opciones

Código Delphi [-]
   Respuesta := idhttp_fac.Post('https://pruesarrerak.bizkaia.eus/N3B4000M/aurkezpena',RequestBody);
    AResponse := TStringStream.Create(Respuesta);
    Comprimido := TFileStream.Create(ExtractFilePath(Application.ExeName)+'\LROE_respuesta.gz', fmCreate);
    Comprimido.CopyFrom(AResponse, AResponse.Size);

Código Delphi [-]
    MyText := TStringList.Create;
    MyText.Add(Respuesta);
    MyText.SaveToFile(ExtractFilePath(Application.ExeName)+'\LROE_respuesta2.gz',TEncoding.UTF8);
    MyText.Free;

[unomasmas]

Empezado por rci

Buenas tardes, a ver si lo he entendido bien, para utilizar el entorno de pruebas de batuz que se puso en marcha recientemente, a parte ser necesaria una inscripción previa de la empresa desarrolladora, también debemos utilizar los certificados de pruebas y especificar unos datos del obligado tributario ficticios que nos proporcionará batuz.

Por lo tanto no podemos poner nuestro programa a un cliente final nuestro y dejarlo en entorno de pruebas batuz para que envie con su certificado y sus datos de obligado tributario, para ir probando antes de pasar al entorno real a partir del 1 de enero del 2022 (período voluntario)

pues si es así pierde toda la gracia ese entorno de pruebas...

Es así o me equivoco?

Muchas gracias

Yo también estoy sorprendido, aunque no entiendo para qué es necesaria la inscripción previa de la empresa desarrolladora si en el XML TicketBAI hay que indicar estos datos:
▪ Licencia TBAI: TBAIBI00000000PRUEBA
▪ NIF entidad desarrolladora: A99800005
▪ Nombre: SOFTWARE GARANTE TICKETBAI PRUEBA
▪ Versión: 1.0

O sea, te dan estos datos, te dan los certificados que puedes usar y tras la inscripción te indicarán los datos de clientes con los que hacer las pruebas. Todo predefinido ¿No? Si estos datos de clientes se hacen públicos ¿Para qué es necesaria la inscripción?

[keys]

Empezado por Neftali [Germán.Estévez]

Nosotros guardamos el HASH del certificado.
Con ese procedimiento cargas los certificados disponibles usando la clase TElWinCertStorage.
Aquí hay un ejemplo de cómo acceder a esa clase. Está en VB, pero verás que es muy parecido al código que he puesto yo.

Desde esa clase puedes acceder a los certificados y obtener elementos de la clase TElX509Certificate.

Hola a todos.

Al final hablando con SecureBlackBox me han dado la siguiente solución.

Your version of SecureBlackbox used a “DRU” approach to incorporate the SecureBlackbox product DLL into your application and load it manually in run time. That was an efficient and handy approach, but it proved to have one drawback. Certain variants of the operation system and antimalware apps take that approach suspiciously, and stop the applications from loading the DLL in that way right in the middle of the process (effectively, by making the application crash). The behaviour you are observing looks very similar to that.
That’s why we eventually stopped offering that option and suggested to always ship the SecureBlackbox DLL in the “normal” way, by deploying it alongside the application. This eliminates any side effects caused by DEP and anti-malware software.
To fix the issue on your side, please do the following two things:
1) Define USESECUREBLACKBOXDLL globally in your project settings.
2) When deploying your application, please put the SecureBlackbox20.dll file (you will find it in the \lib directory in the SBB folder) alongside your application’s executable

Lo he probado y funciona correctamente.

Ahora el problema lo tengo a la hora de firmar el fichero con sbxXAdESSigner1.Sign(); que despues de cargarle todos los parametros me sale el siguiente error.

1048581 The certificate does not have a associated private key

El certificado le he puesto uno nuestro y le pasa lo mismo. Por algún motivo no puede acceder a la clave privada de los certificados.

Un Saludo.

[Neftali [Germán.Estévez]]

Empezado por keys

El certificado le he puesto uno nuestro y le pasa lo mismo. Por algún motivo no puede acceder a la clave privada de los certificados.

No se si es lo mismo (no creo, pero por si acaso), pero si son certificados que están instalados en la máquina (no como usuario local), hay problemas al acceder a ellos.
Necesitas elevación de permisos.

[juramisa]

Empezado por keys

Hola a todos.

Estoy firmando los xml con SecureBlackBox y delphi. Funciona bien, pero tengo un caso de un cliente que cuando llamo a

CertificateStorage.Open('system://currentuser@localhost/?store=MY');

Para acceder a los certificados del sistema. El programa se cierra. ¿Alguien tiene alguna pista?

Cuando me ocurre esas cosas tan extrañas con los certificados, yo suelo probar a ejecutar el "Configurador_FNMT_RCM.exe" suele arreglar muchos problemas con los certificados. Es una aplicación de la Fabrica de Moneda y Timbre

[ermendalenda]

Hola después de varios dias, estoy en varias instalaciones y no he podido seguir el hilo.
El Viernes después de hablar con otro desarrollador me preguntó si sabia como saber si un certificado está revocado.
Se me ocurre enviar uno de esos ficheros vacios a una foral a ver como responde, si teneis alguno revocado para probarlo.
Si hay suerte con mandarlo una vez de vez en cuando para bloquear si veo que está revocado.
Gracias

[ermendalenda]

Con este Master que estamos haciendo nos va a salir mejor currar de asesor de ticketbai

[Ramon88]

Sigo con el error 400 y no se por donde tirar.
Estoy revisando el Json, y aunque veo algunas diferencias con el que te ponen de ejemplo, probando el suyo de ejemplo tal cual, todo seguido sin "" me da el mismo error. Nose si será eso o que, os pongo mi Json a ver si veis algo raro.

Código SQL [-]
"{""con"":""LROE"",""apa"":""1.1"",""inte"":[{""nif"":""A99110237"",""nrs"":""GLe7V235qZ"",""ap1"":""Pu125yvAaQ"",""ap2"":""BjvfghGZq5""}],""drs"":[{""mode"":""140"",""ejer"":""2021""}]}"

[Sistel]

Empezado por Ramon88

Sigo con el error 400 y no se por donde tirar.
Estoy revisando el Json, y aunque veo algunas diferencias con el que te ponen de ejemplo, probando el suyo de ejemplo tal cual, todo seguido sin "" me da el mismo error. Nose si será eso o que, os pongo mi Json a ver si veis algo raro.

Código SQL [-]
"{""con"":""LROE"",""apa"":""1.1"",""inte"":[{""nif"":""A99110237"",""nrs"":""GLe7V235qZ"",""ap1"":""Pu125yvAaQ"",""ap2"":""BjvfghGZq5""}],""drs"":[{""mode"":""140"",""ejer"":""2021""}]}"

Hola Ramon88,

Yo para comprobar si una estructura JSON está correcta, utilizo Insomnia (al igual que para hacer pruebas de envío).
Al pasar tu JSON por Insomnia (quitando la " inicial y la " final) veo que da error.
Parece que no le gusta lo de repetir " dos veces en cada sitio donde debería haber una sola "

Mira a ver si es eso.

Saludos