42: END IF;
43: IF l_debug_level > 0 THEN
44: oe_debug_pub.add( 'ITEM KEY IS ' || ITEMKEY ) ;
45: END IF;
46: OE_STANDARD_WF.Set_Msg_Context(actid);
47:
48: SAVEPOINT Before_Lock;
49:
50: select top_model_line_id into l_top_model_line_id
68: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR) THEN
69: fnd_message.set_name('ONT', 'OE_LINE_LOCKED');
70: OE_MSG_PUB.Add;
71: END IF;
72: OE_STANDARD_WF.Save_Messages;
73: OE_STANDARD_WF.Clear_Msg_Context;
74: return;
75: END; -- bug 4503620 ends
76:
69: fnd_message.set_name('ONT', 'OE_LINE_LOCKED');
70: OE_MSG_PUB.Add;
71: END IF;
72: OE_STANDARD_WF.Save_Messages;
73: OE_STANDARD_WF.Clear_Msg_Context;
74: return;
75: END; -- bug 4503620 ends
76:
77: OE_Line_Util.Lock_Row
83: IF l_debug_level > 0 THEN
84: oe_debug_pub.add( 'LOCK ROW RETURNED WITH ERROR' , 1 ) ;
85: END IF;
86: resultout := 'COMPLETE:INCOMPLETE';
87: OE_STANDARD_WF.Save_Messages;
88: OE_STANDARD_WF.Clear_Msg_Context;
89: return;
90: END IF;
91:
84: oe_debug_pub.add( 'LOCK ROW RETURNED WITH ERROR' , 1 ) ;
85: END IF;
86: resultout := 'COMPLETE:INCOMPLETE';
87: OE_STANDARD_WF.Save_Messages;
88: OE_STANDARD_WF.Clear_Msg_Context;
89: return;
90: END IF;
91:
92: OE_MSG_PUB.set_msg_context(
140: --
141: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
142: IF l_result_out = OE_GLOBALS.G_WFR_COMPLETE THEN
143: resultout := 'NOTIFIED';
144: OE_STANDARD_WF.Save_Messages;
145: OE_STANDARD_WF.Clear_Msg_Context;
146: RETURN;
147: END IF;
148: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
141: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
142: IF l_result_out = OE_GLOBALS.G_WFR_COMPLETE THEN
143: resultout := 'NOTIFIED';
144: OE_STANDARD_WF.Save_Messages;
145: OE_STANDARD_WF.Clear_Msg_Context;
146: RETURN;
147: END IF;
148: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
149: resultout := 'COMPLETE:INCOMPLETE';
146: RETURN;
147: END IF;
148: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
149: resultout := 'COMPLETE:INCOMPLETE';
150: OE_STANDARD_WF.Save_Messages;
151: OE_STANDARD_WF.Clear_Msg_Context;
152: RETURN;
153: ELSE
154: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
147: END IF;
148: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
149: resultout := 'COMPLETE:INCOMPLETE';
150: OE_STANDARD_WF.Save_Messages;
151: OE_STANDARD_WF.Clear_Msg_Context;
152: RETURN;
153: ELSE
154: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
155: END IF;
192: -- in the case of an exception.
193: wf_core.context('OE_EXPORT_COMPLIANCE_WF', 'ECS_Request',
194: itemtype, itemkey, to_char(actid), funcmode);
195: -- start data fix project
196: OE_STANDARD_WF.Add_Error_Activity_Msg(p_actid => actid,
197: p_itemtype => itemtype,
198: p_itemkey => itemkey);
199: OE_STANDARD_WF.Save_Messages;
200: OE_STANDARD_WF.Clear_Msg_Context;
195: -- start data fix project
196: OE_STANDARD_WF.Add_Error_Activity_Msg(p_actid => actid,
197: p_itemtype => itemtype,
198: p_itemkey => itemkey);
199: OE_STANDARD_WF.Save_Messages;
200: OE_STANDARD_WF.Clear_Msg_Context;
201: -- end data fix project
202: raise;
203: END ECS_Request;
196: OE_STANDARD_WF.Add_Error_Activity_Msg(p_actid => actid,
197: p_itemtype => itemtype,
198: p_itemkey => itemkey);
199: OE_STANDARD_WF.Save_Messages;
200: OE_STANDARD_WF.Clear_Msg_Context;
201: -- end data fix project
202: raise;
203: END ECS_Request;
204:
214: 1. Called from the workflow activity UPDATE_SCREENING_RESULTS.
215: RELEASE LEVEL :
216: 12.1.2 and higher.
217: PARAMETERS :
218: standard WF activity parameters
219: */
220:
221: PROCEDURE Update_Screening_Results (
222: itemtype IN VARCHAR2,
463: );
464:
465:
466: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
467: OE_STANDARD_WF.Save_Messages;
468: OE_STANDARD_WF.Clear_Msg_Context;
469: APP_EXCEPTION.Raise_Exception;
470: END IF;
471:
464:
465:
466: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
467: OE_STANDARD_WF.Save_Messages;
468: OE_STANDARD_WF.Clear_Msg_Context;
469: APP_EXCEPTION.Raise_Exception;
470: END IF;
471:
472: resultout := 'COMPLETE:OVERRIDE';
469: APP_EXCEPTION.Raise_Exception;
470: END IF;
471:
472: resultout := 'COMPLETE:OVERRIDE';
473: OE_STANDARD_WF.Save_Messages;
474: OE_STANDARD_WF.Clear_Msg_Context;
475:
476: RETURN;
477: END IF;
470: END IF;
471:
472: resultout := 'COMPLETE:OVERRIDE';
473: OE_STANDARD_WF.Save_Messages;
474: OE_STANDARD_WF.Clear_Msg_Context;
475:
476: RETURN;
477: END IF;
478:
607: );
608:
609: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
610: resultout := 'COMPLETE:INCOMPLETE';
611: OE_STANDARD_WF.Save_Messages;
612: OE_STANDARD_WF.Clear_Msg_Context;
613: APP_EXCEPTION.Raise_Exception;
614: END IF;
615:
608:
609: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
610: resultout := 'COMPLETE:INCOMPLETE';
611: OE_STANDARD_WF.Save_Messages;
612: OE_STANDARD_WF.Clear_Msg_Context;
613: APP_EXCEPTION.Raise_Exception;
614: END IF;
615:
616: resultout := 'COMPLETE:SCREENING_ERROR';
613: APP_EXCEPTION.Raise_Exception;
614: END IF;
615:
616: resultout := 'COMPLETE:SCREENING_ERROR';
617: OE_STANDARD_WF.Save_Messages;
618: OE_STANDARD_WF.Clear_Msg_Context;
619:
620: ELSIF l_gen_hold_flag = 'Y' AND
621: OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
614: END IF;
615:
616: resultout := 'COMPLETE:SCREENING_ERROR';
617: OE_STANDARD_WF.Save_Messages;
618: OE_STANDARD_WF.Clear_Msg_Context;
619:
620: ELSIF l_gen_hold_flag = 'Y' AND
621: OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
622:
657: );
658:
659: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
660: resultout := 'COMPLETE:INCOMPLETE';
661: OE_STANDARD_WF.Save_Messages;
662: OE_STANDARD_WF.Clear_Msg_Context;
663: APP_EXCEPTION.Raise_Exception;
664: END IF;
665:
658:
659: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
660: resultout := 'COMPLETE:INCOMPLETE';
661: OE_STANDARD_WF.Save_Messages;
662: OE_STANDARD_WF.Clear_Msg_Context;
663: APP_EXCEPTION.Raise_Exception;
664: END IF;
665:
666: resultout := 'COMPLETE:HOLD_APPLIED';
663: APP_EXCEPTION.Raise_Exception;
664: END IF;
665:
666: resultout := 'COMPLETE:HOLD_APPLIED';
667: OE_STANDARD_WF.Save_Messages;
668: OE_STANDARD_WF.Clear_Msg_Context;
669:
670: ELSIF l_hold_applied = 'Y' THEN
671:
664: END IF;
665:
666: resultout := 'COMPLETE:HOLD_APPLIED';
667: OE_STANDARD_WF.Save_Messages;
668: OE_STANDARD_WF.Clear_Msg_Context;
669:
670: ELSIF l_hold_applied = 'Y' THEN
671:
672: -- Check whether Denied party hold needs to be applied
706: );
707:
708: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
709: resultout := 'COMPLETE:INCOMPLETE';
710: OE_STANDARD_WF.Save_Messages;
711: OE_STANDARD_WF.Clear_Msg_Context;
712: APP_EXCEPTION.Raise_Exception;
713: END IF;
714:
707:
708: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
709: resultout := 'COMPLETE:INCOMPLETE';
710: OE_STANDARD_WF.Save_Messages;
711: OE_STANDARD_WF.Clear_Msg_Context;
712: APP_EXCEPTION.Raise_Exception;
713: END IF;
714:
715: resultout := 'COMPLETE:HOLD_APPLIED';
712: APP_EXCEPTION.Raise_Exception;
713: END IF;
714:
715: resultout := 'COMPLETE:HOLD_APPLIED';
716: OE_STANDARD_WF.Save_Messages;
717: OE_STANDARD_WF.Clear_Msg_Context;
718:
719: ELSIF l_activity_complete = 'Y' THEN
720:
713: END IF;
714:
715: resultout := 'COMPLETE:HOLD_APPLIED';
716: OE_STANDARD_WF.Save_Messages;
717: OE_STANDARD_WF.Clear_Msg_Context;
718:
719: ELSIF l_activity_complete = 'Y' THEN
720:
721: OE_ORDER_WF_UTIL.Update_Flow_Status_Code
725: );
726:
727: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
728: resultout := 'COMPLETE:INCOMPLETE';
729: OE_STANDARD_WF.Save_Messages;
730: OE_STANDARD_WF.Clear_Msg_Context;
731: APP_EXCEPTION.Raise_Exception;
732: END IF;
733:
726:
727: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
728: resultout := 'COMPLETE:INCOMPLETE';
729: OE_STANDARD_WF.Save_Messages;
730: OE_STANDARD_WF.Clear_Msg_Context;
731: APP_EXCEPTION.Raise_Exception;
732: END IF;
733:
734: resultout := 'COMPLETE:COMPLETE';
731: APP_EXCEPTION.Raise_Exception;
732: END IF;
733:
734: resultout := 'COMPLETE:COMPLETE';
735: OE_STANDARD_WF.Save_Messages;
736: OE_STANDARD_WF.Clear_Msg_Context;
737:
738: END IF;
739:
732: END IF;
733:
734: resultout := 'COMPLETE:COMPLETE';
735: OE_STANDARD_WF.Save_Messages;
736: OE_STANDARD_WF.Clear_Msg_Context;
737:
738: END IF;
739:
740:
780: -- in the case of an exception.
781: wf_core.context('OE_EXPORT_COMPLIANCE_WF', 'Update_Screening_Results',
782: itemtype, itemkey, to_char(actid), funcmode);
783: -- start data fix project
784: OE_STANDARD_WF.Add_Error_Activity_Msg(p_actid => actid,
785: p_itemtype => itemtype,
786: p_itemkey => itemkey);
787: OE_STANDARD_WF.Save_Messages;
788: OE_STANDARD_WF.Clear_Msg_Context;
783: -- start data fix project
784: OE_STANDARD_WF.Add_Error_Activity_Msg(p_actid => actid,
785: p_itemtype => itemtype,
786: p_itemkey => itemkey);
787: OE_STANDARD_WF.Save_Messages;
788: OE_STANDARD_WF.Clear_Msg_Context;
789: -- end data fix project
790:
791: ROLLBACK TO UPDATE_API;
784: OE_STANDARD_WF.Add_Error_Activity_Msg(p_actid => actid,
785: p_itemtype => itemtype,
786: p_itemkey => itemkey);
787: OE_STANDARD_WF.Save_Messages;
788: OE_STANDARD_WF.Clear_Msg_Context;
789: -- end data fix project
790:
791: ROLLBACK TO UPDATE_API;
792: