Al consumir WebService me da Accessviolation al acceder al resultado

[ja_73]

hola apo
he probado la primera parte y me funcionó.
ya me dirás a que correo enviaste la pregunta, yo envié uno aemcs(arroba)correo.aeat.es pero no me contestaron.
podrían publicar esto en las faq de la aeat, nos libraría de muchos dolores de cabeza...
te cuento lo que hice, yo lo hice en .NET, pero espero que te pueda ayudar.
me descarge el wsdl de la página de hacienda, y los todos los xsd necesarios, los guardas todos en una carpeta
modificas con el bloc de notas el archivo wsdl, y en la parte donde define el Ie215V1SalType pones el que pusiste tu.
luego cuando añades la referencia al servicio en .NET, normalmente agregas una url, ahora tines que hacer referencia a un archivo del disco duro.
se añade la referencia al servicio, y a partir de aquí ya es como siempre.
lo que ví que cambió, es que antes la llamada al servicio era así:

Ie215V1SalType respuesta = cliente.Ie215V1(ie215Tipo);

y ahora queda así

cliente.Ie215V1(ie215Tipo, out Ie215V1Service2.IE204Tipo iE204);

la respuesta la recibe la variable IE204.

sigo recibiendo el error 07009-Mensaje YA consumido con anterioridad y rechazado.
pero eso ya es otra historia
ahora por lo menos no recibo null
muchas gracias APO
y al señor de AEAT también

si alguien se anima a probar el resto de opciones, que publique a ver que tal les fué.

[APO]

Empezado por ja_73

hola apo
he probado la primera parte y me funcionó.
ya me dirás a que correo enviaste la pregunta, yo envié uno aemcs(arroba)correo.aeat.es pero no me contestaron.
podrían publicar esto en las faq de la aeat, nos libraría de muchos dolores de cabeza...
te cuento lo que hice, yo lo hice en .NET, pero espero que te pueda ayudar.
me descarge el wsdl de la página de hacienda, y los todos los xsd necesarios, los guardas todos en una carpeta
modificas con el bloc de notas el archivo wsdl, y en la parte donde define el Ie215V1SalType pones el que pusiste tu.
luego cuando añades la referencia al servicio en .NET, normalmente agregas una url, ahora tines que hacer referencia a un archivo del disco duro.
se añade la referencia al servicio, y a partir de aquí ya es como siempre.
lo que ví que cambió, es que antes la llamada al servicio era así:

Ie215V1SalType respuesta = cliente.Ie215V1(ie215Tipo);

y ahora queda así

cliente.Ie215V1(ie215Tipo, out Ie215V1Service2.IE204Tipo iE204);

la respuesta la recibe la variable IE204.

sigo recibiendo el error 07009-Mensaje YA consumido con anterioridad y rechazado.
pero eso ya es otra historia
ahora por lo menos no recibo null
muchas gracias APO
y al señor de AEAT también

si alguien se anima a probar el resto de opciones, que publique a ver que tal les fué.

Hola ja_73,

Me alegro que ya te funcione! Te pongo el email donde hice la consulta a la AEAT por si necesitaras alguna otra información: atenusu(arroba)correo.aeat.es

Yo, sin embargo, sigo teniendo problemas. He modificado el WSDL y todos los xsd relacionados, pero la respuesta me sigue viniendo a nil.
¿Podrías aquí poner el WSDL ya modificado? Y el código cuando consumes el WebService? No sé, algo me debo estar dejando.

Por otra parte, a todo esto le veo un inconveniente. Y es que, si modifican el Webservice, también tendremos que hacer de nuevo estas modificaciones no?

Muchas gracias!

[ja_73]

Empezado por APO

Hola ja_73,

Me alegro que ya te funcione! Te pongo el email donde hice la consulta a la AEAT por si necesitaras alguna otra información: atenusu(arroba)correo.aeat.es

Yo, sin embargo, sigo teniendo problemas. He modificado el WSDL y todos los xsd relacionados, pero la respuesta me sigue viniendo a nil.
¿Podrías aquí poner el WSDL ya modificado? Y el código cuando consumes el WebService? No sé, algo me debo estar dejando.

Por otra parte, a todo esto le veo un inconveniente. Y es que, si modifican el Webservice, también tendremos que hacer de nuevo estas modificaciones no?

Muchas gracias!

hola apo,
yo solo modifiqué el wsdl, la primera opción
sustituir
esto:

	<wsdl:message name="Salida">
		<wsdl:part name="Ie215V1Sal" type="Ie215V1SalType"/>
	</wsdl:message>

por esto:

<wsdl:message name="Salida"> 
    <wsdl : part name="Ie215V1Sal1" element="Sal201:Ie201" /> 
    <wsdl : part name="Ie215V1Sal2" element="Sal204:Ie204" /> 
</wsdl:message>

