DBA Data[Home] [Help]

APPS.GME_RESOURCE_ENGINE_PVT dependencies on FND_API

Line 85: l_return_status VARCHAR2 (1) := fnd_api.g_ret_sts_success;

81:
82: get_rsrc query_ref;
83: l_where VARCHAR2 (2000);
84: l_api_name CONSTANT VARCHAR2 (30) := 'FETCH_ALL_TRANS';
85: l_return_status VARCHAR2 (1) := fnd_api.g_ret_sts_success;
86: l_line_index BINARY_INTEGER := 1;
87: l_cursor BINARY_INTEGER;
88: l_debug VARCHAR2 (2000);
89: BEGIN

Line 96: x_return_status := fnd_api.g_ret_sts_success;

92: || l_api_name);
93: END IF;
94:
95: /* Initialize API return status to sucess */
96: x_return_status := fnd_api.g_ret_sts_success;
97:
98: -- Determine if any of the key values are present
99: IF ( (p_resource_rec.poc_trans_id IS NOT NULL)
100: OR (p_resource_rec.poc_trans_id <> fnd_api.g_miss_num) ) THEN

Line 100: OR (p_resource_rec.poc_trans_id <> fnd_api.g_miss_num) ) THEN

96: x_return_status := fnd_api.g_ret_sts_success;
97:
98: -- Determine if any of the key values are present
99: IF ( (p_resource_rec.poc_trans_id IS NOT NULL)
100: OR (p_resource_rec.poc_trans_id <> fnd_api.g_miss_num) ) THEN
101: l_debug := 'Build Where Clause Cursor Ref 1';
102: l_where := 'POC_TRANS_ID =:poc_trans_id ';
103: l_cursor := 1;
104: ELSIF ( (p_resource_rec.doc_id IS NOT NULL)

Line 105: OR (p_resource_rec.doc_id <> fnd_api.g_miss_num) ) THEN

101: l_debug := 'Build Where Clause Cursor Ref 1';
102: l_where := 'POC_TRANS_ID =:poc_trans_id ';
103: l_cursor := 1;
104: ELSIF ( (p_resource_rec.doc_id IS NOT NULL)
105: OR (p_resource_rec.doc_id <> fnd_api.g_miss_num) ) THEN
106: l_debug := 'Build Where Clause Cursor Ref 2';
107: l_where := ' DOC_ID =:doc_id';
108: l_cursor := 2;
109: ELSE

Line 145: WHEN fnd_api.g_exc_error THEN

141: IF g_debug <= gme_debug.g_log_procedure THEN
142: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
143: END IF;
144: EXCEPTION
145: WHEN fnd_api.g_exc_error THEN
146: x_return_status := fnd_api.g_ret_sts_error;
147: WHEN fnd_api.g_exc_unexpected_error THEN
148: x_return_status := fnd_api.g_ret_sts_unexp_error;
149:

Line 146: x_return_status := fnd_api.g_ret_sts_error;

142: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
143: END IF;
144: EXCEPTION
145: WHEN fnd_api.g_exc_error THEN
146: x_return_status := fnd_api.g_ret_sts_error;
147: WHEN fnd_api.g_exc_unexpected_error THEN
148: x_return_status := fnd_api.g_ret_sts_unexp_error;
149:
150: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

Line 147: WHEN fnd_api.g_exc_unexpected_error THEN

143: END IF;
144: EXCEPTION
145: WHEN fnd_api.g_exc_error THEN
146: x_return_status := fnd_api.g_ret_sts_error;
147: WHEN fnd_api.g_exc_unexpected_error THEN
148: x_return_status := fnd_api.g_ret_sts_unexp_error;
149:
150: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
151: gme_debug.put_line ('IN UN ' || SQLERRM);

Line 148: x_return_status := fnd_api.g_ret_sts_unexp_error;

144: EXCEPTION
145: WHEN fnd_api.g_exc_error THEN
146: x_return_status := fnd_api.g_ret_sts_error;
147: WHEN fnd_api.g_exc_unexpected_error THEN
148: x_return_status := fnd_api.g_ret_sts_unexp_error;
149:
150: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
151: gme_debug.put_line ('IN UN ' || SQLERRM);
152: END IF;

Line 163: x_return_status := fnd_api.g_ret_sts_unexp_error;

159: || ' Error is '
160: || SQLERRM);
161: END IF;
162:
163: x_return_status := fnd_api.g_ret_sts_unexp_error;
164: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
165: END fetch_all_resources;
166:
167: /*===========================================================================================

Line 186: l_return_status VARCHAR2 (1) := fnd_api.g_ret_sts_success;

182: ,x_tran_rec OUT NOCOPY gme_resource_txns_gtmp%ROWTYPE
183: ,x_return_status OUT NOCOPY VARCHAR2)
184: IS
185: l_api_name CONSTANT VARCHAR2 (30) := 'CREATE_RESOURCE_TRANS';
186: l_return_status VARCHAR2 (1) := fnd_api.g_ret_sts_success;
187: l_gme_tran_rec gme_resource_txns_gtmp%ROWTYPE;
188: BEGIN
189: IF g_debug <= gme_debug.g_log_procedure THEN
190: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'

Line 207: RAISE fnd_api.g_exc_error;

203:
204: IF NOT gme_resource_txns_gtmp_dbl.insert_row
205: (p_resource_txns => l_gme_tran_rec
206: ,x_resource_txns => x_tran_rec) THEN
207: RAISE fnd_api.g_exc_error;
208: END IF;
209:
210: x_return_status := l_return_status;
211:

Line 216: WHEN fnd_api.g_exc_error THEN

212: IF g_debug <= gme_debug.g_log_procedure THEN
213: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
214: END IF;
215: EXCEPTION
216: WHEN fnd_api.g_exc_error THEN
217: x_return_status := fnd_api.g_ret_sts_error;
218: WHEN fnd_api.g_exc_unexpected_error THEN
219: x_return_status := fnd_api.g_ret_sts_unexp_error;
220: WHEN OTHERS THEN

Line 217: x_return_status := fnd_api.g_ret_sts_error;

213: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
214: END IF;
215: EXCEPTION
216: WHEN fnd_api.g_exc_error THEN
217: x_return_status := fnd_api.g_ret_sts_error;
218: WHEN fnd_api.g_exc_unexpected_error THEN
219: x_return_status := fnd_api.g_ret_sts_unexp_error;
220: WHEN OTHERS THEN
221: IF g_debug <= gme_debug.g_log_unexpected THEN

Line 218: WHEN fnd_api.g_exc_unexpected_error THEN

214: END IF;
215: EXCEPTION
216: WHEN fnd_api.g_exc_error THEN
217: x_return_status := fnd_api.g_ret_sts_error;
218: WHEN fnd_api.g_exc_unexpected_error THEN
219: x_return_status := fnd_api.g_ret_sts_unexp_error;
220: WHEN OTHERS THEN
221: IF g_debug <= gme_debug.g_log_unexpected THEN
222: gme_debug.put_line ( 'When others exception in '

Line 219: x_return_status := fnd_api.g_ret_sts_unexp_error;

215: EXCEPTION
216: WHEN fnd_api.g_exc_error THEN
217: x_return_status := fnd_api.g_ret_sts_error;
218: WHEN fnd_api.g_exc_unexpected_error THEN
219: x_return_status := fnd_api.g_ret_sts_unexp_error;
220: WHEN OTHERS THEN
221: IF g_debug <= gme_debug.g_log_unexpected THEN
222: gme_debug.put_line ( 'When others exception in '
223: || g_pkg_name

Line 230: x_return_status := fnd_api.g_ret_sts_unexp_error;

226: || ' Error is '
227: || SQLERRM);
228: END IF;
229:
230: x_return_status := fnd_api.g_ret_sts_unexp_error;
231: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
232: END create_resource_trans;
233:
234: /*===========================================================================================

Line 252: l_return_status VARCHAR2 (1) := fnd_api.g_ret_sts_success;

248: ,x_return_status OUT NOCOPY VARCHAR2)
249: IS
250: l_gme_tran_rec gme_resource_txns_gtmp%ROWTYPE;
251: l_api_name CONSTANT VARCHAR2 (30) := 'DELETE_RESOURCE_TRANS';
252: l_return_status VARCHAR2 (1) := fnd_api.g_ret_sts_success;
253: BEGIN
254: IF g_debug <= gme_debug.g_log_procedure THEN
255: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
256: || l_api_name);

Line 269: RAISE fnd_api.g_exc_error;

265: l_gme_tran_rec.action_code := 'DEL';
266:
267: IF NOT gme_resource_txns_gtmp_dbl.update_row
268: (p_resource_txns => l_gme_tran_rec) THEN
269: RAISE fnd_api.g_exc_error;
270: END IF;
271: END IF;
272:
273: x_return_status := l_return_status;

Line 279: WHEN fnd_api.g_exc_error THEN

275: IF g_debug <= gme_debug.g_log_procedure THEN
276: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
277: END IF;
278: EXCEPTION
279: WHEN fnd_api.g_exc_error THEN
280: x_return_status := fnd_api.g_ret_sts_error;
281: WHEN fnd_api.g_exc_unexpected_error THEN
282: x_return_status := fnd_api.g_ret_sts_unexp_error;
283: WHEN OTHERS THEN

Line 280: x_return_status := fnd_api.g_ret_sts_error;

276: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
277: END IF;
278: EXCEPTION
279: WHEN fnd_api.g_exc_error THEN
280: x_return_status := fnd_api.g_ret_sts_error;
281: WHEN fnd_api.g_exc_unexpected_error THEN
282: x_return_status := fnd_api.g_ret_sts_unexp_error;
283: WHEN OTHERS THEN
284: IF g_debug <= gme_debug.g_log_unexpected THEN

Line 281: WHEN fnd_api.g_exc_unexpected_error THEN

277: END IF;
278: EXCEPTION
279: WHEN fnd_api.g_exc_error THEN
280: x_return_status := fnd_api.g_ret_sts_error;
281: WHEN fnd_api.g_exc_unexpected_error THEN
282: x_return_status := fnd_api.g_ret_sts_unexp_error;
283: WHEN OTHERS THEN
284: IF g_debug <= gme_debug.g_log_unexpected THEN
285: gme_debug.put_line ( 'When others exception in '

Line 282: x_return_status := fnd_api.g_ret_sts_unexp_error;

278: EXCEPTION
279: WHEN fnd_api.g_exc_error THEN
280: x_return_status := fnd_api.g_ret_sts_error;
281: WHEN fnd_api.g_exc_unexpected_error THEN
282: x_return_status := fnd_api.g_ret_sts_unexp_error;
283: WHEN OTHERS THEN
284: IF g_debug <= gme_debug.g_log_unexpected THEN
285: gme_debug.put_line ( 'When others exception in '
286: || g_pkg_name

Line 293: x_return_status := fnd_api.g_ret_sts_unexp_error;

289: || ' Error is '
290: || SQLERRM);
291: END IF;
292:
293: x_return_status := fnd_api.g_ret_sts_unexp_error;
294: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
295: END delete_resource_trans;
296:
297: /*===========================================================================================

Line 314: l_return_status VARCHAR2 (1) := fnd_api.g_ret_sts_success;

310: p_tran_rec IN gme_resource_txns_gtmp%ROWTYPE
311: ,x_return_status OUT NOCOPY VARCHAR2)
312: IS
313: l_api_name CONSTANT VARCHAR2 (30) := 'UPDATE_RESOURCE_TRANS';
314: l_return_status VARCHAR2 (1) := fnd_api.g_ret_sts_success;
315: l_gme_tran_rec gme_resource_txns_gtmp%ROWTYPE;
316: BEGIN
317: IF g_debug <= gme_debug.g_log_procedure THEN
318: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'

Line 336: RAISE fnd_api.g_exc_error;

332: END IF;
333:
334: IF NOT gme_resource_txns_gtmp_dbl.update_row
335: (p_resource_txns => l_gme_tran_rec) THEN
336: RAISE fnd_api.g_exc_error;
337: END IF;
338:
339: x_return_status := l_return_status;
340:

Line 345: WHEN fnd_api.g_exc_error THEN

341: IF g_debug <= gme_debug.g_log_procedure THEN
342: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
343: END IF;
344: EXCEPTION
345: WHEN fnd_api.g_exc_error THEN
346: x_return_status := fnd_api.g_ret_sts_error;
347: WHEN fnd_api.g_exc_unexpected_error THEN
348: x_return_status := fnd_api.g_ret_sts_unexp_error;
349: WHEN OTHERS THEN

Line 346: x_return_status := fnd_api.g_ret_sts_error;

342: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
343: END IF;
344: EXCEPTION
345: WHEN fnd_api.g_exc_error THEN
346: x_return_status := fnd_api.g_ret_sts_error;
347: WHEN fnd_api.g_exc_unexpected_error THEN
348: x_return_status := fnd_api.g_ret_sts_unexp_error;
349: WHEN OTHERS THEN
350: IF g_debug <= gme_debug.g_log_unexpected THEN

Line 347: WHEN fnd_api.g_exc_unexpected_error THEN

343: END IF;
344: EXCEPTION
345: WHEN fnd_api.g_exc_error THEN
346: x_return_status := fnd_api.g_ret_sts_error;
347: WHEN fnd_api.g_exc_unexpected_error THEN
348: x_return_status := fnd_api.g_ret_sts_unexp_error;
349: WHEN OTHERS THEN
350: IF g_debug <= gme_debug.g_log_unexpected THEN
351: gme_debug.put_line ( 'When others exception in '

Line 348: x_return_status := fnd_api.g_ret_sts_unexp_error;

344: EXCEPTION
345: WHEN fnd_api.g_exc_error THEN
346: x_return_status := fnd_api.g_ret_sts_error;
347: WHEN fnd_api.g_exc_unexpected_error THEN
348: x_return_status := fnd_api.g_ret_sts_unexp_error;
349: WHEN OTHERS THEN
350: IF g_debug <= gme_debug.g_log_unexpected THEN
351: gme_debug.put_line ( 'When others exception in '
352: || g_pkg_name

Line 359: x_return_status := fnd_api.g_ret_sts_unexp_error;

355: || ' Error is '
356: || SQLERRM);
357: END IF;
358:
359: x_return_status := fnd_api.g_ret_sts_unexp_error;
360: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
361: END update_resource_trans;
362:
363: /*===========================================================================================

Line 497: RAISE fnd_api.g_exc_error;

493: (p_org_id => l_org_id
494: ,p_trans_date => l_trans_date
495: ,x_trans_date => l_tran_rec.trans_date
496: ,x_period_id => l_period_id) THEN
497: RAISE fnd_api.g_exc_error;
498: END IF;
499: */
500:
501: -- Bug 8751983/8922059 - Let's default to timestamp if old transaction is in a closed period

