method GetDaemonDebugLevel

Parameters

icDaemonName	input	character
oiDebugLevel	output	integer
ocErrorMessage	output	character
oiReturnStatus	output	integer	Return status of the method.

Internal usage

QadFinancials

method BDaemonFunctions.GetDaemonDebugLevel

program code (program1/tdaemonutility.p)

<M-11 run GetAppserverConnection
   (input  icDaemonName (icDaemonName), 
    input  '' (icDaemonAppserverURL), 
    output vhAppserver (ohDaemonAppserver), 
    output ocErrorMessage (ocMessage), 
    output oiReturnStatus (oiReturnStatus)) in TDaemonUtility>
if oiReturnStatus < 0
then return.

if valid-handle(vhAppServer)
and vhAppServer:connected()
then do:
    /* run on appserver */
    run program/tdaemonutility.p persistent set vhFcComponent on vhAppserver (input viSessionID).
    run GetDaemonDebugLevelInternal in vhFcComponent
       (input icDaemonName,
        output oiDebugLevel).
    run gipr_DeleteProcedure in vhFcComponent.
    delete procedure vhFcComponent.
    vhAppServer:disconnect().
    delete object vhAppServer.
end.
else do:
    /* run locally */
    <M-44 run GetDaemonDebugLevelInternal
       (input  icDaemonName (icDaemonName), 
        output oiDebugLevel (oiDebugLevel)) in TDaemonUtility>
end.