Typo in SOAP WebServExp.GenerateXMLSchema?

0
votes

We've recently setup out own webservice using SOAP and it all works like a charm. Because the service is only used from within our own applications, I usually don't allow for a WSDL to be generated.

Today i started some tests with SoapUI and needed a WSDL of our own service. So I enabled the Default action of the TWSDLHTMLPublish component and tried to get the WSDL exported. All I got was an access violaton in WebServExp.GenerateXMLSchema, line 1636:

if (ParentInfo = nil) and ((GetTypeData(ATypeInfo).ParentInfo)^ <> nil) then

Debugging this, reveiled that GetTypeData(ATypeInfo).ParentInforeturned a nil, so of course using ^ on nil raises an access violation.

After removing the carret i had no problems generating the WSDL.

So did I find myself a bug here or am I missing something?

BTW: We have created our own SOAP.bpl, containing all original Delphi soap sources, to correct it for a known problem with exception derived from TRemotableException

1
delphisoapdelphi-2007

1 Answers

1
votes

So did I find myself a bug here or am I missing something?

Yes, that's a bug. And Subversion reveals it's been like that for many years - for as long as we've been on Subversion:(. [I am not setup to access the previous Starteam repository anymore].

I'm making to a note to remedy and check in unit tests for this. Please feel free to file a QC if time allows. And I'd like to hear more about the issue with TRemotableException-derived types.

Cheers,

Bruneau