DBA Data[Home] [Help]

APPS.GME_UPDATE_STEP_QTY_PVT dependencies on FND_API

Line 76: x_return_status := fnd_api.g_ret_sts_success;

72:
73: /* Set the savepoint before proceeding */
74: SAVEPOINT update_step_qty;
75: /* Set the return status to success initially */
76: x_return_status := fnd_api.g_ret_sts_success;
77: IF g_debug <= gme_debug.g_log_statement THEN
78: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
79: || l_api_name||'p_routing_scale_factor ' || p_routing_scale_factor);
80: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'

Line 109: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN

105: (p_batch_row => l_batch_header
106: ,x_rsc_row_count => l_rec
107: ,x_return_status => l_return_status);
108:
109: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
110: RAISE fnd_api.g_exc_error;
111: END IF;
112: IF g_debug <= gme_debug.g_log_statement THEN
113: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'

Line 110: RAISE fnd_api.g_exc_error;

106: ,x_rsc_row_count => l_rec
107: ,x_return_status => l_return_status);
108:
109: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
110: RAISE fnd_api.g_exc_error;
111: END IF;
112: IF g_debug <= gme_debug.g_log_statement THEN
113: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
114: || l_api_name||': Resource transactions loaded '||l_rec);

Line 311: x_return_status := fnd_api.g_ret_sts_error;

307: END IF;
308: EXCEPTION
309: WHEN batch_step_fetch_error THEN
310: ROLLBACK TO SAVEPOINT update_step_qty;
311: x_return_status := fnd_api.g_ret_sts_error;
312: fnd_msg_pub.count_and_get (p_count => x_message_count
313: ,p_data => x_message_list);
314: WHEN invalid_step_status THEN
315: ROLLBACK TO SAVEPOINT update_step_qty;

Line 316: x_return_status := fnd_api.g_ret_sts_error;

312: fnd_msg_pub.count_and_get (p_count => x_message_count
313: ,p_data => x_message_list);
314: WHEN invalid_step_status THEN
315: ROLLBACK TO SAVEPOINT update_step_qty;
316: x_return_status := fnd_api.g_ret_sts_error;
317: gme_common_pvt.log_message ('GME_API_INV_STAT_STEP_EDIT');
318: fnd_msg_pub.count_and_get (p_count => x_message_count
319: ,p_data => x_message_list);
320: WHEN batch_header_fetch_error THEN

Line 322: x_return_status := fnd_api.g_ret_sts_error;

318: fnd_msg_pub.count_and_get (p_count => x_message_count
319: ,p_data => x_message_list);
320: WHEN batch_header_fetch_error THEN
321: ROLLBACK TO SAVEPOINT update_step_qty;
322: x_return_status := fnd_api.g_ret_sts_error;
323: fnd_msg_pub.count_and_get (p_count => x_message_count
324: ,p_data => x_message_list);
325: WHEN invalid_batch_status THEN
326: ROLLBACK TO SAVEPOINT update_step_qty;

Line 327: x_return_status := fnd_api.g_ret_sts_error;

323: fnd_msg_pub.count_and_get (p_count => x_message_count
324: ,p_data => x_message_list);
325: WHEN invalid_batch_status THEN
326: ROLLBACK TO SAVEPOINT update_step_qty;
327: x_return_status := fnd_api.g_ret_sts_error;
328: gme_common_pvt.log_message ('GME_API_INV_BATCH_EDIT_STEP');
329: fnd_msg_pub.count_and_get (p_count => x_message_count
330: ,p_data => x_message_list);
331: WHEN auto_step_calc_error THEN

Line 352: x_return_status := fnd_api.g_ret_sts_unexp_error;

348: || SQLERRM);
349: END IF;
350:
351: ROLLBACK TO SAVEPOINT edit_step_qty;
352: x_return_status := fnd_api.g_ret_sts_unexp_error;
353: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
354: fnd_msg_pub.count_and_get (p_count => x_message_count
355: ,p_data => x_message_list);
356: END update_step_qty;

Line 472: x_return_status := fnd_api.g_ret_sts_success;

