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 18-04-2017
Avatar de keys
keys keys is online now
Miembro
 
Registrado: sep 2003
Ubicación: Bilbao
Posts: 1.035
Poder: 22
keys Va por buen camino
Cita:
Empezado por newtron Ver Mensaje



Yo lo haría pero todavía no sé cómo generar el XML que se envía a partir de los objetos del webservice, ¿tú sabes cómo?
En el evento afterExecute del objeto HttpTrio pones lo siguiente:

Código Delphi [-]
var
  ss:TFileStream;
begin

    if FileExists('c:\tmp\salida.xml') then
     begin
       DeleteFile('c:\tmp\salida.xml');
     end;

    ss:=TFileStream.Create('c:\tmp\salida.xml', fmCreate);
    SOAPResponse.Position := 0;
    ss.CopyFrom(SOAPResponse, SOAPResponse.size);
    ss.Free;
    SOAPResponse.Position := 0;
Responder Con Cita
  #2  
Antiguo 18-04-2017
Avatar de newtron
[newtron] newtron is offline
Membrillo Premium
 
Registrado: abr 2007
Ubicación: Motril, Granada
Posts: 3.473
Poder: 21
newtron Va camino a la fama
Cita:
Empezado por keys Ver Mensaje
En el evento afterExecute del objeto HttpTrio pones lo siguiente:

Código Delphi [-]var ss:TFileStream; begin if FileExists('c:\tmp\salida.xml') then begin DeleteFile('c:\tmp\salida.xml'); end; ss:=TFileStream.Create('c:\tmp\salida.xml', fmCreate); SOAPResponse.Position := 0; ss.CopyFrom(SOAPResponse, SOAPResponse.size); ss.Free; SOAPResponse.Position := 0;
Eso ya lo había probado pero lo que crea es un XML con el error que devuelve la llamada, yo estoy intentando ver si hay forma de generar el XML que se envía con los datos de la factura.
__________________
Be water my friend.
Responder Con Cita
  #3  
Antiguo 18-04-2017
Avatar de keys
keys keys is online now
Miembro
 
Registrado: sep 2003
Ubicación: Bilbao
Posts: 1.035
Poder: 22
keys Va por buen camino
Perdon es el evento BeforeExecute.
Responder Con Cita
  #4  
Antiguo 18-04-2017
Avatar de newtron
[newtron] newtron is offline
Membrillo Premium
 
Registrado: abr 2007
Ubicación: Motril, Granada
Posts: 3.473
Poder: 21
newtron Va camino a la fama
Buenas, por fin he conseguido extraer el XML, una cosa que no me cuadra es poner el NIF del proveedor sin el prefijo de país en el apartado IdFactura y con el prefijo en la contraparte pero es que si no lo hago así me da otros errores.

Cita:
<?xml version="1.0"?>

-<SOAP-ENV:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/">


-<SOAP-ENV:Body>


-<SuministroLRFacturasRecibidas xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroLR.xsd">


-<Cabecera xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">

<IDVersionSii>0.6</IDVersionSii>


-<Titular>

<NombreRazon>MI NOMBRE</NombreRazon>

<NIF>XXXXXXXX</NIF>

</Titular>

<TipoComunicacion>A0</TipoComunicacion>

</Cabecera>


-<RegistroLRFacturasRecibidas>


-<PeriodoImpositivo xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">

<Ejercicio>2017</Ejercicio>

<Periodo>02</Periodo>

</PeriodoImpositivo>


-<IDFactura>


-<IDEmisorFactura xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">

<NIF>277419107</NIF>

</IDEmisorFactura>

<NumSerieFacturaEmisor xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">COMPINT1/201704181106000</NumSerieFacturaEmisor>

<FechaExpedicionFacturaEmisor xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">02/02/2017</FechaExpedicionFacturaEmisor>

</IDFactura>


-<FacturaRecibida>

<TipoFactura xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">F1</TipoFactura>

<ClaveRegimenEspecialOTrascendencia xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">09</ClaveRegimenEspecialOTrascendencia>

<ImporteTotal xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">121</ImporteTotal>

<DescripcionOperacion xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">Su Factura</DescripcionOperacion>


-<DesgloseFactura xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">


-<DesgloseIVA>


-<DetalleIVA>

<TipoImpositivo>21</TipoImpositivo>

<BaseImponible>100</BaseImponible>

<CuotaSoportada>21</CuotaSoportada>

</DetalleIVA>

</DesgloseIVA>

</DesgloseFactura>


-<Contraparte xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">

<NombreRazon>PROVEEDOR EXTRANJERO</NombreRazon>


-<IDOtro>

<CodigoPais>GB</CodigoPais>

<IDType>04</IDType>

<ID>GB277419107</ID>

</IDOtro>

</Contraparte>

<FechaRegContable xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">02/02/2017</FechaRegContable>

<CuotaDeducible xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">100</CuotaDeducible>

</FacturaRecibida>

</RegistroLRFacturasRecibidas>

<RegistroLRFacturasRecibidas xmlns="" xsi:nil="true"/>

</SuministroLRFacturasRecibidas>

</SOAP-ENV:Body>

</SOAP-ENV:Envelope
__________________
Be water my friend.
Responder Con Cita
  #5  
Antiguo 18-04-2017
Avatar de keys
keys keys is online now
Miembro
 
Registrado: sep 2003
Ubicación: Bilbao
Posts: 1.035
Poder: 22
keys Va por buen camino
Tienes que poner lo mismo en el id dew factura y en la contraparte. Exactamente lo mismo con el prefijo del pais.
Responder Con Cita
  #6  
Antiguo 18-04-2017
Avatar de keys
keys keys is online now
Miembro
 
Registrado: sep 2003
Ubicación: Bilbao
Posts: 1.035
Poder: 22
keys Va por buen camino
IDType 02 no 04
Responder Con Cita
  #7  
Antiguo 18-04-2017
Avatar de newtron
[newtron] newtron is offline
Membrillo Premium
 
Registrado: abr 2007
Ubicación: Motril, Granada
Posts: 3.473
Poder: 21
newtron Va camino a la fama
Cita:
Empezado por keys Ver Mensaje
Tienes que poner lo mismo en el id dew factura y en la contraparte. Exactamente lo mismo con el prefijo del pais.
Si pongo el prefijo del pais en el bloque "IdFactura" me da un error de tipo incorrecto.

¿Tienes algún XML de ejemplo por ahí?
__________________
Be water my friend.
Responder Con Cita
  #8  
Antiguo 18-04-2017
Avatar de keys
keys keys is online now
Miembro
 
Registrado: sep 2003
Ubicación: Bilbao
Posts: 1.035
Poder: 22
keys Va por buen camino
TE paso un ejemplo
Archivos Adjuntos
Tipo de Archivo: zip Intracomunitaria.zip (901 Bytes, 242 visitas)
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
TICKET BAI (TicketBAI); Nuevo sistema de la Agencia Tributaria del Pais Vasco keys Internet 4170 Hace 2 Semanas 17:29:05
AEAT envio de datos vía Webservice problemas con WSDL CelsoO Internet 11 09-10-2019 20:03:41
webService Soap de la Administración Digital Española notific@ apicito Internet 3 31-01-2017 11:25:28
Error en Webservice funcion envio de sms webmasterplc Delphi para la web 5 25-07-2013 20:10:29
Problemas con envío de XML a un WebService davidvamo Internet 1 13-02-2007 15:49:20


La franja horaria es GMT +2. Ahora son las 11:39:17.


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