Line 529: p_init_msg_list => FND_API.G_FALSE,

525: -- Bug 5903208 - Make call to GMF for actual costing
526: --
527: GMF_LAYERS.Create_Resource_Layers
528: ( p_api_version => 1.0,
529: p_init_msg_list => FND_API.G_FALSE,
530: p_rsrc_rec => l_tran_rec,
531: p_doc_qty => l_tran_rec.resource_usage,
532: p_doc_um => l_tran_rec.trans_qty_um,
533: x_return_status => l_return_status,

Line 537: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

533: x_return_status => l_return_status,
534: x_msg_count => l_msg_count,
535: x_msg_data => l_msg_data);
536:
537: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
538: THEN
539: RAISE gmf_cost_failure;
540: END IF;
541: -- End Bug 5903208

Line 580: -- RAISE fnd_api.g_exc_error;

576: -- (p_org_id => l_org_id
577: -- ,p_trans_date => l_trans_date
578: -- ,x_trans_date => l_prev_rec.trans_date
579: -- ,x_period_id => l_period_id) THEN
580: -- RAISE fnd_api.g_exc_error;
581: -- END IF;
582:
583: -- Bug 16327528 - Check for closed period.
584:

Line 624: p_init_msg_list => FND_API.G_FALSE,

620: -- Bug 5903208 - Make call to GMF for actual costing
621: --
622: GMF_LAYERS.Create_Resource_Layers
623: ( p_api_version => 1.0,
624: p_init_msg_list => FND_API.G_FALSE,
625: p_rsrc_rec => l_prev_rec,
626: p_doc_qty => l_prev_rec.resource_usage,
627: p_doc_um => l_prev_rec.trans_qty_um,
628: x_return_status => l_return_status,

Line 632: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

628: x_return_status => l_return_status,
629: x_msg_count => l_msg_count,
630: x_msg_data => l_msg_data);
631:
632: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
633: THEN
634: RAISE gmf_cost_failure;
635: END IF;
636: -- End Bug 5903208

Line 649: RAISE fnd_api.g_exc_error;

645: (p_org_id => l_org_id
646: ,p_trans_date => l_trans_date
647: ,x_trans_date => l_tran_rec.trans_date
648: ,x_period_id => l_period_id) THEN
649: RAISE fnd_api.g_exc_error;
650: END IF;
651:
652: IF NOT gme_resource_txns_dbl.insert_row (l_tran_rec
653: ,l_tran_rec) THEN

Line 663: p_init_msg_list => FND_API.G_FALSE,

659: -- Bug 5903208 - Make call to GMF for actual costing
660: --
661: GMF_LAYERS.Create_Resource_Layers
662: ( p_api_version => 1.0,
663: p_init_msg_list => FND_API.G_FALSE,
664: p_rsrc_rec => l_tran_rec,
665: p_doc_qty => l_tran_rec.resource_usage,
666: p_doc_um => l_tran_rec.trans_qty_um,
667: x_return_status => l_return_status,

Line 671: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

667: x_return_status => l_return_status,
668: x_msg_count => l_msg_count,
669: x_msg_data => l_msg_data);
670:
671: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
672: THEN
673: RAISE gmf_cost_failure;
674: END IF;
675: -- End Bug 5903208

Line 743: RAISE fnd_api.g_exc_error;

