method LoadSettings

Description

Load the settings for the backend appserver agent.
First, read settings from the server.xml file stored on the qad home server.
Read the local "specificserver.xml" file in the propath to read settings that override the centrally stored settings.

Parameters

oiReturnStatus

output

integer

Return status of the method.

Internal usage

unused

program code (program1/componentpool.p)

assign oiReturnStatus = -98.

assign vcServerXmlPath = search("server.xml").

assign vhFcComponent = ?.
<M-1 run MainBlock
     () in XML>
assign vhXMLhandle = vhFcComponent.

<M-2 run ReadXML
   (input  vcServerXmlPath (icXMLFile), 
    input  'serverConfiguration':U (icStartTag), 
    output tServerXmlNodes (tNodes), 
    output viFcReturnSuper (oiReturnStatus)) in XML>

<M-3 run FillSettings
   (input  0 (iiNodeId), 
    input  '' (icNameSpace), 
    output viFcReturnSuper (oiReturnStatus)) in ComponentPool>    

if oiReturnStatus = -98 
then assign oiReturnStatus = 0.