468: || l_api_name);
469: END IF;
470:
471: /* Set the return status to success initially */
472: x_return_status := fnd_api.g_ret_sts_success;
473: /* Bug 3545726 store original charges */
474: l_orig_charges := NVL (p_batch_step_rec.actual_charges, 0);
475:
476: IF p_batch_step_rec.step_status > gme_common_pvt.g_step_pending THEN

Line 536: x_return_status := fnd_api.g_ret_sts_error;

532: EXCEPTION
533: WHEN compute_resource_error THEN
534: x_return_status := l_return_status;
535: WHEN batch_step_upd_err OR error_calc_charge OR batch_step_fetch_err THEN
536: x_return_status := fnd_api.g_ret_sts_error;
537: WHEN OTHERS THEN
538: IF g_debug <= gme_debug.g_log_unexpected THEN
539: gme_debug.put_line ( 'When others exception in '
540: || g_pkg_name

Line 547: x_return_status := fnd_api.g_ret_sts_unexp_error;

543: || ' Error is '
544: || SQLERRM);
545: END IF;
546:
547: x_return_status := fnd_api.g_ret_sts_unexp_error;
548: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
549: END calculate_quantities;
550:
551: /*===========================================================================================

Line 659: x_return_status := fnd_api.g_ret_sts_success;

655: || l_api_name);
656: END IF;
657:
658: /* Initialize the return status to success */
659: x_return_status := fnd_api.g_ret_sts_success;
660: x_charge := 0;
661: l_remaining_quantity := -1;
662:
663: IF NVL (g_debug, -1) = gme_debug.g_log_statement THEN

Line 838: IF l_return_status <> fnd_api.g_ret_sts_success THEN

834: ,p_no_of_charges => l_charge
835: ,p_remaining_quantity => l_remaining_quantity
836: ,x_return_status => l_return_status);
837:
838: IF l_return_status <> fnd_api.g_ret_sts_success THEN
839: RAISE error_charge_insert;
840: END IF;
841: END IF; /*if l_scale_type = 1*/
842: END IF; /*if p_resource is not null*/

Line 849: x_return_status := fnd_api.g_ret_sts_error;

845: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
846: END IF;
847: EXCEPTION
848: WHEN error_step_not_found THEN
849: x_return_status := fnd_api.g_ret_sts_error;
850: gme_common_pvt.log_message ('GME_BATCH_STEP_NOT_FOUND'
851: ,'STEP_ID'
852: ,p_step_id);
853: WHEN error_calc_charge_conv THEN

Line 854: -- x_return_status := FND_API.G_RET_STS_ERROR;

850: gme_common_pvt.log_message ('GME_BATCH_STEP_NOT_FOUND'
851: ,'STEP_ID'
852: ,p_step_id);
853: WHEN error_calc_charge_conv THEN
854: -- x_return_status := FND_API.G_RET_STS_ERROR;
855: gme_common_pvt.log_message ('GME_CALC_CHARGE_CONV_ERROR'
856: ,'STEP_NO'
857: ,x_step_no);
858: WHEN error_max_cap_not_mass_vol THEN

Line 881: x_return_status := fnd_api.g_ret_sts_unexp_error;

877: || ' Error is '
878: || SQLERRM);
879: END IF;
880:
881: x_return_status := fnd_api.g_ret_sts_unexp_error;
882: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
883: END calc_charge;
884:
885: /*===========================================================================================

Line 935: x_return_status := fnd_api.g_ret_sts_success;

931: || l_api_name);
932: END IF;
933:
934: /* Initialize the return status to success */
935: x_return_status := fnd_api.g_ret_sts_success;
936:
937: /* Fetch all the activities associated with the batch step */
938: OPEN cur_step_activity_ids;
939:

Line 1014: x_return_status := fnd_api.g_ret_sts_error;

1010: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1011: END IF;
1012: EXCEPTION
1013: WHEN step_activity_fetch_error THEN
1014: x_return_status := fnd_api.g_ret_sts_error;
1015: WHEN step_resource_upd_err THEN
1016: x_return_status := l_return_status;
1017: WHEN step_activity_upd_err THEN
1018: x_return_status := fnd_api.g_ret_sts_error;

Line 1018: x_return_status := fnd_api.g_ret_sts_error;

