Error con W-2008 Server

[Parsec]

Hola de nuevo,

procedure TForm1.Button1Click(Sender: TObject);
var
Dato2: String;
Mensaje: AuraPortalProcesosSoap;
Datos:WideString;
Entero: Integer;
begin

Dato2:='Order1';

Mensaje:= GetAuraPortalProcesosSoap();
Entero:=Mensaje.MensajeInicioBorradorCrear(179,Dato2);

Edit1.Text:=IntToStr(Entero);
end;

Saludos