4: -- This procedure sets the global g_upgrade_mode to TRUE
5: Procedure UPGRADE_MODE_ON
6: IS
7: --
8: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
9: --
10: Begin
11: OE_STANDARD_WF.G_UPGRADE_MODE := TRUE;
12: End UPGRADE_MODE_ON;
14: -- This procedure sets the global g_save_messages to TRUE
15: Procedure SAVE_MESSAGES_ON
16: IS
17: --
18: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
19: --
20: Begin
21: OE_STANDARD_WF.G_SAVE_MESSAGES := TRUE;
22: End SAVE_MESSAGES_ON;
24: -- This procedure sets the global g_save_messages to FALSE
25: Procedure SAVE_MESSAGES_OFF
26: IS
27: --
28: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
29: --
30: Begin
31: OE_STANDARD_WF.G_SAVE_MESSAGES := FALSE;
32: End SAVE_MESSAGES_OFF;
34: -- This procedure sets the global G_RESET_APPS_CONTEXT to TRUE
35: Procedure RESET_APPS_CONTEXT_ON
36: IS
37: --
38: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
39: --
40: Begin
41: OE_STANDARD_WF.G_RESET_APPS_CONTEXT := TRUE;
42: End RESET_APPS_CONTEXT_ON;
44: -- This procedure sets the global G_RESET_APPS_CONTEXT to FALSE
45: Procedure RESET_APPS_CONTEXT_OFF
46: IS
47: --
48: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
49: --
50: Begin
51: OE_STANDARD_WF.G_RESET_APPS_CONTEXT := FALSE;
52: End RESET_APPS_CONTEXT_OFF;
55: -- context for messages.
56: PROCEDURE SET_MSG_CONTEXT(P_PROCESS_ACTIVITY IN NUMBER DEFAULT NULL)
57: IS
58: --
59: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
60: --
61: BEGIN
62: OE_MSG_PUB.Set_Process_Activity(p_process_activity);
63: END;
65: -- This procedures clears the workflow context from the context area.
66: PROCEDURE CLEAR_MSG_CONTEXT
67: IS
68: --
69: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
70: --
71: BEGIN
72: OE_MSG_PUB.Set_Process_Activity(NULL);
73: END;
76: p_instance_id IN NUMBER DEFAULT NULL
77: )
78: is
79: --
80: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
81: --
82: begin
83: IF l_debug_level > 0 THEN
84: oe_debug_pub.add('In WF save messages', 5);
80: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
81: --
82: begin
83: IF l_debug_level > 0 THEN
84: oe_debug_pub.add('In WF save messages', 5);
85: END IF;
86:
87: -- we will save the message regardless of the global
88: -- since the save_api_messages will have the intelligence
114: resultout in out nocopy varchar2 /* file.sql.39 change */
115: )
116: is
117: --
118: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
119: --
120: begin
121: -- start data fix project
122: OE_STANDARD_WF.Set_Msg_Context(actid);
167: l_current_org_id NUMBER;
168: l_client_org_id NUMBER;
169:
170: --
171: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
172: --
173: BEGIN
174:
175: -- p_result := FND_API.G_MISS_CHAR;
177: -- Workflow engine calls the SET_CTX to set the context for the
178: -- activity before the execution.
179: --Bug 6884804
180: IF l_debug_level > 0 THEN
181: oe_debug_pub.add( 'THE WORKFLOW FUNCTION MODE IS: FUNCMODE='||P_FUNCMODE
182: ||' ITEMTYPE = '||P_ITEMTYPE||' ITEMKEY = '||P_ITEMKEY,1);
183: END IF;
184: --End Bug 6884804
185:
185:
186:
187: l_header_id := to_number(p_itemkey);
188: IF l_debug_level > 0 THEN
189: oe_debug_pub.add( 'HEADER ID IS ' || L_HEADER_ID ) ;
190: END IF;
191:
192: -- Currently this mode is not being used
193: -- we are using the OE_ORDER_WF_UTIL pkg functions
213: INTO l_org_id
214: FROM oe_order_headers_all
215: WHERE header_id = to_number (p_itemkey);
216: IF l_debug_level > 0 THEN
217: oe_debug_pub.add('ORG ID IS ' || l_org_id ) ;
218: END IF;
219:
220: MO_GLOBAL.set_policy_context ('S', l_org_id);
221:
263: END IF; -- End if TEST_CTX
264:
265: --Bug 6884804
266: IF l_debug_level > 0 THEN
267: oe_debug_pub.add( ' Exiting OEOH_SELECTOR , RESULT = '||P_RESULT
268: ||' ITEMTYPE = '||P_ITEMTYPE||' ITEMKEY = '||P_ITEMKEY,1);
269: END IF;
270: --End Bug 6884804
271: EXCEPTION
298: l_current_org_id NUMBER;
299: l_client_org_id NUMBER;
300:
301: --
302: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
303: --
304: BEGIN
305:
306: -- Currently this mode is not being used
309: -- and passing that in the createprocess call within
310: -- Process Order.
311: --Bug 6884804
312: IF l_debug_level > 0 THEN
313: oe_debug_pub.add( 'IN OEOL_SELECTOR , FUNCMODE:' || P_FUNCMODE || ' ' || P_ITEMTYPE || ' ' || P_ITEMKEY , 1 ) ;
314: END IF;
315: --End Bug 6884804
316: IF G_RESET_APPS_CONTEXT THEN
317: IF l_debug_level > 0 THEN
314: END IF;
315: --End Bug 6884804
316: IF G_RESET_APPS_CONTEXT THEN
317: IF l_debug_level > 0 THEN
318: oe_debug_pub.add( 'G_RESET_APPS_CONTEXT IS TRUE' ) ;
319: END IF;
320: ELSE
321: IF l_debug_level > 0 THEN
322: oe_debug_pub.add( 'G_RESET_APPS_CONTEXT IS FALSE' ) ;
318: oe_debug_pub.add( 'G_RESET_APPS_CONTEXT IS TRUE' ) ;
319: END IF;
320: ELSE
321: IF l_debug_level > 0 THEN
322: oe_debug_pub.add( 'G_RESET_APPS_CONTEXT IS FALSE' ) ;
323: END IF;
324: END IF;
325:
326: IF G_UPGRADE_MODE THEN
324: END IF;
325:
326: IF G_UPGRADE_MODE THEN
327: IF l_debug_level > 0 THEN
328: oe_debug_pub.add( 'G_UPGRADE_MODE IS TRUE' ) ;
329: END IF;
330: ELSE
331: IF l_debug_level > 0 THEN
332: oe_debug_pub.add( 'G_UPGRADE_MODE IS FALSE' ) ;
328: oe_debug_pub.add( 'G_UPGRADE_MODE IS TRUE' ) ;
329: END IF;
330: ELSE
331: IF l_debug_level > 0 THEN
332: oe_debug_pub.add( 'G_UPGRADE_MODE IS FALSE' ) ;
333: END IF;
334: END IF;
335:
336: if (p_funcmode = 'RUN') THEN
375: INTO l_org_id
376: FROM oe_order_lines_all
377: WHERE line_id = to_number (p_itemkey);
378: IF l_debug_level > 0 THEN
379: oe_debug_pub.add('ORG ID IS ' || l_org_id ) ;
380: END IF;
381:
382: IF NVL(MO_GLOBAL.get_current_org_id, -99) <> l_org_id
383: THEN
395: END IF; -- End mode
396:
397: --Bug 6884804
398: IF l_debug_level > 0 THEN
399: oe_debug_pub.add( ' Exiting OEOL_SELELECTOR , RESULT = '||P_RESULT
400: ||' ITEMTYPE = '||P_ITEMTYPE||' ITEMKEY = '||P_ITEMKEY,1);
401: END IF;
402: --End Bug 6884804
403: IF l_debug_level > 0 THEN
400: ||' ITEMTYPE = '||P_ITEMTYPE||' ITEMKEY = '||P_ITEMKEY,1);
401: END IF;
402: --End Bug 6884804
403: IF l_debug_level > 0 THEN
404: oe_debug_pub.add( 'P_RESULT:' || P_RESULT ) ;
405: END IF;
406:
407: EXCEPTION
408: WHEN OTHERS THEN NULL;
437: l_current_org_id NUMBER;
438: l_client_org_id NUMBER;
439: l_sales_document_type_code VARCHAR2(1);
440: --
441: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
442: --
443: BEGIN
444:
445: -- Workflow engine calls the SET_CTX to set the context for the
445: -- Workflow engine calls the SET_CTX to set the context for the
446: -- activity before the execution.
447: --Bug 6884804
448: IF l_debug_level > 0 THEN
449: oe_debug_pub.add( 'THE WORKFLOW FUNCTION MODE IS: FUNCMODE='||P_FUNCMODE
450: ||' ITEMTYPE = '||P_ITEMTYPE||' ITEMKEY = '||P_ITEMKEY,1);
451: END IF;
452: --End Bug 6884804
453:
452: --End Bug 6884804
453:
454: l_header_id := to_number(p_itemkey);
455: IF l_debug_level > 0 THEN
456: oe_debug_pub.add( 'OENH HEADER ID IS ' || L_HEADER_ID ) ;
457: END IF;
458:
459: IF (p_funcmode = 'RUN') THEN
460: p_result := 'COMPLETE';
481: FROM oe_blanket_headers_all
482: WHERE header_id = to_number (p_itemkey);
483: ELSE
484: -- Should never get here. In negotiation phase it should be O or B
485: oe_debug_pub.add('l_sales_document_type_code is NULL for:' || p_itemkey);
486: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
487: END IF;
488:
489: MO_GLOBAL.set_policy_context ('S', l_org_id);
525: FROM oe_blanket_headers_all
526: WHERE header_id = to_number (p_itemkey);
527: ELSE
528: -- Should never get here. In negotiation phase it should be O or B
529: oe_debug_pub.add('l_sales_document_type_code is NULL for:' || p_itemkey);
530: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
531: END IF;
532:
533: IF l_debug_level > 0 THEN
530: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
531: END IF;
532:
533: IF l_debug_level > 0 THEN
534: oe_debug_pub.add('ORG ID IS ' || l_org_id ) ;
535: END IF;
536:
537: IF NVL(MO_GLOBAL.get_current_org_id, -99) <> l_org_id
538: THEN
550: END IF; -- End if TEST_CTX
551:
552: --Bug 6884804
553: IF l_debug_level > 0 THEN
554: oe_debug_pub.add( ' Exiting OENH_SELECTOR , RESULT = '||P_RESULT
555: ||' ITEMTYPE = '||P_ITEMTYPE||' ITEMKEY = '||P_ITEMKEY,1);
556: END IF;
557: --End Bug 6884804
558: EXCEPTION
589: l_current_org_id NUMBER;
590: l_client_org_id NUMBER;
591:
592: --
593: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
594: --
595: BEGIN
596:
597: -- Workflow engine calls the SET_CTX to set the context for the
597: -- Workflow engine calls the SET_CTX to set the context for the
598: -- activity before the execution.
599: --Bug 6884804
600: IF l_debug_level > 0 THEN
601: oe_debug_pub.add( 'THE WORKFLOW FUNCTION MODE IS: FUNCMODE='||P_FUNCMODE
602: ||' ITEMTYPE = '||P_ITEMTYPE||' ITEMKEY = '||P_ITEMKEY,1);
603: END IF;
604: --End Bug 6884804
605:
604: --End Bug 6884804
605:
606: l_header_id := to_number(p_itemkey);
607: IF l_debug_level > 0 THEN
608: oe_debug_pub.add( 'OEBH HEADER ID IS ' || L_HEADER_ID ) ;
609: END IF;
610:
611: IF (p_funcmode = 'RUN') THEN
612: p_result := 'COMPLETE';
653: INTO l_org_id
654: FROM oe_blanket_headers_all
655: WHERE header_id = to_number (p_itemkey);
656: IF l_debug_level > 0 THEN
657: oe_debug_pub.add('ORG ID IS ' || l_org_id ) ;
658: END IF;
659:
660: IF NVL(MO_GLOBAL.get_current_org_id, -99) <> l_org_id
661: THEN
673: END IF; -- End if TEST_CTX
674:
675: --Bug 6884804
676: IF l_debug_level > 0 THEN
677: oe_debug_pub.add( ' Exiting OEBH_SELECTOR , RESULT = '||P_RESULT
678: ||' ITEMTYPE = '||P_ITEMTYPE||' ITEMKEY = '||P_ITEMKEY,1);
679: END IF;
680: --End Bug 6884804
681: EXCEPTION
700: )
701: IS
702: l_source_type VARCHAR2(30);
703: --
704: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
705: --
706: BEGIN
707: -- start data fix project
708: OE_STANDARD_WF.Set_Msg_Context(p_actid);
753: )
754: IS
755: l_category_code VARCHAR2(30);
756: --
757: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
758: --
759: BEGIN
760: -- start data fix project
761: OE_STANDARD_WF.Set_Msg_Context(p_actid);
799: l_data VARCHAR2(500);
800: l_msg_index_out NUMBER;
801:
802: --
803: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
804: --
805: BEGIN
806:
807: OE_MSG_PUB.GET( p_msg_index => OE_MSG_PUB.G_LAST
872: l_current_org_id NUMBER;
873: l_client_org_id NUMBER;
874: l_sales_document_type_code VARCHAR2 (1);
875: --
876: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
877: l_parent_type VARCHAR2 (240);
878: --
879: BEGIN
880: -- Workflow engine calls the SET_CTX to set the context for the
881: -- activity before the execution.
882: --Bug 6884804
883: IF l_debug_level > 0
884: THEN
885: oe_debug_pub.ADD ( 'THE WORKFLOW FUNCTION MODE IS: FUNCMODE='
886: || p_funcmode
887: || ' ITEMTYPE = '
888: || p_itemtype
889: || ' ITEMKEY = '
901: WHERE item_type = p_itemtype AND item_key = p_itemkey;
902:
903: IF l_debug_level > 0
904: THEN
905: oe_debug_pub.ADD ('parent_item_type:' || l_parent_type);
906: oe_debug_pub.ADD ('parent_item_key:' || l_header_id);
907: END IF;
908: ELSIF p_itemtype IN ('OEOH', 'OENH')
909: THEN
902:
903: IF l_debug_level > 0
904: THEN
905: oe_debug_pub.ADD ('parent_item_type:' || l_parent_type);
906: oe_debug_pub.ADD ('parent_item_key:' || l_header_id);
907: END IF;
908: ELSIF p_itemtype IN ('OEOH', 'OENH')
909: THEN
910: l_header_id := TO_NUMBER (p_itemkey);
911: END IF;
912:
913: IF l_debug_level > 0
914: THEN
915: oe_debug_pub.ADD ('HEADER ID IS ' || l_header_id);
916: END IF;
917:
918: IF (p_funcmode = 'RUN')
919: THEN
948: ELSE
949: -- Should never get here. In negotiation phase it should be O or B
950: IF l_debug_level > 0
951: THEN
952: oe_debug_pub.ADD
953: ( 'l_sales_document_type_code is NULL for:'
954: || NVL (l_parent_type, p_itemtype)
955: );
956: END IF;
974: WHERE header_id = l_header_id;
975:
976: IF l_debug_level > 0
977: THEN
978: oe_debug_pub.ADD ('l_org_id:' || l_org_id);
979: END IF;
980:
981: mo_global.set_policy_context ('S', l_org_id);
982: END IF;
1020: ELSE
1021: -- Should never get here. In negotiation phase it should be O or B
1022: IF l_debug_level > 0
1023: THEN
1024: oe_debug_pub.ADD
1025: ( 'l_sales_document_type_code is NULL for:'
1026: || p_itemkey
1027: );
1028: END IF;
1031: END IF;
1032:
1033: IF l_debug_level > 0
1034: THEN
1035: oe_debug_pub.ADD ('ORG ID IS ' || l_org_id);
1036: oe_debug_pub.ADD ( 'mo_global.get_current_org_id is:'
1037: || mo_global.get_current_org_id
1038: );
1039: END IF;
1032:
1033: IF l_debug_level > 0
1034: THEN
1035: oe_debug_pub.ADD ('ORG ID IS ' || l_org_id);
1036: oe_debug_pub.ADD ( 'mo_global.get_current_org_id is:'
1037: || mo_global.get_current_org_id
1038: );
1039: END IF;
1040:
1068: WHERE header_id = l_header_id;
1069:
1070: IF l_debug_level > 0
1071: THEN
1072: oe_debug_pub.ADD ('l_org_id is:' || l_org_id);
1073: oe_debug_pub.ADD ( 'mo_global.get_current_org_id is:'
1074: || mo_global.get_current_org_id
1075: );
1076: END IF;
1069:
1070: IF l_debug_level > 0
1071: THEN
1072: oe_debug_pub.ADD ('l_org_id is:' || l_org_id);
1073: oe_debug_pub.ADD ( 'mo_global.get_current_org_id is:'
1074: || mo_global.get_current_org_id
1075: );
1076: END IF;
1077:
1090:
1091: --Bug 6884804
1092: IF l_debug_level > 0
1093: THEN
1094: oe_debug_pub.ADD ( ' Exiting OEAME_SELECTOR , RESULT = '
1095: || p_result
1096: || ' ITEMTYPE = '
1097: || p_itemtype
1098: || ' ITEMKEY = '