1014: x_return_status := fnd_api.g_ret_sts_error;
1015: WHEN step_resource_upd_err THEN
1016: x_return_status := l_return_status;
1017: WHEN step_activity_upd_err THEN
1018: x_return_status := fnd_api.g_ret_sts_error;
1019: WHEN VALUE_ERROR THEN
1020: x_return_status := fnd_api.g_ret_sts_error;
1021:
1022: IF l_gme_calc_int_rsrc_usage_char IS NOT NULL THEN

Line 1020: x_return_status := fnd_api.g_ret_sts_error;

1016: x_return_status := l_return_status;
1017: WHEN step_activity_upd_err THEN
1018: x_return_status := fnd_api.g_ret_sts_error;
1019: WHEN VALUE_ERROR THEN
1020: x_return_status := fnd_api.g_ret_sts_error;
1021:
1022: IF l_gme_calc_int_rsrc_usage_char IS NOT NULL THEN
1023: l_user_profile_option_name := gme_common_pvt.g_calc_interim_rsrc_usg_ind;
1024: /* SELECT user_profile_option_name

Line 1049: x_return_status := fnd_api.g_ret_sts_unexp_error;

1045: || ' Error is '
1046: || SQLERRM);
1047: END IF;
1048:
1049: x_return_status := fnd_api.g_ret_sts_unexp_error;
1050: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1051: END update_activities;
1052:
1053: /*===========================================================================================

Line 1148: x_return_status := fnd_api.g_ret_sts_success;

1144: || l_api_name);
1145: END IF;
1146:
1147: /* Initialize the return status to success */
1148: x_return_status := fnd_api.g_ret_sts_success;
1149:
1150: IF (p_batch_hdr_rec.batch_type = 0) THEN
1151: l_doc_type := 'PROD';
1152: ELSE

Line 1733: x_return_status := fnd_api.g_ret_sts_error;

1729: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1730: END IF;
1731: EXCEPTION
1732: WHEN activity_resource_fetch_error THEN
1733: x_return_status := fnd_api.g_ret_sts_error;
1734: WHEN resource_trans_ins_err THEN
1735: x_return_status := fnd_api.g_ret_sts_error;
1736: WHEN step_resource_upd_err THEN
1737: x_return_status := fnd_api.g_ret_sts_error;

Line 1735: x_return_status := fnd_api.g_ret_sts_error;

1731: EXCEPTION
1732: WHEN activity_resource_fetch_error THEN
1733: x_return_status := fnd_api.g_ret_sts_error;
1734: WHEN resource_trans_ins_err THEN
1735: x_return_status := fnd_api.g_ret_sts_error;
1736: WHEN step_resource_upd_err THEN
1737: x_return_status := fnd_api.g_ret_sts_error;
1738: WHEN error_fetch_rsrc_tran THEN
1739: x_return_status := l_return_status;

Line 1737: x_return_status := fnd_api.g_ret_sts_error;

1733: x_return_status := fnd_api.g_ret_sts_error;
1734: WHEN resource_trans_ins_err THEN
1735: x_return_status := fnd_api.g_ret_sts_error;
1736: WHEN step_resource_upd_err THEN
1737: x_return_status := fnd_api.g_ret_sts_error;
1738: WHEN error_fetch_rsrc_tran THEN
1739: x_return_status := l_return_status;
1740: WHEN error_txns_update THEN
1741: x_return_status := fnd_api.g_ret_sts_error;

Line 1741: x_return_status := fnd_api.g_ret_sts_error;

