269: else
270: l_is_serial_control := false;
271: end if;
272:
273: fnd_msg_pub.Delete_Msg;
274:
275: -- Call the procedure
276: inv_quantity_tree_pub.query_quantities(p_api_version_number => 1.0,
277: p_init_msg_lst => 'T',
607:
608: procedure clear_msg_stack
609: Is
610: Begin
611: fnd_msg_pub.Initialize;
612:
613: End clear_msg_stack;
614:
615: function get_current_resp_key return varchar2
637: Begin
638:
639: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
640: THEN
641: FND_MSG_PUB.initialize;
642: END IF;
643: x_return_status := FND_API.G_RET_STS_SUCCESS;
644:
645: update wip_discrete_jobs wdj
648:
649: exception when others then
650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
651:
652: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
653: FND_MSG_PUB.Add_Exc_Msg ('wip_ws_util' ,'append_job_note');
654: END IF;
655:
656: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
649: exception when others then
650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
651:
652: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
653: FND_MSG_PUB.Add_Exc_Msg ('wip_ws_util' ,'append_job_note');
654: END IF;
655:
656: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
657: end append_job_note;
652: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
653: FND_MSG_PUB.Add_Exc_Msg ('wip_ws_util' ,'append_job_note');
654: END IF;
655:
656: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
657: end append_job_note;
658:
659: procedure append_job_note(p_wip_entity_id number, p_clob_msg clob,
660: p_init_msg_list IN VARCHAR2,
666: Begin
667:
668: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
669: THEN
670: FND_MSG_PUB.initialize;
671: END IF;
672: x_return_status := FND_API.G_RET_STS_SUCCESS;
673:
674: select wdj.job_note
683:
684: exception when others then
685: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
686:
687: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
688: FND_MSG_PUB.Add_Exc_Msg ('wip_ws_util' ,'append_job_note');
689: END IF;
690:
691: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
684: exception when others then
685: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
686:
687: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
688: FND_MSG_PUB.Add_Exc_Msg ('wip_ws_util' ,'append_job_note');
689: END IF;
690:
691: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
692: end append_job_note;
687: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
688: FND_MSG_PUB.Add_Exc_Msg ('wip_ws_util' ,'append_job_note');
689: END IF;
690:
691: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
692: end append_job_note;
693:
694: procedure append_exception_note(p_exception_id number, p_msg varchar2,
695: p_init_msg_list IN VARCHAR2,
702: Begin
703:
704: IF p_init_msg_list IS NOT NULL AND FND_API.TO_BOOLEAN(p_init_msg_list)
705: THEN
706: FND_MSG_PUB.initialize;
707: END IF;
708: x_return_status := FND_API.G_RET_STS_SUCCESS;
709:
710: select note into l_note from wip_exceptions
722:
723: exception when others then
724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
725:
726: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
727: FND_MSG_PUB.Add_Exc_Msg ('wip_ws_util' ,'append_exception_note');
728: END IF;
729:
730: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
723: exception when others then
724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
725:
726: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
727: FND_MSG_PUB.Add_Exc_Msg ('wip_ws_util' ,'append_exception_note');
728: END IF;
729:
730: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
731: end append_exception_note;
726: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
727: FND_MSG_PUB.Add_Exc_Msg ('wip_ws_util' ,'append_exception_note');
728: END IF;
729:
730: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count ,p_data => x_msg_data);
731: end append_exception_note;
732:
733:
734: function get_resource_remaining_usage