project BLF > class Cacher > method SetDecimalValue

Description

Store a decimal 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


icNameinputcharacterThe name of the cached decimal type item for which the value needs to be stored in the cache.
idValueinputdecimalThe value of the cached decimal data item with the name specified in icDataItemName, that needs to get stored in the cache.
iiSessionIDinputintegerID of the session to which the data item belongs.
Zero when the data item to store is not session dependent.
oiReturnStatusoutputintegerReturn status of the method.


Internal usage


BLF
method Session.SetDecimalValue


program code (program1/cacher.p)

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