739: ,p_trans_date => l_trans_date
740: ,x_trans_date => l_tran_rec.trans_date
741: ,x_period_id => l_period_id) THEN
742:
743: RAISE fnd_api.g_exc_error;
744: END IF;
745: */
746: -- Bug 8751983 - Let's default to timestamp if old transaction is in a closed period
747: IF NOT gme_common_pvt.check_close_period(p_org_id => l_org_id

Line 789: p_init_msg_list => FND_API.G_FALSE,

785: -- Bug 5903208 - Make call to GMF for actual costing
786: --
787: GMF_LAYERS.Create_Resource_Layers
788: ( p_api_version => 1.0,
789: p_init_msg_list => FND_API.G_FALSE,
790: p_rsrc_rec => l_tran_rec,
791: p_doc_qty => l_tran_rec.resource_usage,
792: p_doc_um => l_tran_rec.trans_qty_um,
793: x_return_status => l_return_status,

Line 797: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

793: x_return_status => l_return_status,
794: x_msg_count => l_msg_count,
795: x_msg_data => l_msg_data);
796:
797: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
798: THEN
799: RAISE gmf_cost_failure;
800: END IF;
801: -- End Bug 5903208

Line 827: WHEN fnd_api.g_exc_error THEN

823: IF g_debug <= gme_debug.g_log_procedure THEN
824: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
825: END IF;
826: EXCEPTION
827: WHEN fnd_api.g_exc_error THEN
828: x_return_status := fnd_api.g_ret_sts_error;
829: WHEN insert_failure THEN
830: x_return_status := fnd_api.g_ret_sts_error;
831: WHEN update_failure THEN

Line 828: x_return_status := fnd_api.g_ret_sts_error;

824: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
825: END IF;
826: EXCEPTION
827: WHEN fnd_api.g_exc_error THEN
828: x_return_status := fnd_api.g_ret_sts_error;
829: WHEN insert_failure THEN
830: x_return_status := fnd_api.g_ret_sts_error;
831: WHEN update_failure THEN
832: x_return_status := fnd_api.g_ret_sts_error;

Line 830: x_return_status := fnd_api.g_ret_sts_error;

826: EXCEPTION
827: WHEN fnd_api.g_exc_error THEN
828: x_return_status := fnd_api.g_ret_sts_error;
829: WHEN insert_failure THEN
830: x_return_status := fnd_api.g_ret_sts_error;
831: WHEN update_failure THEN
832: x_return_status := fnd_api.g_ret_sts_error;
833: WHEN OTHERS THEN
834: IF g_debug <= gme_debug.g_log_unexpected THEN

Line 832: x_return_status := fnd_api.g_ret_sts_error;

828: x_return_status := fnd_api.g_ret_sts_error;
829: WHEN insert_failure THEN
830: x_return_status := fnd_api.g_ret_sts_error;
831: WHEN update_failure THEN
832: x_return_status := fnd_api.g_ret_sts_error;
833: WHEN OTHERS THEN
834: IF g_debug <= gme_debug.g_log_unexpected THEN
835: gme_debug.put_line ( 'When others exception in '
836: || g_pkg_name

Line 843: x_return_status := fnd_api.g_ret_sts_unexp_error;

839: || ' Error is '
840: || SQLERRM);
841: END IF;
842:
843: x_return_status := fnd_api.g_ret_sts_unexp_error;
844: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
845: END consolidate_batch_resources;
846:
847: /*===========================================================================================

Line 987: l_return_status VARCHAR2 (1) := fnd_api.g_ret_sts_success;

983:
984: get_rsrc query_ref;
985: l_where VARCHAR2 (2000);
986: l_api_name CONSTANT VARCHAR2 (30) := 'FETCH_ACTIVE_RESOURCES';
987: l_return_status VARCHAR2 (1) := fnd_api.g_ret_sts_success;
988: l_line_index BINARY_INTEGER := 1;
989: l_cursor BINARY_INTEGER;
990: bad_keys EXCEPTION;
991: BEGIN

Line 998: x_return_status := fnd_api.g_ret_sts_success;

994: || l_api_name);
995: END IF;
996:
997: /* Initialize API return status to sucess */
998: x_return_status := fnd_api.g_ret_sts_success;
999:
1000: -- Determine if any of the key values are present
1001: IF (p_resource_rec.poc_trans_id IS NOT NULL) THEN
1002: l_where := 'POC_TRANS_ID =:poc_trans_id ';

Line 1077: WHEN fnd_api.g_exc_error THEN

1073: IF g_debug <= gme_debug.g_log_procedure THEN
1074: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1075: END IF;
1076: EXCEPTION
1077: WHEN fnd_api.g_exc_error THEN
1078: x_return_status := fnd_api.g_ret_sts_error;
1079: WHEN fnd_api.g_exc_unexpected_error THEN
1080: x_return_status := fnd_api.g_ret_sts_unexp_error;
1081: WHEN bad_keys THEN

Line 1078: x_return_status := fnd_api.g_ret_sts_error;

1074: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1075: END IF;
1076: EXCEPTION
1077: WHEN fnd_api.g_exc_error THEN
1078: x_return_status := fnd_api.g_ret_sts_error;
1079: WHEN fnd_api.g_exc_unexpected_error THEN
1080: x_return_status := fnd_api.g_ret_sts_unexp_error;
1081: WHEN bad_keys THEN
1082: x_return_status := fnd_api.g_ret_sts_error;

Line 1079: WHEN fnd_api.g_exc_unexpected_error THEN

1075: END IF;
1076: EXCEPTION
1077: WHEN fnd_api.g_exc_error THEN
1078: x_return_status := fnd_api.g_ret_sts_error;
1079: WHEN fnd_api.g_exc_unexpected_error THEN
1080: x_return_status := fnd_api.g_ret_sts_unexp_error;
1081: WHEN bad_keys THEN
1082: x_return_status := fnd_api.g_ret_sts_error;
1083: WHEN OTHERS THEN

Line 1080: x_return_status := fnd_api.g_ret_sts_unexp_error;

1076: EXCEPTION
1077: WHEN fnd_api.g_exc_error THEN
1078: x_return_status := fnd_api.g_ret_sts_error;
1079: WHEN fnd_api.g_exc_unexpected_error THEN
1080: x_return_status := fnd_api.g_ret_sts_unexp_error;
1081: WHEN bad_keys THEN
1082: x_return_status := fnd_api.g_ret_sts_error;
1083: WHEN OTHERS THEN
1084: IF g_debug <= gme_debug.g_log_unexpected THEN

Line 1082: x_return_status := fnd_api.g_ret_sts_error;

1078: x_return_status := fnd_api.g_ret_sts_error;
1079: WHEN fnd_api.g_exc_unexpected_error THEN
1080: x_return_status := fnd_api.g_ret_sts_unexp_error;
1081: WHEN bad_keys THEN
1082: x_return_status := fnd_api.g_ret_sts_error;
1083: WHEN OTHERS THEN
1084: IF g_debug <= gme_debug.g_log_unexpected THEN
1085: gme_debug.put_line ( 'When others exception in '
1086: || g_pkg_name

Line 1093: x_return_status := fnd_api.g_ret_sts_unexp_error;

1089: || ' Error is '
1090: || SQLERRM);
1091: END IF;
1092:
1093: x_return_status := fnd_api.g_ret_sts_unexp_error;
1094: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1095: END fetch_active_resources;
1096:
1097: /*===========================================================================================

Line 1184: x_return_status := fnd_api.g_ret_sts_success;

1180: gme_debug.log_initialize('RESOURCE_TXN');
1181: END IF;
1182:
1183: /* Initialize return status to success */
1184: x_return_status := fnd_api.g_ret_sts_success;
1185: x_step_resources_rec := p_step_resources_rec;
1186: l_batch_step.batchstep_id := x_step_resources_rec.batchstep_id;
1187:
1188: IF NOT gme_batch_steps_dbl.fetch_row (p_batch_step => l_batch_step

Line 1190: RAISE fnd_api.g_exc_error;

1186: l_batch_step.batchstep_id := x_step_resources_rec.batchstep_id;
1187:
1188: IF NOT gme_batch_steps_dbl.fetch_row (p_batch_step => l_batch_step
1189: ,x_batch_step => l_batch_step) THEN
1190: RAISE fnd_api.g_exc_error;
1191: END IF;
1192:
1193: l_step_activity.batchstep_activity_id :=
1194: p_step_resources_rec.batchstep_activity_id;

Line 1199: RAISE fnd_api.g_exc_error;

1195:
1196: IF NOT gme_batch_step_activities_dbl.fetch_row
1197: (p_batch_step_activities => l_step_activity
1198: ,x_batch_step_activities => l_step_activity) THEN
1199: RAISE fnd_api.g_exc_error;
1200: END IF;
1201:
1202: l_batch_header.batch_id := x_step_resources_rec.batch_id;
1203:

Line 1206: RAISE fnd_api.g_exc_error;

1202: l_batch_header.batch_id := x_step_resources_rec.batch_id;
1203:
1204: IF NOT gme_batch_header_dbl.fetch_row (p_batch_header => l_batch_header
1205: ,x_batch_header => l_batch_header) THEN
1206: RAISE fnd_api.g_exc_error;
1207: END IF;
1208:
1209: /* If automatic step qty calculation is set for the batch then */
1210: /* we have to compute the usage fields */

Line 1284: RAISE fnd_api.g_exc_error;

1280: ,p_check_prim_rsrc => p_check_prim_rsrc
1281: ,x_return_status => l_return_status);
1282:
1283: IF l_return_status <> x_return_status THEN
1284: RAISE fnd_api.g_exc_error;
1285: END IF;
1286: END IF;
1287:
1288: /* Since this procedure is called from the forms

Line 1303: RAISE FND_API.g_exc_error;

1299: /*
1300: GME_RESOURCE_ENGINE_PVT.check_primary_resource (p_step_resources_rec => x_step_resources_rec
1301: ,x_return_status => l_return_status);
1302: IF l_return_status <> x_return_status THEN
1303: RAISE FND_API.g_exc_error;
1304: END IF;
1305: */
1306:
1307: -- Bug 12576806 - Initialize org id.

Line 1313: RAISE fnd_api.g_exc_error;

1309:
1310: IF NOT (gme_batch_step_resources_dbl.insert_row
1311: (p_batch_step_resources => x_step_resources_rec
1312: ,x_batch_step_resources => x_step_resources_rec) ) THEN
1313: RAISE fnd_api.g_exc_error;
1314: END IF;
1315: END IF;
1316:
1317: IF p_action_code IN ('INSERT', 'UPDATE') THEN

Line 1325: RAISE fnd_api.g_exc_error;

1321: (p_batch_step_resources_rec => x_step_resources_rec
1322: ,x_return_status => l_return_status);
1323:
1324: IF l_return_status <> x_return_status THEN
1325: RAISE fnd_api.g_exc_error;
1326: END IF;
1327: ELSIF l_batch_step.step_status > 1
1328: AND NVL (x_step_resources_rec.actual_rsrc_usage, -1) >= 0 THEN
1329: gme_update_step_qty_pvt.adjust_actual_usage

Line 1334: RAISE fnd_api.g_exc_error;

1330: (p_batch_step_resources_rec => x_step_resources_rec
1331: ,x_return_status => l_return_status);
1332:
1333: IF l_return_status <> x_return_status THEN
1334: RAISE fnd_api.g_exc_error;
1335: END IF;
1336: END IF; /* IF l_batch_step.step_status = 1 */
1337: END IF; /* IF l_batch_header.update_inventory_ind = 'Y' */
1338:

Line 1345: p_init_msg_list => FND_API.G_FALSE,

1341: --
1342: IF p_action_code = 'INSERT' THEN
1343: GMF_VIB.Update_Batch_Requirements
1344: ( p_api_version => 1.0,
1345: p_init_msg_list => FND_API.G_FALSE,
1346: p_batch_id => l_batch_header.batch_id,
1347: x_return_status => l_return_status,
1348: x_msg_count => l_message_count,
1349: x_msg_data => l_message_list);

Line 1351: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

1347: x_return_status => l_return_status,
1348: x_msg_count => l_message_count,
1349: x_msg_data => l_message_list);
1350:
1351: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
1352: THEN
1353: RAISE gmf_cost_failure;
1354: END IF;
1355: END IF;

Line 1365: RAISE FND_API.g_exc_error;

