Incluir header en webservice

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

No comentas qué componentes estás utilizando.

En el caso de TRESTclient, puedes añadir los HAEDERS como parámetros de la cabecera.
Algo simila a esto:

Código Delphi [-]
FRestClient.AddParameter('ID', 'XXX-XXXX-XXXX-XXXX', TRESTRequestParameterKind.pkHTTPHEADER);

[[egostar]]

Hola

Los Header se envían antes de llamar el método que vas a consumir. En tu caso yo haría algo así, lo hago al aire, ajusta lo que se necesite:

Código Delphi [-]

var
  wsID: ID; 

begin
  //Crear servicio

  //****************
  wsID := ID.Create;
  wsID.Value := 'valor';
  (servicio as ISOAPHeader).Send(wsID);
  //****************

  //Llamar al método
end;

Saludos

[Quim Herrera]

Empezado por egostar

Hola

Los Header se envían antes de llamar el método que vas a consumir. En tu caso yo haría algo así, lo hago al aire, ajusta lo que se necesite:

Código Delphi [-]
var
  wsID: ID; 

begin
  //Crear servicio

  //****************
  wsID := ID.Create;
  wsID.Value := 'valor';
  (servicio as ISOAPHeader).Send(wsID);
  //****************

  //Llamar al método
end;

Saludos

Hola,

La solución de egostar funciona perfectamente (añadiendo una 's' ) :

Código Delphi [-]
 ( servicio as ISOAPHeaders ).Send(wsID);

Muchísimas gracias a todos.
Saludos,