[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';
1552: );
1553: END IF;
1554:
1555: -- Standard call to check for call compatibility.
1556: IF NOT fnd_api.compatible_api_call (l_api_version,
1557: p_api_version,
1558: l_api_name,
1559: g_pkg_name
1560: ) THEN
1557: p_api_version,
1558: l_api_name,
1559: g_pkg_name
1560: ) THEN
1561: RAISE fnd_api.g_exc_unexpected_error;
1562: END IF;
1563:
1564: -- Initialize message list if p_init_msg_list is set to TRUE.
1565: IF fnd_api.to_boolean (p_init_msg_list) THEN
1561: RAISE fnd_api.g_exc_unexpected_error;
1562: END IF;
1563:
1564: -- Initialize message list if p_init_msg_list is set to TRUE.
1565: IF fnd_api.to_boolean (p_init_msg_list) THEN
1566: fnd_msg_pub.initialize;
1567: END IF;
1568:
1569: -- Initialize API return status to success
1566: fnd_msg_pub.initialize;
1567: END IF;
1568:
1569: -- Initialize API return status to success
1570: x_return_status := fnd_api.g_ret_sts_success;
1571: -- set context to multi org
1572: -- mo_global.init ('OKC');
1573: oks_wf_k_process_pvt.customer_decline_quote
1574: (p_api_version => p_api_version,
1584: );
1585:
1586: --- If any errors happen abort API
1587: IF (x_return_status = g_ret_sts_unexp_error) THEN
1588: RAISE fnd_api.g_exc_unexpected_error;
1589: ELSIF (x_return_status = g_ret_sts_error) THEN
1590: RAISE fnd_api.g_exc_error;
1591: END IF;
1592:
1586: --- If any errors happen abort API
1587: IF (x_return_status = g_ret_sts_unexp_error) THEN
1588: RAISE fnd_api.g_exc_unexpected_error;
1589: ELSIF (x_return_status = g_ret_sts_error) THEN
1590: RAISE fnd_api.g_exc_error;
1591: END IF;
1592:
1593: -- Standard call to get message count and if count is 1, get message info.
1594: fnd_msg_pub.count_and_get (p_encoded => 'F',
1607: l_api_name
1608: );
1609: END IF;
1610: EXCEPTION
1611: WHEN fnd_api.g_exc_error THEN
1612: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1613: fnd_log.STRING (fnd_log.level_procedure,
1614: g_module ||
1615: l_api_name,
1624: fnd_msg_pub.count_and_get (p_encoded => 'F',
1625: p_count => x_msg_count,
1626: p_data => x_msg_data
1627: );
1628: WHEN fnd_api.g_exc_unexpected_error THEN
1629: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1630: fnd_log.STRING (fnd_log.level_procedure,
1631: g_module ||
1632: l_api_name,
1686: );
1687: END IF;
1688:
1689: -- Standard call to check for call compatibility.
1690: IF NOT fnd_api.compatible_api_call (l_api_version,
1691: p_api_version,
1692: l_api_name,
1693: g_pkg_name
1694: ) THEN
1691: p_api_version,
1692: l_api_name,
1693: g_pkg_name
1694: ) THEN
1695: RAISE fnd_api.g_exc_unexpected_error;
1696: END IF;
1697:
1698: -- Initialize message list if p_init_msg_list is set to TRUE.
1699: IF fnd_api.to_boolean (p_init_msg_list) THEN
1695: RAISE fnd_api.g_exc_unexpected_error;
1696: END IF;
1697:
1698: -- Initialize message list if p_init_msg_list is set to TRUE.
1699: IF fnd_api.to_boolean (p_init_msg_list) THEN
1700: fnd_msg_pub.initialize;
1701: END IF;
1702:
1703: -- Initialize API return status to success
1700: fnd_msg_pub.initialize;
1701: END IF;
1702:
1703: -- Initialize API return status to success
1704: x_return_status := fnd_api.g_ret_sts_success;
1705: -- set context to multi org
1706: -- mo_global.init ('OKC');
1707: oks_wf_k_process_pvt.customer_accept_quote
1708: (p_api_version => p_api_version,
1715: );
1716:
1717: --- If any errors happen abort API
1718: IF (x_return_status = g_ret_sts_unexp_error) THEN
1719: RAISE fnd_api.g_exc_unexpected_error;
1720: ELSIF (x_return_status = g_ret_sts_error) THEN
1721: RAISE fnd_api.g_exc_error;
1722: END IF;
1723:
1717: --- If any errors happen abort API
1718: IF (x_return_status = g_ret_sts_unexp_error) THEN
1719: RAISE fnd_api.g_exc_unexpected_error;
1720: ELSIF (x_return_status = g_ret_sts_error) THEN
1721: RAISE fnd_api.g_exc_error;
1722: END IF;
1723:
1724: -- Standard call to get message count and if count is 1, get message info.
1725: fnd_msg_pub.count_and_get (p_encoded => 'F',
1738: l_api_name
1739: );
1740: END IF;
1741: EXCEPTION
1742: WHEN fnd_api.g_exc_error THEN
1743: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1744: fnd_log.STRING (fnd_log.level_procedure,
1745: g_module ||
1746: l_api_name,
1755: fnd_msg_pub.count_and_get (p_encoded => 'F',
1756: p_count => x_msg_count,
1757: p_data => x_msg_data
1758: );
1759: WHEN fnd_api.g_exc_unexpected_error THEN
1760: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1761: fnd_log.STRING (fnd_log.level_procedure,
1762: g_module ||
1763: l_api_name,
1918: );
1919: END IF;
1920:
1921: -- Standard call to check for call compatibility.
1922: IF NOT fnd_api.compatible_api_call (l_api_version,
1923: p_api_version,
1924: l_api_name,
1925: g_pkg_name
1926: ) THEN
1923: p_api_version,
1924: l_api_name,
1925: g_pkg_name
1926: ) THEN
1927: RAISE fnd_api.g_exc_unexpected_error;
1928: END IF;
1929:
1930: -- Initialize message list if p_init_msg_list is set to TRUE.
1931: IF fnd_api.to_boolean (p_init_msg_list) THEN
1927: RAISE fnd_api.g_exc_unexpected_error;
1928: END IF;
1929:
1930: -- Initialize message list if p_init_msg_list is set to TRUE.
1931: IF fnd_api.to_boolean (p_init_msg_list) THEN
1932: fnd_msg_pub.initialize;
1933: END IF;
1934:
1935: -- Initialize API return status to success
1932: fnd_msg_pub.initialize;
1933: END IF;
1934:
1935: -- Initialize API return status to success
1936: x_return_status := fnd_api.g_ret_sts_success;
1937:
1938: -- if p_payment_type is USEDCC then don't update credit card information
1939: IF (p_payment_type = 'USEDCC') THEN
1940: RETURN;
1941: END IF;
1942:
1943: -- delete any existing old txn extension id record
1944: delete_transaction_extension (p_chr_id => p_chr_id,
1945: p_commit => fnd_api.g_false,
1946: x_return_status => x_return_status,
1947: x_msg_data => x_msg_data,
1948: x_msg_count => x_msg_count
1949: );
1949: );
1950:
1951: --- If any errors happen abort API
1952: IF (x_return_status = g_ret_sts_unexp_error) THEN
1953: RAISE fnd_api.g_exc_unexpected_error;
1954: ELSIF (x_return_status = g_ret_sts_error) THEN
1955: RAISE fnd_api.g_exc_error;
1956: END IF;
1957:
1951: --- If any errors happen abort API
1952: IF (x_return_status = g_ret_sts_unexp_error) THEN
1953: RAISE fnd_api.g_exc_unexpected_error;
1954: ELSIF (x_return_status = g_ret_sts_error) THEN
1955: RAISE fnd_api.g_exc_error;
1956: END IF;
1957:
1958: -- Get the payment_terms_id1 from GCD
1959: -- debug log
2007: END IF;
2008:
2009: --- If any errors happen abort API
2010: IF (x_return_status = g_ret_sts_unexp_error) THEN
2011: RAISE fnd_api.g_exc_unexpected_error;
2012: ELSIF (x_return_status = g_ret_sts_error) THEN
2013: RAISE fnd_api.g_exc_error;
2014: END IF;
2015:
2009: --- If any errors happen abort API
2010: IF (x_return_status = g_ret_sts_unexp_error) THEN
2011: RAISE fnd_api.g_exc_unexpected_error;
2012: ELSIF (x_return_status = g_ret_sts_error) THEN
2013: RAISE fnd_api.g_exc_error;
2014: END IF;
2015:
2016: -- Update contract table attributes
2017: IF p_payment_type = 'CCR' THEN
2022: OR (p_expiration_month IS NULL)
2023: OR (p_expiration_year IS NULL) THEN
2024: fnd_message.set_name (g_app_name, 'OKS_CC_INVALID_DATA');
2025: fnd_msg_pub.ADD;
2026: RAISE fnd_api.g_exc_unexpected_error;
2027: END IF; -- cc info invalid
2028: END IF; -- p_instr_assignment_id is null
2029:
2030: -- get billing_address_id
2114: );
2115: END IF;
2116:
2117: IF (x_return_status = g_ret_sts_unexp_error) THEN
2118: RAISE fnd_api.g_exc_unexpected_error;
2119: ELSIF (x_return_status = g_ret_sts_error) THEN
2120: RAISE fnd_api.g_exc_error;
2121: END IF;
2122:
2116:
2117: IF (x_return_status = g_ret_sts_unexp_error) THEN
2118: RAISE fnd_api.g_exc_unexpected_error;
2119: ELSIF (x_return_status = g_ret_sts_error) THEN
2120: RAISE fnd_api.g_exc_error;
2121: END IF;
2122:
2123: -- update OKC and OKS entities
2124: UPDATE oks_k_headers_b
2217: l_api_name
2218: );
2219: END IF;
2220: EXCEPTION
2221: WHEN fnd_api.g_exc_error THEN
2222: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2223: fnd_log.STRING (fnd_log.level_procedure,
2224: g_module ||
2225: l_api_name,
2234: fnd_msg_pub.count_and_get (p_encoded => 'F',
2235: p_count => x_msg_count,
2236: p_data => x_msg_data
2237: );
2238: WHEN fnd_api.g_exc_unexpected_error THEN
2239: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2240: fnd_log.STRING (fnd_log.level_procedure,
2241: g_module ||
2242: l_api_name,
2317: );
2318: END IF;
2319:
2320: -- Standard call to check for call compatibility.
2321: IF NOT fnd_api.compatible_api_call (l_api_version,
2322: p_api_version,
2323: l_api_name,
2324: g_pkg_name
2325: ) THEN
2322: p_api_version,
2323: l_api_name,
2324: g_pkg_name
2325: ) THEN
2326: RAISE fnd_api.g_exc_unexpected_error;
2327: END IF;
2328:
2329: -- debug log
2330: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2335: );
2336: END IF;
2337:
2338: -- Initialize message list if p_init_msg_list is set to TRUE.
2339: IF fnd_api.to_boolean (p_init_msg_list) THEN
2340: fnd_msg_pub.initialize;
2341: END IF;
2342:
2343: -- Initialize API return status to success
2340: fnd_msg_pub.initialize;
2341: END IF;
2342:
2343: -- Initialize API return status to success
2344: x_return_status := fnd_api.g_ret_sts_success;
2345: -- set context to multi org
2346: -- mo_global.init ('OKC');
2347:
2348: -- debug log
2382: END IF;
2383:
2384: --- If any errors happen abort API
2385: IF (x_return_status = g_ret_sts_unexp_error) THEN
2386: RAISE fnd_api.g_exc_unexpected_error;
2387: ELSIF (x_return_status = g_ret_sts_error) THEN
2388: RAISE fnd_api.g_exc_error;
2389: END IF;
2390:
2384: --- If any errors happen abort API
2385: IF (x_return_status = g_ret_sts_unexp_error) THEN
2386: RAISE fnd_api.g_exc_unexpected_error;
2387: ELSIF (x_return_status = g_ret_sts_error) THEN
2388: RAISE fnd_api.g_exc_error;
2389: END IF;
2390:
2391: -- Standard call to get message count and if count is 1, get message info.
2392: fnd_msg_pub.count_and_get (p_encoded => 'F',
2405: l_api_name
2406: );
2407: END IF;
2408: EXCEPTION
2409: WHEN fnd_api.g_exc_error THEN
2410: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2411: fnd_log.STRING (fnd_log.level_procedure,
2412: g_module ||
2413: l_api_name,
2422: fnd_msg_pub.count_and_get (p_encoded => 'F',
2423: p_count => x_msg_count,
2424: p_data => x_msg_data
2425: );
2426: WHEN fnd_api.g_exc_unexpected_error THEN
2427: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2428: fnd_log.STRING (fnd_log.level_procedure,
2429: g_module ||
2430: l_api_name,
2514: );
2515: END IF;
2516:
2517: -- Standard call to check for call compatibility.
2518: IF NOT fnd_api.compatible_api_call (l_api_version,
2519: p_api_version,
2520: l_api_name,
2521: g_pkg_name
2522: ) THEN
2519: p_api_version,
2520: l_api_name,
2521: g_pkg_name
2522: ) THEN
2523: RAISE fnd_api.g_exc_unexpected_error;
2524: END IF;
2525:
2526: -- Initialize message list if p_init_msg_list is set to TRUE.
2527: IF fnd_api.to_boolean (p_init_msg_list) THEN
2523: RAISE fnd_api.g_exc_unexpected_error;
2524: END IF;
2525:
2526: -- Initialize message list if p_init_msg_list is set to TRUE.
2527: IF fnd_api.to_boolean (p_init_msg_list) THEN
2528: fnd_msg_pub.initialize;
2529: END IF;
2530:
2531: -- Initialize API return status to success
2528: fnd_msg_pub.initialize;
2529: END IF;
2530:
2531: -- Initialize API return status to success
2532: x_return_status := fnd_api.g_ret_sts_success;
2533: -- set context to multi org
2534: -- mo_global.init ('OKC');
2535:
2536: -- debug log
2602: END IF;
2603:
2604: --- If any errors happen abort API
2605: IF (x_return_status = g_ret_sts_unexp_error) THEN
2606: RAISE fnd_api.g_exc_unexpected_error;
2607: ELSIF (x_return_status = g_ret_sts_error) THEN
2608: RAISE fnd_api.g_exc_error;
2609: END IF;
2610:
2604: --- If any errors happen abort API
2605: IF (x_return_status = g_ret_sts_unexp_error) THEN
2606: RAISE fnd_api.g_exc_unexpected_error;
2607: ELSIF (x_return_status = g_ret_sts_error) THEN
2608: RAISE fnd_api.g_exc_error;
2609: END IF;
2610:
2611: -- check the contract amount and payment_threshold_amt
2612: -- if contract amount is less then the payment_threshold_amt then credit card is the only valid option
2847: l_api_name
2848: );
2849: END IF;
2850: EXCEPTION
2851: WHEN fnd_api.g_exc_error THEN
2852: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2853: fnd_log.STRING (fnd_log.level_procedure,
2854: g_module ||
2855: l_api_name,
2864: fnd_msg_pub.count_and_get (p_encoded => 'F',
2865: p_count => x_msg_count,
2866: p_data => x_msg_data
2867: );
2868: WHEN fnd_api.g_exc_unexpected_error THEN
2869: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2870: fnd_log.STRING (fnd_log.level_procedure,
2871: g_module ||
2872: l_api_name,
2904: ---------------------------------------------------
2905: PROCEDURE process_credit_card (
2906: p_api_version IN NUMBER,
2907: p_init_msg_list IN VARCHAR2,
2908: p_commit IN VARCHAR2 DEFAULT fnd_api.g_false,
2909: p_order_id IN NUMBER,
2910: p_party_id IN NUMBER,
2911: p_cust_account_id IN NUMBER,
2912: p_card_number IN VARCHAR2 DEFAULT NULL,
3016: );
3017: END IF;
3018:
3019: -- Standard call to check for call compatibility.
3020: IF NOT fnd_api.compatible_api_call (l_api_version,
3021: p_api_version,
3022: l_api_name,
3023: g_pkg_name
3024: ) THEN
3021: p_api_version,
3022: l_api_name,
3023: g_pkg_name
3024: ) THEN
3025: RAISE fnd_api.g_exc_unexpected_error;
3026: END IF;
3027:
3028: -- Initialize message list if p_init_msg_list is set to TRUE.
3029: IF fnd_api.to_boolean (p_init_msg_list) THEN
3025: RAISE fnd_api.g_exc_unexpected_error;
3026: END IF;
3027:
3028: -- Initialize message list if p_init_msg_list is set to TRUE.
3029: IF fnd_api.to_boolean (p_init_msg_list) THEN
3030: fnd_msg_pub.initialize;
3031: END IF;
3032:
3033: -- Initialize API return status to success
3030: fnd_msg_pub.initialize;
3031: END IF;
3032:
3033: -- Initialize API return status to success
3034: x_return_status := fnd_api.g_ret_sts_success;
3035: -- populate the payer record
3036: l_payer.payment_function := 'CUSTOMER_PAYMENT';
3037: l_payer.party_id := p_party_id;
3038: l_payer.cust_account_id := p_cust_account_id;
3086:
3087: -- dbms_output.put_line('Calling IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension');
3088: iby_fndcpt_trxn_pub.delete_transaction_extension
3089: (p_api_version => 1.0,
3090: p_init_msg_list => fnd_api.g_false,
3091: p_commit => p_commit,
3092: x_return_status => x_return_status,
3093: x_msg_count => x_msg_count,
3094: x_msg_data => x_msg_data,
3153: ('IBY_API_NAME',
3154: 'IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension');
3155: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3156: fnd_msg_pub.ADD;
3157: RAISE fnd_api.g_exc_unexpected_error;
3158: ELSIF (x_return_status = g_ret_sts_error) THEN
3159: /*
3160: iby will NOT allow txn extn to be deleted if there are any authorizations against the txn extn id
3161: In OKS QA check, we get a authorization from iby to validate credit card
3168: ('IBY_API_NAME',
3169: 'IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension');
3170: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3171: fnd_msg_pub.ADD;
3172: RAISE fnd_api.g_exc_error;
3173: */
3174: null; -- error is ignored
3175: END IF;
3176: END IF; -- p_old_txn_entension_id is not null
3253:
3254: -- dbms_output.put_line('Calling IBY_FNDCPT_SETUP_PUB.Process_Credit_Card');
3255: iby_fndcpt_setup_pub.process_credit_card
3256: (p_api_version => 1.0,
3257: p_init_msg_list => fnd_api.g_false,
3258: p_commit => p_commit,
3259: x_return_status => x_return_status,
3260: x_msg_count => x_msg_count,
3261: x_msg_data => x_msg_data,
3326: fnd_message.set_token ('IBY_API_NAME',
3327: 'IBY_FNDCPT_SETUP_PUB.Process_Credit_Card');
3328: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3329: fnd_msg_pub.ADD;
3330: RAISE fnd_api.g_exc_unexpected_error;
3331: ELSIF (x_return_status = g_ret_sts_error) THEN
3332: fnd_message.set_name (g_app_name, 'OKS_IBY_API_ERROR');
3333: fnd_message.set_token ('IBY_API_NAME',
3334: 'IBY_FNDCPT_SETUP_PUB.Process_Credit_Card');
3333: fnd_message.set_token ('IBY_API_NAME',
3334: 'IBY_FNDCPT_SETUP_PUB.Process_Credit_Card');
3335: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3336: fnd_msg_pub.ADD;
3337: RAISE fnd_api.g_exc_error;
3338: END IF;
3339: ELSE
3340: -- assignment id exists already
3341: l_instr_assignment_id := p_instr_assignment_id;
3424:
3425: -- dbms_output.put_line('Calling IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension');
3426: iby_fndcpt_trxn_pub.create_transaction_extension
3427: (p_api_version => 1.0,
3428: p_init_msg_list => fnd_api.g_false,
3429: p_commit => p_commit,
3430: x_return_status => x_return_status,
3431: x_msg_count => x_msg_count,
3432: x_msg_data => x_msg_data,
3503: ('IBY_API_NAME',
3504: 'IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension');
3505: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3506: fnd_msg_pub.ADD;
3507: RAISE fnd_api.g_exc_unexpected_error;
3508: ELSIF (x_return_status = g_ret_sts_error) THEN
3509: fnd_message.set_name (g_app_name, 'OKS_IBY_API_ERROR');
3510: fnd_message.set_token
3511: ('IBY_API_NAME',
3511: ('IBY_API_NAME',
3512: 'IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension');
3513: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3514: fnd_msg_pub.ADD;
3515: RAISE fnd_api.g_exc_error;
3516: END IF;
3517:
3518: -- end debug log
3519: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
3526: l_api_name
3527: );
3528: END IF;
3529: EXCEPTION
3530: WHEN fnd_api.g_exc_error THEN
3531: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
3532: fnd_log.STRING (fnd_log.level_procedure,
3533: g_module ||
3534: l_api_name,
3543: fnd_msg_pub.count_and_get (p_encoded => 'F',
3544: p_count => x_msg_count,
3545: p_data => x_msg_data
3546: );
3547: WHEN fnd_api.g_exc_unexpected_error THEN
3548: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
3549: fnd_log.STRING (fnd_log.level_procedure,
3550: g_module ||
3551: l_api_name,
3667: );
3668: END IF;
3669:
3670: -- Initialize API return status to success
3671: x_return_status := fnd_api.g_ret_sts_success;
3672:
3673: OPEN csr_k_salesrep;
3674:
3675: FETCH csr_k_salesrep
3737: l_api_name
3738: );
3739: END IF;
3740: EXCEPTION
3741: WHEN fnd_api.g_exc_error THEN
3742: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
3743: fnd_log.STRING (fnd_log.level_procedure,
3744: g_module ||
3745: l_api_name,
3754: fnd_msg_pub.count_and_get (p_encoded => 'F',
3755: p_count => x_msg_count,
3756: p_data => x_msg_data
3757: );
3758: WHEN fnd_api.g_exc_unexpected_error THEN
3759: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
3760: fnd_log.STRING (fnd_log.level_procedure,
3761: g_module ||
3762: l_api_name,
3793:
3794: ---------------------------------------------------
3795: PROCEDURE delete_transaction_extension (
3796: p_chr_id IN NUMBER,
3797: p_commit IN VARCHAR2 DEFAULT fnd_api.g_false,
3798: x_return_status OUT NOCOPY VARCHAR2,
3799: x_msg_data OUT NOCOPY VARCHAR2,
3800: x_msg_count OUT NOCOPY NUMBER
3801: ) AS
3850: );
3851: END IF;
3852:
3853: -- Initialize API return status to success
3854: x_return_status := fnd_api.g_ret_sts_success;
3855:
3856: OPEN csr_old_txn_id;
3857:
3858: FETCH csr_old_txn_id
3920: END IF;
3921:
3922: iby_fndcpt_trxn_pub.delete_transaction_extension
3923: (p_api_version => 1.0,
3924: p_init_msg_list => fnd_api.g_false,
3925: p_commit => p_commit,
3926: x_return_status => x_return_status,
3927: x_msg_count => x_msg_count,
3928: x_msg_data => x_msg_data,
3978: ('IBY_API_NAME',
3979: 'IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension');
3980: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3981: fnd_msg_pub.ADD;
3982: RAISE fnd_api.g_exc_unexpected_error;
3983: ELSIF (x_return_status = g_ret_sts_error) THEN
3984: /*
3985: bug 5486543
3986: iby will NOT allow txn extn to be deleted if there are any authorizations against the txn extn id
3993: ('IBY_API_NAME',
3994: 'IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension');
3995: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3996: fnd_msg_pub.ADD;
3997: RAISE fnd_api.g_exc_error;
3998: */
3999: x_return_status := fnd_api.g_ret_sts_success; -- initialize
4000: null; -- error is ignored
4001: END IF;
3995: fnd_message.set_token ('ERROR_DTLS', l_response.result_message);
3996: fnd_msg_pub.ADD;
3997: RAISE fnd_api.g_exc_error;
3998: */
3999: x_return_status := fnd_api.g_ret_sts_success; -- initialize
4000: null; -- error is ignored
4001: END IF;
4002: END IF; -- csr_old_txn_id%FOUND
4003:
4014: l_api_name
4015: );
4016: END IF;
4017: EXCEPTION
4018: WHEN fnd_api.g_exc_error THEN
4019: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
4020: fnd_log.STRING (fnd_log.level_procedure,
4021: g_module ||
4022: l_api_name,
4031: fnd_msg_pub.count_and_get (p_encoded => 'F',
4032: p_count => x_msg_count,
4033: p_data => x_msg_data
4034: );
4035: WHEN fnd_api.g_exc_unexpected_error THEN
4036: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
4037: fnd_log.STRING (fnd_log.level_procedure,
4038: g_module ||
4039: l_api_name,