...
Info |
---|
Il existe une fonction de script DIVINF_Func_GetInfinityWebServiceInfo qui retourne les informations nécessaires au lancement des webservices infinity.
|
Bloc de code |
---|
// DIVINF_Func_GetInfinityWebServiceInfo // @description => Get infos for webservice infinity // @returns => 0 : error / 1 : ok // @returned variables // InfinityWebServiceUrl : Infinity server URL for the call of the WebService // InfinityWebServiceAction : Infinity diva action to push in the web method // InfinityWebServiceErrorMsg : Error message if returns is 0 InfinityWebServiceUrl = VARGET_DBSQL( "select url from sw_data_externalurl where codeexternalurl='WSDIVA'" ) InfinityWebServiceAction = "WEB_SERVICE_INFINITY" InfinityWebServiceErrorMsg = "" ret = 1 IF (EQUALS( InfinityWebServiceUrl, "" )) THEN InfinityWebServiceErrorMsg = "Infinity server URL for the call of the WebService is not informed (Table=sw_data_externalurl, Code='WSDIVA')" ret = 0 ENDIF VARSET_SHELL( "InfinityWebServiceUrl", InfinityWebServiceUrl, "InfinityWSinfo" ) VARSET_SHELL( "InfinityWebServiceAction", InfinityWebServiceAction, "InfinityWSinfo" ) VARSET_SHELL( "InfinityWebServiceErrorMsg", InfinityWebServiceErrorMsg, "InfinityWSinfo" ) RETURN( ret ) |