project BLF > class PMfgPro > method GetContextProperty

function returns character

Description

Purpose: Return the value of a session context property.

Parameters


icPropertyQualifierinputcharacter
icPropertyNameinputcharacter

Internal usage


unused

program code (program1/pmfgpro.p)

find first tContext where
           (tContext.tcPropertyQualifier = icPropertyQualifier or
            (icPropertyQualifier = ? and tContext.tcPropertyQualifier <> "QAD":U)) and
           tContext.tcPropertyName = icPropertyName no-error.

/* Reset ERROR-STATUS handle */
assign viCnt = 0 no-error.

if available tContext
then return (if tContext.tcPropertyValue = ? then "" else tContext.tcPropertyValue).
else return ?.