404: */
405:
406: EXCEPTION
407: When e_no_pre_batch then
408: FND_MESSAGE.Set_Name('XTR', 'XTR_NO_PRE_REVAL');
409: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
410: APP_EXCEPTION.raise_exception;
411: When e_batch_been_run then
412: FND_MESSAGE.Set_Name('XTR', 'XTR_BATCH_IN_REVAL');
405:
406: EXCEPTION
407: When e_no_pre_batch then
408: FND_MESSAGE.Set_Name('XTR', 'XTR_NO_PRE_REVAL');
409: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
410: APP_EXCEPTION.raise_exception;
411: When e_batch_been_run then
412: FND_MESSAGE.Set_Name('XTR', 'XTR_BATCH_IN_REVAL');
413: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
408: FND_MESSAGE.Set_Name('XTR', 'XTR_NO_PRE_REVAL');
409: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
410: APP_EXCEPTION.raise_exception;
411: When e_batch_been_run then
412: FND_MESSAGE.Set_Name('XTR', 'XTR_BATCH_IN_REVAL');
413: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
414: APP_EXCEPTION.raise_exception;
415:
416: end CALC_REVALS;
409: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
410: APP_EXCEPTION.raise_exception;
411: When e_batch_been_run then
412: FND_MESSAGE.Set_Name('XTR', 'XTR_BATCH_IN_REVAL');
413: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
414: APP_EXCEPTION.raise_exception;
415:
416: end CALC_REVALS;
417: --------------------------------------------------------
1269:
1270: EXCEPTION
1271: when GL_CURRENCY_API.no_rate then
1272: if g_call_by_form = true then
1273: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
1274: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1275: APP_EXCEPTION.raise_exception;
1276: else
1277: set_err_log(retcode);
1270: EXCEPTION
1271: when GL_CURRENCY_API.no_rate then
1272: if g_call_by_form = true then
1273: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
1274: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1275: APP_EXCEPTION.raise_exception;
1276: else
1277: set_err_log(retcode);
1278: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
1274: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1275: APP_EXCEPTION.raise_exception;
1276: else
1277: set_err_log(retcode);
1278: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
1275: APP_EXCEPTION.raise_exception;
1276: else
1277: set_err_log(retcode);
1278: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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);
1276: else
1277: set_err_log(retcode);
1278: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
1277: set_err_log(retcode);
1278: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
1278: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
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');
1288: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1289: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
1290: APP_EXCEPTION.raise_exception;
1291: else
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');
1288: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1289: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
1290: APP_EXCEPTION.raise_exception;
1291: else
1292: set_err_log(retcode);
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');
1288: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1289: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
1290: APP_EXCEPTION.raise_exception;
1291: else
1292: set_err_log(retcode);
1293: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
1289: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
1290: APP_EXCEPTION.raise_exception;
1291: else
1292: set_err_log(retcode);
1293: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
1290: APP_EXCEPTION.raise_exception;
1291: else
1292: set_err_log(retcode);
1293: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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);
1291: else
1292: set_err_log(retcode);
1293: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
1292: set_err_log(retcode);
1293: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
1293: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
1301: if g_call_by_form = true then
1302: APP_EXCEPTION.raise_exception;
1303: else
1304: set_err_log(retcode);
1305: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
1302: APP_EXCEPTION.raise_exception;
1303: else
1304: set_err_log(retcode);
1305: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
1303: else
1304: set_err_log(retcode);
1305: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
1304: set_err_log(retcode);
1305: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
1305: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: --------------------------------------------------------
1474: if g_call_by_form = true then
1475: APP_EXCEPTION.raise_exception;
1476: else
1477: set_err_log(retcode);
1478: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
1475: APP_EXCEPTION.raise_exception;
1476: else
1477: set_err_log(retcode);
1478: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
1476: else
1477: set_err_log(retcode);
1478: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
1477: set_err_log(retcode);
1478: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
1478: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: --------------------------------------------------------------------------
1545: if rec.effective_date <= rec.revldate and rec.status_code = 'CURRENT' then -- unrealized
1546: fair_value := 0;
1547: rec.reval_rate := null;
1548: set_err_log(retcode);
1549: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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;
1546: fair_value := 0;
1547: rec.reval_rate := null;
1548: set_err_log(retcode);
1549: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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);
1547: rec.reval_rate := null;
1548: set_err_log(retcode);
1549: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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
1548: set_err_log(retcode);
1549: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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
1549: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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
1595: if rec.effective_date <= rec.revldate and rec.status_code = 'CURRENT' then -- unrealized
1596: rec.reval_rate := null;
1597: fair_value := 0;
1598: set_err_log(retcode);
1599: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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;
1596: rec.reval_rate := null;
1597: fair_value := 0;
1598: set_err_log(retcode);
1599: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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);
1597: fair_value := 0;
1598: set_err_log(retcode);
1599: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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
1598: set_err_log(retcode);
1599: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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;
1599: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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
1636: fair_value := null;
1637: rec.reval_rate := null;
1638: end if;
1639: set_err_log(retcode);
1640: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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;
1637: rec.reval_rate := null;
1638: end if;
1639: set_err_log(retcode);
1640: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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);
1638: end if;
1639: set_err_log(retcode);
1640: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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
1639: set_err_log(retcode);
1640: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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
1640: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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
1719: fair_value := null;
1720: rec.reval_rate := null;
1721: end if;
1722: set_err_log(retcode);
1723: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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;
1720: rec.reval_rate := null;
1721: end if;
1722: set_err_log(retcode);
1723: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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);
1721: end if;
1722: set_err_log(retcode);
1723: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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
1722: set_err_log(retcode);
1723: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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,
1723: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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',
1783: else
1784: fair_value := null;
1785: end if;
1786: set_err_log(retcode);
1787: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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;
1784: fair_value := null;
1785: end if;
1786: set_err_log(retcode);
1787: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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);
1785: end if;
1786: set_err_log(retcode);
1787: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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
1786: set_err_log(retcode);
1787: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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;
1787: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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;
1878:
1879: EXCEPTION
1880: when e_invalid_dealtype then
1881: if g_call_by_form = true then
1882: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_DEAL_TYPE');
1883: FND_MESSAGE.Set_Token('DEAL_TYPE', rec.deal_type);
1884: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1885: APP_EXCEPTION.raise_exception;
1886: else
1879: EXCEPTION
1880: when e_invalid_dealtype then
1881: if g_call_by_form = true then
1882: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_DEAL_TYPE');
1883: FND_MESSAGE.Set_Token('DEAL_TYPE', rec.deal_type);
1884: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1885: APP_EXCEPTION.raise_exception;
1886: else
1887: set_err_log(retcode);
1880: when e_invalid_dealtype then
1881: if g_call_by_form = true then
1882: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_DEAL_TYPE');
1883: FND_MESSAGE.Set_Token('DEAL_TYPE', rec.deal_type);
1884: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1885: APP_EXCEPTION.raise_exception;
1886: else
1887: set_err_log(retcode);
1888: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALTYPE');
1884: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1885: APP_EXCEPTION.raise_exception;
1886: else
1887: set_err_log(retcode);
1888: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALTYPE');
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;
1885: APP_EXCEPTION.raise_exception;
1886: else
1887: set_err_log(retcode);
1888: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALTYPE');
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);
1886: else
1887: set_err_log(retcode);
1888: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALTYPE');
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;
1887: set_err_log(retcode);
1888: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALTYPE');
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
1888: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALTYPE');
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
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');
1898: FND_MESSAGE.Set_Token('DEAL_NO', rec.deal_no);
1899: FND_MESSAGE.Set_Token('TRANS_NO', rec.trans_no);
1900: APP_EXCEPTION.raise_exception;
1901: else
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');
1898: FND_MESSAGE.Set_Token('DEAL_NO', rec.deal_no);
1899: FND_MESSAGE.Set_Token('TRANS_NO', rec.trans_no);
1900: APP_EXCEPTION.raise_exception;
1901: else
1902: set_err_log(retcode);
1895: when e_invalid_transno then
1896: if g_call_by_form = true then
1897: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_TRANS_NUM');
1898: FND_MESSAGE.Set_Token('DEAL_NO', rec.deal_no);
1899: FND_MESSAGE.Set_Token('TRANS_NO', rec.trans_no);
1900: APP_EXCEPTION.raise_exception;
1901: else
1902: set_err_log(retcode);
1903: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_TRANSNUM');
1899: FND_MESSAGE.Set_Token('TRANS_NO', rec.trans_no);
1900: APP_EXCEPTION.raise_exception;
1901: else
1902: set_err_log(retcode);
1903: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_TRANSNUM');
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;
1900: APP_EXCEPTION.raise_exception;
1901: else
1902: set_err_log(retcode);
1903: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_TRANSNUM');
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);
1901: else
1902: set_err_log(retcode);
1903: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_TRANSNUM');
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;
1902: set_err_log(retcode);
1903: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_TRANSNUM');
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
1903: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_TRANSNUM');
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
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');
1913: FND_MESSAGE.Set_Token('PRICE_MODEL', rec.pricing_model);
1914: FND_MESSAGE.Set_Token('DEAL_TYPE', rec.deal_type);
1915: FND_MESSAGE.Set_Token('DEAL_NO', rec.deal_no);
1916: APP_EXCEPTION.raise_exception;
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');
1913: FND_MESSAGE.Set_Token('PRICE_MODEL', rec.pricing_model);
1914: FND_MESSAGE.Set_Token('DEAL_TYPE', rec.deal_type);
1915: FND_MESSAGE.Set_Token('DEAL_NO', rec.deal_no);
1916: APP_EXCEPTION.raise_exception;
1917: else
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');
1913: FND_MESSAGE.Set_Token('PRICE_MODEL', rec.pricing_model);
1914: FND_MESSAGE.Set_Token('DEAL_TYPE', rec.deal_type);
1915: FND_MESSAGE.Set_Token('DEAL_NO', rec.deal_no);
1916: APP_EXCEPTION.raise_exception;
1917: else
1918: set_err_log(retcode);
1911: if g_call_by_form = true then
1912: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_PRICE_MODEL');
1913: FND_MESSAGE.Set_Token('PRICE_MODEL', rec.pricing_model);
1914: FND_MESSAGE.Set_Token('DEAL_TYPE', rec.deal_type);
1915: FND_MESSAGE.Set_Token('DEAL_NO', rec.deal_no);
1916: APP_EXCEPTION.raise_exception;
1917: else
1918: set_err_log(retcode);
1919: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_PRICEMODEL');
1915: FND_MESSAGE.Set_Token('DEAL_NO', rec.deal_no);
1916: APP_EXCEPTION.raise_exception;
1917: else
1918: set_err_log(retcode);
1919: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_PRICEMODEL');
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;
1916: APP_EXCEPTION.raise_exception;
1917: else
1918: set_err_log(retcode);
1919: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_PRICEMODEL');
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);
1917: else
1918: set_err_log(retcode);
1919: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_PRICEMODEL');
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;
1918: set_err_log(retcode);
1919: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_PRICEMODEL');
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
1919: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_PRICEMODEL');
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
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');
1929: FND_MESSAGE.Set_Token('DEAL_NO', rec.deal_no);
1930: APP_EXCEPTION.raise_exception;
1931: else
1932: set_err_log(retcode);
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');
1929: FND_MESSAGE.Set_Token('DEAL_NO', rec.deal_no);
1930: APP_EXCEPTION.raise_exception;
1931: else
1932: set_err_log(retcode);
1933: FND_MESSAGE.SET_NAME('XTR', 'XTR_SPOTDATE_REVALDATE');
1929: FND_MESSAGE.Set_Token('DEAL_NO', rec.deal_no);
1930: APP_EXCEPTION.raise_exception;
1931: else
1932: set_err_log(retcode);
1933: FND_MESSAGE.SET_NAME('XTR', 'XTR_SPOTDATE_REVALDATE');
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;
1930: APP_EXCEPTION.raise_exception;
1931: else
1932: set_err_log(retcode);
1933: FND_MESSAGE.SET_NAME('XTR', 'XTR_SPOTDATE_REVALDATE');
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);
1931: else
1932: set_err_log(retcode);
1933: FND_MESSAGE.SET_NAME('XTR', 'XTR_SPOTDATE_REVALDATE');
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;
1932: set_err_log(retcode);
1933: FND_MESSAGE.SET_NAME('XTR', 'XTR_SPOTDATE_REVALDATE');
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
1933: FND_MESSAGE.SET_NAME('XTR', 'XTR_SPOTDATE_REVALDATE');
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
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');
1943: FND_MESSAGE.Set_Token('DEAL_NO', rec.deal_no);
1944: APP_EXCEPTION.raise_exception;
1945: else
1946: set_err_log(retcode);
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');
1943: FND_MESSAGE.Set_Token('DEAL_NO', rec.deal_no);
1944: APP_EXCEPTION.raise_exception;
1945: else
1946: set_err_log(retcode);
1947: FND_MESSAGE.SET_NAME('XTR', 'XTR_INTERNAL_ERR');
1943: FND_MESSAGE.Set_Token('DEAL_NO', rec.deal_no);
1944: APP_EXCEPTION.raise_exception;
1945: else
1946: set_err_log(retcode);
1947: FND_MESSAGE.SET_NAME('XTR', 'XTR_INTERNAL_ERR');
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;
1944: APP_EXCEPTION.raise_exception;
1945: else
1946: set_err_log(retcode);
1947: FND_MESSAGE.SET_NAME('XTR', 'XTR_INTERNAL_ERR');
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);
1945: else
1946: set_err_log(retcode);
1947: FND_MESSAGE.SET_NAME('XTR', 'XTR_INTERNAL_ERR');
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;
1946: set_err_log(retcode);
1947: FND_MESSAGE.SET_NAME('XTR', 'XTR_INTERNAL_ERR');
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
1947: FND_MESSAGE.SET_NAME('XTR', 'XTR_INTERNAL_ERR');
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
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');
1957: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1958: APP_EXCEPTION.raise_exception;
1959: else
1960: set_err_log(retcode);
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');
1957: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1958: APP_EXCEPTION.raise_exception;
1959: else
1960: set_err_log(retcode);
1961: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
1957: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1958: APP_EXCEPTION.raise_exception;
1959: else
1960: set_err_log(retcode);
1961: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
1958: APP_EXCEPTION.raise_exception;
1959: else
1960: set_err_log(retcode);
1961: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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);
1959: else
1960: set_err_log(retcode);
1961: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
1960: set_err_log(retcode);
1961: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
1961: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
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');
1971: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
1972: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1973: APP_EXCEPTION.raise_exception;
1974: else
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');
1971: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
1972: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1973: APP_EXCEPTION.raise_exception;
1974: else
1975: set_err_log(retcode);
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');
1971: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
1972: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1973: APP_EXCEPTION.raise_exception;
1974: else
1975: set_err_log(retcode);
1976: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
1972: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
1973: APP_EXCEPTION.raise_exception;
1974: else
1975: set_err_log(retcode);
1976: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
1973: APP_EXCEPTION.raise_exception;
1974: else
1975: set_err_log(retcode);
1976: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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);
1974: else
1975: set_err_log(retcode);
1976: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
1975: set_err_log(retcode);
1976: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
1976: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
1984: if g_call_by_form = true then
1985: APP_EXCEPTION.raise_exception;
1986: else
1987: set_err_log(retcode);
1988: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
1985: APP_EXCEPTION.raise_exception;
1986: else
1987: set_err_log(retcode);
1988: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
1986: else
1987: set_err_log(retcode);
1988: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
1987: set_err_log(retcode);
1988: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
1988: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: -----------------------------------------
2202:
2203: EXCEPTION
2204: when e_invalid_dealtype then
2205: if g_call_by_form = true then
2206: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_DEAL_TYPE');
2207: FND_MESSAGE.set_token('DEAL_TYPE', rec.deal_type);
2208: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2209: APP_EXCEPTION.raise_exception;
2210: else
2203: EXCEPTION
2204: when e_invalid_dealtype then
2205: if g_call_by_form = true then
2206: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_DEAL_TYPE');
2207: FND_MESSAGE.set_token('DEAL_TYPE', rec.deal_type);
2208: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2209: APP_EXCEPTION.raise_exception;
2210: else
2211: set_err_log(retcode);
2204: when e_invalid_dealtype then
2205: if g_call_by_form = true then
2206: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_DEAL_TYPE');
2207: FND_MESSAGE.set_token('DEAL_TYPE', rec.deal_type);
2208: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2209: APP_EXCEPTION.raise_exception;
2210: else
2211: set_err_log(retcode);
2212: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALTYPE');
2208: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2209: APP_EXCEPTION.raise_exception;
2210: else
2211: set_err_log(retcode);
2212: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALTYPE');
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;
2209: APP_EXCEPTION.raise_exception;
2210: else
2211: set_err_log(retcode);
2212: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALTYPE');
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);
2210: else
2211: set_err_log(retcode);
2212: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALTYPE');
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;
2211: set_err_log(retcode);
2212: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALTYPE');
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
2212: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALTYPE');
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
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');
2222: FND_MESSAGE.set_token('DEAL_TYPE', rec.deal_type);
2223: FND_MESSAGE.set_token('DEAL_SUBTYPE', rec.deal_subtype);
2224: APP_EXCEPTION.raise_exception;
2225: else
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');
2222: FND_MESSAGE.set_token('DEAL_TYPE', rec.deal_type);
2223: FND_MESSAGE.set_token('DEAL_SUBTYPE', rec.deal_subtype);
2224: APP_EXCEPTION.raise_exception;
2225: else
2226: set_err_log(retcode);
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');
2222: FND_MESSAGE.set_token('DEAL_TYPE', rec.deal_type);
2223: FND_MESSAGE.set_token('DEAL_SUBTYPE', rec.deal_subtype);
2224: APP_EXCEPTION.raise_exception;
2225: else
2226: set_err_log(retcode);
2227: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALSUBTYPE');
2223: FND_MESSAGE.set_token('DEAL_SUBTYPE', rec.deal_subtype);
2224: APP_EXCEPTION.raise_exception;
2225: else
2226: set_err_log(retcode);
2227: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALSUBTYPE');
2228: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
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);
2224: APP_EXCEPTION.raise_exception;
2225: else
2226: set_err_log(retcode);
2227: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALSUBTYPE');
2228: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
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;
2225: else
2226: set_err_log(retcode);
2227: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALSUBTYPE');
2228: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
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);
2226: set_err_log(retcode);
2227: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALSUBTYPE');
2228: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
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;
2227: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_DEALSUBTYPE');
2228: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
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
2228: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
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
2236: if g_call_by_form = true then
2237: APP_EXCEPTION.raise_exception;
2238: else
2239: set_err_log(retcode);
2240: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
2237: APP_EXCEPTION.raise_exception;
2238: else
2239: set_err_log(retcode);
2240: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
2238: else
2239: set_err_log(retcode);
2240: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
2239: set_err_log(retcode);
2240: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
2240: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: --------------------------------------------------------------
2370:
2371: EXCEPTION
2372: when GL_CURRENCY_API.no_rate then
2373: if g_call_by_form = true then
2374: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
2375: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2376: APP_EXCEPTION.raise_exception;
2377: else
2378: set_err_log(retcode);
2371: EXCEPTION
2372: when GL_CURRENCY_API.no_rate then
2373: if g_call_by_form = true then
2374: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
2375: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2376: APP_EXCEPTION.raise_exception;
2377: else
2378: set_err_log(retcode);
2379: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
2375: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2376: APP_EXCEPTION.raise_exception;
2377: else
2378: set_err_log(retcode);
2379: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
2376: APP_EXCEPTION.raise_exception;
2377: else
2378: set_err_log(retcode);
2379: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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);
2377: else
2378: set_err_log(retcode);
2379: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
2378: set_err_log(retcode);
2379: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
2379: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
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');
2389: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2390: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
2391: APP_EXCEPTION.raise_exception;
2392: else
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');
2389: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2390: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
2391: APP_EXCEPTION.raise_exception;
2392: else
2393: set_err_log(retcode);
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');
2389: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2390: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
2391: APP_EXCEPTION.raise_exception;
2392: else
2393: set_err_log(retcode);
2394: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
2390: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
2391: APP_EXCEPTION.raise_exception;
2392: else
2393: set_err_log(retcode);
2394: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
2391: APP_EXCEPTION.raise_exception;
2392: else
2393: set_err_log(retcode);
2394: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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);
2392: else
2393: set_err_log(retcode);
2394: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
2393: set_err_log(retcode);
2394: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
2394: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
2402: if g_call_by_form = true then
2403: APP_EXCEPTION.raise_exception;
2404: else
2405: set_err_log(retcode);
2406: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
2403: APP_EXCEPTION.raise_exception;
2404: else
2405: set_err_log(retcode);
2406: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
2404: else
2405: set_err_log(retcode);
2406: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
2405: set_err_log(retcode);
2406: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
2406: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: -----------------------------------------------------------------------------------
2509: if g_call_by_form = true then
2510: APP_EXCEPTION.raise_exception;
2511: else
2512: set_err_log(retcode);
2513: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
2510: APP_EXCEPTION.raise_exception;
2511: else
2512: set_err_log(retcode);
2513: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
2511: else
2512: set_err_log(retcode);
2513: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
2512: set_err_log(retcode);
2513: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
2513: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: -------------------------------------------------------------------
2805:
2806: EXCEPTION
2807: when GL_CURRENCY_API.no_rate then
2808: if g_call_by_form = true then
2809: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
2810: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2811: APP_EXCEPTION.raise_exception;
2812: else
2813: set_err_log(retcode);
2806: EXCEPTION
2807: when GL_CURRENCY_API.no_rate then
2808: if g_call_by_form = true then
2809: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
2810: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2811: APP_EXCEPTION.raise_exception;
2812: else
2813: set_err_log(retcode);
2814: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
2810: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2811: APP_EXCEPTION.raise_exception;
2812: else
2813: set_err_log(retcode);
2814: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
2811: APP_EXCEPTION.raise_exception;
2812: else
2813: set_err_log(retcode);
2814: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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);
2812: else
2813: set_err_log(retcode);
2814: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
2813: set_err_log(retcode);
2814: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
2814: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
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');
2824: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2825: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
2826: APP_EXCEPTION.raise_exception;
2827: else
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');
2824: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2825: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
2826: APP_EXCEPTION.raise_exception;
2827: else
2828: set_err_log(retcode);
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');
2824: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
2825: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
2826: APP_EXCEPTION.raise_exception;
2827: else
2828: set_err_log(retcode);
2829: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
2825: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
2826: APP_EXCEPTION.raise_exception;
2827: else
2828: set_err_log(retcode);
2829: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
2826: APP_EXCEPTION.raise_exception;
2827: else
2828: set_err_log(retcode);
2829: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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);
2827: else
2828: set_err_log(retcode);
2829: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
2828: set_err_log(retcode);
2829: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
2829: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
2837: if g_call_by_form = true then
2838: APP_EXCEPTION.raise_exception;
2839: else
2840: set_err_log(retcode);
2841: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
2838: APP_EXCEPTION.raise_exception;
2839: else
2840: set_err_log(retcode);
2841: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
2839: else
2840: set_err_log(retcode);
2841: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
2840: set_err_log(retcode);
2841: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
2841: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: --------------------------------------------------------
3268:
3269: EXCEPTION
3270: when GL_CURRENCY_API.no_rate then
3271: if g_call_by_form = true then
3272: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
3273: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
3274: APP_EXCEPTION.raise_exception;
3275: else
3276: set_err_log(retcode);
3269: EXCEPTION
3270: when GL_CURRENCY_API.no_rate then
3271: if g_call_by_form = true then
3272: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
3273: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
3274: APP_EXCEPTION.raise_exception;
3275: else
3276: set_err_log(retcode);
3277: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
3273: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
3274: APP_EXCEPTION.raise_exception;
3275: else
3276: set_err_log(retcode);
3277: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
3274: APP_EXCEPTION.raise_exception;
3275: else
3276: set_err_log(retcode);
3277: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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);
3275: else
3276: set_err_log(retcode);
3277: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
3276: set_err_log(retcode);
3277: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
3277: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
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');
3287: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
3288: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
3289: APP_EXCEPTION.raise_exception;
3290: else
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');
3287: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
3288: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
3289: APP_EXCEPTION.raise_exception;
3290: else
3291: set_err_log(retcode);
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');
3287: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
3288: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
3289: APP_EXCEPTION.raise_exception;
3290: else
3291: set_err_log(retcode);
3292: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
3288: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
3289: APP_EXCEPTION.raise_exception;
3290: else
3291: set_err_log(retcode);
3292: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
3289: APP_EXCEPTION.raise_exception;
3290: else
3291: set_err_log(retcode);
3292: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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);
3290: else
3291: set_err_log(retcode);
3292: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
3291: set_err_log(retcode);
3292: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
3292: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
3300: if g_call_by_form = true then
3301: APP_EXCEPTION.raise_exception;
3302: else
3303: set_err_log(retcode);
3304: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
3301: APP_EXCEPTION.raise_exception;
3302: else
3303: set_err_log(retcode);
3304: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
3302: else
3303: set_err_log(retcode);
3304: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
3303: set_err_log(retcode);
3304: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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:
3304: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
3740: retcode := 0;
3741: EXCEPTION
3742: when GL_CURRENCY_API.no_rate then
3743: if g_call_by_form = true then
3744: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
3745: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
3746: APP_EXCEPTION.raise_exception;
3747: else
3748: set_err_log(retcode);
3741: EXCEPTION
3742: when GL_CURRENCY_API.no_rate then
3743: if g_call_by_form = true then
3744: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
3745: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
3746: APP_EXCEPTION.raise_exception;
3747: else
3748: set_err_log(retcode);
3749: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
3745: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
3746: APP_EXCEPTION.raise_exception;
3747: else
3748: set_err_log(retcode);
3749: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
3746: APP_EXCEPTION.raise_exception;
3747: else
3748: set_err_log(retcode);
3749: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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);
3747: else
3748: set_err_log(retcode);
3749: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
3748: set_err_log(retcode);
3749: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
3749: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
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');
3759: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
3760: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
3761: APP_EXCEPTION.raise_exception;
3762: else
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');
3759: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
3760: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
3761: APP_EXCEPTION.raise_exception;
3762: else
3763: set_err_log(retcode);
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');
3759: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
3760: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
3761: APP_EXCEPTION.raise_exception;
3762: else
3763: set_err_log(retcode);
3764: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
3760: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
3761: APP_EXCEPTION.raise_exception;
3762: else
3763: set_err_log(retcode);
3764: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
3761: APP_EXCEPTION.raise_exception;
3762: else
3763: set_err_log(retcode);
3764: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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);
3762: else
3763: set_err_log(retcode);
3764: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
3763: set_err_log(retcode);
3764: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
3764: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
3772: if g_call_by_form = true then
3773: APP_EXCEPTION.raise_exception;
3774: else
3775: set_err_log(retcode);
3776: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
3773: APP_EXCEPTION.raise_exception;
3774: else
3775: set_err_log(retcode);
3776: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
3774: else
3775: set_err_log(retcode);
3776: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
3775: set_err_log(retcode);
3776: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
3776: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: -----------------------------------------------------------------
4057: retcode := 0;
4058: EXCEPTION
4059: when GL_CURRENCY_API.no_rate then
4060: if g_call_by_form = true then
4061: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
4062: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
4063: APP_EXCEPTION.raise_exception;
4064: else
4065: set_err_log(retcode);
4058: EXCEPTION
4059: when GL_CURRENCY_API.no_rate then
4060: if g_call_by_form = true then
4061: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
4062: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
4063: APP_EXCEPTION.raise_exception;
4064: else
4065: set_err_log(retcode);
4066: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
4062: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
4063: APP_EXCEPTION.raise_exception;
4064: else
4065: set_err_log(retcode);
4066: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
4063: APP_EXCEPTION.raise_exception;
4064: else
4065: set_err_log(retcode);
4066: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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);
4064: else
4065: set_err_log(retcode);
4066: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
4065: set_err_log(retcode);
4066: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
4066: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
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');
4076: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
4077: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
4078: APP_EXCEPTION.raise_exception;
4079: else
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');
4076: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
4077: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
4078: APP_EXCEPTION.raise_exception;
4079: else
4080: set_err_log(retcode);
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');
4076: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
4077: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
4078: APP_EXCEPTION.raise_exception;
4079: else
4080: set_err_log(retcode);
4081: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
4077: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
4078: APP_EXCEPTION.raise_exception;
4079: else
4080: set_err_log(retcode);
4081: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
4078: APP_EXCEPTION.raise_exception;
4079: else
4080: set_err_log(retcode);
4081: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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);
4079: else
4080: set_err_log(retcode);
4081: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
4080: set_err_log(retcode);
4081: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
4081: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
4089: if g_call_by_form = true then
4090: APP_EXCEPTION.raise_exception;
4091: else
4092: set_err_log(retcode);
4093: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4090: APP_EXCEPTION.raise_exception;
4091: else
4092: set_err_log(retcode);
4093: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
4091: else
4092: set_err_log(retcode);
4093: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4092: set_err_log(retcode);
4093: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4093: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: ---------------------------------------------------------------
4187: if g_call_by_form = true then
4188: APP_EXCEPTION.raise_exception;
4189: else
4190: set_err_log(retcode);
4191: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4188: APP_EXCEPTION.raise_exception;
4189: else
4190: set_err_log(retcode);
4191: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
4189: else
4190: set_err_log(retcode);
4191: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4190: set_err_log(retcode);
4191: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4191: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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:
4361: if g_call_by_form = true then
4362: APP_EXCEPTION.raise_exception;
4363: else
4364: set_err_log(retcode);
4365: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4362: APP_EXCEPTION.raise_exception;
4363: else
4364: set_err_log(retcode);
4365: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
4363: else
4364: set_err_log(retcode);
4365: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4364: set_err_log(retcode);
4365: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4365: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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:
4611: elsif rec.deal_type = 'FRA' then
4612: end_fv := rec.settle_amount;
4613: if rec.settle_date is null then
4614: set_err_log(retcode);
4615: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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;
4612: end_fv := rec.settle_amount;
4613: if rec.settle_date is null then
4614: set_err_log(retcode);
4615: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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);
4613: if rec.settle_date is null then
4614: set_err_log(retcode);
4615: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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;
4614: set_err_log(retcode);
4615: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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
4615: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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);
4727:
4728: EXCEPTION
4729: when GL_CURRENCY_API.no_rate then
4730: if g_call_by_form = true then
4731: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
4732: APP_EXCEPTION.raise_exception;
4733: else
4734: set_err_log(retcode);
4735: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
4731: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
4732: APP_EXCEPTION.raise_exception;
4733: else
4734: set_err_log(retcode);
4735: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
4732: APP_EXCEPTION.raise_exception;
4733: else
4734: set_err_log(retcode);
4735: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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);
4733: else
4734: set_err_log(retcode);
4735: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
4734: set_err_log(retcode);
4735: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
4735: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
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');
4745: APP_EXCEPTION.raise_exception;
4746: else
4747: set_err_log(retcode);
4748: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
4744: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
4745: APP_EXCEPTION.raise_exception;
4746: else
4747: set_err_log(retcode);
4748: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
4745: APP_EXCEPTION.raise_exception;
4746: else
4747: set_err_log(retcode);
4748: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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);
4746: else
4747: set_err_log(retcode);
4748: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
4747: set_err_log(retcode);
4748: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
4748: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
4756: if g_call_by_form = true then
4757: APP_EXCEPTION.raise_exception;
4758: else
4759: set_err_log(retcode);
4760: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4757: APP_EXCEPTION.raise_exception;
4758: else
4759: set_err_log(retcode);
4760: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
4758: else
4759: set_err_log(retcode);
4760: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4759: set_err_log(retcode);
4760: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4760: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: --------------------------------------------------------
4853: -- we don't need to calculate price. Just use previous batch FV.
4854: If rec.deal_type in ('FRA', 'IRO') and
4855: (l_start_date <= rec.revldate and rec.settle_date is null) then
4856: set_err_log(retcode);
4857: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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;
4854: If rec.deal_type in ('FRA', 'IRO') and
4855: (l_start_date <= rec.revldate and rec.settle_date is null) then
4856: set_err_log(retcode);
4857: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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);
4855: (l_start_date <= rec.revldate and rec.settle_date is null) then
4856: set_err_log(retcode);
4857: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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
4856: set_err_log(retcode);
4857: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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,
4857: FND_MESSAGE.SET_NAME('XTR', 'XTR_SETTLE_DEAL');
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);
4912:
4913: EXCEPTION
4914: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
4915: if g_call_by_form = true then
4916: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
4917: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
4918: APP_EXCEPTION.raise_exception;
4919: else
4920: set_err_log(retcode);
4913: EXCEPTION
4914: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
4915: if g_call_by_form = true then
4916: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
4917: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
4918: APP_EXCEPTION.raise_exception;
4919: else
4920: set_err_log(retcode);
4921: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
4917: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
4918: APP_EXCEPTION.raise_exception;
4919: else
4920: set_err_log(retcode);
4921: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
4918: APP_EXCEPTION.raise_exception;
4919: else
4920: set_err_log(retcode);
4921: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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);
4919: else
4920: set_err_log(retcode);
4921: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
4920: set_err_log(retcode);
4921: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
4921: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
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');
4931: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
4932: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
4933: APP_EXCEPTION.raise_exception;
4934: else
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');
4931: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
4932: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
4933: APP_EXCEPTION.raise_exception;
4934: else
4935: set_err_log(retcode);
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');
4931: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
4932: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
4933: APP_EXCEPTION.raise_exception;
4934: else
4935: set_err_log(retcode);
4936: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
4932: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
4933: APP_EXCEPTION.raise_exception;
4934: else
4935: set_err_log(retcode);
4936: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
4933: APP_EXCEPTION.raise_exception;
4934: else
4935: set_err_log(retcode);
4936: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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);
4934: else
4935: set_err_log(retcode);
4936: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
4935: set_err_log(retcode);
4936: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
4936: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
4944: if g_call_by_form = true then
4945: APP_EXCEPTION.raise_exception;
4946: else
4947: set_err_log(retcode);
4948: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4945: APP_EXCEPTION.raise_exception;
4946: else
4947: set_err_log(retcode);
4948: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
4946: else
4947: set_err_log(retcode);
4948: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4947: set_err_log(retcode);
4948: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
4948: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: --------------------------------------------------------
5094:
5095: EXCEPTION
5096: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
5097: if g_call_by_form = true then
5098: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
5099: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5100: APP_EXCEPTION.raise_exception;
5101: else
5102: set_err_log(retcode);
5095: EXCEPTION
5096: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
5097: if g_call_by_form = true then
5098: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
5099: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5100: APP_EXCEPTION.raise_exception;
5101: else
5102: set_err_log(retcode);
5103: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
5099: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5100: APP_EXCEPTION.raise_exception;
5101: else
5102: set_err_log(retcode);
5103: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
5100: APP_EXCEPTION.raise_exception;
5101: else
5102: set_err_log(retcode);
5103: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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);
5101: else
5102: set_err_log(retcode);
5103: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
5102: set_err_log(retcode);
5103: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
5103: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
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');
5113: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
5114: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5115: APP_EXCEPTION.raise_exception;
5116: else
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');
5113: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
5114: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5115: APP_EXCEPTION.raise_exception;
5116: else
5117: set_err_log(retcode);
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');
5113: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
5114: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5115: APP_EXCEPTION.raise_exception;
5116: else
5117: set_err_log(retcode);
5118: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
5114: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5115: APP_EXCEPTION.raise_exception;
5116: else
5117: set_err_log(retcode);
5118: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
5115: APP_EXCEPTION.raise_exception;
5116: else
5117: set_err_log(retcode);
5118: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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);
5116: else
5117: set_err_log(retcode);
5118: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
5117: set_err_log(retcode);
5118: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
5118: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
5126: if g_call_by_form = true then
5127: APP_EXCEPTION.raise_exception;
5128: else
5129: set_err_log(retcode);
5130: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
5127: APP_EXCEPTION.raise_exception;
5128: else
5129: set_err_log(retcode);
5130: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
5128: else
5129: set_err_log(retcode);
5130: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
5129: set_err_log(retcode);
5130: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
5130: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: -----------------------------------------
5427:
5428: EXCEPTION
5429: when GL_CURRENCY_API.no_rate then
5430: if g_call_by_form = true then
5431: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
5432: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5433: APP_EXCEPTION.raise_exception;
5434: else
5435: set_err_log(retcode);
5428: EXCEPTION
5429: when GL_CURRENCY_API.no_rate then
5430: if g_call_by_form = true then
5431: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
5432: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5433: APP_EXCEPTION.raise_exception;
5434: else
5435: set_err_log(retcode);
5436: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
5432: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5433: APP_EXCEPTION.raise_exception;
5434: else
5435: set_err_log(retcode);
5436: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
5433: APP_EXCEPTION.raise_exception;
5434: else
5435: set_err_log(retcode);
5436: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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);
5434: else
5435: set_err_log(retcode);
5436: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
5435: set_err_log(retcode);
5436: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
5436: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
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');
5446: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5447: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
5448: APP_EXCEPTION.raise_exception;
5449: else
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');
5446: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5447: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
5448: APP_EXCEPTION.raise_exception;
5449: else
5450: set_err_log(retcode);
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');
5446: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5447: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
5448: APP_EXCEPTION.raise_exception;
5449: else
5450: set_err_log(retcode);
5451: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
5447: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
5448: APP_EXCEPTION.raise_exception;
5449: else
5450: set_err_log(retcode);
5451: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
5448: APP_EXCEPTION.raise_exception;
5449: else
5450: set_err_log(retcode);
5451: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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);
5449: else
5450: set_err_log(retcode);
5451: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
5450: set_err_log(retcode);
5451: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
5451: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
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');
5461: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5462: APP_EXCEPTION.raise_exception;
5463: else
5464: set_err_log(retcode);
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');
5461: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5462: APP_EXCEPTION.raise_exception;
5463: else
5464: set_err_log(retcode);
5465: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
5461: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5462: APP_EXCEPTION.raise_exception;
5463: else
5464: set_err_log(retcode);
5465: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
5462: APP_EXCEPTION.raise_exception;
5463: else
5464: set_err_log(retcode);
5465: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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);
5463: else
5464: set_err_log(retcode);
5465: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
5464: set_err_log(retcode);
5465: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
5465: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
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');
5475: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
5476: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5477: APP_EXCEPTION.raise_exception;
5478: else
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');
5475: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
5476: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5477: APP_EXCEPTION.raise_exception;
5478: else
5479: set_err_log(retcode);
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');
5475: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
5476: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5477: APP_EXCEPTION.raise_exception;
5478: else
5479: set_err_log(retcode);
5480: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
5476: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5477: APP_EXCEPTION.raise_exception;
5478: else
5479: set_err_log(retcode);
5480: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
5477: APP_EXCEPTION.raise_exception;
5478: else
5479: set_err_log(retcode);
5480: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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);
5478: else
5479: set_err_log(retcode);
5480: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
5479: set_err_log(retcode);
5480: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
5480: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
5488: if g_call_by_form = true then
5489: APP_EXCEPTION.raise_exception;
5490: else
5491: set_err_log(retcode);
5492: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
5489: APP_EXCEPTION.raise_exception;
5490: else
5491: set_err_log(retcode);
5492: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
5490: else
5491: set_err_log(retcode);
5492: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
5491: set_err_log(retcode);
5492: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
5492: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: --------------------------------------------------------
5676:
5677: EXCEPTION
5678: when GL_CURRENCY_API.no_rate then
5679: if g_call_by_form = true then
5680: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
5681: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5682: APP_EXCEPTION.raise_exception;
5683: else
5684: set_err_log(retcode);
5677: EXCEPTION
5678: when GL_CURRENCY_API.no_rate then
5679: if g_call_by_form = true then
5680: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
5681: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5682: APP_EXCEPTION.raise_exception;
5683: else
5684: set_err_log(retcode);
5685: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
5681: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5682: APP_EXCEPTION.raise_exception;
5683: else
5684: set_err_log(retcode);
5685: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
5682: APP_EXCEPTION.raise_exception;
5683: else
5684: set_err_log(retcode);
5685: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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);
5683: else
5684: set_err_log(retcode);
5685: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
5684: set_err_log(retcode);
5685: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
5685: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
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');
5695: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5696: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
5697: APP_EXCEPTION.raise_exception;
5698: else
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');
5695: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5696: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
5697: APP_EXCEPTION.raise_exception;
5698: else
5699: set_err_log(retcode);
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');
5695: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5696: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
5697: APP_EXCEPTION.raise_exception;
5698: else
5699: set_err_log(retcode);
5700: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
5696: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
5697: APP_EXCEPTION.raise_exception;
5698: else
5699: set_err_log(retcode);
5700: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
5697: APP_EXCEPTION.raise_exception;
5698: else
5699: set_err_log(retcode);
5700: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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);
5698: else
5699: set_err_log(retcode);
5700: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
5699: set_err_log(retcode);
5700: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
5700: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
5708: if g_call_by_form = true then
5709: APP_EXCEPTION.raise_exception;
5710: else
5711: set_err_log(retcode);
5712: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
5709: APP_EXCEPTION.raise_exception;
5710: else
5711: set_err_log(retcode);
5712: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
5710: else
5711: set_err_log(retcode);
5712: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
5711: set_err_log(retcode);
5712: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
5712: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: ----------------------------------------------------------------
5949:
5950: EXCEPTION
5951: when GL_CURRENCY_API.no_rate then
5952: if g_call_by_form = true then
5953: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
5954: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5955: APP_EXCEPTION.raise_exception;
5956: else
5957: set_err_log(retcode);
5950: EXCEPTION
5951: when GL_CURRENCY_API.no_rate then
5952: if g_call_by_form = true then
5953: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
5954: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5955: APP_EXCEPTION.raise_exception;
5956: else
5957: set_err_log(retcode);
5958: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
5954: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5955: APP_EXCEPTION.raise_exception;
5956: else
5957: set_err_log(retcode);
5958: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
5955: APP_EXCEPTION.raise_exception;
5956: else
5957: set_err_log(retcode);
5958: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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);
5956: else
5957: set_err_log(retcode);
5958: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
5957: set_err_log(retcode);
5958: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
5958: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
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');
5968: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5969: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
5970: APP_EXCEPTION.raise_exception;
5971: else
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');
5968: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5969: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
5970: APP_EXCEPTION.raise_exception;
5971: else
5972: set_err_log(retcode);
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');
5968: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5969: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
5970: APP_EXCEPTION.raise_exception;
5971: else
5972: set_err_log(retcode);
5973: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
5969: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
5970: APP_EXCEPTION.raise_exception;
5971: else
5972: set_err_log(retcode);
5973: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
5970: APP_EXCEPTION.raise_exception;
5971: else
5972: set_err_log(retcode);
5973: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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);
5971: else
5972: set_err_log(retcode);
5973: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
5972: set_err_log(retcode);
5973: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
5973: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
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');
5983: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5984: APP_EXCEPTION.raise_exception;
5985: else
5986: set_err_log(retcode);
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');
5983: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5984: APP_EXCEPTION.raise_exception;
5985: else
5986: set_err_log(retcode);
5987: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
5983: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5984: APP_EXCEPTION.raise_exception;
5985: else
5986: set_err_log(retcode);
5987: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
5984: APP_EXCEPTION.raise_exception;
5985: else
5986: set_err_log(retcode);
5987: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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);
5985: else
5986: set_err_log(retcode);
5987: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
5986: set_err_log(retcode);
5987: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
5987: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
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');
5997: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
5998: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5999: APP_EXCEPTION.raise_exception;
6000: else
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');
5997: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
5998: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5999: APP_EXCEPTION.raise_exception;
6000: else
6001: set_err_log(retcode);
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');
5997: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
5998: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5999: APP_EXCEPTION.raise_exception;
6000: else
6001: set_err_log(retcode);
6002: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
5998: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
5999: APP_EXCEPTION.raise_exception;
6000: else
6001: set_err_log(retcode);
6002: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
5999: APP_EXCEPTION.raise_exception;
6000: else
6001: set_err_log(retcode);
6002: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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);
6000: else
6001: set_err_log(retcode);
6002: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
6001: set_err_log(retcode);
6002: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
6002: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
6010: if g_call_by_form = true then
6011: APP_EXCEPTION.raise_exception;
6012: else
6013: set_err_log(retcode);
6014: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
6011: APP_EXCEPTION.raise_exception;
6012: else
6013: set_err_log(retcode);
6014: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
6012: else
6013: set_err_log(retcode);
6014: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
6013: set_err_log(retcode);
6014: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
6014: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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:
6302: end if;
6303:
6304: if l_complete_flag = 'N' then
6305: set_err_log(retcode);
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);
6303:
6304: if l_complete_flag = 'N' then
6305: set_err_log(retcode);
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;
6304: if l_complete_flag = 'N' then
6305: set_err_log(retcode);
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:
6305: set_err_log(retcode);
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);
6460:
6461: EXCEPTION
6462: when GL_CURRENCY_API.no_rate then
6463: if g_call_by_form = true then
6464: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
6465: APP_EXCEPTION.raise_exception;
6466: else
6467: set_err_log(retcode);
6468: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
6464: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
6465: APP_EXCEPTION.raise_exception;
6466: else
6467: set_err_log(retcode);
6468: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
6465: APP_EXCEPTION.raise_exception;
6466: else
6467: set_err_log(retcode);
6468: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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);
6466: else
6467: set_err_log(retcode);
6468: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
6467: set_err_log(retcode);
6468: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
6468: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
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');
6478: APP_EXCEPTION.raise_exception;
6479: else
6480: set_err_log(retcode);
6481: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
6477: FND_MESSAGE.set_name('XTR', 'XTR_INVALID_CURRENCY');
6478: APP_EXCEPTION.raise_exception;
6479: else
6480: set_err_log(retcode);
6481: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
6478: APP_EXCEPTION.raise_exception;
6479: else
6480: set_err_log(retcode);
6481: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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);
6479: else
6480: set_err_log(retcode);
6481: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
6480: set_err_log(retcode);
6481: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
6481: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
6489: if g_call_by_form = true then
6490: APP_EXCEPTION.raise_exception;
6491: else
6492: set_err_log(retcode);
6493: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
6490: APP_EXCEPTION.raise_exception;
6491: else
6492: set_err_log(retcode);
6493: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
6491: else
6492: set_err_log(retcode);
6493: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
6492: set_err_log(retcode);
6493: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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:
6493: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
6771:
6772: EXCEPTION
6773: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
6774: if g_call_by_form = true then
6775: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
6776: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
6777: APP_EXCEPTION.raise_exception;
6778: else
6779: set_err_log(retcode);
6772: EXCEPTION
6773: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
6774: if g_call_by_form = true then
6775: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
6776: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
6777: APP_EXCEPTION.raise_exception;
6778: else
6779: set_err_log(retcode);
6780: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
6776: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
6777: APP_EXCEPTION.raise_exception;
6778: else
6779: set_err_log(retcode);
6780: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
6777: APP_EXCEPTION.raise_exception;
6778: else
6779: set_err_log(retcode);
6780: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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);
6778: else
6779: set_err_log(retcode);
6780: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
6779: set_err_log(retcode);
6780: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
6780: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
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');
6790: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
6791: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
6792: APP_EXCEPTION.raise_exception;
6793: else
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');
6790: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
6791: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
6792: APP_EXCEPTION.raise_exception;
6793: else
6794: set_err_log(retcode);
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');
6790: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
6791: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
6792: APP_EXCEPTION.raise_exception;
6793: else
6794: set_err_log(retcode);
6795: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
6791: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
6792: APP_EXCEPTION.raise_exception;
6793: else
6794: set_err_log(retcode);
6795: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
6792: APP_EXCEPTION.raise_exception;
6793: else
6794: set_err_log(retcode);
6795: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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);
6793: else
6794: set_err_log(retcode);
6795: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
6794: set_err_log(retcode);
6795: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
6795: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
6803: if g_call_by_form = true then
6804: APP_EXCEPTION.raise_exception;
6805: else
6806: set_err_log(retcode);
6807: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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;
6804: APP_EXCEPTION.raise_exception;
6805: else
6806: set_err_log(retcode);
6807: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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);
6805: else
6806: set_err_log(retcode);
6807: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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;
6806: set_err_log(retcode);
6807: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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;
6807: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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:
6990: end if;
6991:
6992: if rec.expiry_date <= rec.revldate and rec.status_code = 'CURRENT' then
6993: set_err_log(retcode);
6994: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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;
6991:
6992: if rec.expiry_date <= rec.revldate and rec.status_code = 'CURRENT' then
6993: set_err_log(retcode);
6994: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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);
6992: if rec.expiry_date <= rec.revldate and rec.status_code = 'CURRENT' then
6993: set_err_log(retcode);
6994: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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
6993: set_err_log(retcode);
6994: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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,
6994: FND_MESSAGE.SET_NAME('XTR', 'XTR_DEAL_EXPIRY');
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);
7102:
7103: EXCEPTION
7104: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
7105: if g_call_by_form = true then
7106: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
7107: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7108: APP_EXCEPTION.raise_exception;
7109: else
7110: set_err_log(retcode);
7103: EXCEPTION
7104: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
7105: if g_call_by_form = true then
7106: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
7107: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7108: APP_EXCEPTION.raise_exception;
7109: else
7110: set_err_log(retcode);
7111: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
7107: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7108: APP_EXCEPTION.raise_exception;
7109: else
7110: set_err_log(retcode);
7111: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
7108: APP_EXCEPTION.raise_exception;
7109: else
7110: set_err_log(retcode);
7111: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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);
7109: else
7110: set_err_log(retcode);
7111: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
7110: set_err_log(retcode);
7111: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
7111: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
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');
7121: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
7122: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7123: APP_EXCEPTION.raise_exception;
7124: else
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');
7121: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
7122: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7123: APP_EXCEPTION.raise_exception;
7124: else
7125: set_err_log(retcode);
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');
7121: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
7122: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7123: APP_EXCEPTION.raise_exception;
7124: else
7125: set_err_log(retcode);
7126: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
7122: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7123: APP_EXCEPTION.raise_exception;
7124: else
7125: set_err_log(retcode);
7126: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
7123: APP_EXCEPTION.raise_exception;
7124: else
7125: set_err_log(retcode);
7126: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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);
7124: else
7125: set_err_log(retcode);
7126: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
7125: set_err_log(retcode);
7126: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
7126: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
7134: if g_call_by_form = true then
7135: APP_EXCEPTION.raise_exception;
7136: else
7137: set_err_log(retcode);
7138: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7135: APP_EXCEPTION.raise_exception;
7136: else
7137: set_err_log(retcode);
7138: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
7136: else
7137: set_err_log(retcode);
7138: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7137: set_err_log(retcode);
7138: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7138: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: --------------------------------------------------------
7291: if g_call_by_form = true then
7292: APP_EXCEPTION.raise_exception;
7293: else
7294: set_err_log(retcode);
7295: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7292: APP_EXCEPTION.raise_exception;
7293: else
7294: set_err_log(retcode);
7295: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
7293: else
7294: set_err_log(retcode);
7295: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7294: set_err_log(retcode);
7295: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7295: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: --------------------------------------------------------
7361:
7362: EXCEPTION
7363: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
7364: if g_call_by_form = true then
7365: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
7366: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7367: APP_EXCEPTION.raise_exception;
7368: else
7369: set_err_log(retcode);
7362: EXCEPTION
7363: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
7364: if g_call_by_form = true then
7365: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
7366: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7367: APP_EXCEPTION.raise_exception;
7368: else
7369: set_err_log(retcode);
7370: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
7366: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7367: APP_EXCEPTION.raise_exception;
7368: else
7369: set_err_log(retcode);
7370: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
7367: APP_EXCEPTION.raise_exception;
7368: else
7369: set_err_log(retcode);
7370: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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);
7368: else
7369: set_err_log(retcode);
7370: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
7369: set_err_log(retcode);
7370: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
7370: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
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');
7380: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
7381: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7382: APP_EXCEPTION.raise_exception;
7383: else
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');
7380: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
7381: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7382: APP_EXCEPTION.raise_exception;
7383: else
7384: set_err_log(retcode);
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');
7380: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
7381: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7382: APP_EXCEPTION.raise_exception;
7383: else
7384: set_err_log(retcode);
7385: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
7381: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7382: APP_EXCEPTION.raise_exception;
7383: else
7384: set_err_log(retcode);
7385: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
7382: APP_EXCEPTION.raise_exception;
7383: else
7384: set_err_log(retcode);
7385: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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);
7383: else
7384: set_err_log(retcode);
7385: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
7384: set_err_log(retcode);
7385: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
7385: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
7393: if g_call_by_form = true then
7394: APP_EXCEPTION.raise_exception;
7395: else
7396: set_err_log(retcode);
7397: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7394: APP_EXCEPTION.raise_exception;
7395: else
7396: set_err_log(retcode);
7397: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
7395: else
7396: set_err_log(retcode);
7397: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7396: set_err_log(retcode);
7397: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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:
7397: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7557:
7558: EXCEPTION
7559: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
7560: if g_call_by_form = true then
7561: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
7562: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7563: APP_EXCEPTION.raise_exception;
7564: else
7565: set_err_log(retcode);
7558: EXCEPTION
7559: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
7560: if g_call_by_form = true then
7561: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
7562: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7563: APP_EXCEPTION.raise_exception;
7564: else
7565: set_err_log(retcode);
7566: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
7562: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7563: APP_EXCEPTION.raise_exception;
7564: else
7565: set_err_log(retcode);
7566: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
7563: APP_EXCEPTION.raise_exception;
7564: else
7565: set_err_log(retcode);
7566: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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);
7564: else
7565: set_err_log(retcode);
7566: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
7565: set_err_log(retcode);
7566: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
7566: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
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');
7576: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
7577: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7578: APP_EXCEPTION.raise_exception;
7579: else
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');
7576: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
7577: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7578: APP_EXCEPTION.raise_exception;
7579: else
7580: set_err_log(retcode);
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');
7576: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
7577: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7578: APP_EXCEPTION.raise_exception;
7579: else
7580: set_err_log(retcode);
7581: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
7577: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
7578: APP_EXCEPTION.raise_exception;
7579: else
7580: set_err_log(retcode);
7581: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
7578: APP_EXCEPTION.raise_exception;
7579: else
7580: set_err_log(retcode);
7581: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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);
7579: else
7580: set_err_log(retcode);
7581: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
7580: set_err_log(retcode);
7581: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
7581: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
7589: if g_call_by_form = true then
7590: APP_EXCEPTION.raise_exception;
7591: else
7592: set_err_log(retcode);
7593: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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;
7590: APP_EXCEPTION.raise_exception;
7591: else
7592: set_err_log(retcode);
7593: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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);
7591: else
7592: set_err_log(retcode);
7593: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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;
7592: set_err_log(retcode);
7593: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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;
7593: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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: -------------------------------------------------------------
7718: if g_call_by_form = true then
7719: APP_EXCEPTION.raise_exception;
7720: else
7721: set_err_log(retcode);
7722: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7719: APP_EXCEPTION.raise_exception;
7720: else
7721: set_err_log(retcode);
7722: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
7720: else
7721: set_err_log(retcode);
7722: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7721: set_err_log(retcode);
7722: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7722: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: --------------------------------------------------------
7780: if g_call_by_form = true then
7781: APP_EXCEPTION.raise_exception;
7782: else
7783: set_err_log(retcode);
7784: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7781: APP_EXCEPTION.raise_exception;
7782: else
7783: set_err_log(retcode);
7784: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
7782: else
7783: set_err_log(retcode);
7784: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7783: set_err_log(retcode);
7784: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7784: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: -------------------------------------------------------------
7913: if g_call_by_form = true then
7914: APP_EXCEPTION.raise_exception;
7915: else
7916: set_err_log(retcode);
7917: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7914: APP_EXCEPTION.raise_exception;
7915: else
7916: set_err_log(retcode);
7917: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
7915: else
7916: set_err_log(retcode);
7917: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7916: set_err_log(retcode);
7917: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
7917: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: ---------------------------------------------------------------
8122:
8123: EXCEPTION
8124: when GL_CURRENCY_API.no_rate then
8125: if g_call_by_form = true then
8126: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
8127: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
8128: APP_EXCEPTION.raise_exception;
8129: else
8130: set_err_log(retcode);
8123: EXCEPTION
8124: when GL_CURRENCY_API.no_rate then
8125: if g_call_by_form = true then
8126: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
8127: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
8128: APP_EXCEPTION.raise_exception;
8129: else
8130: set_err_log(retcode);
8131: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
8127: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
8128: APP_EXCEPTION.raise_exception;
8129: else
8130: set_err_log(retcode);
8131: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
8128: APP_EXCEPTION.raise_exception;
8129: else
8130: set_err_log(retcode);
8131: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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);
8129: else
8130: set_err_log(retcode);
8131: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
8130: set_err_log(retcode);
8131: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
8131: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
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');
8141: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
8142: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
8143: APP_EXCEPTION.raise_exception;
8144: else
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');
8141: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
8142: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
8143: APP_EXCEPTION.raise_exception;
8144: else
8145: set_err_log(retcode);
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');
8141: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
8142: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
8143: APP_EXCEPTION.raise_exception;
8144: else
8145: set_err_log(retcode);
8146: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
8142: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
8143: APP_EXCEPTION.raise_exception;
8144: else
8145: set_err_log(retcode);
8146: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
8143: APP_EXCEPTION.raise_exception;
8144: else
8145: set_err_log(retcode);
8146: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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);
8144: else
8145: set_err_log(retcode);
8146: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
8145: set_err_log(retcode);
8146: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
8146: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
8154: if g_call_by_form = true then
8155: APP_EXCEPTION.raise_exception;
8156: else
8157: set_err_log(retcode);
8158: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
8155: APP_EXCEPTION.raise_exception;
8156: else
8157: set_err_log(retcode);
8158: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
8156: else
8157: set_err_log(retcode);
8158: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
8157: set_err_log(retcode);
8158: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
8158: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: ----------------------------------------------------------------
8537: if g_call_by_form = true then
8538: APP_EXCEPTION.raise_exception;
8539: else
8540: set_err_log(retcode);
8541: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
8538: APP_EXCEPTION.raise_exception;
8539: else
8540: set_err_log(retcode);
8541: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
8539: else
8540: set_err_log(retcode);
8541: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
8540: set_err_log(retcode);
8541: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
8541: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: --------------------------------------------------------
8607:
8608: EXCEPTION
8609: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
8610: if g_call_by_form = true then
8611: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
8612: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
8613: APP_EXCEPTION.raise_exception;
8614: else
8615: set_err_log(retcode);
8608: EXCEPTION
8609: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
8610: if g_call_by_form = true then
8611: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
8612: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
8613: APP_EXCEPTION.raise_exception;
8614: else
8615: set_err_log(retcode);
8616: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
8612: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
8613: APP_EXCEPTION.raise_exception;
8614: else
8615: set_err_log(retcode);
8616: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
8613: APP_EXCEPTION.raise_exception;
8614: else
8615: set_err_log(retcode);
8616: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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);
8614: else
8615: set_err_log(retcode);
8616: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
8615: set_err_log(retcode);
8616: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
8616: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
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');
8626: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
8627: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
8628: APP_EXCEPTION.raise_exception;
8629: else
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');
8626: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
8627: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
8628: APP_EXCEPTION.raise_exception;
8629: else
8630: set_err_log(retcode);
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');
8626: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
8627: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
8628: APP_EXCEPTION.raise_exception;
8629: else
8630: set_err_log(retcode);
8631: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
8627: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
8628: APP_EXCEPTION.raise_exception;
8629: else
8630: set_err_log(retcode);
8631: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
8628: APP_EXCEPTION.raise_exception;
8629: else
8630: set_err_log(retcode);
8631: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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);
8629: else
8630: set_err_log(retcode);
8631: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
8630: set_err_log(retcode);
8631: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
8631: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
8639: if g_call_by_form = true then
8640: APP_EXCEPTION.raise_exception;
8641: else
8642: set_err_log(retcode);
8643: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
8640: APP_EXCEPTION.raise_exception;
8641: else
8642: set_err_log(retcode);
8643: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
8641: else
8642: set_err_log(retcode);
8643: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
8642: set_err_log(retcode);
8643: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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:
8643: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
8758: if g_call_by_form = true then
8759: APP_EXCEPTION.raise_exception;
8760: else
8761: set_err_log(retcode);
8762: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
8759: APP_EXCEPTION.raise_exception;
8760: else
8761: set_err_log(retcode);
8762: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
8760: else
8761: set_err_log(retcode);
8762: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
8761: set_err_log(retcode);
8762: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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:
8762: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
8822: if g_call_by_form = true then
8823: APP_EXCEPTION.raise_exception;
8824: else
8825: set_err_log(retcode);
8826: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
8823: APP_EXCEPTION.raise_exception;
8824: else
8825: set_err_log(retcode);
8826: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
8824: else
8825: set_err_log(retcode);
8826: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
8825: set_err_log(retcode);
8826: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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:
8826: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
9025:
9026: EXCEPTION
9027: when GL_CURRENCY_API.no_rate then
9028: if g_call_by_form = true then
9029: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
9030: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9031: APP_EXCEPTION.raise_exception;
9032: else
9033: set_err_log(retcode);
9026: EXCEPTION
9027: when GL_CURRENCY_API.no_rate then
9028: if g_call_by_form = true then
9029: FND_MESSAGE.set_name('XTR', 'XTR_NO_GL_RATE');
9030: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9031: APP_EXCEPTION.raise_exception;
9032: else
9033: set_err_log(retcode);
9034: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
9030: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9031: APP_EXCEPTION.raise_exception;
9032: else
9033: set_err_log(retcode);
9034: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
9031: APP_EXCEPTION.raise_exception;
9032: else
9033: set_err_log(retcode);
9034: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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);
9032: else
9033: set_err_log(retcode);
9034: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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;
9033: set_err_log(retcode);
9034: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
9034: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_CURRENCY_GL');
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
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');
9044: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9045: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
9046: APP_EXCEPTION.raise_exception;
9047: else
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');
9044: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9045: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
9046: APP_EXCEPTION.raise_exception;
9047: else
9048: set_err_log(retcode);
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');
9044: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9045: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
9046: APP_EXCEPTION.raise_exception;
9047: else
9048: set_err_log(retcode);
9049: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
9045: FND_MESSAGE.set_token('CURRENCY', rec.currencya);
9046: APP_EXCEPTION.raise_exception;
9047: else
9048: set_err_log(retcode);
9049: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
9046: APP_EXCEPTION.raise_exception;
9047: else
9048: set_err_log(retcode);
9049: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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);
9047: else
9048: set_err_log(retcode);
9049: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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;
9048: set_err_log(retcode);
9049: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
9049: FND_MESSAGE.SET_NAME('XTR', 'XTR_INVALID_CURRENCY_TYPE');
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
9057: if g_call_by_form = true then
9058: APP_EXCEPTION.raise_exception;
9059: else
9060: set_err_log(retcode);
9061: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
9062: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
9063: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
9064: APP_EXCEPTION.raise_exception;
9065: end if;
9058: APP_EXCEPTION.raise_exception;
9059: else
9060: set_err_log(retcode);
9061: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
9062: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
9063: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
9064: APP_EXCEPTION.raise_exception;
9065: end if;
9066: END xtr_revl_stock_unreal;
9059: else
9060: set_err_log(retcode);
9061: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
9062: FND_MESSAGE.SET_TOKEN('DEAL_NO', rec.deal_no);
9063: FND_MESSAGE.SET_TOKEN('DEAL_TYPE', rec.deal_type);
9064: APP_EXCEPTION.raise_exception;
9065: end if;
9066: END xtr_revl_stock_unreal;
9067:
9108:
9109: EXCEPTION
9110: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
9111: if g_call_by_form = true then
9112: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
9113: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9114: APP_EXCEPTION.raise_exception;
9115: else
9116: set_err_log(retcode);
9109: EXCEPTION
9110: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
9111: if g_call_by_form = true then
9112: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
9113: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9114: APP_EXCEPTION.raise_exception;
9115: else
9116: set_err_log(retcode);
9117: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
9113: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9114: APP_EXCEPTION.raise_exception;
9115: else
9116: set_err_log(retcode);
9117: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
9114: APP_EXCEPTION.raise_exception;
9115: else
9116: set_err_log(retcode);
9117: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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);
9115: else
9116: set_err_log(retcode);
9117: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
9116: set_err_log(retcode);
9117: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
9117: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
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');
9127: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
9128: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9129: APP_EXCEPTION.raise_exception;
9130: else
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');
9127: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
9128: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9129: APP_EXCEPTION.raise_exception;
9130: else
9131: set_err_log(retcode);
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');
9127: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
9128: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9129: APP_EXCEPTION.raise_exception;
9130: else
9131: set_err_log(retcode);
9132: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
9128: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9129: APP_EXCEPTION.raise_exception;
9130: else
9131: set_err_log(retcode);
9132: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
9129: APP_EXCEPTION.raise_exception;
9130: else
9131: set_err_log(retcode);
9132: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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);
9130: else
9131: set_err_log(retcode);
9132: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
9131: set_err_log(retcode);
9132: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
9132: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
9140: if g_call_by_form = true then
9141: APP_EXCEPTION.raise_exception;
9142: else
9143: set_err_log(retcode);
9144: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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;
9141: APP_EXCEPTION.raise_exception;
9142: else
9143: set_err_log(retcode);
9144: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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);
9142: else
9143: set_err_log(retcode);
9144: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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;
9143: set_err_log(retcode);
9144: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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;
9144: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_RATE_REF');
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:
9269:
9270: EXCEPTION
9271: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
9272: if g_call_by_form = true then
9273: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
9274: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9275: APP_EXCEPTION.raise_exception;
9276: else
9277: set_err_log(retcode);
9270: EXCEPTION
9271: when XTR_MARKET_DATA_P.e_mdcs_no_data_found then
9272: if g_call_by_form = true then
9273: FND_MESSAGE.set_name('XTR', 'XTR_NO_MARKET');
9274: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9275: APP_EXCEPTION.raise_exception;
9276: else
9277: set_err_log(retcode);
9278: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
9274: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9275: APP_EXCEPTION.raise_exception;
9276: else
9277: set_err_log(retcode);
9278: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
9275: APP_EXCEPTION.raise_exception;
9276: else
9277: set_err_log(retcode);
9278: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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);
9276: else
9277: set_err_log(retcode);
9278: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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;
9277: set_err_log(retcode);
9278: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
9278: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_MARKETDATASET');
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
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');
9288: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
9289: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9290: APP_EXCEPTION.raise_exception;
9291: else
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');
9288: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
9289: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9290: APP_EXCEPTION.raise_exception;
9291: else
9292: set_err_log(retcode);
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');
9288: FND_MESSAGE.set_token('MARKET', rec.market_data_set);
9289: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9290: APP_EXCEPTION.raise_exception;
9291: else
9292: set_err_log(retcode);
9293: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
9289: FND_MESSAGE.set_token('DEAL_NO', rec.deal_no);
9290: APP_EXCEPTION.raise_exception;
9291: else
9292: set_err_log(retcode);
9293: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
9290: APP_EXCEPTION.raise_exception;
9291: else
9292: set_err_log(retcode);
9293: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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);
9291: else
9292: set_err_log(retcode);
9293: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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;
9292: set_err_log(retcode);
9293: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
9293: FND_MESSAGE.SET_NAME('XTR', 'XTR_NO_CURVEMARKET');
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
9301: if g_call_by_form = true then
9302: APP_EXCEPTION.raise_exception;
9303: else
9304: set_err_log(retcode);
9305: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
9302: APP_EXCEPTION.raise_exception;
9303: else
9304: set_err_log(retcode);
9305: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
9303: else
9304: set_err_log(retcode);
9305: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
9304: set_err_log(retcode);
9305: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
9305: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: --------------------------------------------------------
9582: if g_call_by_form = true then
9583: APP_EXCEPTION.raise_exception;
9584: else
9585: set_err_log(retcode);
9586: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
9583: APP_EXCEPTION.raise_exception;
9584: else
9585: set_err_log(retcode);
9586: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
9584: else
9585: set_err_log(retcode);
9586: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
9585: set_err_log(retcode);
9586: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
9586: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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:
9711: if g_call_by_form = true then
9712: APP_EXCEPTION.raise_exception;
9713: else
9714: set_err_log(retcode);
9715: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
9712: APP_EXCEPTION.raise_exception;
9713: else
9714: set_err_log(retcode);
9715: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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);
9713: else
9714: set_err_log(retcode);
9715: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
9714: set_err_log(retcode);
9715: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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;
9715: FND_MESSAGE.SET_NAME('XTR', 'XTR_SQL_FAILURE');
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: --------------------------------------------------------
10027:
10028: if CHK_LAST_HEDGE%ISOPEN then
10029: close CHK_LAST_HEDGE;
10030: end if;
10031: FND_MESSAGE.Set_name('XTR', 'XTR_DEAL_LOCK');
10032: FND_MESSAGE.Set_token('DEAL_NO', rec.deal_no);
10033: FND_MESSAGE.Set_token('DEAL_TYPE', rec.deal_type);
10034: Raise app_exceptions.RECORD_LOCK_EXCEPTION;
10035:
10028: if CHK_LAST_HEDGE%ISOPEN then
10029: close CHK_LAST_HEDGE;
10030: end if;
10031: FND_MESSAGE.Set_name('XTR', 'XTR_DEAL_LOCK');
10032: FND_MESSAGE.Set_token('DEAL_NO', rec.deal_no);
10033: FND_MESSAGE.Set_token('DEAL_TYPE', rec.deal_type);
10034: Raise app_exceptions.RECORD_LOCK_EXCEPTION;
10035:
10036: end xtr_revl_unreal_log;
10029: close CHK_LAST_HEDGE;
10030: end if;
10031: FND_MESSAGE.Set_name('XTR', 'XTR_DEAL_LOCK');
10032: FND_MESSAGE.Set_token('DEAL_NO', rec.deal_no);
10033: FND_MESSAGE.Set_token('DEAL_TYPE', rec.deal_type);
10034: Raise app_exceptions.RECORD_LOCK_EXCEPTION;
10035:
10036: end xtr_revl_unreal_log;
10037:
10174: if CHK_LOCK_ROLL%ISOPEN then
10175: close CHK_LOCK_ROLL;
10176: end if;
10177:
10178: FND_MESSAGE.Set_name('XTR', 'XTR_DEAL_LOCK');
10179: FND_MESSAGE.Set_token('DEAL_NO', rec.deal_no);
10180: FND_MESSAGE.Set_token('DEAL_TYPE', rec.deal_type);
10181: Raise app_exceptions.RECORD_LOCK_EXCEPTION;
10182:
10175: close CHK_LOCK_ROLL;
10176: end if;
10177:
10178: FND_MESSAGE.Set_name('XTR', 'XTR_DEAL_LOCK');
10179: FND_MESSAGE.Set_token('DEAL_NO', rec.deal_no);
10180: FND_MESSAGE.Set_token('DEAL_TYPE', rec.deal_type);
10181: Raise app_exceptions.RECORD_LOCK_EXCEPTION;
10182:
10183: end xtr_revl_real_log;
10176: end if;
10177:
10178: FND_MESSAGE.Set_name('XTR', 'XTR_DEAL_LOCK');
10179: FND_MESSAGE.Set_token('DEAL_NO', rec.deal_no);
10180: FND_MESSAGE.Set_token('DEAL_TYPE', rec.deal_type);
10181: Raise app_exceptions.RECORD_LOCK_EXCEPTION;
10182:
10183: end xtr_revl_real_log;
10184:
10218: l_sysdate, fnd_global.user_id, l_sysdate, fnd_global.login_id);
10219:
10220: EXCEPTION
10221: When e_batch_been_run then
10222: FND_MESSAGE.Set_Name('XTR', 'XTR_BATCH_IN_REVAL');
10223: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
10224: APP_EXCEPTION.raise_exception;
10225:
10226: End;
10219:
10220: EXCEPTION
10221: When e_batch_been_run then
10222: FND_MESSAGE.Set_Name('XTR', 'XTR_BATCH_IN_REVAL');
10223: FND_MESSAGE.Set_Token('BATCH', p_batch_id);
10224: APP_EXCEPTION.raise_exception;
10225:
10226: End;
10227: --------------------------------------------------------