project QadFinancials > class BDaemonFunctions > method GetDaemonDebugLevel

Description

Read the debug level from the daemon configuration file.


Parameters


icDaemonNameinputcharacter
oiDebugLeveloutputinteger
oiReturnStatusoutputintegerReturn status of the method.


Internal usage


unused


program code (program3/bdaemonfunctions.p)

<M-47 run Main  (input  viSessionID (iiSessionId)) in TDaemonUtility>
<M-82 run GetDaemonDebugLevel
   (input  icDaemonName (icDaemonName), 
    output oiDebugLevel (oiDebugLevel), 
    output vcMessage (ocErrorMessage), 
    output viFcReturnSuper (oiReturnStatus)) in TDaemonUtility>
run gipr_DeleteProcedure in vhFcComponent.
delete procedure vhFcComponent.

if viFcReturnSuper <> 0
then oiReturnStatus = viFcReturnSuper.
if viFcReturnSuper < 0
then do:
    <M-68 run SetMessage
       (input  vcMessage (icMessage), 
        input  '' (icArguments), 
        input  '' (icFieldName), 
        input  '' (icFieldValue), 
        input  'D' (icType), 
        input  3 (iiSeverity), 
        input  '' (icRowid), 
        input  'qadfin-322153':U (icFcMsgNumber), 
        input  '' (icFcExplanation), 
        input  '' (icFcIdentification), 
        input  '' (icFcContext), 
        output viFcReturnSuper (oiReturnStatus)) in BDaemonFunctions>
    return.
end.