Run allocation error

Dear expert,

I have run Allocation successfully but nothing saved in database. source script like this:

*XDIM_MEMBERSET TIME=2013.01,2014.01

*XDIM_MEMBERSET ACCOUNT = BS122

*XDIM_MEMBERSET CATEGORY=Plan,Actual

*XDIM_MEMBERSET ENTITY =$SOURCE$,$TARGET$

*WHEN ENTITY

*IS "Africa"

*REC(EXPRESSION=$ASARENT$,TIME=2014.01,CATEGORY=Plan)

*ENDWHEN

*COMMIT

*RUNALLOCATION

*FACTOR=USING/TOTAL

*DIM ACCOUNT  WHAT=BS122;                WHERE=<<<;               USING=<<<;         TOTAL=<<<

*DIM ENTITY    WHAT=$SOURCE$;  WHERE=BAS($TARGET$);  USING=<<<;          TOTAL=<<<

*DIM TIME     WHAT=>>>;                    WHERE=2014.01;      USING=2013.01;  TOTAL=<<<

*DIM CATEGORY     WHAT=>>>;                   WHERE=Plan;      USING=Actual;  TOTAL=<<<

*ENDALLOCATION

*WHEN ENTITY

*IS "Africa"

*REC(EXPRESSION=0,TIME=2014.01,CATEGORY=Plan)

*ENDWHEN

*COMMIT

Please show what I am wrong and how to correct it.

thanks so much

HUNGTH