[Home] [Help]
1510:
1511: begin
1512: select rounding_factor
1513: into l_round
1514: from xtr_master_currencies_v
1515: where currency = rec.reval_ccy;
1516:
1517: l_market_set := rec.MARKET_DATA_SET;
1518: xtr_revl_get_mds(l_market_set, rec);
2004:
2005: begin
2006: select rounding_factor
2007: into l_round
2008: from xtr_master_currencies_v
2009: where currency = rec.reval_ccy;
2010:
2011: xtr_get_fv_from_batch(rec, l_ex_fv, l_dummy, cum_pl_value, l_dummy2);
2012:
2437: PARAMETER_CODE = C_BEGIN_FV;
2438:
2439: select rounding_factor
2440: into l_round
2441: from xtr_master_currencies_v
2442: where currency = rec.sob_ccy;
2443:
2444: if l_begin_fv = 'BEGIN' then -- currency G/L = last batch's fair value * (rate1 - rate0)
2445: xtr_get_fv_from_batch(rec, l_fair_value, l_dummy, l_dummy1, l_dummy2);
2580:
2581: Begin
2582: select rounding_factor
2583: into l_round
2584: from xtr_master_currencies_v
2585: where currency = rec.sob_ccy;
2586:
2587: if rec.reval_ccy = rec.sob_ccy then -- No curency G/L calculation needed
2588: rel_currency_gl := 0;
2930: Begin
2931: retcode := 1;
2932: select rounding_factor
2933: into l_round
2934: from xtr_master_currencies_v
2935: where currency = rec.sob_ccy;
2936:
2937: ----------------------------------------------------------------------
2938: -- Obtain GL exchange rate on the batch end date
3430: Begin
3431: retcode := 1;
3432: select rounding_factor
3433: into l_round
3434: from xtr_master_currencies_v
3435: where currency = rec.sob_ccy;
3436:
3437: -------------------------------------------------
3438: -- Obtain GL exchange rate on the batch end date
3842: Begin
3843: retcode := 1;
3844: select rounding_factor
3845: into l_round
3846: from xtr_master_currencies_v
3847: where currency = rec.sob_ccy;
3848:
3849: GL_CURRENCY_API.get_triangulation_rate
3850: (rec.reval_ccy, rec.sob_ccy, rec.revldate, rec.ex_rate_type,
4567:
4568: begin
4569: select rounding_factor
4570: into l_round
4571: from xtr_master_currencies_v
4572: where currency = rec.reval_ccy;
4573:
4574: /*********** TMM ending FV **********************/
4575: if rec.deal_type = 'TMM' then
5194: and param_name = 'FX_REALIZED_RATE';
5195:
5196: select rounding_factor
5197: into l_round
5198: from xtr_master_currencies_v
5199: where currency = rec.reval_ccy;
5200:
5201: if g_call_by_form = TRUE then
5202: -- called from form for FX rollover/predelive
5529: rec.reval_ex_rate_two :=NULL;
5530:
5531: select rounding_factor
5532: into l_round
5533: from xtr_master_currencies_v
5534: where currency = rec.reval_ccy;
5535:
5536: l_base_ccy := rec.currencya;
5537: l_contra_ccy := rec.currencyb;
6374:
6375: BEGIN
6376: select rounding_factor
6377: into l_round
6378: from xtr_master_currencies_v
6379: where currency = rec.reval_ccy;
6380:
6381: /* Derive the correct current hedge amount for the broken down piece */
6382: open C_CUR_HEDGE_AMT;
6548: LOG_MSG('Entering xtr_hedge_fwd_rate');
6549:
6550: select rounding_factor
6551: into l_round
6552: from xtr_master_currencies_v
6553: where currency = rec.reval_ccy;
6554:
6555: /* Derive the correct current hedge amount for the broken down piece */
6556: open C_CUR_HEDGE_AMT;
7615:
7616: Begin
7617: select ROUNDING_FACTOR
7618: into l_rounding
7619: from XTR_MASTER_CURRENCIES_V
7620: where currency = rec.currencya;
7621:
7622: bo_rec.batch_id := rec.batch_id;
7623: xtr_first_reval(rec, l_first);
7798:
7799: Begin
7800: select rounding_factor
7801: into l_round
7802: from xtr_master_currencies_v
7803: where currency = rec.reval_ccy;
7804:
7805: r_rd.amount_type := 'REAL'; -- 'REALMTM'
7806: rec.reval_ccy := rec.currencya;
7948: end if;
7949:
7950: select rounding_factor
7951: into l_round
7952: from xtr_master_currencies_v
7953: where currency = rec.reval_ccy;
7954:
7955: If p_resale = TRUE then
7956: -- record is a result of resale. Create last unrealized G/L record for resold amount.
8204: where deal_no = rec.deal_no;
8205:
8206: select rounding_factor
8207: into l_round
8208: from xtr_master_currencies_v
8209: where currency = rec.reval_ccy;
8210:
8211: l_market_set := rec.MARKET_DATA_SET;
8212: xtr_revl_get_mds(l_market_set, rec);
8669: l_buf Varchar2(500);
8670: BEGIN
8671: select ROUNDING_FACTOR
8672: into l_rounding
8673: from XTR_MASTER_CURRENCIES_V
8674: where currency = rec.currencya;
8675: xtr_first_reval(rec, l_first);
8676: if l_first = TRUE then -- first time reval
8677: l_pre_batch := NULL;
8860: end if;
8861:
8862: select rounding_factor
8863: into l_round
8864: from xtr_master_currencies_v
8865: where currency = rec.reval_ccy;
8866:
8867: If p_resale = TRUE then
8868: -- record is a result of resale. Create last unrealized G/L record for resold amount.
9344:
9345: Begin
9346: select rounding_factor
9347: into l_round
9348: from xtr_master_currencies_v
9349: where currency = rec.reval_ccy;
9350:
9351: select fixed_or_floating_rate, day_count_type, rounding_type, start_date, margin
9352: into l_fix_float, l_day_count_type, l_round_type, l_deal_begin_date,
9650:
9651: Begin
9652: select rounding_factor
9653: into l_round
9654: from xtr_master_currencies_v
9655: where currency = rec.reval_ccy;
9656:
9657: select all_in_rate, rounding_type
9658: into l_all_in_rate, l_rounding_type -- 5130446