Cal script question to calculate exchange rate

Question

Hi All expert,
I'm new in Essbase, can anyone help and tell me what's wrong with the following cal script?
I got 10 dimension
- Account
- Month
- Year
- Market
- Product
- Cost center
- Currency
- Version
- Currency type - USDvalue, EURvalue, etc.
For data upload, we'll upload only either USD or EUR value, then based on exchange rate for the month (also loaded as data), try to calculate the value in other currency
/* GET EXCHANGE RATE */
     FIX(@LEVMBRS("3000000000",0),@LEVMBRS("Company",0), @LEVMBRS(Market,0),
          @LEVMBRS(Product,0),@LEVMBRS("Cost Centre",0),@LEVMBRS(Month,0),
          @LEVMBRS(Year,0),@LEVMBRS("Version",0),@LEVMBRS(Currency,0))
          "USDValue" (
          IF (@ISMBR("USD"))
               USDValue;
          ELSE
          EURValue / (@CURRMBR("Year"))->(@CURRMBR("Month"))->(@CURRMBR("Version"))
          ->(@CURRMBR("Currency"))->"CTR_ACC"->"MKT_HK"->"PROD_TRY"->"999999"->"COM_1010"->
          "RPT to EUR ex rate";
          ENDIF;
ENDFIX;
CALC All;
I got stuck after running this script, thanks for all your help in advace.

Answer 1

/* GET EXCHANGE RATE */
     FIX(@LEVMBRS("3000000000",0),@LEVMBRS("Company",0), @LEVMBRS(Market,0),
          @LEVMBRS(Product,0),@LEVMBRS("Cost Centre",0),@LEVMBRS(Month,0),
          @LEVMBRS(Year,0),@LEVMBRS("Version",0),@LEVMBRS(Currency,0))
          "USDValue" (
          IF (@ISMBR("USD"))
               USDValue;
          ELSE
          EURValue / (@CURRMBR("Year"))->(@CURRMBR("Month"))->(@CURRMBR("Version"))
          ->(@CURRMBR("Currency"))->"CTR_ACC"->"MKT_HK"->"PROD_TRY"->"999999"->"COM_1010"->
          "RPT to EUR ex rate";
          ENDIF;
ENDFIX;
CALC All;
I got stuck after running this script, thanks for all your help in advace.I'm not sure what you mean by you got stuck after running the script, can you eloborate? I will point out that there are some things in your script that are a bit odd.
(@CURRMBR("Year"))->(@CURRMBR("Month"))->(@CURRMBR("Version"))->(@CURRMBR("Currency"))
is unnecessary as the fix statement above it will set that all for you.
I think I would rewrite this as
     FIX(@LEVMBRS("3000000000",0),@LEVMBRS("Company",0), @LEVMBRS(Market,0),
          @LEVMBRS(Product,0),@LEVMBRS("Cost Centre",0),@LEVMBRS(Month,0),
          @LEVMBRS(Year,0),@LEVMBRS("Version",0),@LEVMBRS(Currency,0))
          "USDValue" (
          IF ( @ISMBR("USD"))
          "USDValue" = EURValue / "CTR_ACC"->"MKT_HK"->"PROD_TRY"->"999999"->"COM_1010"->"RPT to EUR ex rate";
Else
          "EURValue" = USDValue * "CTR_ACC"->"MKT_HK"->"PROD_TRY"->"999999"->"COM_1010"->"RPT to EUR ex rate";
          ENDIF;
ENDFIX;