Consultor Eletrônico



Kbase P106288: WebService StockQuotes sample program returns nothing.
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   12/07/2005
Status: Unverified

FACT(s) (Environment):

OpenEdge 10.0A
OpenEdge 10.0B

SYMPTOM(s):

WebServices Stock Quotes sample program doesn't display a result.

Running sample program DLC/src/samples/webservices/4GLClient/StockQuotes.p

No errors are reported.

CAUSE:

This is a known issue being investigated by Development
The problem is that the webservice has changed, and there is also a programming bug that's stopping an error from being reported.
Workaround:
Edit the StockQuotes.p procedure.

1. Replace the element names:
GetStockQuotes with GetQuotes , EXCEPT the one in the RUN statement.
GetStockQuotesResponse with GetQuotesResponse
GetStockQuotesResult with GetQuotesResult
2. Where the code is creating the node namespaces, replace the three URLs that currently show "http://swanandmokashi.com/" with "http://swanandmokashi.com". Notice the "/" removed from the end of the URL.
3. There should be DELETE OBJECT statements to delete the X-DOCUMENT and X-NODEREF objects. Add these to the end of the bgetquote button's trigger so the end of the trigger looks like:

fillin-2:SCREEN-VALUE = cResult.

DELETE OBJECT hDoc.
DELETE OBJECT hRoot.
DELETE OBJECT hChild.
DELETE OBJECT hNextChild.
DELETE OBJECT hNextNode.
DELETE OBJECT hTextNode.

END. /* bgetQuote*/
4. In the internal procedure ErrorInfo, under "DO k = 1 TO ERROR-STATUS:NUM-MESSAGES" , change GET-MESSAGE(i) to GET-MESSAGE(k) so that the intended error reporting will work.