[Home] [Help]
11: := 'oks.plsql.' ||
12: g_pkg_name ||
13: '.';
14: g_application_id CONSTANT NUMBER := 515; -- OKS Application
15: g_false CONSTANT VARCHAR2 (1) := fnd_api.g_false;
16: g_true CONSTANT VARCHAR2 (1) := fnd_api.g_true;
17: g_ret_sts_success CONSTANT VARCHAR2 (1)
18: := fnd_api.g_ret_sts_success;
19: g_ret_sts_error CONSTANT VARCHAR2 (1)
12: g_pkg_name ||
13: '.';
14: g_application_id CONSTANT NUMBER := 515; -- OKS Application
15: g_false CONSTANT VARCHAR2 (1) := fnd_api.g_false;
16: g_true CONSTANT VARCHAR2 (1) := fnd_api.g_true;
17: g_ret_sts_success CONSTANT VARCHAR2 (1)
18: := fnd_api.g_ret_sts_success;
19: g_ret_sts_error CONSTANT VARCHAR2 (1)
20: := fnd_api.g_ret_sts_error;
14: g_application_id CONSTANT NUMBER := 515; -- OKS Application
15: g_false CONSTANT VARCHAR2 (1) := fnd_api.g_false;
16: g_true CONSTANT VARCHAR2 (1) := fnd_api.g_true;
17: g_ret_sts_success CONSTANT VARCHAR2 (1)
18: := fnd_api.g_ret_sts_success;
19: g_ret_sts_error CONSTANT VARCHAR2 (1)
20: := fnd_api.g_ret_sts_error;
21: g_ret_sts_unexp_error CONSTANT VARCHAR2 (1)
22: := fnd_api.g_ret_sts_unexp_error;
16: g_true CONSTANT VARCHAR2 (1) := fnd_api.g_true;
17: g_ret_sts_success CONSTANT VARCHAR2 (1)
18: := fnd_api.g_ret_sts_success;
19: g_ret_sts_error CONSTANT VARCHAR2 (1)
20: := fnd_api.g_ret_sts_error;
21: g_ret_sts_unexp_error CONSTANT VARCHAR2 (1)
22: := fnd_api.g_ret_sts_unexp_error;
23: g_unexpected_error CONSTANT VARCHAR2 (200)
24: := 'OKS_UNEXPECTED_ERROR';
18: := fnd_api.g_ret_sts_success;
19: g_ret_sts_error CONSTANT VARCHAR2 (1)
20: := fnd_api.g_ret_sts_error;
21: g_ret_sts_unexp_error CONSTANT VARCHAR2 (1)
22: := fnd_api.g_ret_sts_unexp_error;
23: g_unexpected_error CONSTANT VARCHAR2 (200)
24: := 'OKS_UNEXPECTED_ERROR';
25: g_sqlerrm_token CONSTANT VARCHAR2 (200) := 'ERROR_MESSAGE';
26: g_sqlcode_token CONSTANT VARCHAR2 (200) := 'ERROR_CODE';
1553: );
1554: END IF;
1555:
1556: -- Standard call to check for call compatibility.
1557: IF NOT fnd_api.compatible_api_call (l_api_version,
1558: p_api_version,
1559: l_api_name,
1560: g_pkg_name
1561: ) THEN
1558: p_api_version,
1559: l_api_name,
1560: g_pkg_name
1561: ) THEN
1562: RAISE fnd_api.g_exc_unexpected_error;
1563: END IF;
1564:
1565: -- Initialize message list if p_init_msg_list is set to TRUE.
1566: IF fnd_api.to_boolean (p_init_msg_list) THEN
1562: RAISE fnd_api.g_exc_unexpected_error;
1563: END IF;
1564:
1565: -- Initialize message list if p_init_msg_list is set to TRUE.
1566: IF fnd_api.to_boolean (p_init_msg_list) THEN
1567: fnd_msg_pub.initialize;
1568: END IF;
1569:
1570: -- Initialize API return status to success
1567: fnd_msg_pub.initialize;
1568: END IF;
1569:
1570: -- Initialize API return status to success
1571: x_return_status := fnd_api.g_ret_sts_success;
1572: -- set context to multi org
1573: -- mo_global.init ('OKC');
1574: oks_wf_k_process_pvt.customer_decline_quote
1575: (p_api_version => p_api_version,
1585: );
1586:
1587: --- If any errors happen abort API
1588: IF (x_return_status = g_ret_sts_unexp_error) THEN
1589: RAISE fnd_api.g_exc_unexpected_error;
1590: ELSIF (x_return_status = g_ret_sts_error) THEN
1591: RAISE fnd_api.g_exc_error;
1592: END IF;
1593:
1587: --- If any errors happen abort API
1588: IF (x_return_status = g_ret_sts_unexp_error) THEN
1589: RAISE fnd_api.g_exc_unexpected_error;
1590: ELSIF (x_return_status = g_ret_sts_error) THEN
1591: RAISE fnd_api.g_exc_error;
1592: END IF;
1593:
1594: -- Standard call to get message count and if count is 1, get message info.
1595: fnd_msg_pub.count_and_get (p_encoded => 'F',
1608: l_api_name
1609: );
1610: END IF;
1611: EXCEPTION
1612: WHEN fnd_api.g_exc_error THEN
1613: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1614: fnd_log.STRING (fnd_log.level_procedure,
1615: g_module ||
1616: l_api_name,
1625: fnd_msg_pub.count_and_get (p_encoded => 'F',
1626: p_count => x_msg_count,
1627: p_data => x_msg_data
1628: );
1629: WHEN fnd_api.g_exc_unexpected_error THEN
1630: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1631: fnd_log.STRING (fnd_log.level_procedure,
1632: g_module ||
1633: l_api_name,
1687: );
1688: END IF;
1689:
1690: -- Standard call to check for call compatibility.
1691: IF NOT fnd_api.compatible_api_call (l_api_version,
1692: p_api_version,
1693: l_api_name,
1694: g_pkg_name
1695: ) THEN
1692: p_api_version,
1693: l_api_name,
1694: g_pkg_name
1695: ) THEN
1696: RAISE fnd_api.g_exc_unexpected_error;
1697: END IF;
1698:
1699: -- Initialize message list if p_init_msg_list is set to TRUE.
1700: IF fnd_api.to_boolean (p_init_msg_list) THEN
1696: RAISE fnd_api.g_exc_unexpected_error;
1697: END IF;
1698:
1699: -- Initialize message list if p_init_msg_list is set to TRUE.
1700: IF fnd_api.to_boolean (p_init_msg_list) THEN
1701: fnd_msg_pub.initialize;
1702: END IF;
1703:
1704: -- Initialize API return status to success
1701: fnd_msg_pub.initialize;
1702: END IF;
1703:
1704: -- Initialize API return status to success
1705: x_return_status := fnd_api.g_ret_sts_success;
1706: -- set context to multi org
1707: -- mo_global.init ('OKC');
1708: oks_wf_k_process_pvt.customer_accept_quote
1709: (p_api_version => p_api_version,
1716: );
1717:
1718: --- If any errors happen abort API
1719: IF (x_return_status = g_ret_sts_unexp_error) THEN
1720: RAISE fnd_api.g_exc_unexpected_error;
1721: ELSIF (x_return_status = g_ret_sts_error) THEN
1722: RAISE fnd_api.g_exc_error;
1723: END IF;
1724:
1718: --- If any errors happen abort API
1719: IF (x_return_status = g_ret_sts_unexp_error) THEN
1720: RAISE fnd_api.g_exc_unexpected_error;
1721: ELSIF (x_return_status = g_ret_sts_error) THEN
1722: RAISE fnd_api.g_exc_error;
1723: END IF;
1724:
1725: -- Standard call to get message count and if count is 1, get message info.
1726: fnd_msg_pub.count_and_get (p_encoded => 'F',
1739: l_api_name
1740: );
1741: END IF;
1742: EXCEPTION
1743: WHEN fnd_api.g_exc_error THEN
1744: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1745: fnd_log.STRING (fnd_log.level_procedure,
1746: g_module ||
1747: l_api_name,
1756: fnd_msg_pub.count_and_get (p_encoded => 'F',
1757: p_count => x_msg_count,
1758: p_data => x_msg_data
1759: );
1760: WHEN fnd_api.g_exc_unexpected_error THEN
1761: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1762: fnd_log.STRING (fnd_log.level_procedure,
1763: g_module ||
1764: l_api_name,
1919: );
1920: END IF;
1921:
1922: -- Standard call to check for call compatibility.
1923: IF NOT fnd_api.compatible_api_call (l_api_version,
1924: p_api_version,
1925: l_api_name,
1926: g_pkg_name
1927: ) THEN
1924: p_api_version,
1925: l_api_name,
1926: g_pkg_name
1927: ) THEN
1928: RAISE fnd_api.g_exc_unexpected_error;
1929: END IF;
1930:
1931: -- Initialize message list if p_init_msg_list is set to TRUE.
1932: IF fnd_api.to_boolean (p_init_msg_list) THEN
1928: RAISE fnd_api.g_exc_unexpected_error;
1929: END IF;
1930:
1931: -- Initialize message list if p_init_msg_list is set to TRUE.
1932: IF fnd_api.to_boolean (p_init_msg_list) THEN
1933: fnd_msg_pub.initialize;
1934: END IF;
1935:
1936: -- Initialize API return status to success
1933: fnd_msg_pub.initialize;
1934: END IF;
1935:
1936: -- Initialize API return status to success
1937: x_return_status := fnd_api.g_ret_sts_success;
1938:
1939: -- if p_payment_type is USEDCC then don't update credit card information
1940: IF (p_payment_type = 'USEDCC') THEN
1941: RETURN;
1942: END IF;
1943:
1944: -- delete any existing old txn extension id record
1945: delete_transaction_extension (p_chr_id => p_chr_id,
1946: p_commit => fnd_api.g_false,
1947: x_return_status => x_return_status,
1948: x_msg_data => x_msg_data,
1949: x_msg_count => x_msg_count
1950: );
1950: );
1951:
1952: --- If any errors happen abort API
1953: IF (x_return_status = g_ret_sts_unexp_error) THEN
1954: RAISE fnd_api.g_exc_unexpected_error;
1955: ELSIF (x_return_status = g_ret_sts_error) THEN
1956: RAISE fnd_api.g_exc_error;
1957: END IF;
1958:
1952: --- If any errors happen abort API
1953: IF (x_return_status = g_ret_sts_unexp_error) THEN
1954: RAISE fnd_api.g_exc_unexpected_error;
1955: ELSIF (x_return_status = g_ret_sts_error) THEN
1956: RAISE fnd_api.g_exc_error;
1957: END IF;
1958:
1959: -- Get the payment_terms_id1 from GCD
1960: -- debug log
2008: END IF;
2009:
2010: --- If any errors happen abort API
2011: IF (x_return_status = g_ret_sts_unexp_error) THEN
2012: RAISE fnd_api.g_exc_unexpected_error;
2013: ELSIF (x_return_status = g_ret_sts_error) THEN
2014: RAISE fnd_api.g_exc_error;
2015: END IF;
2016:
2010: --- If any errors happen abort API
2011: IF (x_return_status = g_ret_sts_unexp_error) THEN
2012: RAISE fnd_api.g_exc_unexpected_error;
2013: ELSIF (x_return_status = g_ret_sts_error) THEN
2014: RAISE fnd_api.g_exc_error;
2015: END IF;
2016:
2017: -- Update contract table attributes
2018: IF p_payment_type = 'CCR' THEN
2023: OR (p_expiration_month IS NULL)
2024: OR (p_expiration_year IS NULL) THEN
2025: fnd_message.set_name (g_app_name, 'OKS_CC_INVALID_DATA');
2026: fnd_msg_pub.ADD;
2027: RAISE fnd_api.g_exc_unexpected_error;
2028: END IF; -- cc info invalid
2029: END IF; -- p_instr_assignment_id is null
2030:
2031: -- get billing_address_id
2115: );
2116: END IF;
2117:
2118: IF (x_return_status = g_ret_sts_unexp_error) THEN
2119: RAISE fnd_api.g_exc_unexpected_error;
2120: ELSIF (x_return_status = g_ret_sts_error) THEN
2121: RAISE fnd_api.g_exc_error;
2122: END IF;
2123:
2117:
2118: IF (x_return_status = g_ret_sts_unexp_error) THEN
2119: RAISE fnd_api.g_exc_unexpected_error;
2120: ELSIF (x_return_status = g_ret_sts_error) THEN
2121: RAISE fnd_api.g_exc_error;
2122: END IF;
2123:
2124: -- update OKC and OKS entities
2125: UPDATE oks_k_headers_b
2218: l_api_name
2219: );
2220: END IF;
2221: EXCEPTION
2222: WHEN fnd_api.g_exc_error THEN
2223: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2224: fnd_log.STRING (fnd_log.level_procedure,
2225: g_module ||
2226: l_api_name,
2235: fnd_msg_pub.count_and_get (p_encoded => 'F',
2236: p_count => x_msg_count,
2237: p_data => x_msg_data
2238: );
2239: WHEN fnd_api.g_exc_unexpected_error THEN
2240: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2241: fnd_log.STRING (fnd_log.level_procedure,
2242: g_module ||
2243: l_api_name,
2318: );
2319: END IF;
2320:
2321: -- Standard call to check for call compatibility.
2322: IF NOT fnd_api.compatible_api_call (l_api_version,
2323: p_api_version,
2324: l_api_name,
2325: g_pkg_name
2326: ) THEN
2323: p_api_version,
2324: l_api_name,
2325: g_pkg_name
2326: ) THEN
2327: RAISE fnd_api.g_exc_unexpected_error;
2328: END IF;
2329:
2330: -- debug log
2331: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2336: );
2337: END IF;
2338:
2339: -- Initialize message list if p_init_msg_list is set to TRUE.
2340: IF fnd_api.to_boolean (p_init_msg_list) THEN
2341: fnd_msg_pub.initialize;
2342: END IF;
2343:
2344: -- Initialize API return status to success
2341: fnd_msg_pub.initialize;
2342: END IF;
2343:
2344: -- Initialize API return status to success
2345: x_return_status := fnd_api.g_ret_sts_success;
2346: -- set context to multi org
2347: -- mo_global.init ('OKC');
2348:
2349: -- debug log
2383: END IF;
2384:
2385: --- If any errors happen abort API
2386: IF (x_return_status = g_ret_sts_unexp_error) THEN
2387: RAISE fnd_api.g_exc_unexpected_error;
2388: ELSIF (x_return_status = g_ret_sts_error) THEN
2389: RAISE fnd_api.g_exc_error;
2390: END IF;
2391:
2385: --- If any errors happen abort API
2386: IF (x_return_status = g_ret_sts_unexp_error) THEN
2387: RAISE fnd_api.g_exc_unexpected_error;
2388: ELSIF (x_return_status = g_ret_sts_error) THEN
2389: RAISE fnd_api.g_exc_error;
2390: END IF;
2391:
2392: -- Standard call to get message count and if count is 1, get message info.
2393: fnd_msg_pub.count_and_get (p_encoded => 'F',
2406: l_api_name
2407: );
2408: END IF;
2409: EXCEPTION
2410: WHEN fnd_api.g_exc_error THEN
2411: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2412: fnd_log.STRING (fnd_log.level_procedure,
2413: g_module ||
2414: l_api_name,
2423: fnd_msg_pub.count_and_get (p_encoded => 'F',
2424: p_count => x_msg_count,
2425: p_data => x_msg_data
2426: );
2427: WHEN fnd_api.g_exc_unexpected_error THEN
2428: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2429: fnd_log.STRING (fnd_log.level_procedure,
2430: g_module ||
2431: l_api_name,
2527: );
2528: END IF;
2529:
2530: -- Standard call to check for call compatibility.
2531: IF NOT fnd_api.compatible_api_call (l_api_version,
2532: p_api_version,
2533: l_api_name,
2534: g_pkg_name
2535: ) THEN
2532: p_api_version,
2533: l_api_name,
2534: g_pkg_name
2535: ) THEN
2536: RAISE fnd_api.g_exc_unexpected_error;
2537: END IF;
2538:
2539: -- Initialize message list if p_init_msg_list is set to TRUE.
2540: IF fnd_api.to_boolean (p_init_msg_list) THEN
2536: RAISE fnd_api.g_exc_unexpected_error;
2537: END IF;
2538:
2539: -- Initialize message list if p_init_msg_list is set to TRUE.
2540: IF fnd_api.to_boolean (p_init_msg_list) THEN
2541: fnd_msg_pub.initialize;
2542: END IF;
2543:
2544: -- Initialize API return status to success
2541: fnd_msg_pub.initialize;
2542: END IF;
2543:
2544: -- Initialize API return status to success
2545: x_return_status := fnd_api.g_ret_sts_success;
2546: -- set context to multi org
2547: -- mo_global.init ('OKC');
2548:
2549: -- debug log
2615: END IF;
2616:
2617: --- If any errors happen abort API
2618: IF (x_return_status = g_ret_sts_unexp_error) THEN
2619: RAISE fnd_api.g_exc_unexpected_error;
2620: ELSIF (x_return_status = g_ret_sts_error) THEN
2621: RAISE fnd_api.g_exc_error;
2622: END IF;
2623:
2617: --- If any errors happen abort API
2618: IF (x_return_status = g_ret_sts_unexp_error) THEN
2619: RAISE fnd_api.g_exc_unexpected_error;
2620: ELSIF (x_return_status = g_ret_sts_error) THEN
2621: RAISE fnd_api.g_exc_error;
2622: END IF;
2623:
2624: -- check the contract amount and payment_threshold_amt
2625: -- if contract amount is less then the payment_threshold_amt then credit card is the only valid option
2895: l_api_name
2896: );
2897: END IF;
2898: EXCEPTION
2899: WHEN fnd_api.g_exc_error THEN
2900: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2901: fnd_log.STRING (fnd_log.level_procedure,
2902: g_module ||
2903: l_api_name,
2912: fnd_msg_pub.count_and_get (p_encoded => 'F',
2913: p_count => x_msg_count,
2914: p_data => x_msg_data
2915: );
2916: WHEN fnd_api.g_exc_unexpected_error THEN
2917: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2918: fnd_log.STRING (fnd_log.level_procedure,
2919: g_module ||
2920: l_api_name,
2952: ---------------------------------------------------
2953: PROCEDURE process_credit_card (
2954: p_api_version IN NUMBER,
2955: p_init_msg_list IN VARCHAR2,
2956: p_commit IN VARCHAR2 DEFAULT fnd_api.g_false,
2957: p_order_id IN NUMBER,
2958: p_party_id IN NUMBER,
2959: p_cust_account_id IN NUMBER,
2960: p_card_number IN VARCHAR2 DEFAULT NULL,
3064: );
3065: END IF;
3066:
3067: -- Standard call to check for call compatibility.
3068: IF NOT fnd_api.compatible_api_call (l_api_version,
3069: p_api_version,
3070: l_api_name,
3071: g_pkg_name
3072: ) THEN
3069: p_api_version,
3070: l_api_name,
3071: g_pkg_name
3072: ) THEN
3073: RAISE fnd_api.g_exc_unexpected_error;
3074: END IF;
3075:
3076: -- Initialize message list if p_init_msg_list is set to TRUE.
3077: IF fnd_api.to_boolean (p_init_msg_list) THEN
3073: RAISE fnd_api.g_exc_unexpected_error;
3074: END IF;
3075:
3076: -- Initialize message list if p_init_msg_list is set to TRUE.
3077: IF fnd_api.to_boolean (p_init_msg_list) THEN
3078: fnd_msg_pub.initialize;
3079: END IF;
3080:
3081: -- Initialize API return status to success
3078: fnd_msg_pub.initialize;
3079: END IF;
3080:
3081: -- Initialize API return status to success
3082: x_return_status := fnd_api.g_ret_sts_success;
3083: -- populate the payer record
3084: l_payer.payment_function := 'CUSTOMER_PAYMENT';
3085: l_payer.party_id := p_party_id;
3086: l_payer.cust_account_id := p_cust_account_id;
3134:
3135: -- dbms_output.put_line('Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension');
3136: iby_fndcpt_trxn_pub.delete_transaction_extension
3137: (p_api_version => 1.0,
3138: p_init_msg_list => fnd_api.g_false,
3139: p_commit => p_commit,
3140: x_return_status => x_return_status,
3141: x_msg_count => x_msg_count,
3142: x_msg_data => x_msg_data,
3201: ('IBY_API_NAME',
3202: 'IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension');
3203: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3204: fnd_msg_pub.ADD;
3205: RAISE fnd_api.g_exc_unexpected_error;
3206: ELSIF (x_return_status = g_ret_sts_error) THEN
3207: /*
3208: iby will NOT allow txn extn to be deleted if there are any authorizations against the txn extn id
3209: In OKS QA check, we get a authorization from iby to validate credit card
3216: ('IBY_API_NAME',
3217: 'IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension');
3218: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3219: fnd_msg_pub.ADD;
3220: RAISE fnd_api.g_exc_error;
3221: */
3222: null; -- error is ignored
3223: END IF;
3224: END IF; -- p_old_txn_entension_id is not null
3301:
3302: -- dbms_output.put_line('Calling IBY_FNDCPT_SETUP_PUB.Process_Credit_Card');
3303: iby_fndcpt_setup_pub.process_credit_card
3304: (p_api_version => 1.0,
3305: p_init_msg_list => fnd_api.g_false,
3306: p_commit => p_commit,
3307: x_return_status => x_return_status,
3308: x_msg_count => x_msg_count,
3309: x_msg_data => x_msg_data,
3374: fnd_message.set_token ('IBY_API_NAME',
3375: 'IBY_FNDCPT_SETUP_PUB.Process_Credit_Card');
3376: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3377: fnd_msg_pub.ADD;
3378: RAISE fnd_api.g_exc_unexpected_error;
3379: ELSIF (x_return_status = g_ret_sts_error) THEN
3380: fnd_message.set_name (g_app_name, 'OKS_IBY_API_ERROR');
3381: fnd_message.set_token ('IBY_API_NAME',
3382: 'IBY_FNDCPT_SETUP_PUB.Process_Credit_Card');
3381: fnd_message.set_token ('IBY_API_NAME',
3382: 'IBY_FNDCPT_SETUP_PUB.Process_Credit_Card');
3383: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3384: fnd_msg_pub.ADD;
3385: RAISE fnd_api.g_exc_error;
3386: END IF;
3387: ELSE
3388: -- assignment id exists already
3389: l_instr_assignment_id := p_instr_assignment_id;
3472:
3473: -- dbms_output.put_line('Calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension');
3474: iby_fndcpt_trxn_pub.create_transaction_extension
3475: (p_api_version => 1.0,
3476: p_init_msg_list => fnd_api.g_false,
3477: p_commit => p_commit,
3478: x_return_status => x_return_status,
3479: x_msg_count => x_msg_count,
3480: x_msg_data => x_msg_data,
3551: ('IBY_API_NAME',
3552: 'IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension');
3553: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3554: fnd_msg_pub.ADD;
3555: RAISE fnd_api.g_exc_unexpected_error;
3556: ELSIF (x_return_status = g_ret_sts_error) THEN
3557: fnd_message.set_name (g_app_name, 'OKS_IBY_API_ERROR');
3558: fnd_message.set_token
3559: ('IBY_API_NAME',
3559: ('IBY_API_NAME',
3560: 'IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension');
3561: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3562: fnd_msg_pub.ADD;
3563: RAISE fnd_api.g_exc_error;
3564: END IF;
3565:
3566: -- end debug log
3567: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
3574: l_api_name
3575: );
3576: END IF;
3577: EXCEPTION
3578: WHEN fnd_api.g_exc_error THEN
3579: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
3580: fnd_log.STRING (fnd_log.level_procedure,
3581: g_module ||
3582: l_api_name,
3591: fnd_msg_pub.count_and_get (p_encoded => 'F',
3592: p_count => x_msg_count,
3593: p_data => x_msg_data
3594: );
3595: WHEN fnd_api.g_exc_unexpected_error THEN
3596: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
3597: fnd_log.STRING (fnd_log.level_procedure,
3598: g_module ||
3599: l_api_name,
3715: );
3716: END IF;
3717:
3718: -- Initialize API return status to success
3719: x_return_status := fnd_api.g_ret_sts_success;
3720:
3721: OPEN csr_k_salesrep;
3722:
3723: FETCH csr_k_salesrep
3785: l_api_name
3786: );
3787: END IF;
3788: EXCEPTION
3789: WHEN fnd_api.g_exc_error THEN
3790: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
3791: fnd_log.STRING (fnd_log.level_procedure,
3792: g_module ||
3793: l_api_name,
3802: fnd_msg_pub.count_and_get (p_encoded => 'F',
3803: p_count => x_msg_count,
3804: p_data => x_msg_data
3805: );
3806: WHEN fnd_api.g_exc_unexpected_error THEN
3807: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
3808: fnd_log.STRING (fnd_log.level_procedure,
3809: g_module ||
3810: l_api_name,
3841:
3842: ---------------------------------------------------
3843: PROCEDURE delete_transaction_extension (
3844: p_chr_id IN NUMBER,
3845: p_commit IN VARCHAR2 DEFAULT fnd_api.g_false,
3846: x_return_status OUT NOCOPY VARCHAR2,
3847: x_msg_data OUT NOCOPY VARCHAR2,
3848: x_msg_count OUT NOCOPY NUMBER
3849: ) AS
3898: );
3899: END IF;
3900:
3901: -- Initialize API return status to success
3902: x_return_status := fnd_api.g_ret_sts_success;
3903:
3904: OPEN csr_old_txn_id;
3905:
3906: FETCH csr_old_txn_id
3968: END IF;
3969:
3970: iby_fndcpt_trxn_pub.delete_transaction_extension
3971: (p_api_version => 1.0,
3972: p_init_msg_list => fnd_api.g_false,
3973: p_commit => p_commit,
3974: x_return_status => x_return_status,
3975: x_msg_count => x_msg_count,
3976: x_msg_data => x_msg_data,
4026: ('IBY_API_NAME',
4027: 'IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension');
4028: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
4029: fnd_msg_pub.ADD;
4030: RAISE fnd_api.g_exc_unexpected_error;
4031: ELSIF (x_return_status = g_ret_sts_error) THEN
4032: /*
4033: bug 5486543
4034: iby will NOT allow txn extn to be deleted if there are any authorizations against the txn extn id
4041: ('IBY_API_NAME',
4042: 'IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension');
4043: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
4044: fnd_msg_pub.ADD;
4045: RAISE fnd_api.g_exc_error;
4046: */
4047: x_return_status := fnd_api.g_ret_sts_success; -- initialize
4048: null; -- error is ignored
4049: END IF;
4043: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
4044: fnd_msg_pub.ADD;
4045: RAISE fnd_api.g_exc_error;
4046: */
4047: x_return_status := fnd_api.g_ret_sts_success; -- initialize
4048: null; -- error is ignored
4049: END IF;
4050: END IF; -- csr_old_txn_id%FOUND
4051:
4062: l_api_name
4063: );
4064: END IF;
4065: EXCEPTION
4066: WHEN fnd_api.g_exc_error THEN
4067: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
4068: fnd_log.STRING (fnd_log.level_procedure,
4069: g_module ||
4070: l_api_name,
4079: fnd_msg_pub.count_and_get (p_encoded => 'F',
4080: p_count => x_msg_count,
4081: p_data => x_msg_data
4082: );
4083: WHEN fnd_api.g_exc_unexpected_error THEN
4084: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
4085: fnd_log.STRING (fnd_log.level_procedure,
4086: g_module ||
4087: l_api_name,