1737: x_return_status := fnd_api.g_ret_sts_error;
1738: WHEN error_fetch_rsrc_tran THEN
1739: x_return_status := l_return_status;
1740: WHEN error_txns_update THEN
1741: x_return_status := fnd_api.g_ret_sts_error;
1742: WHEN qty_below_cap_error THEN
1743: x_return_status := fnd_api.g_ret_sts_error;
1744: gme_common_pvt.log_message ('GME_API_RSRC_QTY_BELOW_CAP'
1745: ,'RESOURCES'

Line 1743: x_return_status := fnd_api.g_ret_sts_error;

1739: x_return_status := l_return_status;
1740: WHEN error_txns_update THEN
1741: x_return_status := fnd_api.g_ret_sts_error;
1742: WHEN qty_below_cap_error THEN
1743: x_return_status := fnd_api.g_ret_sts_error;
1744: gme_common_pvt.log_message ('GME_API_RSRC_QTY_BELOW_CAP'
1745: ,'RESOURCES'
1746: ,l_gme_batchstep_resources.resources);
1747: WHEN OTHERS THEN

Line 1757: x_return_status := fnd_api.g_ret_sts_unexp_error;

1753: || ' Error is '
1754: || SQLERRM);
1755: END IF;
1756:
1757: x_return_status := fnd_api.g_ret_sts_unexp_error;
1758: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1759: END update_resources;
1760:
1761: /*===========================================================================================

Line 1808: x_return_status := fnd_api.g_ret_sts_success;

1804: || l_api_name);
1805: END IF;
1806:
1807: /* Initialize the return status to success */
1808: x_return_status := fnd_api.g_ret_sts_success;
1809:
1810: /* Generate the surrogate key */
1811: OPEN cur_get_poc_trans_id;
1812:

Line 1895: RAISE FND_API.g_exc_error;

