CallStdWebService()
CallStdWebService() – Webservice ausführen
Mit dieser Funktionen kann ein Webservice ausgeführt werden.
Hinweis
Einschränkung:
Die Webservice Funktionen muss "ExecuteServiceStr" heißen und über die Eingabeparameter cId:C und cParam:C verfügen.
Das Ergebnis wird unter executeServiceStrReturn:C erwartet.
Die Verwendung im BEAS ist nur mit Startparameter CALL_STD_WEB_SERVICE_RO möglich.
Durch Setzen des Startparameters CALL_STD_WEB_SERVICE_RO wird eine stabilere Neuimplementierung der Funktion verwendet.
Parameter | Beschreibung |
---|---|
cServiceURL:C | Adresse des Webservices (steht im WSDL-Dokument des Webservices) |
cNamespace:C | Namespace des Webservices (steht im WSDL-Dokument des Webservices) |
cServiceID:C | Individuelle Service-ID |
cParam:C | Sonstiger Parameter |
lBeWebService:L | Verwende abweichende Signatur des be-Webservice (id, param, Result) |
Rückgabewert
Alphanumerisch - Ergebnis des aufgerufenen Webservices
Beispiel
//****************************************************************
// 1. CB-Programm mit Event "bei WebService-Anforderung" erstellen
| nEvtNo:P1, cServiceID:P2, uParam:P3, uRes |
if cServiceID = '1' then
uRes := 'Ihre Eingabe lautet: ' + uParam,
else
uRes := 'Service-ID <' + cServiceID + '> ist nicht definiert!',
endif,
uRes
//****************************************************************
// 2. BE als "Webservice Server" starten (mit Parameter /webservice)
//****************************************************************
// 3. "eigenen" Webservice aufrufen
CallStdWebService('http://localhost:2446/soap/', 'urn:Dontenwill.de/IBeCBService', '1', 'Hallo BE!', True)
//****************************************************************
// Beispiel für den Aufruf eines externen Web-Service
//****************************************************************
CallStdWebService('http://192.168.10.11:8080/ProductionSrv/services/LabelService', '', 'LABEL_INIT', '')