importas el wsdl y el resto del código debería funcionarte igual, (por lo menos en .NET, en delphi no se como puede ser)
un truco, copia el wsdl y los archivos modificados en una carpeta nueva, antes de volver a importar, en .net por lo menos a mi, siempre me importaba el mismo y me daba error, hasta que lo copié en una carpeta nueva y me lo importó bien.

[mtxtania]

Buenas tardes, yo de momento quiero probar sin modificar el WDSL aunque me salta el siguiente error y no puedo analizar las respuestas:


Codigo[1207].Se esperaba Atributo 'Id' event: com.ibm.xml.xlxp.api.stax.events.StartElementImpl@84705eb1


Estoy con los albaranes, Ie215V1.wsdl



Os suena a alguno?

[APO]

Empezado por mtxtania

Buenas tardes, yo de momento quiero probar sin modificar el WDSL aunque me salta el siguiente error y no puedo analizar las respuestas:

Codigo[1207].Se esperaba Atributo 'Id' event: com.ibm.xml.xlxp.api.stax.events.StartElementImpl@84705eb1

Estoy con los albaranes, Ie215V1.wsdl

Os suena a alguno?

Hola mtxtania,
Eso también me pasaba a mí. Es porque al importar el WSDL al final de todo añade unos namespace a los atributos Id, NifDeclarante, NombreDeclarante y Test. Se ve que al generar el XML de salida no le gusta con esos namespace.

Yo lo solucioné comentando esas líneas:

Código Delphi [-]
//  RemClassRegistry.RegisterExternalPropName(TypeInfo(Ie201Tipo), 'Test', '[Namespace="https://www3.agenciatributaria.gob.es/static_files/common/internet/dep/aduanas/es/aeat/adia/avit/ws/listas.xsd"]');
//  RemClassRegistry.RegisterExternalPropName(TypeInfo(Ie215Tipo), 'Id', '[Namespace="https://www3.agenciatributaria.gob.es/static_files/common/internet/dep/aduanas/es/aeat/adia/avit/ws/tipos.xsd"]');
//  RemClassRegistry.RegisterExternalPropName(TypeInfo(Ie215Tipo), 'NifDeclarante', '[Namespace="https://www3.agenciatributaria.gob.es/static_files/common/internet/dep/aduanas/es/aeat/adia/avit/ws/tipos.xsd"]');
//  RemClassRegistry.RegisterExternalPropName(TypeInfo(Ie215Tipo), 'NombreDeclarante', '[Namespace="https://www3.agenciatributaria.gob.es/static_files/common/internet/dep/aduanas/es/aeat/adia/avit/ws/tipos.xsd"]');
//  RemClassRegistry.RegisterExternalPropName(TypeInfo(Ie215Tipo), 'Test', '[Namespace="https://www3.agenciatributaria.gob.es/static_files/common/internet/dep/aduanas/es/aeat/adia/avit/ws/listas.xsd"]');

Pruébalo y cuéntanos a ver qué tal

[mtxtania]

Perfecto gracias!!

Ahora me encuentro que las respuestas me vienen a nil como comentabais mas arriba. Tengo que modificar el WSDL? Os ha funcionado a vosotros?

[APO]

¿En qué lenguaje de programación lo estás haciendo? Porque yo utilizando Delphi XE8, y modificando el WSDL me siguen viniendo a nil. En cambio, ja_73 que lo está haciendo en .NET, modificando el WSDL sí que le ha funcionado.

Básicamente del WSDL hay que cambiar esta parte:

Código Delphi [-]
message name="Salida">
art type="Ie215V1SalType" name="Ie215V1Sal"/>
message>

Por esta otra:

Código Delphi [-]
message name="Salida"> 
   art name="Ie215V1Sal1" element="Sal201:Ie201" /> 
   art name="Ie215V1Sal2" element="Sal204:Ie204" /> 
message>

Y luego a la hora de consumir el Webservice debería ser algo así:

Código Delphi [-]
//Aquí declaro las variables para consumir el Webservice
var
   XML: Ie215V11.Ie215;
   XMLRespuestaIe201: Ie215V11.Ie201;
   XMLRespuestaIe204: Ie215V11.Ie204;

begin
   //Rellenemos los datos que voy a enviar
   XML:=Ie215V11.Ie215.Create;
   XML.Id:='201905150001'; //Debe ser un identificar único por mensaje
   XML.NifDeclarante:='XXXXXXXXX';
   XML.NombreDeclarante:='XXXXXXXXXX';

   //… rellenar los demás datos necesarios ...


   //Y aquí consumo el Webservice
   Ie215V11.GetIe215V1(True,'',HTTPRIO1).Ie215V1(XML,XMLRespuestaIe201,XMLRespuestaIe204);

Y en teoría una de las dos respuestas XMLRespuestaIe201 (mensaje aceptado) o XMLRespuestaIe204 (mensaje rechazado) debería tener valor. Pero a mí me vienen las dos a nil.