Что означает ошибка синтаксического анализа XML, отправленная из TXMLTransform, когда я использую SOAP для удаленного чтения данных в набор данных клиента через SOAP в Delphi? - PullRequest
Новая
       45

Что означает ошибка синтаксического анализа XML, отправленная из TXMLTransform, когда я использую SOAP для удаленного чтения данных в набор данных клиента через SOAP в Delphi?

2 голосов
/ 22 марта 2012

Я задал другой вопрос, связанный с SOAP некоторое время назад, в котором запрашиваются работающий клиент Soap и сервер для Delphi XE и выше.

Ни у кого не было готового решения, поэтомуЯ восстановил демо эпохи Delphi 2007 в рабочее состояние для Delphi XE и XE2.У меня работают демоверсии, и у меня есть сервер на основе форм INDY VCL (автономный HTTP-сервер, работающий на Indy) с сервером Soap.Демонстрация сервера состоит из двух частей: «пользовательский метод» (обычный вызов функции soap) и «удаленный набор данных».Это удаленный набор данных, который я не могу заставить работать.

У меня ошибка в форме клиента, когда я устанавливаю активный набор данных клиента, сервер отправляет исключение, когда я выполняю эту строку вдемонстрационный клиент: 

  ClientDataSet1.Open;

Это, в свою очередь, сводится к коду DBClient.pas, TDataSet.OpenCursor вызывает DoGetRecords, который пытается прочитать из ProviderName = 'XMLTransformProvider1', с помощью этого вызова RIO: 

  Result := AppServer.AS_GetRecords(ProviderName, Count, RecsOut, Options,
     CommandText, Params, OwnerData);
  // ProviderName = 'XMLTransformProvider1', Count = -1,
  // CommandText = '', Params = NULL, OwnerData = Unassigned

Это взрывается с этим исключением, показанным в типичной MessageBox форме: 

`ERemotableException: XML Parse error...`. 
    ERemotableException 
    'XML Parse Error:
     Reason: The system cannot locate the object specified.
     '.

Здесь показан стек вызовов исключений на стороне сервера для модуля данных мыльного раствора Indy: 

xmlutil.DocParseError(TMSDOMDocument($292C994) as IDOMDocument)
xmlutil.LoadDocFromFile(???)
Xmlxform.TXMLTransform.GetData
Xmlxform.TXMLTransformProvider.InternalGetRecords(???,???,[grMetaData],'',Null)
Provider.TCustomProvider.DoGetRecords(-1,0,1,'',Null,Null)
Provider.TCustomProvider.GetRecords(???,0,1,'',Null,Null)
SOAPDm.TSoapDataModule.GetRecords('XMLTransformProvider1',-1,0,1,'',Null,Null)
SOAPDm.TSoapDataModule.SAS_GetRecords('XMLTransformProvider1',-1,0,1,'',Null,Null)
Invoker.TInterfaceInvoker.Invoke(???,('IDataMod', 'DataMod_U', (('', ccReg, 0, 0, nil, nil, (), False), ('', ccReg, 0, 0, nil, nil, (), False), ('', ccReg, 0, 0, nil, nil, (), False), ('SAS_ApplyUpdates', ccStdCall, 3, 5, $401314, $628D50, (([pfConst], 'ProviderName', $4012DC), ([pfReference], 'Delta', $401314), ([], 'MaxErrors', $4010A0), ([pfOut], 'ErrorCount', $4010A0), ([pfVar,pfReference], 'OwnerData', $401314), ([], '', nil)), True), ('SAS_GetRecords', ccStdCall, 4, 7, $401314, $628D50, (([pfConst], 'ProviderName', $4012DC), ([], 'Count', $4010A0), ([pfOut], 'RecsOut', $4010A0), ([], 'Options', $4010A0), ([pfConst], 'CommandText', $4012DC), ([pfVar,pfReference], 'Params', $401314), ([pfVar,pfReference], 'OwnerData', $401314), ([], '', nil)), True), ('SAS_DataRequest', ccStdCall, 5, 2, $401314, $628D50, (([pfConst], 'ProviderName', $4012DC), ([pfReference], 'Data', $401314), ([], '', nil)), True), ('SAS_GetProviderNames', ccStdCall, 6, 0, $40BC38, $628D50, (([], '', nil)), True), ('SAS_GetParams', ccStdCall, 7, 2, $401314, $628D50, (([pfConst], 'ProviderName', $4012DC), ([pfVar,pfReference], 'OwnerData', $401314), ([], '', nil)), True), ('SAS_RowRequest', ccStdCall, 8, 4, $401314, $628D50, (([pfConst], 'ProviderName', $4012DC), ([pfReference], 'Row', $401314), ([], 'RequestType', $4010A0), ([pfVar,pfReference], 'OwnerData', $401314), ([], '', nil)), True), ('SAS_Execute', ccStdCall, 9, 4, nil, $628D50, (([pfConst], 'ProviderName', $4012DC), ([pfConst], 'CommandText', $4012DC), ([pfVar,pfReference], 'Params', $401314), ([pfVar,pfReference], 'OwnerData', $401314), ([], '', nil)), True), ('CustomMethod', ccStdCall, 10, 0, $4012CC, $62E668, (([], '', nil)), True)), (45872836, 16917, 16768, (153, 166, 192, 149, 84, 207, 120, 216)), $62E668, $628D50, 10),4,$2942270)
SOAPPasInv.TSoapPascalInvoker.Invoke(???,???,'',$28F3700,$28F36A0,???)
SOAPHTTPPasInv.THTTPSoapPascalInvoker.DispatchSOAP('/SOAPDMServerWAD.Sample/soap/IDataMod',???,$28F3700,$28F36A0,btSoap)
WebBrokerSOAP.THTTPSoapDispatcher.DispatchRequest(???,???,$29421C8)
HTTPApp.DispatchHandler($28E4140,THTTPSoapDispatcher($291687C) as IWebDispatch,$290FEA0,$29421C8,False)
HTTPApp.TCustomWebDispatcher.DispatchAction($290FEA0,$29421C8)
HTTPApp.TCustomWebDispatcher.HandleRequest(???,???)
HTTPApp.TDefaultWebAppServices.InvokeDispatcher
HTTPApp.TDefaultWebAppServices.HandleRequest
WebReq.TWebRequestHandler.HandleRequest($290FEA0,$29421C8)
IdHTTPWebBrokerBridge.TIdHTTPWebBrokerBridgeRequestHandler.Run(???,$28851B0,???)
IdHTTPWebBrokerBridge.TIdHTTPWebBrokerBridge.DoCommandGet(???,???,???)
IdCustomHTTPServer.TIdCustomHTTPServer.DoExecute($293AB30)
IdContext.TIdContext.Run
IdTask.TIdTask.DoRun
IdThread.TIdThreadWithTask.Run
IdThread.TIdThread.Execute
Classes.ThreadProc($28A1FE0)