1361: /*
1362: GME_RESOURCE_ENGINE_PVT.check_primary_resource (p_step_resources_rec => x_step_resources_rec
1363: ,x_return_status => l_return_status);
1364: IF l_return_status <> x_return_status THEN
1365: RAISE FND_API.g_exc_error;
1366: END IF;
1367: */
1368: gme_delete_batch_step_pvt.delete_resource
1369: (p_batch_step_resources_rec => x_step_resources_rec

Line 1373: RAISE fnd_api.g_exc_error;

1369: (p_batch_step_resources_rec => x_step_resources_rec
1370: ,x_return_status => l_return_status);
1371:
1372: IF l_return_status <> x_return_status THEN
1373: RAISE fnd_api.g_exc_error;
1374: END IF;
1375:
1376: -- Bug 5043868 - Make call to GMF for actual costing data
1377: -- recording when deleting a resource from the form or api.

Line 1380: p_init_msg_list => FND_API.G_FALSE,

1376: -- Bug 5043868 - Make call to GMF for actual costing data
1377: -- recording when deleting a resource from the form or api.
1378: GMF_VIB.Update_Batch_Requirements
1379: ( p_api_version => 1.0,
1380: p_init_msg_list => FND_API.G_FALSE,
1381: p_batch_id => l_batch_header.batch_id,
1382: x_return_status => l_return_status,
1383: x_msg_count => l_message_count,
1384: x_msg_data => l_message_list);

Line 1386: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

1382: x_return_status => l_return_status,
1383: x_msg_count => l_message_count,
1384: x_msg_data => l_message_list);
1385:
1386: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
1387: THEN
1388: RAISE gmf_cost_failure;
1389: END IF;
1390: -- End Bug 5903208

Line 1400: RAISE fnd_api.g_exc_error;

1396: /* deducted from the pending resource transactions */
1397: IF p_action_code = 'UPDATE' THEN
1398: IF NOT (gme_batch_step_resources_dbl.update_row
1399: (p_batch_step_resources => x_step_resources_rec) ) THEN
1400: RAISE fnd_api.g_exc_error;
1401: END IF;
1402:
1403: x_step_resources_rec.last_updated_by := gme_common_pvt.g_user_ident;
1404: x_step_resources_rec.last_update_date := gme_common_pvt.g_timestamp;

Line 1416: RAISE fnd_api.g_exc_error;

1412: gme_common_pvt.setup (p_org_id => l_batch_header.ORGANIZATION_ID --1381
1413: ,p_org_code => NULL);
1414:
1415: IF NOT gme_common_pvt.g_setup_done THEN
1416: RAISE fnd_api.g_exc_error;
1417: END IF;
1418:
1419: OPEN cur_get_rsrc(x_step_resources_rec.resources);
1420: FETCH cur_get_rsrc INTO l_rsrc_rec;

Line 1455: IF l_return_status <> fnd_api.g_ret_sts_success THEN

1451: p_batch_id => l_batch_step.batch_id
1452: ,p_batchstep_id => l_batch_step.batchstep_id
1453: ,x_return_status => l_return_status);
1454:
1455: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1456: RAISE error_in_clear_charges;
1457: END IF;
1458: END IF;
1459:

Line 1468: IF l_return_status <> fnd_api.g_ret_sts_success THEN

1464: ,p_cal_type => 'R'
1465: ,x_batchstep_rec => x_batch_step
1466: ,x_return_status => l_return_status );
1467:
1468: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1469: RAISE fnd_api.g_exc_error;
1470: END IF;
1471: END IF; /*action code check */
1472: END IF; /*p_step_resources_rec.capacity_constraint = 1 */

Line 1469: RAISE fnd_api.g_exc_error;

1465: ,x_batchstep_rec => x_batch_step
1466: ,x_return_status => l_return_status );
1467:
1468: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1469: RAISE fnd_api.g_exc_error;
1470: END IF;
1471: END IF; /*action code check */
1472: END IF; /*p_step_resources_rec.capacity_constraint = 1 */
1473: /*Bug#5231180 End */

Line 1481: x_return_status := FND_API.G_RET_STS_ERROR;

1477: END IF;
1478: EXCEPTION
1479: WHEN gmf_cost_failure THEN
1480: -- Bug 5903208
1481: x_return_status := FND_API.G_RET_STS_ERROR;
1482:
1483: WHEN fnd_api.g_exc_error THEN
1484: x_return_status := fnd_api.g_ret_sts_error;
1485: WHEN OTHERS THEN

Line 1483: WHEN fnd_api.g_exc_error THEN

1479: WHEN gmf_cost_failure THEN
1480: -- Bug 5903208
1481: x_return_status := FND_API.G_RET_STS_ERROR;
1482:
1483: WHEN fnd_api.g_exc_error THEN
1484: x_return_status := fnd_api.g_ret_sts_error;
1485: WHEN OTHERS THEN
1486: IF g_debug <= gme_debug.g_log_unexpected THEN
1487: gme_debug.put_line ( 'When others exception in '

Line 1484: x_return_status := fnd_api.g_ret_sts_error;

1480: -- Bug 5903208
1481: x_return_status := FND_API.G_RET_STS_ERROR;
1482:
1483: WHEN fnd_api.g_exc_error THEN
1484: x_return_status := fnd_api.g_ret_sts_error;
1485: WHEN OTHERS THEN
1486: IF g_debug <= gme_debug.g_log_unexpected THEN
1487: gme_debug.put_line ( 'When others exception in '
1488: || g_pkg_name

Line 1495: x_return_status := fnd_api.g_ret_sts_unexp_error;

1491: || ' Error is '
1492: || SQLERRM);
1493: END IF;
1494:
1495: x_return_status := fnd_api.g_ret_sts_unexp_error;
1496: fnd_msg_pub.add_exc_msg ('GME_RESOURCE_ENGINE_PVT'
1497: ,'resource_dtl_process');
1498: END resource_dtl_process;
1499:

Line 1529: x_return_status := fnd_api.g_ret_sts_success;

1525: || l_api_name);
1526: END IF;
1527:
1528: /* Initialize return status to success */
1529: x_return_status := fnd_api.g_ret_sts_success;
1530:
1531: IF ( p_batch_step_rec.step_status = 1
1532: AND p_step_resources_rec.plan_start_date IS NULL) THEN
1533: gme_common_pvt.log_message ('GME_START_DATE_REQD');

Line 1534: RAISE fnd_api.g_exc_error;

1530:
1531: IF ( p_batch_step_rec.step_status = 1
1532: AND p_step_resources_rec.plan_start_date IS NULL) THEN
1533: gme_common_pvt.log_message ('GME_START_DATE_REQD');
1534: RAISE fnd_api.g_exc_error;
1535: END IF;
1536:
1537: IF p_batch_step_rec.step_status = 1
1538: AND p_step_resources_rec.plan_rsrc_usage IS NULL THEN

Line 1540: RAISE fnd_api.g_exc_error;

1536:
1537: IF p_batch_step_rec.step_status = 1
1538: AND p_step_resources_rec.plan_rsrc_usage IS NULL THEN
1539: gme_common_pvt.log_message ('GME_PLAN_RSRC_REQD');
1540: RAISE fnd_api.g_exc_error;
1541: END IF;
1542:
1543: IF ( p_batch_step_rec.step_status = 1
1544: AND p_step_resources_rec.plan_rsrc_qty IS NULL) THEN

Line 1546: RAISE fnd_api.g_exc_error;

1542:
1543: IF ( p_batch_step_rec.step_status = 1
1544: AND p_step_resources_rec.plan_rsrc_qty IS NULL) THEN
1545: gme_common_pvt.log_message ('GME_RSRC_QTY_REQD');
1546: RAISE fnd_api.g_exc_error;
1547: END IF;
1548:
1549: IF ( p_batch_step_rec.step_status = 1
1550: AND p_step_resources_rec.plan_rsrc_count IS NULL) THEN

Line 1552: RAISE fnd_api.g_exc_error;

1548:
1549: IF ( p_batch_step_rec.step_status = 1
1550: AND p_step_resources_rec.plan_rsrc_count IS NULL) THEN
1551: gme_common_pvt.log_message ('GME_RSRC_COUNT_REQD');
1552: RAISE fnd_api.g_exc_error;
1553: END IF;
1554:
1555: IF ( p_batch_step_rec.step_status > 2
1556: AND p_step_resources_rec.actual_rsrc_qty IS NULL) THEN

Line 1558: RAISE fnd_api.g_exc_error;

1554:
1555: IF ( p_batch_step_rec.step_status > 2
1556: AND p_step_resources_rec.actual_rsrc_qty IS NULL) THEN
1557: gme_common_pvt.log_message ('GME_RSRC_QTY_REQD');
1558: RAISE fnd_api.g_exc_error;
1559: END IF;
1560:
1561: IF ( p_batch_step_rec.step_status > 2
1562: AND p_step_resources_rec.actual_rsrc_count IS NULL) THEN

Line 1564: RAISE fnd_api.g_exc_error;

1560:
1561: IF ( p_batch_step_rec.step_status > 2
1562: AND p_step_resources_rec.actual_rsrc_count IS NULL) THEN
1563: gme_common_pvt.log_message ('GME_RSRC_COUNT_REQD');
1564: RAISE fnd_api.g_exc_error;
1565: END IF;
1566:
1567: /* Let us check for the validitiy of the plan and actual dates */
1568: IF p_step_resources_rec.plan_start_date IS NOT NULL

Line 1573: RAISE fnd_api.g_exc_error;

1569: AND p_step_resources_rec.plan_cmplt_date IS NOT NULL THEN
1570: IF p_step_resources_rec.plan_start_date >
1571: p_step_resources_rec.plan_cmplt_date THEN
1572: gme_common_pvt.log_message ('PM_BADSTARTDATE');
1573: RAISE fnd_api.g_exc_error;
1574: END IF;
1575: END IF;
1576:
1577: IF p_step_resources_rec.actual_start_date IS NOT NULL

Line 1582: RAISE fnd_api.g_exc_error;

1578: AND p_step_resources_rec.actual_cmplt_date IS NOT NULL THEN
1579: IF p_step_resources_rec.actual_start_date >
1580: p_step_resources_rec.actual_cmplt_date THEN
1581: gme_common_pvt.log_message ('PM_BADSTARTDATE');
1582: RAISE fnd_api.g_exc_error;
1583: END IF;
1584: END IF;
1585:
1586: IF p_step_resources_rec.plan_start_date IS NOT NULL

Line 1597: RAISE fnd_api.g_exc_error;

1593: ,'START_DATE'
1594: ,fnd_date.date_to_displaydt (p_step_activity_rec.plan_start_date)
1595: ,'END_DATE'
1596: ,fnd_date.date_to_displaydt (p_step_activity_rec.plan_cmplt_date) );
1597: RAISE fnd_api.g_exc_error;
1598: END IF;
1599:
1600: IF p_step_resources_rec.plan_cmplt_date IS NOT NULL
1601: AND p_step_resources_rec.plan_cmplt_date >