1891: IF NOT gme_api_grp.close_period_check_flexible
1892: (p_tran_rec => p_tran_rec,
1893: x_tran_rec => l_tran_rec_out)
1894: THEN
1895: RAISE FND_API.g_exc_error;
1896: END IF;
1897: l_ins_resource_row.trans_date := l_tran_rec_out.trans_date;
1898: */
1899: IF NOT (gme_resource_txns_gtmp_dbl.insert_row (l_ins_resource_row

Line 1909: x_return_status := fnd_api.g_ret_sts_error;

1905: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1906: END IF;
1907: EXCEPTION
1908: WHEN resource_trans_ins_err THEN
1909: x_return_status := fnd_api.g_ret_sts_error;
1910: WHEN fnd_api.g_exc_error THEN
1911: x_return_status := fnd_api.g_ret_sts_error;
1912: WHEN OTHERS THEN
1913: IF g_debug <= gme_debug.g_log_unexpected THEN

Line 1910: WHEN fnd_api.g_exc_error THEN

1906: END IF;
1907: EXCEPTION
1908: WHEN resource_trans_ins_err THEN
1909: x_return_status := fnd_api.g_ret_sts_error;
1910: WHEN fnd_api.g_exc_error THEN
1911: x_return_status := fnd_api.g_ret_sts_error;
1912: WHEN OTHERS THEN
1913: IF g_debug <= gme_debug.g_log_unexpected THEN
1914: gme_debug.put_line ( 'When others exception in '

Line 1911: x_return_status := fnd_api.g_ret_sts_error;

1907: EXCEPTION
1908: WHEN resource_trans_ins_err THEN
1909: x_return_status := fnd_api.g_ret_sts_error;
1910: WHEN fnd_api.g_exc_error THEN
1911: x_return_status := fnd_api.g_ret_sts_error;
1912: WHEN OTHERS THEN
1913: IF g_debug <= gme_debug.g_log_unexpected THEN
1914: gme_debug.put_line ( 'When others exception in '
1915: || g_pkg_name

Line 1922: x_return_status := fnd_api.g_ret_sts_unexp_error;

1918: || ' Error is '
1919: || SQLERRM);
1920: END IF;
1921:
1922: x_return_status := fnd_api.g_ret_sts_unexp_error;
1923: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1924: END build_insert_resource_txn;
1925:
1926: /*===========================================================================================

Line 1964: x_return_status := fnd_api.g_ret_sts_success;

1960: || l_api_name);
1961: END IF;
1962:
1963: /* Initialize return status to success */
1964: x_return_status := fnd_api.g_ret_sts_success;
1965:
1966: /* Lets get the sum of pending usages to determine if their is a change */
1967: OPEN cur_sum_usage (p_batch_step_resources_rec.batchstep_resource_id);
1968:

Line 1997: RAISE fnd_api.g_exc_error;

1993: (p_batch_step_resources_rec => p_batch_step_resources_rec
1994: ,x_return_status => l_return_status);
1995:
1996: IF l_return_status <> x_return_status THEN
1997: RAISE fnd_api.g_exc_error;
1998: END IF;
1999:
2000: l_alloc_usage :=
2001: p_batch_step_resources_rec.plan_rsrc_usage

Line 2012: RAISE fnd_api.g_exc_error;

2008: l_batch_hdr.batch_id := p_batch_step_resources_rec.batch_id;
2009:
2010: IF NOT gme_batch_header_dbl.fetch_row (p_batch_header => l_batch_hdr
2011: ,x_batch_header => l_batch_hdr) THEN
2012: RAISE fnd_api.g_exc_error;
2013: END IF;
2014:
2015: FOR i IN 1 .. p_batch_step_resources_rec.plan_rsrc_count LOOP
2016: build_insert_resource_txn

Line 2024: RAISE fnd_api.g_exc_error;

2020: ,p_completed => 0
2021: ,x_return_status => l_return_status);
2022:
2023: IF l_return_status <> x_return_status THEN
2024: RAISE fnd_api.g_exc_error;
2025: END IF;
2026: END LOOP; /* FOR i IN 1..l_gme_batchstep_resources.plan_rsrc_count */
2027: END IF;
2028: /* IF (l_tot_usage <> p_batch_step_resources_rec.plan_rsrc_usage) */

Line 2030: WHEN fnd_api.g_exc_error THEN

2026: END LOOP; /* FOR i IN 1..l_gme_batchstep_resources.plan_rsrc_count */
2027: END IF;
2028: /* IF (l_tot_usage <> p_batch_step_resources_rec.plan_rsrc_usage) */
2029: EXCEPTION
2030: WHEN fnd_api.g_exc_error THEN
2031: x_return_status := fnd_api.g_ret_sts_error;
2032: WHEN OTHERS THEN
2033: IF g_debug <= gme_debug.g_log_unexpected THEN
2034: gme_debug.put_line ( 'When others exception in '

Line 2031: x_return_status := fnd_api.g_ret_sts_error;

2027: END IF;
2028: /* IF (l_tot_usage <> p_batch_step_resources_rec.plan_rsrc_usage) */
2029: EXCEPTION
2030: WHEN fnd_api.g_exc_error THEN
2031: x_return_status := fnd_api.g_ret_sts_error;
2032: WHEN OTHERS THEN
2033: IF g_debug <= gme_debug.g_log_unexpected THEN
2034: gme_debug.put_line ( 'When others exception in '
2035: || g_pkg_name

Line 2042: x_return_status := fnd_api.g_ret_sts_unexp_error;

2038: || ' Error is '
2039: || SQLERRM);
2040: END IF;
2041:
2042: x_return_status := fnd_api.g_ret_sts_unexp_error;
2043: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
2044: END adjust_pending_usage;
2045:
2046: /*===========================================================================================

Line 2120: x_return_status := fnd_api.g_ret_sts_success;

2116: || l_api_name);
2117: END IF;
2118:
2119: /* Initialize return status to success */
2120: x_return_status := fnd_api.g_ret_sts_success;
2121:
2122: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2123: gme_debug.put_line ( ' Adjusting actual usage :'
2124: || p_batch_step_resources_rec.actual_rsrc_usage);

Line 2138: RAISE fnd_api.g_exc_error;

2134: ,x_resource_tbl => l_resource_tab
2135: ,x_return_status => l_return_status);
2136:
2137: IF l_return_status <> x_return_status THEN
2138: RAISE fnd_api.g_exc_error;
2139: END IF;
2140:
2141: /* Step 1 : */
2142: gme_update_step_qty_pvt.reduce_pending_usage

Line 2147: RAISE fnd_api.g_exc_error;

2143: (p_batch_step_resources_rec => p_batch_step_resources_rec
2144: ,x_return_status => l_return_status);
2145:
2146: IF l_return_status <> x_return_status THEN
2147: RAISE fnd_api.g_exc_error;
2148: END IF;
2149:
2150: /* Calculate the sum of the Completed Transactions */
2151: /* for this Operation detail line. */

Line 2194: RAISE fnd_api.g_exc_error;

2190:
2191: IF NOT gme_batch_header_dbl.fetch_row
2192: (p_batch_header => l_batch_hdr
2193: ,x_batch_header => l_batch_hdr) THEN
2194: RAISE fnd_api.g_exc_error;
2195: END IF;
2196:
2197: /* Step 3 : */
2198: IF (l_sum_comp_usage < p_batch_step_resources_rec.actual_rsrc_usage) THEN

Line 2215: RAISE fnd_api.g_exc_error;

2211: ,p_completed => 1
2212: ,x_return_status => l_return_status);
2213:
2214: IF l_return_status <> x_return_status THEN
2215: RAISE fnd_api.g_exc_error;
2216: END IF;
2217: END LOOP;
2218: /* FOR i IN 1..p_batch_step_resources_rec.actual_rsrc_count */
2219: ELSE

Line 2232: RAISE fnd_api.g_exc_error;

2228: (p_tran_rec => l_resource_txns
2229: ,x_return_status => l_return_status);
2230:
2231: IF l_return_status <> x_return_status THEN
2232: RAISE fnd_api.g_exc_error;
2233: END IF;
2234: ELSIF (l_resource_tab (i).overrided_protected_ind = 'Y') THEN
2235: l_override_usage :=
2236: l_override_usage + l_resource_tab (i).resource_usage;

Line 2255: RAISE fnd_api.g_exc_error;

2251: ,p_completed => 1
2252: ,x_return_status => l_return_status);
2253:
2254: IF l_return_status <> x_return_status THEN
2255: RAISE fnd_api.g_exc_error;
2256: END IF;
2257: END LOOP;
2258: /* FOR i IN 1..p_batch_step_resources_rec.actual_rsrc_count */
2259: END IF;

