project BLF > class Session > method SetPublicData

Description

Procedure for updating the value of public data items, except temp-tables and datasets.


Parameters


icDataListinputcharacterComma seperated list of public data item names to set (full name, including prefix).
Data items with extent and temp-tables are not supported.
icValueListinputcharacterchr(3) seperated list of the values to set.
Format of the values:
decimal = use decimal point, replace comma with a point
date = YYYYMMDD
logical = true / false
oiReturnStatusoutputintegerReturn status of the method.


Internal usage


unused


program code (program/session.p)

<ANCESTOR-CODE>
if oiReturnStatus < 0
then return.

/* ======================================================================= */
/* Always update the cache with the current values                         */
/* ======================================================================= */
<M-1 run StartCacher (output vhFcComponent (ohCacher), 
                      output viFcReturnSuper (oiReturnStatus)) in Session>

assign viItems = num-entries(icDataList).

do viCnt = 1 to viItems:
    assign vhFcComponent = vhCacher.
    <M-2 run SetCharacterValue
       (input  entry(viCnt,icDataList) (icName), 
        input  entry(viCnt,icValueList,chr(3)) (icValue), 
        input  viFcCurrentInstanceId (iiSessionID), 
        output viFcReturnSuper (oiReturnStatus)) in Cacher>

end.