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

[DemonAscun]

Para los que estáis ociosos... sabéis que Araba ya publicó su guía del entorno de pruebas? Todos a lanzar Ticketbais contra la agencia foral de Araba...jajaja... espero que vaya más rápido que Guipuzkoa.

[Ramon88]

Alguien conoce Binovo ??
Tienen una API que funciona con JSON.



Estoy de reunión con ellos y aseguran que Álava va a funcionar exactamente igual que guipuzkoa.

[ermendalenda]

Empezado por Ramon88

Alguien conoce Binovo ??
Tienen una API que funciona con JSON.



Estoy de reunión con ellos y aseguran que Álava va a funcionar exactamente igual que guipuzkoa.

Sí, parecen serios, estarás tratando con Juanjo.
Su Api arranca sobre un contenedor Docker (para ello necesitaras unos requisitos mínimos de sistema, memoria suficiente, S.O windows 10, linux..) le mandas la info en JSON (creo que admitenotros formatos) y te devuelven la imagen Qr, el identificador Qr y la api se encarga del control del envio.
Buena Solución si no te quieres pringar demasiado a un coste razonable y te olvidas de las actualizaciones que te haran/daran ellos mientras tengas el mantenimiento.

A mi me gusta tener el toro por los cuernos pero no descarto, si se me complica, poner la api de ellos.

[Ramon88]

Empezado por ermendalenda

Sí, parecen serios, estarás tratando con Juanjo.
Su Api arranca sobre un contenedor Docker (para ello necesitaras unos requisitos mínimos de sistema, memoria suficiente, S.O windows 10, linux..) le mandas la info en JSON (creo que admitenotros formatos) y te devuelven la imagen Qr, el identificador Qr y la api se encarga del control del envio.
Buena Solución si no te quieres pringar demasiado a un coste razonable y te olvidas de las actualizaciones que te haran/daran ellos mientras tengas el mantenimiento.

A mi me gusta tener el toro por los cuernos pero no descarto, si se me complica, poner la api de ellos.

No me ha parecido muy economico, por no decir nada...

Vamos por ese dinero tengo un trabajador haciéndolo... Es mi opinión.


El problema de hacerlo es el tiempo que esto implica, que antes me subia bien el XML ahora no, por que? no lo se... es una jodienda de la buenas.

[ermendalenda]

Empezado por Ramon88

No me ha parecido muy economico, por no decir nada...

Vamos por ese dinero tengo un trabajador haciéndolo... Es mi opinión.


El problema de hacerlo es el tiempo que esto implica, que antes me subia bien el XML ahora no, por que? no lo se... es una jodienda de la buenas.

bueno, ya te digo que esto no es un trabajo para un mes, pero bueno, creo que en el foro hay alguien más que te puede ofrecer el servicio y además creo que no necesita tantos requisitos de sistema

[Ramon88]

Bueno, intentaremos sacarlo...


Alguien tiene la clase para calcular CRC8 en .Net o c#??

[ermendalenda]

Empezado por Ramon88

Bueno, intentaremos sacarlo...


Alguien tiene la clase para calcular CRC8 en .Net o c#??

En Vb cambiando poca cosa te vale para net:

Private Declare Function WideCharToMultiByte Lib "kernel32" ( _
    ByVal CodePage As Long, _
    ByVal dwFlags As Long, _
    ByVal lpWideCharStr As Long, _
    ByVal cchWideChar As Long, _
    ByVal lpMultiByteStr As Long, _
    ByVal cbMultiByte As Long, _
    ByVal lpDefaultChar As Long, _
    ByVal lpUsedDefaultChar As Long) As Long

Dim CRC8_Table As Variant
' CodePage constant for UTF-8
Private Const CP_UTF8 = 65001