Line 2268: WHEN fnd_api.g_exc_error THEN

2264: IF g_debug <= gme_debug.g_log_procedure THEN
2265: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
2266: END IF;
2267: EXCEPTION
2268: WHEN fnd_api.g_exc_error THEN
2269: x_return_status := fnd_api.g_ret_sts_error;
2270: WHEN OTHERS THEN
2271: IF g_debug <= gme_debug.g_log_unexpected THEN
2272: gme_debug.put_line ( 'When others exception in '

Line 2269: x_return_status := fnd_api.g_ret_sts_error;

2265: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
2266: END IF;
2267: EXCEPTION
2268: WHEN fnd_api.g_exc_error THEN
2269: x_return_status := fnd_api.g_ret_sts_error;
2270: WHEN OTHERS THEN
2271: IF g_debug <= gme_debug.g_log_unexpected THEN
2272: gme_debug.put_line ( 'When others exception in '
2273: || g_pkg_name

Line 2280: x_return_status := fnd_api.g_ret_sts_unexp_error;

2276: || ' Error is '
2277: || SQLERRM);
2278: END IF;
2279:
2280: x_return_status := fnd_api.g_ret_sts_unexp_error;
2281: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
2282: END adjust_actual_usage;
2283:
2284: /*===========================================================================================

Line 2346: x_return_status := fnd_api.g_ret_sts_success;

2342: || l_api_name);
2343: END IF;
2344:
2345: /* Initialize return status to success */
2346: x_return_status := fnd_api.g_ret_sts_success;
2347:
2348: /* Let us check the status of the step */
2349: OPEN cur_get_step_status (p_batch_step_resources_rec.batchstep_id);
2350:

Line 2372: RAISE fnd_api.g_exc_error;

2368: ,x_resource_tbl => l_resource_tab
2369: ,x_return_status => l_return_status);
2370:
2371: IF l_return_status <> x_return_status THEN
2372: RAISE fnd_api.g_exc_error;
2373: END IF;
2374:
2375: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2376: gme_debug.put_line(g_pkg_name||'.'||l_api_name||': Line ID '||l_resource_txns.line_id);

Line 2477: RAISE fnd_api.g_exc_error;

2473: (p_tran_rec => l_resource_txns
2474: ,x_return_status => l_return_status);
2475:
2476: IF l_return_status <> x_return_status THEN
2477: RAISE fnd_api.g_exc_error;
2478: END IF;
2479: ELSIF l_step_status > gme_common_pvt.g_step_wip THEN
2480: /* If the step is certified then their shouldn't be any further pending transactions */
2481: gme_resource_engine_pvt.delete_resource_trans

