[Home] [Help]
1: PACKAGE BODY OE_DEALS_UTIL as
2: /* $Header: OEXUDLSB.pls 120.10.12010000.2 2008/10/30 14:03:30 sgoli ship $ */
3:
4: FUNCTION get_notified_activity(p_item_key varchar2 , p_item_type varchar2)
5: RETURN varchar2 IS
400: return;
401: END IF;
402: EXCEPTION
403: when others then
404: wf_core.context('OE_DEALS_UTIL', 'COMPLIANCE_CHECK',
405: itemtype, itemkey, to_char(actid), funcmode);
406: OE_STANDARD_WF.Add_Error_Activity_Msg(p_actid => actid,
407: p_itemtype => itemtype,
408: p_itemkey => itemkey);
497: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
498:
499: BEGIN
500: IF l_debug_level > 0 THEN
501: oe_debug_pub.add( 'ENTER OE_DEALS_UTIL.COMPLETE_COMPLIANCE_ELIGIBLE' , 1 ) ;
502: END IF;
503: x_return_status := FND_API.G_RET_STS_SUCCESS;
504: -- Initialize message list.
505: IF FND_API.to_Boolean(p_init_msg_list) THEN
602:
603: OE_MSG_PUB.Reset_Msg_Context(p_entity_code => 'HEADER');
604:
605: IF l_debug_level > 0 THEN
606: oe_debug_pub.add( 'EXIT OE_DEALS_UTIL.COMPLETE_Compliance_eligible' , 1 ) ;
607: END IF;
608:
609: EXCEPTION
610: WHEN FND_API.G_EXC_ERROR THEN
608:
609: EXCEPTION
610: WHEN FND_API.G_EXC_ERROR THEN
611: IF l_debug_level > 0 THEN
612: oe_debug_pub.add( 'EXC ERROR OE_DEALS_UTIL.COMPLETE_Compliance_eligible' , 1 ) ;
613: END IF;
614: x_return_status := FND_API.G_RET_STS_ERROR;
615: IF (Compliance_eligible%ISOPEN) THEN
616: CLOSE Compliance_eligible;
625: OE_MSG_PUB.Reset_Msg_Context(p_entity_code => 'HEADER');
626:
627: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
628: IF l_debug_level > 0 THEN
629: oe_debug_pub.add( 'EXC UNEXPECTED ERROR OE_DEALS_UTIL.COMPLETE_Compliance_eligible' , 1 ) ;
630: END IF;
631: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
632: IF (Compliance_eligible%ISOPEN) THEN
633: CLOSE Compliance_eligible;
642: OE_MSG_PUB.Reset_Msg_Context(p_entity_code => 'HEADER');
643:
644: WHEN OTHERS THEN
645: IF l_debug_level > 0 THEN
646: oe_debug_pub.add( 'OTHER ERROR OE_DEALS_UTIL.COMPLETE_Compliance_eligible' , 1 ) ;
647: END IF;
648: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
649: IF (Compliance_eligible%ISOPEN) THEN
650: CLOSE Compliance_eligible;
654: END IF;
655: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
656: THEN
657: OE_MSG_PUB.Add_Exc_Msg
658: ( 'OE_DEALS_UTIL'
659: , 'Complete_Compliance_Eligible'
660: );
661: END IF;
662: OE_MSG_PUB.Count_And_Get
743:
744: --when deal is submitted take WF to route 2, change status to Pending Pricing Approval
745: IF (event = 'SUBMITTED') THEN
746:
747: IF OE_DEALS_UTIL.Validate_Config(p_header_id =>l_header_id) then
748:
749: OE_DEALS_UTIL.Complete_Compliance_Eligible
750: ( p_init_msg_list => l_init_msg_list
751: , p_header_id => l_header_id
745: IF (event = 'SUBMITTED') THEN
746:
747: IF OE_DEALS_UTIL.Validate_Config(p_header_id =>l_header_id) then
748:
749: OE_DEALS_UTIL.Complete_Compliance_Eligible
750: ( p_init_msg_list => l_init_msg_list
751: , p_header_id => l_header_id
752: , p_accept => 'N'
753: , p_item_type => l_item_type
779: --when deal is Accepted, change status to Pricing Approved, update order with deal,
780: -- Progress WF, there can be 2 cases--direct accept --Pricing eligible->Pricing Approved
781: --Submit n Approve n accept --Submit Deal WB->Pricing Approved
782: IF (event = 'ACCEPTED') THEN
783: IF OE_DEALS_UTIL.Validate_Config(p_header_id =>l_header_id) then
784:
785: OE_DEALS_UTIL.Update_Order_with_Deal
786: ( p_header_id => l_header_id
787: , p_item_type => l_item_type
781: --Submit n Approve n accept --Submit Deal WB->Pricing Approved
782: IF (event = 'ACCEPTED') THEN
783: IF OE_DEALS_UTIL.Validate_Config(p_header_id =>l_header_id) then
784:
785: OE_DEALS_UTIL.Update_Order_with_Deal
786: ( p_header_id => l_header_id
787: , p_item_type => l_item_type
788: , x_return_status => x_return_status
789: , x_msg_count => l_msg_count
1127:
1128: BEGIN
1129:
1130: IF l_debug_level > 0 THEN
1131: oe_debug_pub.add( 'ENTER OE_DEALS_UTIL.get_Deal' , 1 ) ;
1132: END IF;
1133: x_deal_id := NULL;
1134: x_deal_status := NULL;
1135:
1160: OUT x_deal_id,
1161: OUT x_deal_status;
1162:
1163: IF l_debug_level > 0 THEN
1164: oe_debug_pub.add( 'Exit OE_DEALS_UTIL.get_Deal QUERY-' || l_dynamicSqlString, 1 ) ;
1165: oe_debug_pub.add( 'Exit OE_DEALS_UTIL.get_Deal' || x_deal_id || x_deal_status, 1 ) ;
1166: END IF;
1167: EXCEPTION
1168: WHEN OTHERS THEN
1161: OUT x_deal_status;
1162:
1163: IF l_debug_level > 0 THEN
1164: oe_debug_pub.add( 'Exit OE_DEALS_UTIL.get_Deal QUERY-' || l_dynamicSqlString, 1 ) ;
1165: oe_debug_pub.add( 'Exit OE_DEALS_UTIL.get_Deal' || x_deal_id || x_deal_status, 1 ) ;
1166: END IF;
1167: EXCEPTION
1168: WHEN OTHERS THEN
1169: x_deal_id := NULL;
1203:
1204: BEGIN
1205:
1206: IF l_debug_level > 0 THEN
1207: oe_debug_pub.add( 'ENTER OE_DEALS_UTIL.Update_Order_with_Deal' , 1 ) ;
1208: END IF;
1209:
1210: SELECT order_source_id, orig_sys_document_ref, change_sequence, source_document_type_id, source_document_id
1211: INTO l_order_source_id, l_orig_sys_document_ref, l_change_sequence, l_source_document_type_id, l_source_document_id
1322: WHEN OTHERS THEN
1323: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1324: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1325: OE_MSG_PUB.Add_Exc_Msg
1326: ( 'OE_DEALS_UTIL'
1327: , 'Update_Order_with_Deal'
1328: );
1329: END IF;
1330: OE_MSG_PUB.Count_And_Get
1333: );
1334: OE_MSG_PUB.Reset_Msg_Context(p_entity_code => 'HEADER');
1335: END Update_Order_with_Deal;
1336:
1337: END OE_DEALS_UTIL;