method SetLogicalValue

Description

Store a logical value in the cache, based on the name that is passed as input parameter. The cached data can be session dependent based on the value of the input parameter ilSessionData.

Parameters

icName	input	character	The name of the cached logical type item for which the value needs to be stored in the cache.
ilValue	input	logical	The value of the cached logical data item with the name specified in icDataItemName, that needs to get stored in the cache.
iiSessionID	input	integer	ID of the session to which the data item belongs. Zero when the data item to store is not session dependent.
oiReturnStatus	output	integer	Return status of the method.

Internal usage

BLF

method Session.SetLogicalValue

program code (program1/cacher.p)

if iiSessionID = 0
or iiSessionID = viCachedSessionID
then do:
    find tCachedData where
         tCachedData.tcName = icName and
         tCachedData.tcDataType = "l"
         no-error.
    if not available tCachedData
    then do :
        create tCachedData.
        assign tCachedData.tcName = icName
               tCachedData.tcDataType = "l".
    end.
    assign tCachedData.tlLogValue    = ilValue
           tCachedData.tlSessionData = (iiSessionID <> 0).
end.