Next one - hope it will be working 
:
*SELECT(%TS%,[TARGET],ACCOUNT,"[ID]=%ACCOUNT_SET%") // get list of target accounts
*XDIM_MEMBERSET TIME = 001.2016
*XDIM_MEMBERSET CATEGORY = BUDGET
*XDIM_MEMBERSET ENTITY = BAS(ENTITY_ALL)
*XDIM_MEMBERSET PRODUCT = BAS(PRODUCT_ALL)
*XDIM_MEMBERSET ACCOUNT = REVENUE_BASE
*FOR %ACC%=%ACCOUNT_SET% AND %T%=%TS%
*WHEN ACCOUNT
*IS *
*REC(FACTOR=([ACCOUNT].[%ACC%],[ENTITY].[NO_ENTITY]),ACCOUNT=%T%)
*ENDWHEN
*NEXT
Vadim