1: PACKAGE BODY flm_seq_ui AS
2: /* $Header: FLMSQUIB.pls 120.2.12010000.2 2008/09/04 15:21:34 adasa ship $ */
3:
4:
5: /******************************************************************
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:
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:
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:
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:
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:
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:
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:
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:
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:
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:
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:
946: flm_licensed VARCHAR2(1) := 'N';
947: flmseq_enabled_prf_value VARCHAR2(1) := 'N';
948: BEGIN
949: flm_licensed := flm_util.Get_Install_Status();
950: flmseq_enabled_prf_value := flm_seq_ui.Get_FlmSeq_Enabled_Flag();
951:
952: IF flm_licensed = 'I' and flmseq_enabled_prf_value = 'Y'
953: THEN
954: RETURN 'Y';
957: RETURN 'N';
958: END Get_FlmSeq_Licensed;
959:
960:
961: END flm_seq_ui;