| icDataList | input | character | Comma seperated list of public data item names to set (full name, including prefix). Data items with extent and temp-tables are not supported. |
| icValueList | input | character | chr(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 |
| oiReturnStatus | output | integer | Return status of the method. |
BLF
QadFinancials
<I-1 {bFcRun
&PARAMETERS = "input icDataList, input icValueList, output oiReturnStatus"
&PROCEDURE = "gipr_SetPublicData"}>
if can-do(icDataList, "vcActivityCode")
then do:
if viTransactionID <> 0 and
vcFcComponentName <> "transaction"
then do:
<I-2 {bFcOpenInstance
&CLASS = "Transaction"}>
<M-3 run SetPublicData
(input 'vcActivityCode' (icDataList),
input (if vcactivityCode = '' then '' else 'MENU|' + vcfccomponentName + '|' + vcactivityCode) (icValueList),
output viFcReturnSuper (oiReturnStatus)) in Transaction>
<I-4 {bFcCloseInstance
&CLASS = "Transaction"}>
end.
end.
if can-do(icDataList, "vcCustomComponent") and
vcFcComponentName = "BCustom"
then assign vcFcComponentName = vcFcComponentName + "[" + entry(lookup("vcCustomComponent", icDataList), icValueList, chr(3)) + "]".