![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
![]() |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
|
|
#1
|
|||
|
|||
|
Cita:
Yo lo necesitaba para otras cosas y al final tuve que hacérmelo. No es difícil, aunque requiere bastantes horas de trabajo para pulirlo, pero una vez hecho es una delicia poder procesar cualquier XML sin despeinarse. Si quieres salir del paso, puedes buscar "<ds:SignatureValue" en el texto. Una vez encontrado tienes que buscar el siguiente '>', apuntar la posición, buscar el siguiente '<', apuntar la posición, y extraer el fragmento comprendido entre las dos posiciones. |
|
#2
|
|||
|
|||
|
A Guipuzcoa. Si envío un NIF español, sí que llega
<Destinatarios> <IDDestinatario> <NIF>NL855820627B01</NIF> <ApellidosNombreRazonSocial>ITX MERKEN B.V.</ApellidosNombreRazonSocial> </IDDestinatario> </Destinatarios> Y me da el siguiente error: Error: El fichero de alta TicketBAI no cumple el esquema XSD. Detalle del error: cvc-pattern-valid: Value 'NL855820627B01' is not facet-valid with respect to pattern '(([a-z|A-Z]{1}\d{7}[a-z|A-Z]{1})|(\d{8}[a-z|A-Z]{1})|([a-z|A-Z]{1}\d{8}))' for type 'NIFType'.</Descripcion> |
|
#3
|
|||
|
|||
|
Bueno, parece que finalmente sí que consigo enviar el XML, recoger la firma para encadenar y generar el QR (al menos para Guipuzcoa)
Lo que no consigo es que dicho QR sea correcto. No sé si porque estoy obtieniendo el CRC mal, o cual es el motivo. (Y tampoco he visto ninguna url que funcione en todo el hilo) Me genera la siguiente cadena: https ://tbai.prep.gipuzkoa.eus/qr/?id=TBAI-B09500307-130521-YiT5C1USVoYiN-002&s=MP&nf=210914&i=5348.20&cr=245 No accede a la factura pero si accedo desde : https ://tbai.prep.gipuzkoa.eus/qr/verificar , ahí si que la encuentra También he probado con: https ://tbai.egoitza.gipuzkoa.eus/qr/verificar ,pero ahí tampoco la encuentra ¿qué diferencia hay entre un subdominio y el otro? La función en VB que utilizo para el cálculo del CRC es: Public Function calculateCRC8(ByVal AppID As String) As String Dim CRC8 As Byte Dim i As Integer Dim j As Integer Dim AppIDarray() As Byte '<--- explicitly dimensioned as a Byte array to avoid confusion Dim aidLength As Integer CRC8 = &HC7 'The AppID is actually bytes stored in hexadecimal in a string. You have to convert them back to bytes before you can run a crc8 on them. AppIDarray = HexToByte(AppID) aidLength = UBound(AppIDarray) For j = 0 To aidLength CRC8 = CRC8 Xor AppIDarray(j) For i = 1 To 8 If CRC8 And &H80 Then 'masking off the left-most bit before shifting prevents the Overflow error. CRC8 = ((&H7F And CRC8) * 2) Xor &H1D Else CRC8 = CRC8 * 2 End If Next i Next j calculateCRC8 = CRC8 End Function Private Function HexToByte(strHex As String) As Byte() Dim i As Integer Dim j As Integer Dim tempByte As Byte Dim outBytes() As Byte Dim Char As String ReDim outBytes(Len(strHex) \ 2 - 1) For i = 0 To Len(strHex) \ 2 - 1 For j = 0 To 1 Char = Mid(strHex, i * 2 + j + 1, 1) Select Case Char Case "0", "1", "2", "3", "4", "5", "6", "7", "8", "9": tempByte = tempByte Or (Asc(Char) - 48) Case "A", "B", "C", "D", "E", "F": tempByte = tempByte Or (Asc(Char) - 55) End Select If j = 0 Then tempByte = tempByte * 2 ^ 4 Else outBytes(i) = tempByte tempByte = 0 End If Next Next HexToByte = outBytes End Function |
|
#4
|
|||
|
|||
|
Te paso la que tengo yo hecha en vb.net a ver si te sirve o te da pistas.
Public Shared Function calculatecrc8(ByVal input As String) As String Dim crc8_table() As Byte = New Byte() {CByte(&H0), CByte(&H7), CByte(&HE), CByte(&H9), CByte(&H1C), CByte(&H1B), CByte(&H12), CByte(&H15), CByte(&H38), CByte(&H3F), CByte(&H36), CByte(&H31), CByte(&H24), CByte(&H23), CByte(&H2A), CByte(&H2D), CByte(&H70), CByte(&H77), CByte(&H7E), CByte(&H79), CByte(&H6C), CByte(&H6B), CByte(&H62), CByte(&H65), CByte(&H48), CByte(&H4F), CByte(&H46), CByte(&H41), CByte(&H54), CByte(&H53), CByte(&H5A), CByte(&H5D), CByte(&HE0), CByte(&HE7), CByte(&HEE), CByte(&HE9), CByte(&HFC), CByte(&HFB), CByte(&HF2), CByte(&HF5), CByte(&HD8), CByte(&HDF), CByte(&HD6), CByte(&HD1), CByte(&HC4), CByte(&HC3), CByte(&HCA), CByte(&HCD), CByte(&H90), CByte(&H97), CByte(&H9E), CByte(&H99), CByte(&H8C), CByte(&H8B), CByte(&H82), CByte(&H85), CByte(&HA8), CByte(&HAF), CByte(&HA6), CByte(&HA1), CByte(&HB4), CByte(&HB3), CByte(&HBA), CByte(&HBD), CByte(&HC7), CByte(&HC0), CByte(&HC9), CByte(&HCE), CByte(&HDB), CByte(&HDC), CByte(&HD5), CByte(&HD2), CByte(&HFF), CByte(&HF8), CByte(&HF1), CByte(&HF6), CByte(&HE3), CByte(&HE4), CByte(&HED), CByte(&HEA), CByte(&HB7), CByte(&HB0), CByte(&HB9), CByte(&HBE), CByte(&HAB), CByte(&HAC), CByte(&HA5), CByte(&HA2), CByte(&H8F), CByte(&H88), CByte(&H81), CByte(&H86), CByte(&H93), CByte(&H94), CByte(&H9D), CByte(&H9A), CByte(&H27), CByte(&H20), CByte(&H29), CByte(&H2E), CByte(&H3B), CByte(&H3C), CByte(&H35), CByte(&H32), CByte(&H1F), CByte(&H18), CByte(&H11), CByte(&H16), CByte(&H3), CByte(&H4), CByte(&HD), CByte(&HA), CByte(&H57), CByte(&H50), CByte(&H59), CByte(&H5E), CByte(&H4B), CByte(&H4C), CByte(&H45), CByte(&H42), CByte(&H6F), CByte(&H68), CByte(&H61), CByte(&H66), CByte(&H73), CByte(&H74), CByte(&H7D), CByte(&H7A), CByte(&H89), CByte(&H8E), CByte(&H87), CByte(&H80), CByte(&H95), CByte(&H92), CByte(&H9B), CByte(&H9C), CByte(&HB1), CByte(&HB6), CByte(&HBF), CByte(&HB8), CByte(&HAD), CByte(&HAA), CByte(&HA3), CByte(&HA4), CByte(&HF9), CByte(&HFE), CByte(&HF7), CByte(&HF0), CByte(&HE5), CByte(&HE2), CByte(&HEB), CByte(&HEC), CByte(&HC1), CByte(&HC6), CByte(&HCF), CByte(&HC8), CByte(&HDD), CByte(&HDA), CByte(&HD3), CByte(&HD4), CByte(&H69), CByte(&H6E), CByte(&H67), CByte(&H60), CByte(&H75), CByte(&H72), CByte(&H7B), CByte(&H7C), CByte(&H51), CByte(&H56), CByte(&H5F), CByte(&H58), CByte(&H4D), CByte(&H4A), CByte(&H43), CByte(&H44), CByte(&H19), CByte(&H1E), CByte(&H17), CByte(&H10), CByte(&H5), CByte(&H2), CByte(&HB), CByte(&HC), CByte(&H21), CByte(&H26), CByte(&H2F), CByte(&H28), CByte(&H3D), CByte(&H3A), CByte(&H33), CByte(&H34), CByte(&H4E), CByte(&H49), CByte(&H40), CByte(&H47), CByte(&H52), CByte(&H55), CByte(&H5C), CByte(&H5B), CByte(&H76), CByte(&H71), CByte(&H78), CByte(&H7F), CByte(&H6A), CByte(&H6D), CByte(&H64), CByte(&H63), CByte(&H3E), CByte(&H39), CByte(&H30), CByte(&H37), CByte(&H22), CByte(&H25), CByte(&H2C), CByte(&H2B), CByte(&H6), CByte(&H1), CByte(&H8), CByte(&HF), CByte(&H1A), CByte(&H1D), CByte(&H14), CByte(&H13), CByte(&HAE), CByte(&HA9), CByte(&HA0), CByte(&HA7), CByte(&HB2), CByte(&HB5), CByte(&HBC), CByte(&HBB), CByte(&H96), CByte(&H91), CByte(&H98), CByte(&H9F), CByte(&H8A), CByte(&H8D), CByte(&H84), CByte(&H83), CByte(&HDE), CByte(&HD9), CByte(&HD0), CByte(&HD7), CByte(&HC2), CByte(&HC5), CByte(&HCC), CByte(&HCB), CByte(&HE6), CByte(&HE1), CByte(&HE8), CByte(&HEF), CByte(&HFA), CByte(&HFD), CByte(&HF4), CByte(&HF3)} Dim data() As Byte = System.Text.Encoding.UTF8.GetBytes(input) Dim len As Integer = data.Length Dim crc As Byte = 0 For i As Integer = 0 To len - 1 crc = crc8_table((crc Xor data(i)) And 255) Next i Return String.Format("{0 3}", crc And &HFFL)End Function |
|
#5
|
||||
|
||||
|
Cita:
Creo que en el caso de clientes extranjeros hay que enviar otra estructura: Código PHP:
![]() Y el IDOtro: ![]()
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi ![]() P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. Última edición por Neftali [Germán.Estévez] fecha: 15-07-2021 a las 08:31:17. |
|
#6
|
||||
|
||||
|
Función CRC en C#
¡Buenos días gente!, ya que el señor Jaiser está recopilando funciones para el cálculo de CRC en distintos lenguajes aporto la solución en C#, ¡Fijo que a alguien le será de utilidad!
Código:
private static byte[] crc8_table = new byte[] {
(byte) 0x00, (byte) 0x07, (byte) 0x0E, (byte) 0x09, (byte) 0x1C, (byte) 0x1B, (byte) 0x12, (byte) 0x15,
(byte) 0x38, (byte) 0x3F, (byte) 0x36, (byte) 0x31, (byte) 0x24, (byte) 0x23, (byte) 0x2A, (byte) 0x2D,
(byte) 0x70, (byte) 0x77, (byte) 0x7E, (byte) 0x79, (byte) 0x6C, (byte) 0x6B, (byte) 0x62, (byte) 0x65,
(byte) 0x48, (byte) 0x4F, (byte) 0x46, (byte) 0x41, (byte) 0x54, (byte) 0x53, (byte) 0x5A, (byte) 0x5D,
(byte) 0xE0, (byte) 0xE7, (byte) 0xEE, (byte) 0xE9, (byte) 0xFC, (byte) 0xFB, (byte) 0xF2, (byte) 0xF5,
(byte) 0xD8, (byte) 0xDF, (byte) 0xD6, (byte) 0xD1, (byte) 0xC4, (byte) 0xC3, (byte) 0xCA, (byte) 0xCD,
(byte) 0x90, (byte) 0x97, (byte) 0x9E, (byte) 0x99, (byte) 0x8C, (byte) 0x8B, (byte) 0x82, (byte) 0x85,
(byte) 0xA8, (byte) 0xAF, (byte) 0xA6, (byte) 0xA1, (byte) 0xB4, (byte) 0xB3, (byte) 0xBA, (byte) 0xBD,
(byte) 0xC7, (byte) 0xC0, (byte) 0xC9, (byte) 0xCE, (byte) 0xDB, (byte) 0xDC, (byte) 0xD5, (byte) 0xD2,
(byte) 0xFF, (byte) 0xF8, (byte) 0xF1, (byte) 0xF6, (byte) 0xE3, (byte) 0xE4, (byte) 0xED, (byte) 0xEA,
(byte) 0xB7, (byte) 0xB0, (byte) 0xB9, (byte) 0xBE, (byte) 0xAB, (byte) 0xAC, (byte) 0xA5, (byte) 0xA2,
(byte) 0x8F, (byte) 0x88, (byte) 0x81, (byte) 0x86, (byte) 0x93, (byte) 0x94, (byte) 0x9D, (byte) 0x9A,
(byte) 0x27, (byte) 0x20, (byte) 0x29, (byte) 0x2E, (byte) 0x3B, (byte) 0x3C, (byte) 0x35, (byte) 0x32,
(byte) 0x1F, (byte) 0x18, (byte) 0x11, (byte) 0x16, (byte) 0x03, (byte) 0x04, (byte) 0x0D, (byte) 0x0A,
(byte) 0x57, (byte) 0x50, (byte) 0x59, (byte) 0x5E, (byte) 0x4B, (byte) 0x4C, (byte) 0x45, (byte) 0x42,
(byte) 0x6F, (byte) 0x68, (byte) 0x61, (byte) 0x66, (byte) 0x73, (byte) 0x74, (byte) 0x7D, (byte) 0x7A,
(byte) 0x89, (byte) 0x8E, (byte) 0x87, (byte) 0x80, (byte) 0x95, (byte) 0x92, (byte) 0x9B, (byte) 0x9C,
(byte) 0xB1, (byte) 0xB6, (byte) 0xBF, (byte) 0xB8, (byte) 0xAD, (byte) 0xAA, (byte) 0xA3, (byte) 0xA4,
(byte) 0xF9, (byte) 0xFE, (byte) 0xF7, (byte) 0xF0, (byte) 0xE5, (byte) 0xE2, (byte) 0xEB, (byte) 0xEC,
(byte) 0xC1, (byte) 0xC6, (byte) 0xCF, (byte) 0xC8, (byte) 0xDD, (byte) 0xDA, (byte) 0xD3, (byte) 0xD4,
(byte) 0x69, (byte) 0x6E, (byte) 0x67, (byte) 0x60, (byte) 0x75, (byte) 0x72, (byte) 0x7B, (byte) 0x7C,
(byte) 0x51, (byte) 0x56, (byte) 0x5F, (byte) 0x58, (byte) 0x4D, (byte) 0x4A, (byte) 0x43, (byte) 0x44,
(byte) 0x19, (byte) 0x1E, (byte) 0x17, (byte) 0x10, (byte) 0x05, (byte) 0x02, (byte) 0x0B, (byte) 0x0C,
(byte) 0x21, (byte) 0x26, (byte) 0x2F, (byte) 0x28, (byte) 0x3D, (byte) 0x3A, (byte) 0x33, (byte) 0x34,
(byte) 0x4E, (byte) 0x49, (byte) 0x40, (byte) 0x47, (byte) 0x52, (byte) 0x55, (byte) 0x5C, (byte) 0x5B,
(byte) 0x76, (byte) 0x71, (byte) 0x78, (byte) 0x7F, (byte) 0x6A, (byte) 0x6D, (byte) 0x64, (byte) 0x63,
(byte) 0x3E, (byte) 0x39, (byte) 0x30, (byte) 0x37, (byte) 0x22, (byte) 0x25, (byte) 0x2C, (byte) 0x2B,
(byte) 0x06, (byte) 0x01, (byte) 0x08, (byte) 0x0F, (byte) 0x1A, (byte) 0x1D, (byte) 0x14, (byte) 0x13,
(byte) 0xAE, (byte) 0xA9, (byte) 0xA0, (byte) 0xA7, (byte) 0xB2, (byte) 0xB5, (byte) 0xBC, (byte) 0xBB,
(byte) 0x96, (byte) 0x91, (byte) 0x98, (byte) 0x9F, (byte) 0x8A, (byte) 0x8D, (byte) 0x84, (byte) 0x83,
(byte) 0xDE, (byte) 0xD9, (byte) 0xD0, (byte) 0xD7, (byte) 0xC2, (byte) 0xC5, (byte) 0xCC, (byte) 0xCB,
(byte) 0xE6, (byte) 0xE1, (byte) 0xE8, (byte) 0xEF, (byte) 0xFA, (byte) 0xFD, (byte) 0xF4, (byte) 0xF3
};
private static String CalcularCRC(String input)
{
byte[] data = Encoding.UTF8.GetBytes(input);
int len = data.Length;
byte crc = 0;
for (int i = 0; i < len; i++)
{
crc = crc8_table[(crc ^ data[i]) & 0xff];
}
long a = (crc & 0xFFL);
return a.ToString("D3");
}
Pd: Quizás deberíamos de plantear el crear un repositorio donde todos podamos aportar código y compartir el dolor de cabeza, que actualmente estamos todos sufriendo en silencio topándonos con los mismos problemas. |
|
#7
|
|||
|
|||
|
¡No me digas que tienes una herramienta que analiza XSD! ![]() ¡LA QUIERO! ¡PORFI, PORFI, PORFI... ![]() |
|
#8
|
|||
|
|||
|
Cita:
las opciones que puedes poner son : 02 nif-iva 03 pasaporte 04 Documento oficial de identificaci`´on expedido por el pais o territorio de residencia. 05 Certificado de residencia 06 Otro documento probatorio <Destinatarios> <IDDestinatario> <IDOtro> <IDType>04</IDType> <ID>nif_empresa_extranjero</ID> </IDOtro> <ApellidosNombreRazonSocial>nombre_razonsocial_empresa.</ApellidosNombreRazonSocial> <Direccion /> </IDDestinatario> </Destinatarios> |
|
#9
|
|||
|
|||
|
Cita:
|
|
#10
|
|||
|
|||
|
Cita:
Ese NIF no es español. Creo que debes detallarlo así: <Destinatarios> <IDDestinatario> <IDOtro> <IDType>04 (o el que corresponda)</IDType> <ID>NL855820627B01</ID> </IDOtro> <ApellidosNombreRazonSocial>ITX MERKEN B.V.</ApellidosNombreRazonSocial> </IDDestinatario> </Destinatarios> Valores posibles para IDType: 02 NIF-IVA. 03 Pasaporte. 04 Documento oficial de identificación expedido por el país o territorio de residencia. 05 Certificado de residencia. 06 Otro documento probatorio. |
|
#11
|
|||
|
|||
|
Tengo problemas para subir el fichero de alta TicketBAI al entorno de pruebas de Gipuzkoa. No entiendo muy bien qué está ocurriendo. Estoy haciendo el script en C#. En los diferentes métodos que he empleado me ocurren dos tipos de problema:
[Problema 1:] Código:
<ResultadosValidacion>
<Codigo>002</Codigo>
<Descripcion>Error: El fichero de alta TicketBAI no cumple el esquema XSD. No se ha podido procesar el mensaje. Detalle del error: Content is not allowed in prolog.</Descripcion>
<Azalpena>Errorea: TicketBAI altako fitxategiak ez du betetzen XSD eskema. Mezua ezin da prozesatu. Errorearen xehetasuna: Content is not allowed in prolog.</Azalpena>
</ResultadosValidacion>
Código:
string urlconexion = "h t t p s://tbai-prep.egoitza.gipuzkoa.eus/WAS/HACI/HTBRecepcionFacturasWEB/rest/recepcionFacturas/alta";
string file = @"D:\Datos_Desarrollo\tBAI\6936.XSIG";
var client = new RestClient(urlconexion);
client.ClientCertificates = new X509CertificateCollection() { certificate };
var restrequest = new RestRequest(Method.POST);
restrequest.AddHeader("Content-Type", "application/xml;charset=UTF-8");
restrequest.AddFile("mifichero", file, "text/xml");
IRestResponse response = client.Execute(restrequest);
System.Diagnostics.Debug.WriteLine(response.Content);
IRestResponse es un contenedor de RestSharp que recoge la respuesta del servidor. certificate es una instancia de la clase X509Certificate2 de System.Security.Cryptography.X509Certificates [Problema 2:] Código:
<ResultadosValidacion>
<Codigo>007</Codigo>
<Descripcion>Error: Certificado remitente no válido para emisor factura.</Descripcion>
<Azalpena>Errorea: Bidaltzailearen ziurtagiria ez da baliagarria fakturaren egilearentzat.</Azalpena>
</ResultadosValidacion>
Código:
string urlconexion = "h t t p s://tbai-prep.egoitza.gipuzkoa.eus/WAS/HACI/HTBRecepcionFacturasWEB/rest/recepcionFacturas/alta";
string file = @"D:\Datos_Desarrollo\tBAI\6936.XSIG";
HttpWebRequest wr = (HttpWebRequest)WebRequest.Create(urlconexion);
wr.ContentType = "application/xml;charset=UTF-8";
wr.Method = "POST";
wr.ClientCertificates = new X509CertificateCollection() { certificate };
Stream rs = wr.GetRequestStream();
rs = wr.GetRequestStream();
FileStream fileStream = new FileStream(file, FileMode.Open, FileAccess.Read);
byte[] buffer = new byte[4096];
int bytesRead = 0;
while ((bytesRead = fileStream.Read(buffer, 0, buffer.Length)) != 0)
{
rs.Write(buffer, 0, bytesRead);
}
WebResponse wresp = null;
try
{
wresp = wr.GetResponse();
Stream stream2 = wresp.GetResponseStream();
StreamReader reader2 = new StreamReader(stream2);
System.Diagnostics.Debug.WriteLine(reader2.ReadToEnd());
}
certificate es igualmente una instancia de la clase X509Certificate2 de System.Security.Cryptography.X509Certificates Me imagino que en este segundo caso el problema puede estar en la manipulación del fichero (por haberlo subido como stream) pero no veo cómo comprobarlo. Si alguien me pudiera echar una mano se lo agradecería tanto como el tiempo que llevo tratando de encontrar una solución (un mogollón). Gracias ya por haberme leido. Última edición por unomasmas fecha: 22-07-2021 a las 23:51:58. Razón: Mejorar la visibilidad del código insertado |
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
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 | 3716 | 19-01-2026 20:01:34 |
| 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 |
|