Line 2486: RAISE fnd_api.g_exc_error;

2482: (p_tran_rec => l_resource_txns
2483: ,x_return_status => l_return_status);
2484:
2485: IF l_return_status <> x_return_status THEN
2486: RAISE fnd_api.g_exc_error;
2487: END IF;
2488: END IF; /* IF l_step_status = 2 */
2489: END IF; /* IF l_resource_tab(i).completed_ind = 0 */
2490: END LOOP; /* FOR i IN 1..l_resource_tab.COUNT */

Line 2496: WHEN fnd_api.g_exc_error THEN

2492: IF g_debug <= gme_debug.g_log_procedure THEN
2493: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
2494: END IF;
2495: EXCEPTION
2496: WHEN fnd_api.g_exc_error THEN
2497: x_return_status := l_return_status;
2498: WHEN OTHERS THEN
2499: IF g_debug <= gme_debug.g_log_unexpected THEN
2500: gme_debug.put_line ( 'When others exception in '

Line 2508: x_return_status := fnd_api.g_ret_sts_unexp_error;

2504: || ' Error is '
2505: || SQLERRM);
2506: END IF;
2507:
2508: x_return_status := fnd_api.g_ret_sts_unexp_error;
2509: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
2510: END reduce_pending_usage;
2511:
2512:

Line 2577: x_return_status := fnd_api.g_ret_sts_success;

2573: IF g_debug <= gme_debug.g_log_procedure THEN
2574: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'|| l_api_name);
2575: END IF;
2576:
2577: x_return_status := fnd_api.g_ret_sts_success;
2578: x_batchstep_rec := p_batchstep_rec;
2579:
2580: IF p_batchstep_rec.batchstep_id IS NULL THEN
2581: /* give error over here */

Line 2650: IF l_return_status <> fnd_api.g_ret_sts_success THEN

2646: ,p_max_capacity => x_batchstep_rec.max_step_capacity
2647: ,x_resource => l_resource
2648: ,x_return_status => l_return_status);
2649:
2650: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2651: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2652: gme_debug.put_line('Error in calculating the max capacity');
2653: END IF;
2654: RAISE error_in_calc_capacity;

Line 2670: IF l_return_status <> fnd_api.g_ret_sts_success THEN

2666: p_batch_id => x_batchstep_rec.batch_id
2667: ,p_batchstep_id => x_batchstep_rec.batchstep_id
2668: ,x_return_status => l_return_status);
2669:
2670: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2671: RAISE error_in_clear_charges;
2672: END IF;
2673:
2674: /*calculate mass qty and vol qty by calling routine */

Line 2702: IF l_return_status <> fnd_api.g_ret_sts_success THEN

2698: ,p_max_capacity => x_batchstep_rec.max_step_capacity
2699: ,x_charge => l_charge
2700: ,x_return_status => l_return_status);
2701:
2702: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2703: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2704: gme_debug.put_line('error in calc_charge');
2705: END IF;
2706: RAISE error_calc_charge;

Line 2725: x_return_status := fnd_api.g_ret_sts_error;

2721: gme_debug.put_line ('Existing api ' || g_pkg_name || '.'|| l_api_name);
2722: END IF;
2723: EXCEPTION
2724: WHEN error_batchstep_id OR error_in_calc_capacity OR error_in_clear_charges THEN
2725: x_return_status := fnd_api.g_ret_sts_error;
2726: WHEN OTHERS THEN
2727: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2728: gme_debug.put_line(g_pkg_name || '.'|| l_api_name --> when others '
2729: || SQLERRM);

Line 2731: x_return_status := fnd_api.g_ret_sts_unexp_error;

2727: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
2728: gme_debug.put_line(g_pkg_name || '.'|| l_api_name --> when others '
2729: || SQLERRM);
2730: END IF;
2731: x_return_status := fnd_api.g_ret_sts_unexp_error;
2732: END recalculate_charges;
2733:
2734: END gme_update_step_qty_pvt;