[Home] [Help]
1279: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1280: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1281: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
1282: l_buf := FND_MESSAGE.GET;
1283: FND_FILE.put_line(fnd_file.log, l_buf);
1284: end if;
1285: when GL_CURRENCY_API.invalid_currency then
1286: if g_call_by_form = true then
1287: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
1294: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1295: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1296: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
1297: l_buf := FND_MESSAGE.GET;
1298: FND_FILE.put_line(fnd_file.log, l_buf);
1299: end if;
1300: when others then
1301: if g_call_by_form = true then
1302: APP_EXCEPTION.raise_exception;
1306: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1307: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1308: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_main');
1309: l_buf := FND_MESSAGE.GET;
1310: FND_FILE.put_line(fnd_file.log, l_buf);
1311: end if;
1312: end xtr_revl_main;
1313: --------------------------------------------------------
1314: /********************************************************/
1479: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1480: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1481: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_get_deal_value');
1482: l_buf := FND_MESSAGE.GET;
1483: FND_FILE.put_line(fnd_file.log, l_buf);
1484: end if;
1485: END;
1486: --------------------------------------------------------------------------
1487: /************************************************************/
1550: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1551: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1552: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
1553: l_buf := FND_MESSAGE.GET;
1554: FND_FILE.put_line(fnd_file.log, l_buf);
1555: elsif rec.expiry_date <= rec.revldate and rec.status_code = 'EXPIRED' then -- realized
1556: if rec.contract_code is not null then
1557: select RIC_CODE
1558: into l_ric_code
1600: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1601: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1602: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
1603: l_buf := FND_MESSAGE.GET;
1604: FND_FILE.put_line(fnd_file.log, l_buf);
1605: elsif rec.expiry_date <= rec.revldate and rec.status_code = 'EXPIRED' then -- realized
1606: rec.reval_rate := null;
1607: fair_value := 0; -- realized
1608: elsif rec.effective_date <= rec.revldate and rec.status_code = 'EXERCISED' then -- realized
1641: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1642: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1643: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
1644: l_buf := FND_MESSAGE.GET;
1645: FND_FILE.put_line(fnd_file.log, l_buf);
1646: elsif rec.effective_date <= rec.revldate and rec.status_code = 'SETTLED' then -- realized
1647: select settle_rate
1648: into rec.reval_rate
1649: from xtr_deals
1724: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1725: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1726: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
1727: l_buf := FND_MESSAGE.GET;
1728: FND_FILE.put_line(fnd_file.log, l_buf);
1729: elsif rec.effective_date <= rec.revldate and rec.status_code = 'EXPIRED' then -- realized
1730: xtr_revl_mds_init(r_md_in, l_market_set, C_SOURCE, C_SPOT_RATE_IND,
1731: rec.expiry_date, NULL, rec.currencya, rec.currencyb, NULL, NULL, 'M',
1732: rec.batch_id, NULL);
1788: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1789: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1790: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
1791: l_buf := FND_MESSAGE.GET;
1792: FND_FILE.put_line(fnd_file.log, l_buf);
1793: elsif rec.expiry_date <= rec.revldate and rec.status_code = 'EXPIRED' then -- realized
1794: rec.reval_rate := rec.transaction_rate;
1795: fair_value := 0;
1796: elsif rec.effective_date <= rec.revldate and rec.status_code = 'EXERCISED' then -- realized
1889: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1890: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1891: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
1892: l_buf := FND_MESSAGE.GET;
1893: FND_FILE.put_line(fnd_file.log, l_buf);
1894: end if;
1895: when e_invalid_transno then
1896: if g_call_by_form = true then
1897: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_TRANS_NUM');
1904: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1905: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1906: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
1907: l_buf := FND_MESSAGE.GET;
1908: FND_FILE.put_line(fnd_file.log, l_buf);
1909: end if;
1910: when e_invalid_price_model then
1911: if g_call_by_form = true then
1912: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_PRICE_MODEL');
1920: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1921: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1922: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
1923: l_buf := FND_MESSAGE.GET;
1924: FND_FILE.put_line(fnd_file.log, l_buf);
1925: end if;
1926: when e_date_order_error then
1927: if g_call_by_form = true then
1928: FND_MESSAGE.set_name('XTR', 'XTR_DATE_ORDER_ERROR');
1934: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1935: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1936: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
1937: l_buf := FND_MESSAGE.GET;
1938: FND_FILE.put_line(fnd_file.log, l_buf);
1939: end if;
1940: when e_invalid_code then
1941: if g_call_by_form = true then
1942: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CODE');
1948: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1949: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1950: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
1951: l_buf := FND_MESSAGE.GET;
1952: FND_FILE.put_line(fnd_file.log, l_buf);
1953: end if;
1954: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
1955: if g_call_by_form = true then
1956: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
1962: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1963: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1964: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
1965: l_buf := FND_MESSAGE.GET;
1966: FND_FILE.put_line(fnd_file.log, l_buf);
1967: end if;
1968: when XTR_MARKET_DATA_P.e_mdcs_no_curve_found then
1969: if g_call_by_form = true then
1970: FND_MESSAGE.set_name('XTR', 'XTR_NO_CURVE');
1977: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1978: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1979: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
1980: l_buf := FND_MESSAGE.GET;
1981: FND_FILE.put_line(fnd_file.log, l_buf);
1982: end if;
1983: when others then
1984: if g_call_by_form = true then
1985: APP_EXCEPTION.raise_exception;
1989: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
1990: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
1991: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_get_fairvalue');
1992: l_buf := FND_MESSAGE.GET;
1993: FND_FILE.put_line(fnd_file.log, l_buf);
1994: end if;
1995: end xtr_revl_get_fairvalue;
1996: -----------------------------------------
1997: /************************************************************/
2213: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
2214: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
2215: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
2216: l_buf := FND_MESSAGE.GET;
2217: FND_FILE.put_line(fnd_file.log, l_buf);
2218: end if;
2219: when e_invalid_deal_subtype then
2220: if g_call_by_form = true then
2221: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_DEAL_SUBTYPE');
2229: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
2230: FND_MESSAGE.SET_TOKEN('DEAL_SUBTYPE', rec.deal_subtype);
2231: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
2232: l_buf := FND_MESSAGE.GET;
2233: FND_FILE.put_line(fnd_file.log, l_buf);
2234: end if;
2235: when others then
2236: if g_call_by_form = true then
2237: APP_EXCEPTION.raise_exception;
2241: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
2242: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
2243: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_get_unrel_pl');
2244: l_buf := FND_MESSAGE.GET;
2245: FND_FILE.put_line(fnd_file.log, l_buf);
2246: end if;
2247: end xtr_revl_get_unrel_pl;
2248: --------------------------------------------------------------
2249: /*************************************************************************************/
2380: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
2381: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
2382: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
2383: l_buf := FND_MESSAGE.GET;
2384: FND_FILE.put_line(fnd_file.log, l_buf);
2385: end if;
2386: when GL_CURRENCY_API.invalid_currency then
2387: if g_call_by_form = true then
2388: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
2395: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
2396: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
2397: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
2398: l_buf := FND_MESSAGE.GET;
2399: FND_FILE.put_line(fnd_file.log, l_buf);
2400: end if;
2401: when others then
2402: if g_call_by_form = true then
2403: APP_EXCEPTION.raise_exception;
2407: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
2408: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
2409: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_exchange_rate');
2410: l_buf := FND_MESSAGE.GET;
2411: FND_FILE.put_line(fnd_file.log, l_buf);
2412: end if;
2413: End xtr_revl_exchange_rate;
2414: -----------------------------------------------------------------------------------
2415: /*************************************************************************************/
2514: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
2515: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
2516: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_get_curr_gl');
2517: l_buf := FND_MESSAGE.GET;
2518: FND_FILE.put_line(fnd_file.log, l_buf);
2519: end if;
2520: end xtr_revl_get_curr_gl;
2521: -------------------------------------------------------------------
2522: /*******************************************************************/
2815: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
2816: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
2817: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
2818: l_buf := FND_MESSAGE.GET;
2819: FND_FILE.put_line(fnd_file.log, l_buf);
2820: end if;
2821: when GL_CURRENCY_API.invalid_currency then
2822: if g_call_by_form = true then
2823: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
2830: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
2831: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
2832: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
2833: l_buf := FND_MESSAGE.GET;
2834: FND_FILE.put_line(fnd_file.log, l_buf);
2835: end if;
2836: when others then
2837: if g_call_by_form = true then
2838: APP_EXCEPTION.raise_exception;
2842: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
2843: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
2844: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_tmm_curr_gl');
2845: l_buf := FND_MESSAGE.GET;
2846: FND_FILE.put_line(fnd_file.log, l_buf);
2847: end if;
2848: End;
2849: --------------------------------------------------------
2850: /*******************************************************************/
3278: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
3279: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
3280: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
3281: l_buf := FND_MESSAGE.GET;
3282: FND_FILE.put_line(fnd_file.log, l_buf);
3283: end if;
3284: when GL_CURRENCY_API.invalid_currency then
3285: if g_call_by_form = true then
3286: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
3293: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
3294: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
3295: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
3296: l_buf := FND_MESSAGE.GET;
3297: FND_FILE.put_line(fnd_file.log, l_buf);
3298: end if;
3299: when others then
3300: if g_call_by_form = true then
3301: APP_EXCEPTION.raise_exception;
3305: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
3306: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
3307: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_ca_curr_gl');
3308: l_buf := FND_MESSAGE.GET;
3309: FND_FILE.put_line(fnd_file.log, l_buf);
3310: end if;
3311:
3312: End;
3313:
3750: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
3751: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
3752: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
3753: l_buf := FND_MESSAGE.GET;
3754: FND_FILE.put_line(fnd_file.log, l_buf);
3755: end if;
3756: when GL_CURRENCY_API.invalid_currency then
3757: if g_call_by_form = true then
3758: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
3765: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
3766: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
3767: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
3768: l_buf := FND_MESSAGE.GET;
3769: FND_FILE.put_line(fnd_file.log, l_buf);
3770: end if;
3771: when others then
3772: if g_call_by_form = true then
3773: APP_EXCEPTION.raise_exception;
3777: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
3778: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
3779: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_ig_curr_gl');
3780: l_buf := FND_MESSAGE.GET;
3781: FND_FILE.put_line(fnd_file.log, l_buf);
3782: end if;
3783: End;
3784: -----------------------------------------------------------------
3785: /*******************************************************************/
3894: -- Get GL rate on start date
3895: GL_CURRENCY_API.get_triangulation_rate
3896: (rec.reval_ccy, rec.sob_ccy, rec.effective_date, rec.ex_rate_type,
3897: l_deno, l_numer, l_trans_gl_rate);
3898: --FND_FILE.put_line(fnd_file.log, 'l_trans_gl_rate = '||l_trans_gl_rate);
3899: l_unrel_start_rate := l_trans_gl_rate;
3900: l_unrel_start_date := rec.start_date;
3901:
3902: select count(*)
4067: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
4068: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
4069: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
4070: l_buf := FND_MESSAGE.GET;
4071: FND_FILE.put_line(fnd_file.log, l_buf);
4072: end if;
4073: when GL_CURRENCY_API.invalid_currency then
4074: if g_call_by_form = true then
4075: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
4082: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
4083: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
4084: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
4085: l_buf := FND_MESSAGE.GET;
4086: FND_FILE.put_line(fnd_file.log, l_buf);
4087: end if;
4088: when others then
4089: if g_call_by_form = true then
4090: APP_EXCEPTION.raise_exception;
4094: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
4095: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
4096: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_onc_curr_gl');
4097: l_buf := FND_MESSAGE.GET;
4098: FND_FILE.put_line(fnd_file.log, l_buf);
4099: end if;
4100: end;
4101: ---------------------------------------------------------------
4102: /***************************************************************/
4192: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
4193: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
4194: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_get_fv_from_batch');
4195: l_buf := FND_MESSAGE.GET;
4196: FND_FILE.put_line(fnd_file.log, l_buf);
4197: end if;
4198: end xtr_get_fv_from_batch;
4199:
4200: --------------------------------------------------------
4366: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
4367: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
4368: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_init_fv');
4369: l_buf := FND_MESSAGE.GET;
4370: FND_FILE.put_line(fnd_file.log, l_buf);
4371: end if;
4372: end xtr_init_fv;
4373:
4374: -------------------------------------------------------------------
4616: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
4617: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
4618: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
4619: l_buff := FND_MESSAGE.GET;
4620: FND_FILE.put_line(fnd_file.log, l_buff);
4621: end if;
4622: if rec.settle_action = 'PAY' then
4623: end_fv := end_fv * (-1);
4624: end if;
4736: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
4737: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
4738: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
4739: l_buff := FND_MESSAGE.GET;
4740: FND_FILE.put_line(fnd_file.log, l_buff);
4741: end if;
4742: when GL_CURRENCY_API.invalid_currency then
4743: if g_call_by_form = true then
4744: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
4749: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
4750: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
4751: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
4752: l_buff := FND_MESSAGE.GET;
4753: FND_FILE.put_line(fnd_file.log, l_buff);
4754: end if;
4755: when others then
4756: if g_call_by_form = true then
4757: APP_EXCEPTION.raise_exception;
4761: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
4762: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
4763: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_end_fv');
4764: l_buff := FND_MESSAGE.GET;
4765: FND_FILE.put_line(fnd_file.log, l_buff);
4766: end if;
4767: end xtr_end_fv;
4768: --------------------------------------------------------
4769: /*********************************************************/
4858: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
4859: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
4860: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
4861: l_buf := FND_MESSAGE.GET;
4862: FND_FILE.put_line(fnd_file.log, l_buf);
4863: Else
4864: XTR_CALC_P.calc_days_run(rec.revldate, l_start_date,
4865: rec.year_calc_type, l_days_t1, l_year);
4866: xtr_revl_mds_init(r_md_in, l_market_set, C_SOURCE,
4922: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
4923: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
4924: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
4925: l_buf := FND_MESSAGE.GET;
4926: FND_FILE.put_line(fnd_file.log, l_buf);
4927: end if;
4928: when XTR_MARKET_DATA_P.e_mdcs_no_curve_found then
4929: if g_call_by_form = true then
4930: FND_MESSAGE.set_name('XTR', 'XTR_NO_CURVE');
4937: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
4938: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
4939: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
4940: l_buf := FND_MESSAGE.GET;
4941: FND_FILE.put_line(fnd_file.log, l_buf);
4942: end if;
4943: when others then
4944: if g_call_by_form = true then
4945: APP_EXCEPTION.raise_exception;
4949: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
4950: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
4951: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_getprice_fwd');
4952: l_buf := FND_MESSAGE.GET;
4953: FND_FILE.put_line(fnd_file.log, l_buf);
4954: end if;
4955: end xtr_revl_getprice_fwd;
4956: --------------------------------------------------------
4957: /*********************************************************/
5104: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
5105: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
5106: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
5107: l_buf := FND_MESSAGE.GET;
5108: FND_FILE.put_line(fnd_file.log, l_buf);
5109: end if;
5110: when XTR_MARKET_DATA_P.e_mdcs_no_curve_found then
5111: if g_call_by_form = true then
5112: FND_MESSAGE.set_name('XTR', 'XTR_NO_CURVE');
5119: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
5120: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
5121: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
5122: l_buf := FND_MESSAGE.GET;
5123: FND_FILE.put_line(fnd_file.log, l_buf);
5124: end if;
5125: when others then
5126: if g_call_by_form = true then
5127: APP_EXCEPTION.raise_exception;
5131: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
5132: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
5133: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_fv_fra');
5134: l_buf := FND_MESSAGE.GET;
5135: FND_FILE.put_line(fnd_file.log, l_buf);
5136: end if;
5137: end xtr_revl_fv_fra;
5138: -----------------------------------------
5139: /*********************************************************/
5437: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
5438: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
5439: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
5440: l_buff := FND_MESSAGE.GET;
5441: FND_FILE.put_line(fnd_file.log, l_buff);
5442: end if;
5443: when GL_CURRENCY_API.invalid_currency then
5444: if g_call_by_form = true then
5445: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
5452: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
5453: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
5454: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
5455: l_buff := FND_MESSAGE.GET;
5456: FND_FILE.put_line(fnd_file.log, l_buff);
5457: end if;
5458: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
5459: if g_call_by_form = true then
5460: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
5466: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
5467: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
5468: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
5469: l_buff := FND_MESSAGE.GET;
5470: FND_FILE.put_line(fnd_file.log, l_buff);
5471: end if;
5472: when XTR_MARKET_DATA_P.e_mdcs_no_curve_found then
5473: if g_call_by_form = true then
5474: FND_MESSAGE.set_name('XTR', 'XTR_NO_CURVE');
5481: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
5482: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
5483: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
5484: l_buff := FND_MESSAGE.GET;
5485: FND_FILE.put_line(fnd_file.log, l_buff);
5486: end if;
5487: when others then
5488: if g_call_by_form = true then
5489: APP_EXCEPTION.raise_exception;
5493: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
5494: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
5495: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_fv_fx');
5496: l_buff := FND_MESSAGE.GET;
5497: FND_FILE.put_line(fnd_file.log, l_buff);
5498: end if;
5499: end xtr_revl_fv_fx;
5500: --------------------------------------------------------
5501: /*************************************************************/
5686: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
5687: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
5688: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
5689: l_buff := FND_MESSAGE.GET;
5690: FND_FILE.put_line(fnd_file.log, l_buff);
5691: end if;
5692: when GL_CURRENCY_API.invalid_currency then
5693: if g_call_by_form = true then
5694: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
5701: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
5702: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
5703: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
5704: l_buff := FND_MESSAGE.GET;
5705: FND_FILE.put_line(fnd_file.log, l_buff);
5706: end if;
5707: when others then
5708: if g_call_by_form = true then
5709: APP_EXCEPTION.raise_exception;
5713: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
5714: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
5715: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_fx_curr_gl');
5716: l_buff := FND_MESSAGE.GET;
5717: FND_FILE.put_line(fnd_file.log, l_buff);
5718: end if;
5719: End;
5720: ----------------------------------------------------------------
5721: /*********************************************************/
5959: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
5960: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
5961: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
5962: l_buff := FND_MESSAGE.GET;
5963: FND_FILE.put_line(fnd_file.log, l_buff);
5964: end if;
5965: when GL_CURRENCY_API.invalid_currency then
5966: if g_call_by_form = true then
5967: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
5974: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
5975: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
5976: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
5977: l_buff := FND_MESSAGE.GET;
5978: FND_FILE.put_line(fnd_file.log, l_buff);
5979: end if;
5980: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
5981: if g_call_by_form = true then
5982: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
5988: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
5989: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
5990: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
5991: l_buff := FND_MESSAGE.GET;
5992: FND_FILE.put_line(fnd_file.log, l_buff);
5993: end if;
5994: when XTR_MARKET_DATA_P.e_mdcs_no_curve_found then
5995: if g_call_by_form = true then
5996: FND_MESSAGE.set_name('XTR', 'XTR_NO_CURVE');
6003: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
6004: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
6005: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
6006: l_buff := FND_MESSAGE.GET;
6007: FND_FILE.put_line(fnd_file.log, l_buff);
6008: end if;
6009: when others then
6010: if g_call_by_form = true then
6011: APP_EXCEPTION.raise_exception;
6015: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
6016: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
6017: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_getrate_fx');
6018: l_buff := FND_MESSAGE.GET;
6019: FND_FILE.put_line(fnd_file.log, l_buff);
6020: end if;
6021: end xtr_revl_getrate_fx;
6022:
6023:
6306: FND_MESSAGE.SET_NAME('XTR', 'XTR_REVAL_PROS_FAIL');
6307: FND_MESSAGE.SET_TOKEN('HEDGE_NO', rec.deal_no);
6308: FND_MESSAGE.SET_TOKEN('NEXT_TEST_DATE', l_next_test_date);
6309: l_buff := FND_MESSAGE.GET;
6310: FND_FILE.put_line(fnd_file.log, l_buff);
6311: end if;
6312:
6313: xtr_first_reval(rec, l_first);
6314: if l_first = TRUE then -- first time reval
6469: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
6470: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
6471: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
6472: l_buff := FND_MESSAGE.GET;
6473: FND_FILE.put_line(fnd_file.log, l_buff);
6474: end if;
6475: when GL_CURRENCY_API.invalid_currency then
6476: if g_call_by_form = true then
6477: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
6482: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
6483: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
6484: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
6485: l_buff := FND_MESSAGE.GET;
6486: FND_FILE.put_line(fnd_file.log, l_buff);
6487: end if;
6488: when others then
6489: if g_call_by_form = true then
6490: APP_EXCEPTION.raise_exception;
6494: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
6495: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
6496: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_hedge_gl_rate' );
6497: l_buff := FND_MESSAGE.GET;
6498: FND_FILE.put_line(fnd_file.log, l_buff);
6499: end if;
6500:
6501: END xtr_hedge_gl_rate;
6502:
6781: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
6782: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
6783: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
6784: l_buff := FND_MESSAGE.GET;
6785: FND_FILE.put_line(fnd_file.log, l_buff);
6786: end if;
6787: when XTR_MARKET_DATA_P.e_mdcs_no_curve_found then
6788: if g_call_by_form = true then
6789: FND_MESSAGE.set_name('XTR', 'XTR_NO_CURVE');
6796: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
6797: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
6798: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
6799: l_buff := FND_MESSAGE.GET;
6800: FND_FILE.put_line(fnd_file.log, l_buff);
6801: end if;
6802: when others then
6803: if g_call_by_form = true then
6804: APP_EXCEPTION.raise_exception;
6808: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
6809: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
6810: FND_MESSAGE.SET_TOKEN('ISSUE_CODE', rec.contract_code);
6811: l_buff := FND_MESSAGE.GET;
6812: fnd_file.put_line(fnd_file.log, l_buff);
6813: end if;
6814: END xtr_hedge_fwd_rate;
6815:
6816: ---------------------------------------------------------------
6995: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
6996: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
6997: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
6998: l_buf := FND_MESSAGE.GET;
6999: FND_FILE.put_line(fnd_file.log, l_buf);
7000: Else
7001: XTR_CALC_P.calc_days_run(rec.revldate, rec.expiry_date,
7002: rec.year_calc_type, l_no_of_days, l_year);
7003:
7112: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
7113: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
7114: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
7115: l_buf := FND_MESSAGE.GET;
7116: FND_FILE.put_line(fnd_file.log, l_buf);
7117: end if;
7118: when XTR_MARKET_DATA_P.e_mdcs_no_curve_found then
7119: if g_call_by_form = true then
7120: FND_MESSAGE.set_name('XTR', 'XTR_NO_CURVE');
7127: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
7128: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
7129: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
7130: l_buf := FND_MESSAGE.GET;
7131: FND_FILE.put_line(fnd_file.log, l_buf);
7132: end if;
7133: when others then
7134: if g_call_by_form = true then
7135: APP_EXCEPTION.raise_exception;
7139: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
7140: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
7141: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_getprice_fxo');
7142: l_buf := FND_MESSAGE.GET;
7143: FND_FILE.put_line(fnd_file.log, l_buf);
7144: end if;
7145: end xtr_revl_getprice_fxo;
7146: --------------------------------------------------------
7147: /*********************************************************/
7296: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
7297: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
7298: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_fv_ni');
7299: l_buf := FND_MESSAGE.GET;
7300: FND_FILE.put_line(fnd_file.log, l_buf);
7301: end if;
7302: end xtr_revl_fv_ni;
7303: --------------------------------------------------------
7304: /*********************************************************/
7371: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
7372: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
7373: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
7374: l_buf := FND_MESSAGE.GET;
7375: FND_FILE.put_line(fnd_file.log, l_buf);
7376: end if;
7377: when XTR_MARKET_DATA_P.e_mdcs_no_curve_found then
7378: if g_call_by_form = true then
7379: FND_MESSAGE.set_name('XTR', 'XTR_NO_CURVE');
7386: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
7387: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
7388: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
7389: l_buf := FND_MESSAGE.GET;
7390: FND_FILE.put_line(fnd_file.log, l_buf);
7391: end if;
7392: when others then
7393: if g_call_by_form = true then
7394: APP_EXCEPTION.raise_exception;
7398: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
7399: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
7400: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_getrate_ni');
7401: l_buf := FND_MESSAGE.GET;
7402: FND_FILE.put_line(fnd_file.log, l_buf);
7403: end if;
7404:
7405: end xtr_revl_getrate_ni;
7406: -------------------------------------------------------------
7567: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
7568: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
7569: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
7570: l_buff := FND_MESSAGE.GET;
7571: FND_FILE.put_line(fnd_file.log, l_buff);
7572: end if;
7573: when XTR_MARKET_DATA_P.e_mdcs_no_curve_found then
7574: if g_call_by_form = true then
7575: FND_MESSAGE.set_name('XTR', 'XTR_NO_CURVE');
7582: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
7583: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
7584: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
7585: l_buff := FND_MESSAGE.GET;
7586: FND_FILE.put_line(fnd_file.log, l_buff);
7587: end if;
7588: when others then
7589: if g_call_by_form = true then
7590: APP_EXCEPTION.raise_exception;
7594: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
7595: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
7596: FND_MESSAGE.SET_TOKEN('ISSUE_CODE', rec.contract_code);
7597: l_buff := FND_MESSAGE.GET;
7598: fnd_file.put_line(fnd_file.log, l_buff);
7599: end if;
7600: End xtr_revl_getprice_bond;
7601: -------------------------------------------------------------
7602: /*********************************************************/
7723: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
7724: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
7725: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_fv_bond');
7726: l_buf := FND_MESSAGE.GET;
7727: FND_FILE.put_line(fnd_file.log, l_buf);
7728: end if;
7729: End;
7730: --------------------------------------------------------
7731: /*********************************************************/
7785: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
7786: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
7787: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_bond_realamc');
7788: l_buf := FND_MESSAGE.GET;
7789: FND_FILE.put_line(fnd_file.log, l_buf);
7790: end if;
7791: End xtr_revl_bond_realamc;
7792: -------------------------------------------------------------
7793: /*********************************************************/
7918: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
7919: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
7920: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_bond_realmtm');
7921: l_buf := FND_MESSAGE.GET;
7922: FND_FILE.put_line(fnd_file.log, l_buf);
7923: end if;
7924: End xtr_revl_bond_realmtm;
7925: ---------------------------------------------------------------
7926: /*********************************************************/
8132: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
8133: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
8134: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
8135: l_buf := FND_MESSAGE.GET;
8136: FND_FILE.put_line(fnd_file.log, l_buf);
8137: end if;
8138: when GL_CURRENCY_API.invalid_currency then
8139: if g_call_by_form = true then
8140: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
8147: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
8148: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
8149: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
8150: l_buf := FND_MESSAGE.GET;
8151: FND_FILE.put_line(fnd_file.log, l_buf);
8152: end if;
8153: when others then
8154: if g_call_by_form = true then
8155: APP_EXCEPTION.raise_exception;
8159: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
8160: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
8161: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_bond_unreal');
8162: l_buf := FND_MESSAGE.GET;
8163: FND_FILE.put_line(fnd_file.log, l_buf);
8164: end if;
8165: End xtr_revl_bond_unreal;
8166: ----------------------------------------------------------------
8167: /*********************************************************/
8542: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
8543: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
8544: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_fv_tmm');
8545: l_buf := FND_MESSAGE.GET;
8546: FND_FILE.put_line(fnd_file.log, l_buf);
8547: end if;
8548: end xtr_revl_fv_tmm;
8549: --------------------------------------------------------
8550: PROCEDURE xtr_revl_present_value_tmm(
8617: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
8618: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
8619: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
8620: l_buf := FND_MESSAGE.GET;
8621: FND_FILE.put_line(fnd_file.log, l_buf);
8622: end if;
8623: when XTR_MARKET_DATA_P.e_mdcs_no_curve_found then
8624: if g_call_by_form = true then
8625: FND_MESSAGE.set_name('XTR', 'XTR_NO_CURVE');
8632: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
8633: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
8634: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
8635: l_buf := FND_MESSAGE.GET;
8636: FND_FILE.put_line(fnd_file.log, l_buf);
8637: end if;
8638: when others then
8639: if g_call_by_form = true then
8640: APP_EXCEPTION.raise_exception;
8644: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
8645: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
8646: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_present_value_tmm');
8647: l_buf := FND_MESSAGE.GET;
8648: FND_FILE.put_line(fnd_file.log, l_buf);
8649: end if;
8650:
8651: end xtr_revl_present_value_tmm;
8652: --------------------------------------------------------
8763: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
8764: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
8765: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_fv_stock');
8766: l_buf := FND_MESSAGE.GET;
8767: FND_FILE.put_line(fnd_file.log, l_buf);
8768: end if;
8769:
8770: END;
8771:
8827: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
8828: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
8829: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_stock_real');
8830: l_buf := FND_MESSAGE.GET;
8831: FND_FILE.put_line(fnd_file.log, l_buf);
8832: end if;
8833:
8834: END;
8835:
9035: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
9036: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
9037: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
9038: l_buf := FND_MESSAGE.GET;
9039: FND_FILE.put_line(fnd_file.log, l_buf);
9040: end if;
9041: when GL_CURRENCY_API.invalid_currency then
9042: if g_call_by_form = true then
9043: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
9050: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
9051: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
9052: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
9053: l_buf := FND_MESSAGE.GET;
9054: FND_FILE.put_line(fnd_file.log, l_buf);
9055: end if;
9056: when others then
9057: if g_call_by_form = true then
9058: APP_EXCEPTION.raise_exception;
9118: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
9119: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
9120: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
9121: l_buff := FND_MESSAGE.GET;
9122: FND_FILE.put_line(fnd_file.log, l_buff);
9123: end if;
9124: when XTR_MARKET_DATA_P.e_mdcs_no_curve_found then
9125: if g_call_by_form = true then
9126: FND_MESSAGE.set_name('XTR', 'XTR_NO_CURVE');
9133: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
9134: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
9135: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
9136: l_buff := FND_MESSAGE.GET;
9137: FND_FILE.put_line(fnd_file.log, l_buff);
9138: end if;
9139: when others then
9140: if g_call_by_form = true then
9141: APP_EXCEPTION.raise_exception;
9145: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
9146: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
9147: FND_MESSAGE.SET_TOKEN('ISSUE_CODE', rec.contract_code);
9148: l_buff := FND_MESSAGE.GET;
9149: fnd_file.put_line(fnd_file.log, l_buff);
9150: end if;
9151: End xtr_revl_getprice_stock;
9152:
9153: -----------------------------------------------------------
9279: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
9280: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
9281: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
9282: l_buf := FND_MESSAGE.GET;
9283: FND_FILE.put_line(fnd_file.log, l_buf);
9284: end if;
9285: when XTR_MARKET_DATA_P.e_mdcs_no_curve_found then
9286: if g_call_by_form = true then
9287: FND_MESSAGE.set_name('XTR', 'XTR_NO_CURVE');
9294: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
9295: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
9296: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no);
9297: l_buf := FND_MESSAGE.GET;
9298: FND_FILE.put_line(fnd_file.log, l_buf);
9299: end if;
9300: when others then
9301: if g_call_by_form = true then
9302: APP_EXCEPTION.raise_exception;
9306: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
9307: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
9308: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_fv_iro');
9309: l_buf := FND_MESSAGE.GET;
9310: FND_FILE.put_line(fnd_file.log, l_buf);
9311: end if;
9312: end xtr_revl_fv_iro;
9313: --------------------------------------------------------
9314: /*********************************************************/
9587: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
9588: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
9589: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_revl_fv_irs');
9590: l_buf := FND_MESSAGE.GET;
9591: FND_FILE.put_line(fnd_file.log, l_buf);
9592: end if;
9593: end xtr_revl_fv_irs;
9594:
9595: -------------------------------------------------------------
9716: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
9717: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
9718: FND_MESSAGE.SET_TOKEN('TRANS_NO', rec.trans_no||' in procedure xtr_ni_eff_interest');
9719: l_buf := FND_MESSAGE.GET;
9720: FND_FILE.put_line(fnd_file.log, l_buf);
9721: end if;
9722: End;
9723: --------------------------------------------------------
9724: /*******************************************************/
9813: t_log(l_tmp).trans_no || ' Error: ' ||
9814: t_log(l_tmp).log;
9815: end if;
9816: End If;
9817: fnd_file.put_line(fnd_file.log, l_buf);
9818: l_tmp := l_tmp + 1;
9819: end loop;
9820: fnd_file.close;
9821: end t_log_dump;
9816: End If;
9817: fnd_file.put_line(fnd_file.log, l_buf);
9818: l_tmp := l_tmp + 1;
9819: end loop;
9820: fnd_file.close;
9821: end t_log_dump;
9822:
9823: --------------------------------------------------------
9824: PROCEDURE t_log_init is
10403: if l_flag = 'D' then
10404: /*dbms_output.put_line(p_text||' : '||p_value);*/
10405: null;
10406: elsif l_flag = 'C' then
10407: fnd_file.put_line(1,p_text||' : '||p_value);
10408: else
10409: xtr_risk_debug_pkg.dlog(p_text, p_value);
10410: end if;
10411: