Dear All,
I am trying to copy data from one member to multiple members using following logic.
Package script:
PROMPT (SELECTINPUT,%SOURCE%,,,"ZHQ_CNTRY_CUST")
PROMPT (SELECTINPUT,%DEST%,,,"ZHQ_CNTRY_CUST")
INFO (%EQU%,=)
INFO (%TAB%,;)
TASK (/CPMB/DEFAULT_FORMULAS_LOGIC,TAB,%TAB%)
TASK (/CPMB/DEFAULT_FORMULAS_LOGIC,EQU,%EQU%)
TASK (/CPMB/DEFAULT_FORMULAS_LOGIC,SUSER,%USER%)
TASK (/CPMB/DEFAULT_FORMULAS_LOGIC,SAPPSET,%APPSET%)
TASK (/CPMB/DEFAULT_FORMULAS_LOGIC,SAPP,%APP%)
TASK (/CPMB/DEFAULT_FORMULAS_LOGIC,SELECTION,%SELECTION%)
TASK (/CPMB/DEFAULT_FORMULAS_LOGIC,LOGICFILENAME,ABC.LGF)
TASK (CPMB/DEFAULT_FORMULAS_LOGIC,MEMBERSELECTION,SOURCE%EQU%%SOURCE%%TAB%DEST%EQU%%DEST%)
Logic script: ABC.LGF
*XDIM_MEMBERSET ZHQ_CNTRY_CUST = $SOURCE$
*WHEN ZHQ_CNTRY_CUST
*IS *
*FOR %M%=$DEST$
*REC(EXPRESSION=%VALUE%,ZHQ_CNTRY_CUST=%M%)
*NEXT
*ENDWHEN