Line 1609: RAISE fnd_api.g_exc_error;

1605: ,'START_DATE'
1606: ,fnd_date.date_to_displaydt (p_step_activity_rec.plan_start_date)
1607: ,'END_DATE'
1608: ,fnd_date.date_to_displaydt (p_step_activity_rec.plan_cmplt_date) );
1609: RAISE fnd_api.g_exc_error;
1610: END IF;
1611:
1612: IF p_step_resources_rec.actual_start_date IS NOT NULL
1613: AND ( p_step_resources_rec.actual_start_date <

Line 1625: RAISE fnd_api.g_exc_error;

1621: ,'END_DATE'
1622: ,fnd_date.date_to_displaydt
1623: (NVL (p_step_activity_rec.actual_cmplt_date
1624: ,p_step_activity_rec.actual_start_date) ) );
1625: RAISE fnd_api.g_exc_error;
1626: END IF;
1627:
1628: IF p_step_resources_rec.actual_cmplt_date IS NOT NULL
1629: AND p_step_resources_rec.actual_cmplt_date >

Line 1637: RAISE fnd_api.g_exc_error;

1633: ,'START_DATE'
1634: ,fnd_date.date_to_displaydt (p_step_activity_rec.actual_start_date)
1635: ,'END_DATE'
1636: ,fnd_date.date_to_displaydt (p_step_activity_rec.actual_cmplt_date) );
1637: RAISE fnd_api.g_exc_error;
1638: END IF;
1639:
1640: /* Only one primary resource is allowed per activity let us check for it now */
1641: /* Remove this call as per Resource TD page 57 */

Line 1653: WHEN fnd_api.g_exc_error THEN

1649: IF g_debug <= gme_debug.g_log_procedure THEN
1650: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1651: END IF;
1652: EXCEPTION
1653: WHEN fnd_api.g_exc_error THEN
1654: x_return_status := fnd_api.g_ret_sts_error;
1655: WHEN OTHERS THEN
1656: IF g_debug <= gme_debug.g_log_unexpected THEN
1657: gme_debug.put_line ( 'When others exception in '

Line 1654: x_return_status := fnd_api.g_ret_sts_error;

1650: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1651: END IF;
1652: EXCEPTION
1653: WHEN fnd_api.g_exc_error THEN
1654: x_return_status := fnd_api.g_ret_sts_error;
1655: WHEN OTHERS THEN
1656: IF g_debug <= gme_debug.g_log_unexpected THEN
1657: gme_debug.put_line ( 'When others exception in '
1658: || g_pkg_name

Line 1665: x_return_status := fnd_api.g_ret_sts_unexp_error;

1661: || ' Error is '
1662: || SQLERRM);
1663: END IF;
1664:
1665: x_return_status := fnd_api.g_ret_sts_unexp_error;
1666: fnd_msg_pub.add_exc_msg ('GME_RESOURCE_ENGINE_PVT'
1667: ,'VALIDATE_RESOURCE');
1668: END validate_resource;
1669:

Line 1730: x_return_status := fnd_api.g_ret_sts_success;

1726: || l_api_name);
1727: END IF;
1728:
1729: /* Initialize return status to success */
1730: x_return_status := fnd_api.g_ret_sts_success;
1731:
1732: OPEN cur_get_prim_rsrc (p_step_resources_rec.batchstep_activity_id
1733: ,p_step_resources_rec.batchstep_resource_id);
1734:

Line 1778: RAISE fnd_api.g_exc_error;

1774: --Rishi 3446787/3020345
1775: fnd_message.set_token ('ACTIVITY', l_activity);
1776: fnd_message.set_token ('STEPNO', l_batchstep_no);
1777: fnd_msg_pub.ADD;
1778: RAISE fnd_api.g_exc_error;
1779: ELSIF (l_count = 0) AND NVL (p_step_resources_rec.prim_rsrc_ind, 0) = 0 THEN
1780: fnd_message.set_name ('GME', 'GME_MIN_ONE_PRIM_RSRC');
1781: fnd_message.set_token ('ACTIVITY', l_activity);
1782: fnd_message.set_token ('STEPNO', l_batchstep_no);

Line 1785: RAISE fnd_api.g_exc_error;

1781: fnd_message.set_token ('ACTIVITY', l_activity);
1782: fnd_message.set_token ('STEPNO', l_batchstep_no);
1783: --Rishi 3446787/3020345 end
1784: fnd_msg_pub.ADD;
1785: RAISE fnd_api.g_exc_error;
1786: END IF;
1787:
1788: IF g_debug <= gme_debug.g_log_procedure THEN
1789: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);

Line 1792: WHEN fnd_api.g_exc_error THEN

