Leer XML desarrollado en .NET que retorna DataTable

[juanelo]

Que tal,
Según yo (no me hagas mucho caso), pero este valor deberia de venir como una variable de tipo TRemotable que si usaste el "importador wsdl" de Delphi, te la crea de manera automatica.
En algunas ocasiones, en lo que se conoce con "marshalling" del los parametros de envío (request) no concuerda con lo que espera el WebService del otro lado del cable, sobre todo en .NET, pero la mayoria de veces este propio "marshalling" si que funciona de vuelta (response) con los componentes de Delphi, lo cual hace que las variables de vuelta se alojen correctamente en las usadas por delphi.
Aqui lo que veo es que es una estructura (ComplexType) de la cual deberia de tener su equivalente como TRemotable, lo datos de abajo son los que me hacen dudar (y creo que esos son los que indicas que son un dataset).
¿Puedes poner la URL del WSDL o bien el propiop WSDL, asi como un ejemplo del request que solicita el webservice?

[juanelo]

Analizando un poco mas el Response del WebService, casi estoy seguro que el resultado te lo aloja como una array de TRemotable, pero insisto sería de mucha utilidad que puedas mandar el WSDL al menos para poder ayudarte.

[JuanPa1]

Efectivamente para poder obtner el XML de respuesta he utilizado el "importador WSDL" de delphi. El enlace al web service es el siguiente:

http://186.3.87.210/SLXWebServicesDe...vice.asmx?WSDL

Ejemplo de requests que le envio desde delphi.

procedure TForm1.Button1Click(Sender: TObject);
var
ServiceToCall : SecureServiceSoap;
Authentication : AuthenticationHeader;

begin

ServiceToCall:=GetSecureServiceSoap(False,'',nil);
Authentication:=AuthenticationHeader.Create;
Authentication.UserName:=Trim('Tecanser.sesa');
Authentication.Password:=Trim('Tecanser.Sesa123');
(HTTPRIO1 as ISOAPHeaders).Send(Authentication);
(HTTPRIO1 as SecureServiceSoap).ConsultarDatosClienteMercadeo(txtidentificacion.Text);

end;

///////////////////////////////////////////////////////////////////////////////////////////////////
En el evento AfterExecute del componente HTTPRIO obtengo el resultado y asigno al componente Memo.

procedure TForm1.HTTPRIO1AfterExecute(const MethodName: String;
SOAPResponse: TStream);

begin
Memo1.Lines.LoadFromStream(SOAPResponse);
end;

Saludos.

[[Al González]]

Hola JuanPa1.

Guardando todas las reservas respecto a otras soluciones, quizá esta opción te resulte viable.

La clase y ese programa de ejemplo los descargas fácilmente de aquí (son libres).

Saludos.

[juanelo]

Analizando las classes que te crea el importador, veo que no pudo "construir" la estructura definida en el webservice, por lo visto no hace uso del schema que tiene definido el wsdl para armar la clase.
En fin, mucho me temo que vas a irte por los pies para poder "interprertar" el response. Hazle mucho caso a la respuesta de Al, por ahi van los tiros.
Yo lo que te puedo recomendar es que uses el componente XMLDocument y juegues con:

Código Delphi [-]
TXMLDocument XMLDocument.ChildNodes.FindNode("NombreNodo")

Que es lo que basicamente Al te aconseja, pero estoy seguro que con la solucion de Al se te debe de hacer mucho mas facil.
Saludos.

[JuanPa1]

Voy a seguir la recomendación de Al Gonzáles, les estaré comentando en cuanto logre leer el XML. Gracias por las respuestas.

Saludos,

[JuanPa1]

Intento cargar el componente TghXMLDoc en Delphi 7 pero tengo este error, "[Fatal Error] GHFRTL.pas(2021): Internal error: C13081". No se si saben a que se debe ese error.

Saludos.

[[Al González]]

Empezado por JuanPa1

Intento cargar el componente TghXMLDoc en Delphi 7 pero tengo este error, "[Fatal Error] GHFRTL.pas(2021): Internal error: C13081". No se si saben a que se debe ese error.

Delphi 7 suele presentar ese tipo de error cuando no está debidamente actualizado. Básicamente por falta del parche 7.1. Una vez que lo instales ya no deberá presentarse.