delphi调用soap的问题(100分)

大家好，我在做一个接口的时候，厂家给我一个wsdl文件，我根据内容，通过
wsdl importer 导入，生成了我想要的的调用接口和事件，但是对方要求要有个header发过去，我有点奇怪，既然是事件，和消息怎么能同步进行呢？所以请各位帮我一下。我下的代码的意思如下，但是对方提示找不到header。
var s: WSTotalCountBean;
svc: ICSSWebService;
h: TAuthHeader;
begin
svc := GetService;
H := TAuthHeader.Create;
try

{构造包头}

H.CSSToken := getheader;
memo1.Text := H.CSSToken;
{发送 hearder}
(svc as ISOAPHeaders).Send(H);
{ 调用 getCDRTotalCount 方法 }

s := svc.getCDRTotalCount('2006-05', '');
showmessage(inttostr(s.resultCode)+' '+s.errMsg + ' ' + inttostr(s.totalCount));
{找不到header}
finally
H.Free ;
end;