1788: IF g_debug <= gme_debug.g_log_procedure THEN
1789: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1790: END IF;
1791: EXCEPTION
1792: WHEN fnd_api.g_exc_error THEN
1793: x_return_status := fnd_api.g_ret_sts_error;
1794: WHEN OTHERS THEN
1795: IF g_debug <= gme_debug.g_log_unexpected THEN
1796: gme_debug.put_line ( 'When others exception in '

Line 1793: x_return_status := fnd_api.g_ret_sts_error;

1789: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1790: END IF;
1791: EXCEPTION
1792: WHEN fnd_api.g_exc_error THEN
1793: x_return_status := fnd_api.g_ret_sts_error;
1794: WHEN OTHERS THEN
1795: IF g_debug <= gme_debug.g_log_unexpected THEN
1796: gme_debug.put_line ( 'When others exception in '
1797: || g_pkg_name

Line 1804: x_return_status := fnd_api.g_ret_sts_unexp_error;

1800: || ' Error is '
1801: || SQLERRM);
1802: END IF;
1803:
1804: x_return_status := fnd_api.g_ret_sts_unexp_error;
1805: fnd_msg_pub.add_exc_msg ('GME_RESOURCE_ENGINE_PVT'
1806: ,'CHECK_PRIMARY_RESOURCE');
1807: END check_primary_resource;
1808:

Line 1852: x_return_status := fnd_api.g_ret_sts_success;

1848:
1849: l_count NUMBER (5);
1850: BEGIN
1851: /* Initialize return status to success */
1852: x_return_status := fnd_api.g_ret_sts_success;
1853:
1854: FOR batchsteps IN cur_get_batch_steps LOOP
1855: FOR activities IN
1856: cur_get_batchstep_activities (p_batch_id

Line 1879: RAISE fnd_api.g_exc_error;

1875: fnd_message.set_name ('GME', 'GME_ONE_PRIM_RSRC');
1876: fnd_message.set_token ('ACTIVITY', activities.activity);
1877: fnd_message.set_token ('STEPNO', batchsteps.batchstep_no);
1878: fnd_msg_pub.ADD;
1879: RAISE fnd_api.g_exc_error;
1880: ELSIF (l_count = 0) THEN
1881: fnd_message.set_name ('GME', 'GME_MIN_ONE_PRIM_RSRC');
1882: fnd_message.set_token ('ACTIVITY', activities.activity);
1883: fnd_message.set_token ('STEPNO', batchsteps.batchstep_no);

Line 1885: RAISE fnd_api.g_exc_error;

1881: fnd_message.set_name ('GME', 'GME_MIN_ONE_PRIM_RSRC');
1882: fnd_message.set_token ('ACTIVITY', activities.activity);
1883: fnd_message.set_token ('STEPNO', batchsteps.batchstep_no);
1884: fnd_msg_pub.ADD;
1885: RAISE fnd_api.g_exc_error;
1886: END IF;
1887: END LOOP;
1888: END LOOP;
1889: EXCEPTION

Line 1890: WHEN fnd_api.g_exc_error THEN

1886: END IF;
1887: END LOOP;
1888: END LOOP;
1889: EXCEPTION
1890: WHEN fnd_api.g_exc_error THEN
1891: x_return_status := fnd_api.g_ret_sts_error;
1892: WHEN OTHERS THEN
1893: x_return_status := fnd_api.g_ret_sts_unexp_error;
1894: fnd_msg_pub.add_exc_msg ('GME_RESOURCE_ENGINE_PVT'

Line 1891: x_return_status := fnd_api.g_ret_sts_error;

1887: END LOOP;
1888: END LOOP;
1889: EXCEPTION
1890: WHEN fnd_api.g_exc_error THEN
1891: x_return_status := fnd_api.g_ret_sts_error;
1892: WHEN OTHERS THEN
1893: x_return_status := fnd_api.g_ret_sts_unexp_error;
1894: fnd_msg_pub.add_exc_msg ('GME_RESOURCE_ENGINE_PVT'
1895: ,'CHECK_PRIMARY_RESOURCE');

Line 1893: x_return_status := fnd_api.g_ret_sts_unexp_error;

1889: EXCEPTION
1890: WHEN fnd_api.g_exc_error THEN
1891: x_return_status := fnd_api.g_ret_sts_error;
1892: WHEN OTHERS THEN
1893: x_return_status := fnd_api.g_ret_sts_unexp_error;
1894: fnd_msg_pub.add_exc_msg ('GME_RESOURCE_ENGINE_PVT'
1895: ,'CHECK_PRIMARY_RESOURCE');
1896: END check_primary_resource;
1897:

Line 1945: x_return_status := fnd_api.g_ret_sts_success;

1941: || l_api_name);
1942: END IF;
1943:
1944: /* Initialize return status to success */
1945: x_return_status := fnd_api.g_ret_sts_success;
1946: x_step_resources_rec.batchstep_resource_id :=
1947: p_step_resources_rec.batchstep_resource_id;
1948:
1949: IF NOT gme_batch_step_resources_dbl.fetch_row

Line 1952: RAISE fnd_api.g_exc_error;

1948:
1949: IF NOT gme_batch_step_resources_dbl.fetch_row
1950: (p_batch_step_resources => x_step_resources_rec
1951: ,x_batch_step_resources => x_step_resources_rec) THEN
1952: RAISE fnd_api.g_exc_error;
1953: END IF;
1954:
1955: OPEN cur_get_stat;
1956:

Line 1986: WHEN fnd_api.g_exc_error THEN

1982: IF g_debug <= gme_debug.g_log_procedure THEN
1983: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1984: END IF;
1985: EXCEPTION
1986: WHEN fnd_api.g_exc_error THEN
1987: x_return_status := fnd_api.g_ret_sts_error;
1988: WHEN OTHERS THEN
1989: IF g_debug <= gme_debug.g_log_unexpected THEN
1990: gme_debug.put_line ( 'When others exception in '

Line 1987: x_return_status := fnd_api.g_ret_sts_error;

1983: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1984: END IF;
1985: EXCEPTION
1986: WHEN fnd_api.g_exc_error THEN
1987: x_return_status := fnd_api.g_ret_sts_error;
1988: WHEN OTHERS THEN
1989: IF g_debug <= gme_debug.g_log_unexpected THEN
1990: gme_debug.put_line ( 'When others exception in '
1991: || g_pkg_name

Line 1998: x_return_status := fnd_api.g_ret_sts_unexp_error;

1994: || ' Error is '
1995: || SQLERRM);
1996: END IF;
1997:
1998: x_return_status := fnd_api.g_ret_sts_unexp_error;
1999: fnd_msg_pub.add_exc_msg ('GME_RESOURCE_ENGINE_PVT'
2000: ,'GET_RESOURCE_USAGE');
2001: END get_resource_usage;
2002:

Line 2192: x_return_status := fnd_api.g_ret_sts_success;

2188: || l_api_name);
2189: END IF;
2190:
2191: /* Initially let us assign the return status to success */
2192: x_return_status := fnd_api.g_ret_sts_success;
2193:
2194: l_batch_step_rsrc_rec_in.batchstep_resource_id := p_batchstep_rsrc_id;
2195: IF NOT gme_common_pvt.get_batchstep_rsrc (
2196: p_batchstep_rsrc_rec => l_batch_step_rsrc_rec_in

Line 2238: RAISE fnd_api.g_exc_error;

2234: OR p_resource IS NULL) THEN
2235: gme_common_pvt.log_message ('INPUT_PARMS_MISS'
2236: ,'PROC'
2237: , l_api_name || '.' || g_pkg_name);
2238: RAISE fnd_api.g_exc_error;
2239: ELSE
2240: -- Validate input param one by one to see if it identifies a resource correctly
2241: OPEN cur_get_batch_id (p_org_id, p_batch_no);
2242:

Line 2313: RAISE fnd_api.g_exc_error;

2309: OR ( (p_end_date IS NULL) AND (p_usage <> 0) ) ) THEN
2310: gme_common_pvt.log_message ('INPUT_PARMS_MISS'
2311: ,'PROC'
2312: , l_api_name || '.' || g_pkg_name);
2313: RAISE fnd_api.g_exc_error;
2314: END IF;
2315:
2316: l_batch_header.batch_id := l_batch_step_rsrc_rec.batch_id;
2317:

Line 2386: RAISE FND_API.g_exc_error;

2382: IF cur_validate_reason_id%NOTFOUND THEN
2383: CLOSE cur_validate_reason_id;
2384: gme_common_pvt.log_message(p_product_code => 'INV'
2385: ,p_message_code => 'INV_LOTC_REASONID_INVALID');
2386: RAISE FND_API.g_exc_error;
2387: END IF;
2388: CLOSE cur_validate_reason_id;
2389: ELSIF p_reason_name IS NOT NULL THEN
2390: OPEN cur_get_reason_id(p_reason_name);

Line 2396: RAISE FND_API.g_exc_error;

2392: INTO x_reason_id;
2393: IF cur_get_reason_id%NOTFOUND THEN
2394: CLOSE cur_get_reason_id;
2395: gme_common_pvt.log_message('GME_INVALID_REASON_NAME');
2396: RAISE FND_API.g_exc_error;
2397: ELSE
2398: FETCH cur_get_reason_id
2399: INTO x_reason_id;
2400: IF cur_get_reason_id%NOTFOUND THEN

Line 2405: RAISE FND_API.g_exc_error;

2401: CLOSE cur_get_reason_id;
2402: ELSE
2403: CLOSE cur_get_reason_id;
2404: gme_common_pvt.log_message('GME_REASON_NAME_NOT_UNIQUE');
2405: RAISE FND_API.g_exc_error;
2406: END IF;
2407: END IF;
2408: END IF; /* IF p_reason_name IS NOT NULL */
2409:

Line 2512: RAISE FND_API.g_exc_error;

2508: IF NOT gme_api_grp.close_period_check_flexible
2509: (p_tran_rec => p_tran_rec,
2510: x_tran_rec => l_tran_rec_out)
2511: THEN
2512: RAISE FND_API.g_exc_error;
2513: END IF;
2514: x_trans_date := l_tran_rec_out.trans_date;
2515: --Rishi Varma 02-09-2004 B3856541 end
2516: */

Line 2522: RAISE fnd_api.g_exc_error;

2518: (p_org_id => l_batch_step_rsrc_rec.organization_id
2519: ,p_trans_date => p_trans_date
2520: ,x_trans_date => x_trans_date
2521: ,x_period_id => l_period_id) THEN
2522: RAISE fnd_api.g_exc_error;
2523: END IF;
2524:
2525: /* end */
2526:

Line 2563: WHEN invalid_date OR close_period_err OR step_status_asqc_error OR asqc_update_rsrc_api_error OR asqc_ovrd_end_txn_api_error OR fnd_api.g_exc_error THEN

2559: IF g_debug <= gme_debug.g_log_procedure THEN
2560: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
2561: END IF;
2562: EXCEPTION
2563: WHEN invalid_date OR close_period_err OR step_status_asqc_error OR asqc_update_rsrc_api_error OR asqc_ovrd_end_txn_api_error OR fnd_api.g_exc_error THEN
2564: x_return_status := fnd_api.g_ret_sts_error;
2565: WHEN invalid_instance_id OR invalid_instance_no THEN
2566: x_return_status := fnd_api.g_ret_sts_error;
2567: WHEN neg_usage_not_allowed OR batch_hdr_fetch_err OR rsrcid_not_found THEN

Line 2564: x_return_status := fnd_api.g_ret_sts_error;

2560: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
2561: END IF;
2562: EXCEPTION
2563: WHEN invalid_date OR close_period_err OR step_status_asqc_error OR asqc_update_rsrc_api_error OR asqc_ovrd_end_txn_api_error OR fnd_api.g_exc_error THEN
2564: x_return_status := fnd_api.g_ret_sts_error;
2565: WHEN invalid_instance_id OR invalid_instance_no THEN
2566: x_return_status := fnd_api.g_ret_sts_error;
2567: WHEN neg_usage_not_allowed OR batch_hdr_fetch_err OR rsrcid_not_found THEN
2568: x_return_status := fnd_api.g_ret_sts_error;

Line 2566: x_return_status := fnd_api.g_ret_sts_error;

2562: EXCEPTION
2563: WHEN invalid_date OR close_period_err OR step_status_asqc_error OR asqc_update_rsrc_api_error OR asqc_ovrd_end_txn_api_error OR fnd_api.g_exc_error THEN
2564: x_return_status := fnd_api.g_ret_sts_error;
2565: WHEN invalid_instance_id OR invalid_instance_no THEN
2566: x_return_status := fnd_api.g_ret_sts_error;
2567: WHEN neg_usage_not_allowed OR batch_hdr_fetch_err OR rsrcid_not_found THEN
2568: x_return_status := fnd_api.g_ret_sts_error;
2569: WHEN batch_not_found OR batchstep_not_found OR invalid_step_status THEN
2570: x_return_status := fnd_api.g_ret_sts_error;

Line 2568: x_return_status := fnd_api.g_ret_sts_error;

2564: x_return_status := fnd_api.g_ret_sts_error;
2565: WHEN invalid_instance_id OR invalid_instance_no THEN
2566: x_return_status := fnd_api.g_ret_sts_error;
2567: WHEN neg_usage_not_allowed OR batch_hdr_fetch_err OR rsrcid_not_found THEN
2568: x_return_status := fnd_api.g_ret_sts_error;
2569: WHEN batch_not_found OR batchstep_not_found OR invalid_step_status THEN
2570: x_return_status := fnd_api.g_ret_sts_error;
2571: WHEN rtxn_for_fpo_not_allowed THEN
2572: x_return_status := fnd_api.g_ret_sts_error;

Line 2570: x_return_status := fnd_api.g_ret_sts_error;

2566: x_return_status := fnd_api.g_ret_sts_error;
2567: WHEN neg_usage_not_allowed OR batch_hdr_fetch_err OR rsrcid_not_found THEN
2568: x_return_status := fnd_api.g_ret_sts_error;
2569: WHEN batch_not_found OR batchstep_not_found OR invalid_step_status THEN
2570: x_return_status := fnd_api.g_ret_sts_error;
2571: WHEN rtxn_for_fpo_not_allowed THEN
2572: x_return_status := fnd_api.g_ret_sts_error;
2573: WHEN stepactivity_not_found OR resource_not_found OR rtxn_for_updinv_not_allowed THEN
2574: x_return_status := fnd_api.g_ret_sts_error;

Line 2572: x_return_status := fnd_api.g_ret_sts_error;

2568: x_return_status := fnd_api.g_ret_sts_error;
2569: WHEN batch_not_found OR batchstep_not_found OR invalid_step_status THEN
2570: x_return_status := fnd_api.g_ret_sts_error;
2571: WHEN rtxn_for_fpo_not_allowed THEN
2572: x_return_status := fnd_api.g_ret_sts_error;
2573: WHEN stepactivity_not_found OR resource_not_found OR rtxn_for_updinv_not_allowed THEN
2574: x_return_status := fnd_api.g_ret_sts_error;
2575: WHEN invalid_reason_code THEN
2576: fnd_message.set_name ('GMA', 'SY_REASONCODE');

Line 2574: x_return_status := fnd_api.g_ret_sts_error;

2570: x_return_status := fnd_api.g_ret_sts_error;
2571: WHEN rtxn_for_fpo_not_allowed THEN
2572: x_return_status := fnd_api.g_ret_sts_error;
2573: WHEN stepactivity_not_found OR resource_not_found OR rtxn_for_updinv_not_allowed THEN
2574: x_return_status := fnd_api.g_ret_sts_error;
2575: WHEN invalid_reason_code THEN
2576: fnd_message.set_name ('GMA', 'SY_REASONCODE');
2577: fnd_msg_pub.ADD;
2578: x_return_status := fnd_api.g_ret_sts_error;

Line 2578: x_return_status := fnd_api.g_ret_sts_error;

2574: x_return_status := fnd_api.g_ret_sts_error;
2575: WHEN invalid_reason_code THEN
2576: fnd_message.set_name ('GMA', 'SY_REASONCODE');
2577: fnd_msg_pub.ADD;
2578: x_return_status := fnd_api.g_ret_sts_error;
2579: WHEN OTHERS THEN
2580: IF g_debug <= gme_debug.g_log_unexpected THEN
2581: gme_debug.put_line ( 'When others exception in '
2582: || g_pkg_name

Line 2589: x_return_status := fnd_api.g_ret_sts_unexp_error;

2585: || ' Error is '
2586: || SQLERRM);
2587: END IF;
2588:
2589: x_return_status := fnd_api.g_ret_sts_unexp_error;
2590: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
2591: END validate_rsrc_txn_param;
2592:
2593: /*===========================================================================================

Line 2667: x_return_status := fnd_api.g_ret_sts_success;

2663: || l_api_name);
2664: END IF;
2665:
2666: /* Initially let us assign the return status to success */
2667: x_return_status := fnd_api.g_ret_sts_success;
2668:
2669: /*siva commented following IF condition to allow insertion of flexfileds
2670: without validation when p_validate_flexfields is FALSE */
2671: --IF gme_common_pvt.g_flex_validate_prof = 1 THEN

Line 2678: IF l_return_status <> fnd_api.g_ret_sts_success THEN

2674: (p_resource_txn_rec => p_rsrc_txn_rec
2675: ,x_resource_txn_rec => x_rsrc_txn_rec
2676: ,x_return_status => l_return_status);
2677:
2678: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2679: RAISE validation_failure;
2680: END IF;
2681: --END IF;
2682:

Line 2720: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2716: || '.'
2717: || l_api_name);
2718: END IF;
2719:
2720: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2721: RAISE validation_failure;
2722: END IF;
2723:
2724: OPEN cur_fetch_resource_dtl (l_line_id);

