15: BEGIN
16: SAVEPOINT flm_delete_tasks;
17: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
18: THEN
19: FND_MSG_PUB.initialize;
20: END IF;
21:
22: x_return_status := FND_API.G_RET_STS_SUCCESS;
23:
51: WHEN OTHERS THEN
52: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
53: ROLLBACK TO flm_delete_tasks;
54:
55: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
56: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_tasks('||l_debug_line||')');
57: END IF;
58:
59: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
52: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
53: ROLLBACK TO flm_delete_tasks;
54:
55: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
56: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_tasks('||l_debug_line||')');
57: END IF;
58:
59: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
60:
55: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
56: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_tasks('||l_debug_line||')');
57: END IF;
58:
59: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
60:
61: END delete_tasks;
62:
63: /*****************************************************************************************
74: BEGIN
75: SAVEPOINT flm_delete_tasks_commit;
76: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
77: THEN
78: FND_MSG_PUB.initialize;
79: END IF;
80:
81: x_return_status := FND_API.G_RET_STS_SUCCESS;
82:
90: WHEN OTHERS THEN
91: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
92: ROLLBACK TO flm_delete_tasks_commit;
93:
94: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
95: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_tasks_commit('||l_debug_line||')');
96: END IF;
97:
98: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
91: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
92: ROLLBACK TO flm_delete_tasks_commit;
93:
94: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
95: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_tasks_commit('||l_debug_line||')');
96: END IF;
97:
98: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
99:
94: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
95: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_tasks_commit('||l_debug_line||')');
96: END IF;
97:
98: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
99:
100: END delete_tasks_commit;
101:
102:
189: BEGIN
190: SAVEPOINT flm_line_available_capacity;
191: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
192: THEN
193: FND_MSG_PUB.initialize;
194: END IF;
195:
196: l_debug_line := 10;
197: x_return_status := FND_API.G_RET_STS_SUCCESS;
319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
320: x_capacity := -1;
321: ROLLBACK TO flm_line_available_capacity;
322:
323: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
324: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'flm_line_available_capacity('||l_debug_line||')');
325: END IF;
326:
327: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
320: x_capacity := -1;
321: ROLLBACK TO flm_line_available_capacity;
322:
323: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
324: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'flm_line_available_capacity('||l_debug_line||')');
325: END IF;
326:
327: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
328:
323: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
324: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'flm_line_available_capacity('||l_debug_line||')');
325: END IF;
326:
327: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
328:
329: END line_available_capacity;
330:
331:
369: BEGIN
370: SAVEPOINT flm_insert_demands;
371: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
372: THEN
373: FND_MSG_PUB.initialize;
374: END IF;
375:
376: l_debug_line := 10;
377: x_return_status := FND_API.G_RET_STS_SUCCESS;
463: IF (p_max_rows IS NOT NULL AND p_max_rows <> -1 AND l_count_rows > p_max_rows) THEN
464: ROLLBACK TO flm_insert_demands;
465: x_return_status := FND_API.G_RET_STS_ERROR;
466:
467: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
468: FND_MESSAGE.SET_NAME('FLM','FLM_SEQ_DEMAND_EXCEEDED');
469: FND_MSG_PUB.Add;
470: END IF;
471:
465: x_return_status := FND_API.G_RET_STS_ERROR;
466:
467: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
468: FND_MESSAGE.SET_NAME('FLM','FLM_SEQ_DEMAND_EXCEEDED');
469: FND_MSG_PUB.Add;
470: END IF;
471:
472: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
473: return;
468: FND_MESSAGE.SET_NAME('FLM','FLM_SEQ_DEMAND_EXCEEDED');
469: FND_MSG_PUB.Add;
470: END IF;
471:
472: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
473: return;
474: END IF;
475:
476: IF (p_max_rows IS NULL OR p_max_rows <> -1) THEN
510: WHEN OTHERS THEN
511: ROLLBACK TO flm_insert_demands;
512: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
513:
514: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
515: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'insert_demands('||l_debug_line||')');
516: END IF;
517:
518: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
511: ROLLBACK TO flm_insert_demands;
512: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
513:
514: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
515: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'insert_demands('||l_debug_line||')');
516: END IF;
517:
518: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
519:
514: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
515: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'insert_demands('||l_debug_line||')');
516: END IF;
517:
518: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
519:
520: END insert_demands;
521:
522: /*****************************************************
533: BEGIN
534: SAVEPOINT flm_get_demand_qty;
535: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
536: THEN
537: FND_MSG_PUB.initialize;
538: END IF;
539:
540: l_debug_line := 10;
541: x_demand_qty := G_DEMAND_QTY(p_line_id);
545: WHEN OTHERS THEN
546: ROLLBACK TO flm_get_demand_qty;
547: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
548:
549: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
550: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'get_demand_qty('||l_debug_line||')');
551: END IF;
552:
553: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
546: ROLLBACK TO flm_get_demand_qty;
547: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
548:
549: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
550: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'get_demand_qty('||l_debug_line||')');
551: END IF;
552:
553: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
554:
549: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
550: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'get_demand_qty('||l_debug_line||')');
551: END IF;
552:
553: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
554:
555: END get_demand_qty;
556:
557:
568: BEGIN
569: SAVEPOINT flm_delete_demands;
570: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
571: THEN
572: FND_MSG_PUB.initialize;
573: END IF;
574:
575: l_debug_line := 10;
576: x_return_status := FND_API.G_RET_STS_SUCCESS;
582: WHEN OTHERS THEN
583: ROLLBACK TO flm_delete_demands;
584: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
585:
586: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
587: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_demands('||l_debug_line||')');
588: END IF;
589:
590: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
583: ROLLBACK TO flm_delete_demands;
584: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
585:
586: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
587: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_demands('||l_debug_line||')');
588: END IF;
589:
590: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
591:
586: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
587: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_demands('||l_debug_line||')');
588: END IF;
589:
590: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
591:
592: END delete_demands;
593:
594: /*******************************************************
605: BEGIN
606: SAVEPOINT flm_delete_criteria;
607: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
608: THEN
609: FND_MSG_PUB.initialize;
610: END IF;
611:
612: l_debug_line := 10;
613: x_return_status := FND_API.G_RET_STS_SUCCESS;
627: WHEN OTHERS THEN
628: ROLLBACK TO flm_delete_criteria;
629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
630:
631: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
632: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_criteria('||l_debug_line||')');
633: END IF;
634:
635: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
628: ROLLBACK TO flm_delete_criteria;
629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
630:
631: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
632: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_criteria('||l_debug_line||')');
633: END IF;
634:
635: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
636:
631: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
632: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_criteria('||l_debug_line||')');
633: END IF;
634:
635: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
636:
637: END delete_criteria;
638:
639: /***************************************************************************************
652: BEGIN
653: SAVEPOINT flm_insert_line_constraints;
654: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
655: THEN
656: FND_MSG_PUB.initialize;
657: END IF;
658:
659: l_debug_line := 10;
660: x_return_status := FND_API.G_RET_STS_SUCCESS;
781: WHEN OTHERS THEN
782: ROLLBACK TO flm_insert_line_constraints;
783: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
784:
785: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
786: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'insert_line_constraints('||l_debug_line||')');
787: END IF;
788:
789: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
782: ROLLBACK TO flm_insert_line_constraints;
783: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
784:
785: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
786: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'insert_line_constraints('||l_debug_line||')');
787: END IF;
788:
789: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
790:
785: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
786: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'insert_line_constraints('||l_debug_line||')');
787: END IF;
788:
789: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
790:
791: END insert_line_constraints;
792:
793: /*****************************************************************************************************
803: BEGIN
804: SAVEPOINT flm_delete_line_constraints;
805: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
806: THEN
807: FND_MSG_PUB.initialize;
808: END IF;
809:
810: l_debug_line := 10;
811: x_return_status := FND_API.G_RET_STS_SUCCESS;
821: WHEN OTHERS THEN
822: ROLLBACK TO flm_delete_line_constraints;
823: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
824:
825: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
826: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_line_constraints('||l_debug_line||')');
827: END IF;
828:
829: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
822: ROLLBACK TO flm_delete_line_constraints;
823: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
824:
825: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
826: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_line_constraints('||l_debug_line||')');
827: END IF;
828:
829: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
830:
825: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
826: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'delete_line_constraints('||l_debug_line||')');
827: END IF;
828:
829: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
830:
831: END delete_line_constraints;
832:
833: /******************************************************************
845: BEGIN
846: SAVEPOINT flm_get_min_wip_entity_id;
847: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
848: THEN
849: FND_MSG_PUB.initialize;
850: END IF;
851:
852: l_debug_line := 10;
853: x_return_status := FND_API.G_RET_STS_SUCCESS;
863: WHEN OTHERS THEN
864: ROLLBACK TO flm_get_min_wip_entity_id;
865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
866:
867: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
868: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'get_min_wip_entity_id('||l_debug_line||')');
869: END IF;
870:
871: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
864: ROLLBACK TO flm_get_min_wip_entity_id;
865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
866:
867: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
868: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'get_min_wip_entity_id('||l_debug_line||')');
869: END IF;
870:
871: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
872:
867: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
868: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'get_min_wip_entity_id('||l_debug_line||')');
869: END IF;
870:
871: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
872:
873: END get_min_wip_entity_id;
874:
875: /*********************************************************************
894:
895: SAVEPOINT flm_data_cleanup;
896: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
897: THEN
898: FND_MSG_PUB.initialize;
899: END IF;
900:
901: l_debug_line := 10;
902: x_return_status := FND_API.G_RET_STS_SUCCESS;
910: WHEN OTHERS THEN
911: ROLLBACK TO flm_data_cleanup;
912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
913:
914: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
915: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'data_cleanup('||l_debug_line||')');
916: END IF;
917:
918: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
911: ROLLBACK TO flm_data_cleanup;
912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
913:
914: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
915: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'data_cleanup('||l_debug_line||')');
916: END IF;
917:
918: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
919:
914: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
915: FND_MSG_PUB.Add_Exc_Msg ('flm_seq_ui' ,'data_cleanup('||l_debug_line||')');
916: END IF;
917:
918: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
919:
920: END data_cleanup;
921:
922: /*****