Я считаю, что происходит то, что мы получаем пустой HTTP-ответ.Это имело бы смысл для меня, если бы ничего не работало, и URL-адрес HTTP, к которому мы обращаемся, не работает.URL, к которому мы обращаемся, доступен через веб-браузер: 

http://localhost:8088/?intf=IDataMod

XML-код, возвращаемый клиенту, вызвавший сообщение об ошибке, выглядит следующим образом: 

<SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/">
 <SOAP-ENV:Body>
  <SOAP-ENV:Fault>
   <faultcode>SOAP-ENV:Server</faultcode>
   <faultstring>XML Parse Error:'#$D#$A#$D#$A'Reason: The system cannot locate the object specified.'#$D#$A#$D#$A#$D#$A'</faultstring>
   <faultactor/>
</SOAP-ENV:Fault>
</SOAP-ENV:Body></SOAP-ENV:Envelope>

Мой вопрос: что на самом деле означает эта ошибка SOAP и почему она происходит, и как ее исправить?

1 Ответ

1 голос
/ 27 марта 2012

В этом случае это означает, что клиент получил уведомление о том, что произошло исключение на стороне сервера. Поскольку исключение на стороне сервера было вызвано проблемой с демонстрационным кодом, решение состоит в том, чтобы восстановить демонстрационный сервер, чтобы он работал правильно.

В случае сервера SOAP, поставляемого с Delphi 2007, в папке примеров SoapDataModule проблема заключается в том, что в нем нет проверки ошибок; если ему не удается загрузить данные примера XML (поскольку папка данных перемещена или отсутствует), то она взорвется с необработанным исключением на стороне сервера.

SOAP обладает прекрасным свойством автоматизации вашей работы; Клиент получает уведомление о том, что мы получили вызов мыла, и вместо реального ответа мы получаем исключение мыла. Нельзя винить в этом SOAP, а Delphi SOAP RTL на самом деле довольно удобен в использовании. Но основной момент, о котором следует здесь упомянуть, состоит в том, что разработчик службы мыла должен выполнить некоторую проверку работоспособности на сервере мыла при его запуске, чтобы ошибки можно было исправить до того, как они станут фатальными для запроса SOAP.

Извлеченный урок; При создании сервера SOAP рассмотрите обработку ошибок конфигурации и обнаружение фатальных ошибок как задачу запуска перед первым сеансом сервера SOAP.

...