Line 2751: RAISE fnd_api.g_exc_error;

2747: ,x_resource_tbl => l_resource_tbl
2748: ,x_return_status => l_return_status);
2749:
2750: IF l_return_status <> x_return_status THEN
2751: RAISE fnd_api.g_exc_error;
2752: END IF;
2753:
2754: -- delete all rec in l_resource_tbl
2755: FOR i IN 1 .. l_resource_tbl.COUNT LOOP

Line 2869: x_return_status := fnd_api.g_ret_sts_error;

2865: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
2866: END IF;
2867: EXCEPTION
2868: WHEN validation_failure OR error_load_trans THEN
2869: x_return_status := fnd_api.g_ret_sts_error;
2870: WHEN update_rsrc_txn_err OR rsrc_txn_insert_err THEN
2871: x_return_status := fnd_api.g_ret_sts_error;
2872: WHEN rsrc_fetch_err OR rsrc_update_err THEN
2873: x_return_status := fnd_api.g_ret_sts_error;

Line 2871: x_return_status := fnd_api.g_ret_sts_error;

2867: EXCEPTION
2868: WHEN validation_failure OR error_load_trans THEN
2869: x_return_status := fnd_api.g_ret_sts_error;
2870: WHEN update_rsrc_txn_err OR rsrc_txn_insert_err THEN
2871: x_return_status := fnd_api.g_ret_sts_error;
2872: WHEN rsrc_fetch_err OR rsrc_update_err THEN
2873: x_return_status := fnd_api.g_ret_sts_error;
2874: WHEN OTHERS THEN
2875: IF g_debug <= gme_debug.g_log_unexpected THEN

Line 2873: x_return_status := fnd_api.g_ret_sts_error;

2869: x_return_status := fnd_api.g_ret_sts_error;
2870: WHEN update_rsrc_txn_err OR rsrc_txn_insert_err THEN
2871: x_return_status := fnd_api.g_ret_sts_error;
2872: WHEN rsrc_fetch_err OR rsrc_update_err THEN
2873: x_return_status := fnd_api.g_ret_sts_error;
2874: WHEN OTHERS THEN
2875: IF g_debug <= gme_debug.g_log_unexpected THEN
2876: gme_debug.put_line ( 'When others exception in '
2877: || g_pkg_name

Line 2884: x_return_status := fnd_api.g_ret_sts_unexp_error;

2880: || ' Error is '
2881: || SQLERRM);
2882: END IF;
2883:
2884: x_return_status := fnd_api.g_ret_sts_unexp_error;
2885: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
2886: END update_actual_resource_usage;
2887:
2888: /*===========================================================================================

Line 2977: x_return_status := fnd_api.g_ret_sts_success;

2973: || l_api_name);
2974: END IF;
2975:
2976: /* Initially let us assign the return status to success */
2977: x_return_status := fnd_api.g_ret_sts_success;
2978:
2979: /*siva commented following IF condition to allow insertion of flexfileds
2980: without validation when p_validate_flexfields is FALSE */
2981: --IF gme_common_pvt.g_flex_validate_prof = 1 THEN

Line 2988: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2984: (p_resource_txn_rec => p_rsrc_txn_rec
2985: ,x_resource_txn_rec => x_rsrc_txn_rec
2986: ,x_return_status => x_return_status);
2987:
2988: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2989: RAISE validation_failure;
2990: END IF;
2991: --END IF;
2992:

Line 3032: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3028: || '.'
3029: || l_api_name);
3030: END IF;
3031:
3032: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3033: RAISE validation_failure;
3034: END IF;
3035:
3036: OPEN cur_fetch_resource_dtl (l_line_id);

Line 3094: p_init_msg_list => FND_API.G_FALSE,

3090:
3091: -- Bug 9506856 - Make call to GMF for actual costing
3092: GMF_LAYERS.Create_Resource_Layers
3093: (p_api_version => 1.0,
3094: p_init_msg_list => FND_API.G_FALSE,
3095: p_rsrc_rec => l_rsrc_txn_rec,
3096: p_doc_qty => l_rsrc_txn_rec.resource_usage,
3097: p_doc_um => l_rsrc_txn_rec.trans_qty_um,
3098: x_return_status => l_return_status,

Line 3102: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

3098: x_return_status => l_return_status,
3099: x_msg_count => l_msg_count,
3100: x_msg_data => l_msg_data);
3101:
3102: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
3103: THEN
3104: RAISE gmf_cost_failure;
3105: END IF;
3106:

Line 3155: x_return_status := FND_API.G_RET_STS_ERROR;

3151: END IF;
3152: EXCEPTION
3153: WHEN gmf_cost_failure OR rsrc_txn_fetch_err THEN
3154: -- Bug 9506856
3155: x_return_status := FND_API.G_RET_STS_ERROR;
3156: WHEN validation_failure OR error_load_trans OR rsrc_txn_insert_err THEN
3157: x_return_status := fnd_api.g_ret_sts_error;
3158: WHEN rsrc_fetch_err OR rsrc_update_err OR reduce_pend_usage_err THEN
3159: x_return_status := fnd_api.g_ret_sts_error;

Line 3157: x_return_status := fnd_api.g_ret_sts_error;

3153: WHEN gmf_cost_failure OR rsrc_txn_fetch_err THEN
3154: -- Bug 9506856
3155: x_return_status := FND_API.G_RET_STS_ERROR;
3156: WHEN validation_failure OR error_load_trans OR rsrc_txn_insert_err THEN
3157: x_return_status := fnd_api.g_ret_sts_error;
3158: WHEN rsrc_fetch_err OR rsrc_update_err OR reduce_pend_usage_err THEN
3159: x_return_status := fnd_api.g_ret_sts_error;
3160: WHEN OTHERS THEN
3161: IF g_debug <= gme_debug.g_log_unexpected THEN

Line 3159: x_return_status := fnd_api.g_ret_sts_error;

3155: x_return_status := FND_API.G_RET_STS_ERROR;
3156: WHEN validation_failure OR error_load_trans OR rsrc_txn_insert_err THEN
3157: x_return_status := fnd_api.g_ret_sts_error;
3158: WHEN rsrc_fetch_err OR rsrc_update_err OR reduce_pend_usage_err THEN
3159: x_return_status := fnd_api.g_ret_sts_error;
3160: WHEN OTHERS THEN
3161: IF g_debug <= gme_debug.g_log_unexpected THEN
3162: gme_debug.put_line ( 'When others exception in '
3163: || g_pkg_name

Line 3170: x_return_status := fnd_api.g_ret_sts_unexp_error;

3166: || ' Error is '
3167: || SQLERRM);
3168: END IF;
3169:
3170: x_return_status := fnd_api.g_ret_sts_unexp_error;
3171: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
3172: END insert_incr_actual_rsrc_txn;
3173:
3174: /*==== =======================================================================================

Line 3268: x_return_status := fnd_api.g_ret_sts_success;

3264: || l_api_name);
3265: END IF;
3266:
3267: /* Initially let us assign the return status to success */
3268: x_return_status := fnd_api.g_ret_sts_success;
3269:
3270: /*siva commented following IF condition to allow insertion of flexfileds
3271: without validation when p_validate_flexfields is FALSE */
3272: --IF gme_common_pvt.g_flex_validate_prof = 1 THEN

Line 3279: IF l_return_status <> fnd_api.g_ret_sts_success THEN

3275: (p_resource_txn_rec => p_rsrc_txn_rec
3276: ,x_resource_txn_rec => x_rsrc_txn_rec
3277: ,x_return_status => l_return_status);
3278:
3279: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3280: RAISE validation_failure;
3281: END IF;
3282: --END IF;
3283: l_rsrc_txn_rec := x_rsrc_txn_rec;