''' Return byte array with VBA "Unicode" string encoded in UTF-8
Function Utf8BytesFromString(strInput As String) As Variant
    Dim nBytes As Long
    ' Catch empty or null input string
    Utf8BytesFromString = vbNullString
    If Len(strInput) < 1 Then Exit Function
    ' Get length in bytes *including* terminating null
    nBytes = WideCharToMultiByte(CP_UTF8, 0&, ByVal StrPtr(strInput), -1, 0&, 0&, 0&, 0&)
    ' We don't want the terminating null in our byte array, so ask for `nBytes-1` bytes
    Dim abBuffer() As Byte
    
    ReDim abBuffer(nBytes - 2)  ' NB ReDim with one less byte than you need
    nBytes = WideCharToMultiByte(CP_UTF8, 0&, ByVal StrPtr(strInput), -1, ByVal VarPtr(abBuffer(0)), nBytes - 1, 0&, 0&)
    Utf8BytesFromString = abBuffer
End Function


Public Function crc8(buffer As String, Polynom, Initial As Variant) As Variant
CRC8_Table = Array(&H0, &H7, &HE, &H9, &H1C, &H1B, &H12, &H15, _
    &H38, &H3F, &H36, &H31, &H24, &H23, &H2A, &H2D, &H70, &H77, &H7E, &H79, &H6C, &H6B, &H62, &H65, _
    &H48, &H4F, &H46, &H41, &H54, &H53, &H5A, &H5D, &HE0, &HE7, &HEE, &HE9, &HFC, &HFB, &HF2, &HF5, _
    &HD8, &HDF, &HD6, &HD1, &HC4, &HC3, &HCA, &HCD, &H90, &H97, &H9E, &H99, &H8C, &H8B, &H82, &H85, _
    &HA8, &HAF, &HA6, &HA1, &HB4, &HB3, &HBA, &HBD, &HC7, &HC0, &HC9, &HCE, &HDB, &HDC, &HD5, &HD2, _
    &HFF, &HF8, &HF1, &HF6, &HE3, &HE4, &HED, &HEA, &HB7, &HB0, &HB9, &HBE, &HAB, &HAC, &HA5, &HA2, _
    &H8F, &H88, &H81, &H86, &H93, &H94, &H9D, &H9A, &H27, &H20, &H29, &H2E, &H3B, &H3C, &H35, &H32, _
    &H1F, &H18, &H11, &H16, &H3, &H4, &HD, &HA, &H57, &H50, &H59, &H5E, &H4B, &H4C, &H45, &H42, _
    &H6F, &H68, &H61, &H66, &H73, &H74, &H7D, &H7A, &H89, &H8E, &H87, &H80, &H95, &H92, &H9B, &H9C, _
    &HB1, &HB6, &HBF, &HB8, &HAD, &HAA, &HA3, &HA4, &HF9, &HFE, &HF7, &HF0, &HE5, &HE2, &HEB, &HEC, _
    &HC1, &HC6, &HCF, &HC8, &HDD, &HDA, &HD3, &HD4, &H69, &H6E, &H67, &H60, &H75, &H72, &H7B, &H7C, _
    &H51, &H56, &H5F, &H58, &H4D, &H4A, &H43, &H44, &H19, &H1E, &H17, &H10, &H5, &H2, &HB, &HC, _
    &H21, &H26, &H2F, &H28, &H3D, &H3A, &H33, &H34, &H4E, &H49, &H40, &H47, &H52, &H55, &H5C, &H5B, _
    &H76, &H71, &H78, &H7F, &H6A, &H6D, &H64, &H63, &H3E, &H39, &H30, &H37, &H22, &H25, &H2C, &H2B, _
    &H6, &H1, &H8, &HF, &H1A, &H1D, &H14, &H13, &HAE, &HA9, &HA0, &HA7, &HB2, &HB5, &HBC, &HBB, _
    &H96, &H91, &H98, &H9F, &H8A, &H8D, &H84, &H83, &HDE, &HD9, &HD0, &HD7, &HC2, &HC5, &HCC, &HCB, _
    &HE6, &HE1, &HE8, &HEF, &HFA, &HFD, &HF4, &HF3)
 
  Dim data As Variant
    data = Utf8BytesFromString(buffer)
  Dim alen, i As Integer
  Dim crc As Byte
  'data = Buffer ':= TEncoding.UTF8.GetBytes(Cadena);
  alen = UBound(data)
  crc = 0
    
  For i = 0 To alen
    crc = CRC8_Table((crc Xor data(i)) And &HFF)
   
Next
    crc8 = crc And &HFF



End Function

Para llamar a la función y que te devuelva en cr8:
cr8 = crc8(Cadena_enviada, 7, 0)


iNITIAL Y POLYNOM CREO QUE PUEDES OBVIARLAS

[ion]

Ho!a, Tenemos problemas con los certificados y Batuz.
Para el entorno de pruebas Gipuzkoa usamos un certificado de Dispositivo de Izenpe y no tenemos problemas. Pero con Bizkaia tenemos el error N3_0000016 (No se encuentra el dispositivo dentro del censo de dispositivos de la DFB.). En principio hemos dado de alta nuestro certificado en Bizkaia (usando la Comunicación de certificados de dispositivos (Batuz - TicketBAI)).
Alguien ha tenido e mismo problema? Como lo podemos solucionar?
Gracias!

[iMia]

Empezado por ion

Ho!a, Tenemos problemas con los certificados y Batuz.
Para el entorno de pruebas Gipuzkoa usamos un certificado de Dispositivo de Izenpe y no tenemos problemas. Pero con Bizkaia tenemos el error N3_0000016 (No se encuentra el dispositivo dentro del censo de dispositivos de la DFB.). En principio hemos dado de alta nuestro certificado en Bizkaia (usando la Comunicación de certificados de dispositivos (Batuz - TicketBAI)).
Alguien ha tenido e mismo problema? Como lo podemos solucionar?
Gracias!

Seguramente es lo que me pasa a mi en Gipuzkoa. me sale el 012 , que en Gipuzkoa es: Aviso: Error en verificación alta-inscripción software TicketBAI: el software no está registrado. y en Araba es 012 AVISO: Dispositivo de facturación remitente no registrado.
Se lo he consultado y me han dicho que estoy utilizando un código de registro TBAI de la Aplicación definitivo en el entorno de pruebas. y que aunque es el mismo código el mensaje de error es diferente....
Yo diria que por lo que parece tu caso es muy parecido, puede que estés utilizando un registro de pruebas en Gipuzkoa que no vale para el entorno de pruebas de Bizcaya...
prueba eso a ver como va...

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

Empezado por DemonAscun

Para los que estáis ociosos... sabéis que Araba ya publicó su guía del entorno de pruebas? Todos a lanzar Ticketbais contra la agencia foral de Araba...jajaja... espero que vaya más rápido que Guipuzkoa.

Gracias [DemonAscun].
Los primeros PDF's para descarga están aquí: https://web.araba.eus/es/hacienda/ticketbai (también el el FTP del foro con el resto de documentación)

Actualizo el primer mensaje del foro, con los datos.
Y los mails de consulta:
- Consultas tributarias: [email protected]
- Consultas técnicas: [email protected]

[keys]

Hola a todos.

Una pregunta para los que estais haciendo esto con Delphi y firmando con SecureBlackBox.

Me he dado cuenta que cada hacienda esta pidiendo un hash distinto, y siempre estoy poniendo el mismo (Bizkaia), hasta ahora gipuzkoa y bizkaia lo estan admitiendo sin problemas, pero me gustaria poner el de cada hacienda.

Recuerdo que desde el soporte de secureblackbox me digeron que pusiera esto a la hora de firmar.

Config('SigPolicyHash=' + '42ECE7F7CC773CC6D21F06D4CDA8F97F928EA621F4BBC6EF9B06DB6CD90EF44B');

Que es el hash de bizkaia en hexadecimal.

¿Que estáis poniendo vosotros? o hay alguna forma de pasar el hash que proporciona hacienda a el correspondiente de los componentes.

Y ya que estamos donde estáis poniendo el identificador de cada hacienda (https://ticketbai.araba.eus/tbai/sinadura/)

[keys]

Empezado por keys

Hola a todos.

Una pregunta para los que estais haciendo esto con Delphi y firmando con SecureBlackBox.

Me he dado cuenta que cada hacienda esta pidiendo un hash distinto, y siempre estoy poniendo el mismo (Bizkaia), hasta ahora gipuzkoa y bizkaia lo estan admitiendo sin problemas, pero me gustaria poner el de cada hacienda.

Recuerdo que desde el soporte de secureblackbox me digeron que pusiera esto a la hora de firmar.

Config('SigPolicyHash=' + '42ECE7F7CC773CC6D21F06D4CDA8F97F928EA621F4BBC6EF9B06DB6CD90EF44B');

Que es el hash de bizkaia en hexadecimal.

¿Que estáis poniendo vosotros? o hay alguna forma de pasar el hash que proporciona hacienda a el correspondiente de los componentes.

Y ya que estamos donde estáis poniendo el identificador de cada hacienda (https://ticketbai.araba.eus/tbai/sinadura/)

Ma autorespondo. Hay que pasar el valor que nos propociona hacienda que esta en Base64 a hexadecimal. Los valores de cada hacienda son

Código Delphi [-]
  { case Hacienda of
    PROVBIZKAIA : .Config('SigPolicyHash=' + '42ECE7F7CC773CC6D21F06D4CDA8F97F928EA621F4BBC6EF9B06DB6CD90EF44B');
    PROVGIPUZKOA : Config('SigPolicyHash=' + 'E8DACA026EB4A3BBBAD85510C3365EC36E2B6B6BDEF4F4506300B6D4033A227D');
    PROVALAVA : Config('SigPolicyHash=' + '88E82F917EFFC8720345188FCBF2D84345149FB415F3FD750F50456ECF3232E4');
  end;}

El identificador de cada hacienda hay que ponerlo en Config('SigPolicyID=' + ''https://www.gipuzkoa.eus/ticketbai/sinadura');

[juramisa]

Buenos días

Empezado por keys

Hola a todos.

Una pregunta para los que estais haciendo esto con Delphi y firmando con SecureBlackBox.

Me he dado cuenta que cada hacienda esta pidiendo un hash distinto, y siempre estoy poniendo el mismo (Bizkaia), hasta ahora gipuzkoa y bizkaia lo estan admitiendo sin problemas, pero me gustaria poner el de cada hacienda.

Recuerdo que desde el soporte de secureblackbox me digeron que pusiera esto a la hora de firmar.

Config('SigPolicyHash=' + '42ECE7F7CC773CC6D21F06D4CDA8F97F928EA621F4BBC6EF9B06DB6CD90EF44B');

Que es el hash de bizkaia en hexadecimal.

¿Que estáis poniendo vosotros? o hay alguna forma de pasar el hash que proporciona hacienda a el correspondiente de los componentes.

Y ya que estamos donde estáis poniendo el identificador de cada hacienda (https://ticketbai.araba.eus/tbai/sinadura/)

Yo estoy mandando lo que corresponde a cada hacienda. Lo tengo en un INI.

[SignaturePolicyIdentifier]
SigPolicyID=https://www.batuz.eus/fitxategiak/batuz/ticketbai/sinadura_elektronikoaren_zehaztapenak_especificaciones_de_la_firma_electronica_v1_0.pdf
SigPolicyHash=42ECE7F7CC773CC6D21F06D4CDA8F97F928EA621F4BBC6EF9B06DB6CD90EF44B
SigPolicyHashAlgorithm=SHA256
SigPolicyURI=https://www.batuz.eus/fitxategiak/batuz/ticketbai/sinadura_elektronikoaren_zehaztapenak_especificaciones_de_la_firma_electronica_v1_0.pdf

[GISignaturePolicyIdentifier]
SigPolicyID=https://www.gipuzkoa.eus/ticketbai/sinadura
SigPolicyHash=E8DACA026EB4A3BBBAD85510C3365EC36E2B6B6BDEF4F4506300B6D4033A227D
SigPolicyHashAlgorithm=SHA256
SigPolicyURI=https://www.gipuzkoa.eus/ticketbai/sinadura


[ALSignaturePolicyIdentifier]
SigPolicyID=https://ticketbai.araba.eus/tbai/sinadura/
SigPolicyHash=88E82F917EFFC8720345188FCBF2D84345149FB415F3FD750F50456ECF3232E4
SigPolicyHashAlgorithm=SHA256
SigPolicyURI=https://ticketbai.araba.eus/tbai/sinadura/

De todas formas ha Gipuzkoa no consigo realizar el envío. Yo creo que ni conecto. En cuanto pueda os pediré ayuda a ver que hago mal.

[iMia]

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

Gracias [DemonAscun].
Los primeros PDF's para descarga están aquí: https://web.araba.eus/es/hacienda/ticketbai (también el el FTP del foro con el resto de documentación)

Actualizo el primer mensaje del foro, con los datos.
Y los mails de consulta:
- Consultas tributarias: [email protected]
- Consultas técnicas: [email protected]

Gracias Germán.

Una pregunta la vuelo para todos... he mirado todas las direcciones de envío, estan publicadas solo las de pruebas... pero no las de producción...
Ya tengo la aplicación modificada y funcionando y apunto de distribuir a los clientes... Tengo una tabla de Administraciones TBAI ¿¿tengo que dejar que el usuario final pueda editar la dirección de envío para cuando salgan las definitivas??
por que no voy a hacer otra distribución cuando salgan las definitivas....

[ermendalenda]

Empezado por iMia

Gracias Germán.

Una pregunta la vuelo para todos... he mirado todas las direcciones de envío, estan publicadas solo las de pruebas... pero no las de producción...
Ya tengo la aplicación modificada y funcionando y apunto de distribuir a los clientes... Tengo una tabla de Administraciones TBAI ¿¿tengo que dejar que el usuario final pueda editar la dirección de envío para cuando salgan las definitivas??
por que no voy a hacer otra distribución cuando salgan las definitivas....

Yo estoy parametrizando y guardando los parametros en ficheros encriptados y reemplazables, y un botón de actualización que se descargue ese fichero.

Salludos

[aflores1]

Buenos días alguien sabe por que me puede funcionar el servicio en local pero cuando instalo la versión en el servidor me devuelve una respuesta vacia todo el rato?

[ermendalenda]

Empezado por aflores1

Buenos días alguien sabe por que me puede funcionar el servicio en local pero cuando instalo la versión en el servidor me devuelve una respuesta vacia todo el rato?

Lo mismo estoy espeso, por que es Lunes, pero no entiendo muy bien que servicio y que respuesta.
La firma, el envio...? como haces ese servicio, faltan datos.

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

Empezado por ermendalenda

Lo mismo estoy espeso, por que es Lunes, pero no entiendo muy bien que servicio y que respuesta.
La firma, el envio...? como haces ese servicio, faltan datos.

+1
Me he repetido por no leer hasta el final.

[JoseLeeTo]

Hola a tod@s;

Estoy intentando realizar las primeras pruebas con Alava, y como había poca o ninguna diferencia con Guipuzcoa, ha sido más o menos rápido.

Pero me devuelve un error muy genérico, algo así como que "se han producido uno o varios errores". Me suena a los típicos errores de "caída" de servidor.

¿Alguien ha podido realizar alguna prueba con Alava? ¿Sabéis si los servidores están caidos o algo así?

Muchas gracias.
Un saludo.

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

Empezado por aflores1

Buenos días alguien sabe por que me puede funcionar el servicio en local pero cuando instalo la versión en el servidor me devuelve una respuesta vacia todo el rato?

Pocos datos.
¿Qué servicio? ¿Qué hare o qué utiliza?
En estos casos lo mejor es utilizar un LOG.