Line 3324: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3320: || '.'
3321: || l_api_name);
3322: END IF;
3323:
3324: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3325: RAISE validation_failure;
3326: END IF;
3327:
3328: /* V. Ajay Kumar Bug 3041705. Multiplied the difference of

Line 3426: p_init_msg_list => FND_API.G_FALSE,

3422:
3423: -- Bug 9506856 - Make call to GMF for actual costing
3424: GMF_LAYERS.Create_Resource_Layers
3425: (p_api_version => 1.0,
3426: p_init_msg_list => FND_API.G_FALSE,
3427: p_rsrc_rec => l_rsrc_txn_rec,
3428: p_doc_qty => l_rsrc_txn_rec.resource_usage,
3429: p_doc_um => l_rsrc_txn_rec.trans_qty_um,
3430: x_return_status => l_return_status,

Line 3434: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

3430: x_return_status => l_return_status,
3431: x_msg_count => l_msg_count,
3432: x_msg_data => l_msg_data);
3433:
3434: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
3435: THEN
3436: RAISE gmf_cost_failure;
3437: END IF;
3438:

Line 3488: x_return_status := FND_API.G_RET_STS_ERROR;

3484: END IF;
3485: EXCEPTION
3486: WHEN gmf_cost_failure OR rsrc_txn_fetch_err THEN
3487: -- Bug 9506856
3488: x_return_status := FND_API.G_RET_STS_ERROR;
3489: WHEN validation_failure OR missing_profile_option OR error_load_trans OR rsrc_txn_insert_err THEN
3490: x_return_status := fnd_api.g_ret_sts_error;
3491: WHEN rsrc_fetch_err OR rsrc_update_err OR reduce_pend_usage_err THEN
3492: x_return_status := fnd_api.g_ret_sts_error;

Line 3490: x_return_status := fnd_api.g_ret_sts_error;

3486: WHEN gmf_cost_failure OR rsrc_txn_fetch_err THEN
3487: -- Bug 9506856
3488: x_return_status := FND_API.G_RET_STS_ERROR;
3489: WHEN validation_failure OR missing_profile_option OR error_load_trans OR rsrc_txn_insert_err THEN
3490: x_return_status := fnd_api.g_ret_sts_error;
3491: WHEN rsrc_fetch_err OR rsrc_update_err OR reduce_pend_usage_err THEN
3492: x_return_status := fnd_api.g_ret_sts_error;
3493: WHEN uom_conversion_err THEN
3494: x_return_status := fnd_api.g_ret_sts_error;

Line 3492: x_return_status := fnd_api.g_ret_sts_error;

3488: x_return_status := FND_API.G_RET_STS_ERROR;
3489: WHEN validation_failure OR missing_profile_option OR error_load_trans OR rsrc_txn_insert_err THEN
3490: x_return_status := fnd_api.g_ret_sts_error;
3491: WHEN rsrc_fetch_err OR rsrc_update_err OR reduce_pend_usage_err THEN
3492: x_return_status := fnd_api.g_ret_sts_error;
3493: WHEN uom_conversion_err THEN
3494: x_return_status := fnd_api.g_ret_sts_error;
3495: WHEN OTHERS THEN
3496: IF g_debug <= gme_debug.g_log_unexpected THEN

Line 3494: x_return_status := fnd_api.g_ret_sts_error;

3490: x_return_status := fnd_api.g_ret_sts_error;
3491: WHEN rsrc_fetch_err OR rsrc_update_err OR reduce_pend_usage_err THEN
3492: x_return_status := fnd_api.g_ret_sts_error;
3493: WHEN uom_conversion_err THEN
3494: x_return_status := fnd_api.g_ret_sts_error;
3495: WHEN OTHERS THEN
3496: IF g_debug <= gme_debug.g_log_unexpected THEN
3497: gme_debug.put_line ( 'When others exception in '
3498: || g_pkg_name

Line 3505: x_return_status := fnd_api.g_ret_sts_unexp_error;

3501: || ' Error is '
3502: || SQLERRM);
3503: END IF;
3504:
3505: x_return_status := fnd_api.g_ret_sts_unexp_error;
3506: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
3507: END insert_timed_actual_rsrc_txn;
3508:
3509: /*==== =======================================================================================

Line 3569: x_return_status := fnd_api.g_ret_sts_success;

3565: || l_api_name);
3566: END IF;
3567:
3568: /* Initially let us assign the return status to success */
3569: x_return_status := fnd_api.g_ret_sts_success;
3570:
3571: /*siva commented following IF condition to allow insertion of flexfileds
3572: without validation when p_validate_flexfields is FALSE */
3573: -- IF gme_common_pvt.g_flex_validate_prof = 1 THEN

Line 3580: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3576: (p_resource_txn_rec => p_rsrc_txn_rec
3577: ,x_resource_txn_rec => x_rsrc_txn_rec
3578: ,x_return_status => x_return_status);
3579:
3580: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3581: RAISE validation_failure;
3582: END IF;
3583: --END IF;
3584: /* siva added the following line */

Line 3589: l_return_status := fnd_api.g_ret_sts_success;

3585: l_rsrc_txn_rec := x_rsrc_txn_rec;
3586:
3587:
3588: /* Initially let us assign the return status to success */
3589: l_return_status := fnd_api.g_ret_sts_success;
3590:
3591: IF g_debug <= gme_debug.g_log_procedure THEN
3592: gme_debug.put_line ( 'before calling validate_rsrc_txn_param '
3593: || g_pkg_name

Line 3628: IF l_return_status <> fnd_api.g_ret_sts_success THEN

3624: || '.'
3625: || l_api_name);
3626: END IF;
3627:
3628: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3629: RAISE validation_failure;
3630: END IF;
3631:
3632: OPEN cur_fetch_resource_dtl (l_line_id);

Line 3694: x_return_status := fnd_api.g_ret_sts_error;

3690: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name|| ' with return status '||x_return_status);
3691: END IF;
3692: EXCEPTION
3693: WHEN validation_failure OR rsrc_txn_insert_err THEN
3694: x_return_status := fnd_api.g_ret_sts_error;
3695: WHEN OTHERS THEN
3696: IF g_debug <= gme_debug.g_log_unexpected THEN
3697: gme_debug.put_line ( 'When others exception in '
3698: || g_pkg_name

Line 3705: x_return_status := fnd_api.g_ret_sts_unexp_error;

3701: || ' Error is '
3702: || SQLERRM);
3703: END IF;
3704:
3705: x_return_status := fnd_api.g_ret_sts_unexp_error;
3706: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
3707: END start_cmplt_actual_rsrc_txn;
3708:
3709: /*==== =======================================================================================

Line 3796: x_return_status := fnd_api.g_ret_sts_success;

3792: || l_api_name);
3793: END IF;
3794:
3795: /* Initially let us assign the return status to success */
3796: x_return_status := fnd_api.g_ret_sts_success;
3797:
3798: -- validate poc_trans_id right here as validate_rsrc_txn_param doesnt validate it
3799:
3800: OPEN cur_validate_poc_trans_id (p_rsrc_txn_rec.poc_trans_id);

Line 3823: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3819: (p_resource_txn_rec => p_rsrc_txn_rec
3820: ,x_resource_txn_rec => x_rsrc_txn_rec
3821: ,x_return_status => x_return_status);
3822:
3823: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3824: RAISE validation_failure;
3825: END IF;
3826: --END IF;
3827:

Line 3954: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3950: || '.'
3951: || l_api_name);
3952: END IF;
3953:
3954: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3955: RAISE validation_failure;
3956: END IF;
3957:
3958: -- construct record for updation

Line 4087: x_return_status := fnd_api.g_ret_sts_error;

4083: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
4084: END IF;
4085: EXCEPTION
4086: WHEN expected_error OR missing_profile_option THEN
4087: x_return_status := fnd_api.g_ret_sts_error;
4088: --Begin Bug#3479669
4089: --Added rsrc_txn_ins_err exception
4090: WHEN error_load_trans OR invalid_poc_trans_id OR rsrc_txn_upd_err OR rsrc_txn_ins_err THEN
4091: --End Bug#3479669

Line 4092: x_return_status := fnd_api.g_ret_sts_error;

4088: --Begin Bug#3479669
4089: --Added rsrc_txn_ins_err exception
4090: WHEN error_load_trans OR invalid_poc_trans_id OR rsrc_txn_upd_err OR rsrc_txn_ins_err THEN
4091: --End Bug#3479669
4092: x_return_status := fnd_api.g_ret_sts_error;
4093: WHEN validation_failure THEN
4094: x_return_status := fnd_api.g_ret_sts_error;
4095: WHEN uom_conversion_err OR invalid_txn_for_end THEN
4096: x_return_status := fnd_api.g_ret_sts_error;

Line 4094: x_return_status := fnd_api.g_ret_sts_error;

4090: WHEN error_load_trans OR invalid_poc_trans_id OR rsrc_txn_upd_err OR rsrc_txn_ins_err THEN
4091: --End Bug#3479669
4092: x_return_status := fnd_api.g_ret_sts_error;
4093: WHEN validation_failure THEN
4094: x_return_status := fnd_api.g_ret_sts_error;
4095: WHEN uom_conversion_err OR invalid_txn_for_end THEN
4096: x_return_status := fnd_api.g_ret_sts_error;
4097: WHEN rsrc_fetch_err OR rsrc_txn_fetch_err OR rsrc_update_err OR reduce_pend_usage_err THEN
4098: x_return_status := fnd_api.g_ret_sts_error;

Line 4096: x_return_status := fnd_api.g_ret_sts_error;

4092: x_return_status := fnd_api.g_ret_sts_error;
4093: WHEN validation_failure THEN
4094: x_return_status := fnd_api.g_ret_sts_error;
4095: WHEN uom_conversion_err OR invalid_txn_for_end THEN
4096: x_return_status := fnd_api.g_ret_sts_error;
4097: WHEN rsrc_fetch_err OR rsrc_txn_fetch_err OR rsrc_update_err OR reduce_pend_usage_err THEN
4098: x_return_status := fnd_api.g_ret_sts_error;
4099: WHEN OTHERS THEN
4100: IF g_debug <= gme_debug.g_log_unexpected THEN

Line 4098: x_return_status := fnd_api.g_ret_sts_error;

4094: x_return_status := fnd_api.g_ret_sts_error;
4095: WHEN uom_conversion_err OR invalid_txn_for_end THEN
4096: x_return_status := fnd_api.g_ret_sts_error;
4097: WHEN rsrc_fetch_err OR rsrc_txn_fetch_err OR rsrc_update_err OR reduce_pend_usage_err THEN
4098: x_return_status := fnd_api.g_ret_sts_error;
4099: WHEN OTHERS THEN
4100: IF g_debug <= gme_debug.g_log_unexpected THEN
4101: gme_debug.put_line ( 'When others exception in '
4102: || g_pkg_name

Line 4109: x_return_status := fnd_api.g_ret_sts_unexp_error;

4105: || ' Error is '
4106: || SQLERRM);
4107: END IF;
4108:
4109: x_return_status := fnd_api.g_ret_sts_unexp_error;
4110: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
4111: END end_cmplt_actual_rsrc_txn;
4112: END gme_resource_engine_pvt;