[Home] [Help]
96: and wf_assign.wf_item_type = OE_GLOBALS.G_WFI_BKT
97: and wf_assign.line_type_id IS NULL;
98:
99: --
100: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
101: --
102: BEGIN
103:
104: IF l_debug_level > 0 THEN
101: --
102: BEGIN
103:
104: IF l_debug_level > 0 THEN
105: oe_debug_pub.add( 'IN GET_PROCESSNAME: ' || p_itemtype || '/' || p_itemkey || '/' || p_wfasgn_item_type) ;
106: END IF;
107:
108: IF (p_itemtype = OE_GLOBALS.G_WFI_HDR) THEN
109:
113:
114: CLOSE find_HdrProcessname;
115: ELSIF (p_itemtype = OE_GLOBALS.G_WFI_LIN) THEN
116: IF l_debug_level > 0 THEN
117: oe_debug_pub.add( 'header_id: ' || p_line_rec.header_id || ' line_id: ' || p_line_rec.line_id || ' line_type_id: ' || p_line_rec.line_type_id);
118: END IF;
119: OPEN find_LineProcessname;
120: FETCH find_LineProcessname
121: INTO l_process_name;
152: RAISE NO_DATA_FOUND;
153: END IF;
154:
155: IF l_debug_level > 0 THEN
156: oe_debug_pub.add( 'PROCESS NAME IS '||L_PROCESS_NAME ) ;
157: END IF;
158:
159: RETURN l_process_name;
160: IF l_debug_level > 0 THEN
157: END IF;
158:
159: RETURN l_process_name;
160: IF l_debug_level > 0 THEN
161: oe_debug_pub.add( 'EXITING GET_PROCESSNAME' ) ;
162: END IF;
163:
164: EXCEPTION
165:
193: l_order_category_code VARCHAR2(30);
194: l_order_type_txt VARCHAR2(2000);
195: l_header_txt VARCHAR2(2000);
196: --
197: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
198: --
199: BEGIN
200: document_type := display_type;
201: BEGIN
270: l_option_number NUMBER;
271: l_service_number NUMBER;
272:
273: --
274: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
275: --
276: BEGIN
277: document_type := display_type;
278: BEGIN
344: PROCEDURE Set_Header_User_Key(p_header_rec IN OE_Order_PUB.Header_Rec_Type)
345: IS
346: sales_order VARCHAR2(240);
347: --
348: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
349: --
350: BEGIN
351: if p_header_rec.order_category_code = 'RETURN' then
352: fnd_message.set_name('ONT', 'OE_WF_RETURN_ORDER');
371: PROCEDURE Set_Line_User_Key(p_line_rec IN OE_Order_PUB.Line_Rec_Type)
372: IS
373: l_header_id NUMBER;
374: --
375: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
376: --
377: BEGIN
378:
379: l_header_id := p_line_rec.header_id;
419: , p_itemkey in varchar2
420: )
421: IS
422: --
423: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
424: --
425: BEGIN
426:
427: IF l_debug_level > 0 THEN
424: --
425: BEGIN
426:
427: IF l_debug_level > 0 THEN
428: oe_debug_pub.add( 'IN START_FLOW' ) ;
429: END IF;
430:
431: WF_ENGINE.StartProcess(p_itemtype, p_itemkey);
432:
430:
431: WF_ENGINE.StartProcess(p_itemtype, p_itemkey);
432:
433: IF l_debug_level > 0 THEN
434: oe_debug_pub.add( 'EXITING START_FLOW' ) ;
435: END IF;
436: EXCEPTION
437: WHEN OTHERS THEN
438: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
450: (p_itemkey IN Varchar2
451: )
452: IS
453: --
454: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
455: --
456: BEGIN
457:
458: IF l_debug_level > 0 THEN
455: --
456: BEGIN
457:
458: IF l_debug_level > 0 THEN
459: oe_debug_pub.add( 'IN START_LINEFORK' ) ;
460: END IF;
461:
462: WF_ENGINE.StartForkProcess('OEOL', p_itemkey);
463:
462: WF_ENGINE.StartForkProcess('OEOL', p_itemkey);
463:
464: -- Refresh old notifications here if needed.
465: IF l_debug_level > 0 THEN
466: oe_debug_pub.add( 'EXITING START_LINEFORK' ) ;
467: END IF;
468:
469:
470: EXCEPTION
494: )
495: IS
496: --
497: l_count NUMBER;
498: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
499: --
500: BEGIN
501:
502: IF l_debug_level > 0 THEN
499: --
500: BEGIN
501:
502: IF l_debug_level > 0 THEN
503: oe_debug_pub.add( 'IN CREATESTART_HDRPROCESS' ) ;
504: END IF;
505:
506: Create_HdrWorkItem(p_header_rec);
507:
529:
530: /* Start_Flow(OE_GLOBALS.G_WFI_HDR, p_header_rec.header_id); */
531:
532: IF l_debug_level > 0 THEN
533: oe_debug_pub.add( 'EXITING CREATESTART_HDRPROCESS' ) ;
534: END IF;
535:
536: EXCEPTION
537: WHEN FND_API.G_EXC_ERROR THEN -- 2590433
565: l_validate_user NUMBER;
566: l_owner_role VARCHAR2(100);
567:
568: --
569: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
570: --
571: BEGIN
572:
573: IF l_debug_level > 0 THEN
570: --
571: BEGIN
572:
573: IF l_debug_level > 0 THEN
574: oe_debug_pub.add( 'IN CREATE_HDRWORKITEM' ) ;
575: END IF;
576:
577:
578: -- Get name of Header Process
576:
577:
578: -- Get name of Header Process
579: IF l_debug_level > 0 THEN
580: oe_debug_pub.add( 'GET HEADER PROCESS NAME' ) ;
581: END IF;
582: l_hdr_process_name := Get_ProcessName(p_itemtype => OE_GLOBALS.G_WFI_HDR, p_itemkey => p_header_rec.header_id);
583:
584: Set_Header_User_Key(p_header_rec);
597: WF_ENGINE.additemattr(OE_Globals.G_WFI_HDR,to_char(p_header_rec.header_id),
598: '#WAITFORDETAIL',null,0);
599:
600: IF l_debug_level > 0 THEN
601: oe_debug_pub.add( 'AFTER WF_ENGINE.CREATEPROCESS' ) ;
602: END IF;
603:
604: -- Set various Header Attributes
605: l_aname(1) := 'USER_ID';
650: , l_avaluetext
651: );
652:
653: IF l_debug_level > 0 THEN
654: oe_debug_pub.add( 'EXITING CREATE_HDRWORKITEM' ) ;
655: END IF;
656:
657: EXCEPTION
658: WHEN FND_API.G_EXC_ERROR THEN -- 2590433
678: IS
679: l_item_type varchar2(30);
680: l_index number;
681: --
682: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
683: --
684: BEGIN
685: -- If this is a Split Insert then we need to fork the flow
686: IF p_line_rec.split_from_line_id IS NOT NULL THEN
684: BEGIN
685: -- If this is a Split Insert then we need to fork the flow
686: IF p_line_rec.split_from_line_id IS NOT NULL THEN
687: IF l_debug_level > 0 THEN
688: oe_debug_pub.add( 'SPLIT FROM LINE ID IS NOT NULL' ) ;
689: END IF;
690: CreateStart_LineFork(p_Line_rec);
691: ELSE -- Regular Flow creation
692: -- Get Wf itme type
691: ELSE -- Regular Flow creation
692: -- Get Wf itme type
693: l_item_type := OE_Order_Wf_Util.get_wf_item_type(p_line_rec);
694: IF l_debug_level > 0 THEN
695: oe_debug_pub.add( 'IN CREATESTART_LINEPROCESS' ) ;
696: END IF;
697: Create_LineWorkItem(p_Line_rec, l_item_type);
698:
699: -- We do not start the flow when the record is written, rather
703:
704: -- Bug 3000619, references to G_START_LINE_FLOWS_TBL are changed.
705: IF (OE_GLOBALS.G_START_LINE_FLOWS_TBL.COUNT = 0) THEN
706: IF l_debug_level > 0 THEN
707: oe_debug_pub.add( 'G_START_LINE_FLOWS_TBL.COUNT = 0'|| p_Line_rec.ato_Line_id || '-'|| p_Line_rec.Line_id , 2) ;
708: END IF;
709: OE_GLOBALS.G_START_LINE_FLOWS_TBL(1).line_id := p_Line_rec.Line_id;
710: OE_GLOBALS.G_START_LINE_FLOWS_TBL(1).post_write_ato_line_id := p_Line_rec.ato_Line_id;
711: ELSE -- the table has entries
710: OE_GLOBALS.G_START_LINE_FLOWS_TBL(1).post_write_ato_line_id := p_Line_rec.ato_Line_id;
711: ELSE -- the table has entries
712: l_index := OE_GLOBALS.G_START_LINE_FLOWS_TBL.LAST;
713: IF l_debug_level > 0 THEN
714: oe_debug_pub.add( 'G_START_LINE_FLOWS_TBL.COUNT = ' || to_char(l_index) || p_Line_rec.ato_Line_id || '-'|| p_Line_rec.Line_id, 3 ) ;
715: END IF;
716: OE_GLOBALS.G_START_LINE_FLOWS_TBL(l_index + 1).line_id := p_Line_rec.Line_id;
717: OE_GLOBALS.G_START_LINE_FLOWS_TBL(l_index + 1).post_write_ato_line_id := p_Line_rec.ato_Line_id;
718: END IF;
717: OE_GLOBALS.G_START_LINE_FLOWS_TBL(l_index + 1).post_write_ato_line_id := p_Line_rec.ato_Line_id;
718: END IF;
719:
720: IF l_debug_level > 0 THEN
721: oe_debug_pub.add( 'EXITING CREATESTART_LINEPROCESS' ) ;
722: END IF;
723: END IF;
724:
725: EXCEPTION
741: ( p_Line_rec IN OE_Order_PUB.Line_Rec_Type
742: )
743: IS
744: --
745: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
746: --
747: BEGIN
748:
749: IF l_debug_level > 0 THEN
746: --
747: BEGIN
748:
749: IF l_debug_level > 0 THEN
750: oe_debug_pub.add( 'IN CREATESTART_LINEFORK' ) ;
751: END IF;
752:
753: Create_LineFork(p_Line_rec);
754:
754:
755: Start_LineFork(p_line_rec.line_id);
756:
757: IF l_debug_level > 0 THEN
758: oe_debug_pub.add( 'EXITING CREATESTART_LINEFORK' ) ;
759: END IF;
760:
761:
762: EXCEPTION
792:
793: line VARCHAR2(240);
794: l_owner_role VARCHAR2(100);
795: --
796: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
797: --
798: BEGIN
799:
800: IF l_debug_level > 0 THEN
797: --
798: BEGIN
799:
800: IF l_debug_level > 0 THEN
801: oe_debug_pub.add( 'IN CREATE_LINEWORKITEM' ) ;
802: END IF;
803: l_item_type := p_item_type;
804:
805: -- Get name of Line Process
803: l_item_type := p_item_type;
804:
805: -- Get name of Line Process
806: IF l_debug_level > 0 THEN
807: oe_debug_pub.add( 'GET LINE PROCESSNAME' ) ;
808: END IF;
809: l_line_process_name := Get_ProcessName(p_itemtype => OE_GLOBALS.G_WFI_LIN, p_itemkey => p_Line_rec.line_id, p_wfasgn_item_type => l_item_type, p_line_rec => p_line_rec);
810:
811: Set_Line_User_Key(p_line_rec);
823: l_owner_role);
824:
825:
826: IF l_debug_level > 0 THEN
827: oe_debug_pub.add( 'AFTER WF_ENGINE.CREATEPROCESS' ) ;
828: END IF;
829:
830:
831: -- Set various Line Attributes
861: to_char(p_Line_rec.header_id), '',
862: true);
863:
864: IF l_debug_level > 0 THEN
865: oe_debug_pub.add( 'EXITING CREATE_LINEWORKITEM' ) ;
866: END IF;
867:
868: EXCEPTION
869: WHEN FND_API.G_EXC_ERROR THEN -- 2590433
889: l_header_id NUMBER;
890: line VARCHAR2(240);
891:
892: --
893: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
894: --
895: BEGIN
896:
897: IF l_debug_level > 0 THEN
894: --
895: BEGIN
896:
897: IF l_debug_level > 0 THEN
898: oe_debug_pub.add( 'IN CREATE_LINEFORK' ) ;
899: END IF;
900:
901: Set_Line_User_Key(p_line_rec);
902: line := substrb(fnd_message.get, 1, 240);
910: , p_line_rec.line_id
911: , line);
912:
913: IF l_debug_level > 0 THEN
914: oe_debug_pub.add( 'EXITING CREATE_LINEFORK' ) ;
915: END IF;
916:
917: EXCEPTION
918: WHEN OTHERS THEN
937: ) RETURN VARCHAR2
938: IS
939: l_item_rec OE_ORDER_CACHE.item_rec_type;
940: --
941: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
942: --
943: BEGIN
944: l_item_rec :=
945: OE_Order_Cache.Load_Item (p_line_rec.inventory_item_id
945: OE_Order_Cache.Load_Item (p_line_rec.inventory_item_id
946: ,p_line_rec.ship_from_org_id);
947:
948: IF l_debug_level > 0 THEN
949: oe_debug_pub.add( 'ITEM_TYPE_CODE IS ' || P_LINE_REC.ITEM_TYPE_CODE ) ;
950: END IF;
951:
952: -- Code for Returns
953: IF p_line_rec.line_category_code = 'RETURN' THEN
1058: l_item_type varchar2(30);
1059: l_line_rec oe_order_pub.line_rec_type;
1060: l_header_id NUMBER;
1061: --
1062: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1063: --
1064: BEGIN
1065:
1066: IF l_debug_level > 0 THEN
1063: --
1064: BEGIN
1065:
1066: IF l_debug_level > 0 THEN
1067: oe_debug_pub.add( 'ENTERING START_ALL_FLOWS' ) ;
1068: END IF;
1069:
1070: -- This code should be invoked again, once it starts executing
1071: -- Starting flows can cause the creation of new lines, but we do not
1072: -- want the creation call to get in here again.
1073: IF (NOT OE_GLOBALS.G_FLOW_PROCESSING_STARTED) THEN
1074: OE_GLOBALS.G_FLOW_PROCESSING_STARTED := TRUE;
1075: IF l_debug_level > 0 THEN
1076: oe_debug_pub.add( 'FLOW PROCESSING STARTED' ) ;
1077: END IF;
1078:
1079: -- Issue Savepoint
1080: SAVEPOINT Start_All_Flows;
1091: from oe_order_headers_all
1092: where header_id = OE_GLOBALS.G_START_HEADER_FLOW;
1093:
1094: IF l_debug_level > 0 THEN
1095: oe_debug_pub.add( 'STARTING HEADER FLOW' ) ;
1096: END IF;
1097:
1098: -- Start flow and clear global
1099: Start_Flow(OE_GLOBALS.G_WFI_HDR, OE_GLOBALS.G_START_HEADER_FLOW);
1101:
1102: EXCEPTION
1103: WHEN NO_DATA_FOUND THEN
1104: IF l_debug_level > 0 THEN
1105: oe_debug_pub.add( 'HEADER '||OE_GLOBALS.G_START_HEADER_FLOW||' IS MISSING , BUT ID EXISTS IN GLOBAL TABLE' ) ;
1106: END IF;
1107: OE_GLOBALS.G_START_HEADER_FLOW := NULL;
1108: END;
1109:
1117: -- loop thru using first ... count. Starting a line flow can create included item
1118: -- lines (booking, scheduling activity).
1119:
1120: IF l_debug_level > 0 THEN
1121: oe_debug_pub.add( 'START LINE FLOWS' ) ;
1122: END IF;
1123:
1124: ctr := OE_GLOBALS.G_START_LINE_FLOWS_TBL.FIRST;
1125:
1125:
1126: WHILE (ctr is NOT NULL) LOOP
1127:
1128: IF l_debug_level > 0 THEN
1129: oe_debug_pub.add( 'INSIDE LOOP '||'LINE ID IS '||OE_GLOBALS.G_START_LINE_FLOWS_TBL ( CTR ).line_id ) ;
1130: END IF;
1131:
1132: BEGIN
1133:
1144: from oe_order_lines_all
1145: where line_id = OE_GLOBALS.G_START_LINE_FLOWS_TBL(ctr).line_id;
1146:
1147: IF l_debug_level > 0 THEN
1148: oe_debug_pub.add( 'STARTING LINE FLOW '||'LINE ID = ' ||OE_GLOBALS.G_START_LINE_FLOWS_TBL ( CTR ).line_id ) ;
1149: END IF;
1150:
1151: IF l_item_type_code = 'CLASS' AND
1152: l_ato_line_id is not null AND
1151: IF l_item_type_code = 'CLASS' AND
1152: l_ato_line_id is not null AND
1153: l_ato_line_id <> l_line_id THEN
1154: IF l_debug_level > 0 THEN
1155: oe_debug_pub.add('need to check wf assignment for ato under ato under pto, 3');
1156: END IF;
1157:
1158: IF OE_GLOBALS.G_START_LINE_FLOWS_TBL(CTR).post_write_ato_line_id
1159: <> l_ato_line_id THEN
1183:
1184: EXCEPTION
1185: WHEN NO_DATA_FOUND THEN
1186: IF l_debug_level > 0 THEN
1187: oe_debug_pub.add( 'LINE '||OE_GLOBALS.G_START_LINE_FLOWS_TBL ( CTR ).line_id ||' IS MISSING , BUT ID EXISTS IN GLOBAL TABLE' ) ;
1188: END IF;
1189: END;
1190:
1191:
1215: from oe_blanket_headers_all
1216: where header_id = OE_GLOBALS.G_START_NEGOTIATE_HEADER_FLOW;
1217: END IF;
1218: IF l_debug_level > 0 THEN
1219: oe_debug_pub.add( 'STARTING NEGOTIATE HEADER FLOW' ) ;
1220: END IF;
1221:
1222: -- Start flow and clear global
1223: Start_Flow(OE_GLOBALS.G_WFI_NGO, OE_GLOBALS.G_START_NEGOTIATE_HEADER_FLOW);
1225:
1226: EXCEPTION
1227: WHEN NO_DATA_FOUND THEN
1228: IF l_debug_level > 0 THEN
1229: oe_debug_pub.add( 'Negotiate Header (OENH): '||OE_GLOBALS.G_START_NEGOTIATE_HEADER_FLOW||' IS MISSING , BUT ID EXISTS IN GLOBAL' ) ;
1230: END IF;
1231: OE_GLOBALS.G_START_NEGOTIATE_HEADER_FLOW:= NULL;
1232: END;
1233: END IF;
1242: from oe_blanket_headers_all
1243: where header_id = OE_GLOBALS.G_START_BLANKET_HEADER_FLOW;
1244:
1245: IF l_debug_level > 0 THEN
1246: oe_debug_pub.add( 'STARTING BLANKET HEADER FLOW' ) ;
1247: END IF;
1248:
1249: -- Start flow and clear global
1250: Start_Flow(OE_GLOBALS.G_WFI_BKT, OE_GLOBALS.G_START_BLANKET_HEADER_FLOW);
1252:
1253: EXCEPTION
1254: WHEN NO_DATA_FOUND THEN
1255: IF l_debug_level > 0 THEN
1256: oe_debug_pub.add( 'Blanket Header (OEBH): '||OE_GLOBALS.G_START_BLANKET_HEADER_FLOW||' IS MISSING , BUT ID EXISTS IN GLOBAL' ) ;
1257: END IF;
1258: OE_GLOBALS.G_START_BLANKET_HEADER_FLOW := NULL;
1259: END;
1260: END IF;
1266: OE_GLOBALS.G_FLOW_PROCESSING_STARTED := FALSE;
1267: END IF;
1268:
1269: IF l_debug_level > 0 THEN
1270: oe_debug_pub.add( 'EXITING START_ALL_FLOWS' ) ;
1271: END IF;
1272:
1273: EXCEPTION
1274: WHEN OTHERS THEN
1287:
1288: Procedure Clear_FlowStart_Globals
1289: IS
1290: --
1291: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1292: --
1293: BEGIN
1294:
1295: IF l_debug_level > 0 THEN
1292: --
1293: BEGIN
1294:
1295: IF l_debug_level > 0 THEN
1296: oe_debug_pub.add( 'IN CLEAR_FLOWSTART_GLOBALS' ) ;
1297: END IF;
1298:
1299: OE_GLOBALS.G_START_HEADER_FLOW := NULL;
1300: OE_GLOBALS.G_START_NEGOTIATE_HEADER_FLOW:= NULL;
1315: l_result VARCHAR2(240);
1316: l_count NUMBER;
1317: l_transaction_phase_code VARCHAR2(30);
1318: --
1319: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1320: --
1321: BEGIN
1322: IF l_debug_level > 0 THEN
1323: oe_debug_pub.add( 'IN OE_ORDER_WF_UTIL.DELETE_ROW' ) ;
1319: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1320: --
1321: BEGIN
1322: IF l_debug_level > 0 THEN
1323: oe_debug_pub.add( 'IN OE_ORDER_WF_UTIL.DELETE_ROW' ) ;
1324: END IF;
1325:
1326: IF p_type = 'HEADER' THEN
1327: WF_ENGINE.ItemStatus(itemtype => OE_GLOBALS.G_WFI_HDR,
1367: WF_ENGINE.AbortProcess(itemtype => OE_GLOBALS.G_WFI_LIN,
1368: itemkey => p_id);
1369: END IF;
1370: IF l_debug_level > 0 THEN
1371: oe_debug_pub.add( 'PURGING WF ITEM' ) ;
1372: END IF;
1373: WF_PURGE.Items(itemtype => OE_GLOBALS.G_WFI_LIN,
1374: itemkey => p_id,
1375: force => TRUE,
1385: WF_ENGINE.AbortProcess(itemtype => OE_GLOBALS.G_WFI_NGO,
1386: itemkey => p_id);
1387: END IF;
1388: IF l_debug_level > 0 THEN
1389: oe_debug_pub.add( 'PURGING WF ITEM - Negotiate') ;
1390: END IF;
1391: WF_PURGE.Items(itemtype => OE_GLOBALS.G_WFI_NGO,
1392: itemkey => p_id,
1393: force => TRUE,
1401: WF_ENGINE.AbortProcess(itemtype => OE_GLOBALS.G_WFI_BKT,
1402: itemkey => p_id);
1403: END IF;
1404: IF l_debug_level > 0 THEN
1405: oe_debug_pub.add( 'PURGING WF ITEM - BLANKET') ;
1406: END IF;
1407: WF_PURGE.Items(itemtype => OE_GLOBALS.G_WFI_BKT,
1408: itemkey => p_id,
1409: force => TRUE,
1423: END IF;
1424:
1425: ELSE
1426: IF l_debug_level > 0 THEN
1427: oe_debug_pub.add( 'OE_ORDER_WF_UTIL: DELETE TYPE NOT IN HEADER,LINE,NEGOTIATE,BLANKET' ) ;
1428: END IF;
1429: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1430: THEN
1431: OE_MSG_PUB.Add_Exc_Msg
1435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1436: END IF;
1437: END IF;
1438: IF l_debug_level > 0 THEN
1439: oe_debug_pub.add( 'EXITING OE_ORDER_WF_UTIL.DELETE_ROW' ) ;
1440: END IF;
1441:
1442: END Delete_Row;
1443:
1471: l_msg_count NUMBER;
1472: l_msg_data VARCHAR2(2000);
1473: l_itemkey_sso number; -- GENESIS
1474: --
1475: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1476: --
1477: Cursor lines IS
1478: SELECT line_id, lock_control
1479: FROM OE_ORDER_LINES_ALL
1485:
1486:
1487: BEGIN
1488: IF l_debug_level > 0 THEN
1489: oe_debug_pub.add('ENTERING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
1490: oe_debug_pub.add('UFSC: GLOBAL RECURSION WITHOUT EXCEPTION: ' || OE_ORDER_UTIL.G_RECURSION_WITHOUT_EXCEPTION) ;
1491: oe_debug_pub.add('UFSC: GLOBAL CACHE BOOKED FLAG' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
1492: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
1493: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
1486:
1487: BEGIN
1488: IF l_debug_level > 0 THEN
1489: oe_debug_pub.add('ENTERING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
1490: oe_debug_pub.add('UFSC: GLOBAL RECURSION WITHOUT EXCEPTION: ' || OE_ORDER_UTIL.G_RECURSION_WITHOUT_EXCEPTION) ;
1491: oe_debug_pub.add('UFSC: GLOBAL CACHE BOOKED FLAG' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
1492: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
1493: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
1494: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
1487: BEGIN
1488: IF l_debug_level > 0 THEN
1489: oe_debug_pub.add('ENTERING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
1490: oe_debug_pub.add('UFSC: GLOBAL RECURSION WITHOUT EXCEPTION: ' || OE_ORDER_UTIL.G_RECURSION_WITHOUT_EXCEPTION) ;
1491: oe_debug_pub.add('UFSC: GLOBAL CACHE BOOKED FLAG' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
1492: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
1493: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
1494: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
1495: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
1488: IF l_debug_level > 0 THEN
1489: oe_debug_pub.add('ENTERING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
1490: oe_debug_pub.add('UFSC: GLOBAL RECURSION WITHOUT EXCEPTION: ' || OE_ORDER_UTIL.G_RECURSION_WITHOUT_EXCEPTION) ;
1491: oe_debug_pub.add('UFSC: GLOBAL CACHE BOOKED FLAG' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
1492: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
1493: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
1494: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
1495: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
1496: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
1489: oe_debug_pub.add('ENTERING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
1490: oe_debug_pub.add('UFSC: GLOBAL RECURSION WITHOUT EXCEPTION: ' || OE_ORDER_UTIL.G_RECURSION_WITHOUT_EXCEPTION) ;
1491: oe_debug_pub.add('UFSC: GLOBAL CACHE BOOKED FLAG' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
1492: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
1493: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
1494: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
1495: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
1496: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
1497: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
1490: oe_debug_pub.add('UFSC: GLOBAL RECURSION WITHOUT EXCEPTION: ' || OE_ORDER_UTIL.G_RECURSION_WITHOUT_EXCEPTION) ;
1491: oe_debug_pub.add('UFSC: GLOBAL CACHE BOOKED FLAG' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
1492: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
1493: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
1494: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
1495: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
1496: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
1497: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
1498: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
1491: oe_debug_pub.add('UFSC: GLOBAL CACHE BOOKED FLAG' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
1492: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
1493: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
1494: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
1495: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
1496: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
1497: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
1498: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
1499: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
1492: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
1493: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
1494: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
1495: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
1496: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
1497: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
1498: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
1499: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
1500: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
1493: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
1494: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
1495: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
1496: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
1497: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
1498: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
1499: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
1500: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
1501: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
1494: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
1495: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
1496: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
1497: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
1498: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
1499: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
1500: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
1501: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
1502: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
1495: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
1496: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
1497: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
1498: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
1499: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
1500: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
1501: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
1502: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
1503: oe_debug_pub.add('UFSC: COUNT OF NEW LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_LOT_SERIAL_TBL.COUNT ) ;
1496: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
1497: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
1498: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
1499: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
1500: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
1501: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
1502: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
1503: oe_debug_pub.add('UFSC: COUNT OF NEW LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_LOT_SERIAL_TBL.COUNT ) ;
1504: oe_debug_pub.add('UFSC: COUNT OF OLD LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_OLD_LOT_SERIAL_TBL.COUNT ) ;
1497: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
1498: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
1499: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
1500: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
1501: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
1502: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
1503: oe_debug_pub.add('UFSC: COUNT OF NEW LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_LOT_SERIAL_TBL.COUNT ) ;
1504: oe_debug_pub.add('UFSC: COUNT OF OLD LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_OLD_LOT_SERIAL_TBL.COUNT ) ;
1505: END IF;
1498: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
1499: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
1500: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
1501: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
1502: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
1503: oe_debug_pub.add('UFSC: COUNT OF NEW LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_LOT_SERIAL_TBL.COUNT ) ;
1504: oe_debug_pub.add('UFSC: COUNT OF OLD LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_OLD_LOT_SERIAL_TBL.COUNT ) ;
1505: END IF;
1506:
1499: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
1500: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
1501: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
1502: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
1503: oe_debug_pub.add('UFSC: COUNT OF NEW LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_LOT_SERIAL_TBL.COUNT ) ;
1504: oe_debug_pub.add('UFSC: COUNT OF OLD LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_OLD_LOT_SERIAL_TBL.COUNT ) ;
1505: END IF;
1506:
1507: SAVEPOINT UPDATE_FLOW_STATUS_CODE;
1500: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
1501: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
1502: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
1503: oe_debug_pub.add('UFSC: COUNT OF NEW LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_LOT_SERIAL_TBL.COUNT ) ;
1504: oe_debug_pub.add('UFSC: COUNT OF OLD LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_OLD_LOT_SERIAL_TBL.COUNT ) ;
1505: END IF;
1506:
1507: SAVEPOINT UPDATE_FLOW_STATUS_CODE;
1508:
1534: END IF;
1535:
1536: IF p_sales_document_type_code = 'O' THEN
1537: IF l_debug_level > 0 THEN
1538: oe_debug_pub.add('Update_Flow_Status_Code for Quote:' || p_flow_status_code, 5 ) ;
1539: END IF;
1540: OE_Header_Util.Lock_Row(p_header_id=>p_header_id
1541: , p_x_header_rec=>l_header_rec
1542: , x_return_status => l_return_status);
1603: x_index => l_index,
1604: x_return_status => l_return_status);
1605:
1606: IF l_debug_level > 0 THEN
1607: oe_debug_pub.add('UPDATE_GLOBAL RETURN STATUS FROM OE_WF_ORDER_UTIL.UPDATE HEADER FLOW STATUS CODE IS: ' || L_RETURN_STATUS ) ;
1608: oe_debug_pub.add( 'INDEX IS: ' || L_INDEX , 1 ) ;
1609: oe_debug_pub.add( 'HEADER FLOW STATUS IS: ' || P_FLOW_STATUS_CODE , 1 ) ;
1610: END IF;
1611:
1604: x_return_status => l_return_status);
1605:
1606: IF l_debug_level > 0 THEN
1607: oe_debug_pub.add('UPDATE_GLOBAL RETURN STATUS FROM OE_WF_ORDER_UTIL.UPDATE HEADER FLOW STATUS CODE IS: ' || L_RETURN_STATUS ) ;
1608: oe_debug_pub.add( 'INDEX IS: ' || L_INDEX , 1 ) ;
1609: oe_debug_pub.add( 'HEADER FLOW STATUS IS: ' || P_FLOW_STATUS_CODE , 1 ) ;
1610: END IF;
1611:
1612: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1605:
1606: IF l_debug_level > 0 THEN
1607: oe_debug_pub.add('UPDATE_GLOBAL RETURN STATUS FROM OE_WF_ORDER_UTIL.UPDATE HEADER FLOW STATUS CODE IS: ' || L_RETURN_STATUS ) ;
1608: oe_debug_pub.add( 'INDEX IS: ' || L_INDEX , 1 ) ;
1609: oe_debug_pub.add( 'HEADER FLOW STATUS IS: ' || P_FLOW_STATUS_CODE , 1 ) ;
1610: END IF;
1611:
1612: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1619: OE_ORDER_UTIL.g_header_rec.flow_status_code:=p_flow_status_code;
1620: OE_ORDER_UTIL.g_header_rec.last_update_date:=l_header_rec.last_update_date;
1621: OE_ORDER_UTIL.g_header_rec.operation:=OE_GLOBALS.G_OPR_UPDATE;
1622: IF l_debug_level > 0 THEN
1623: oe_debug_pub.add( 'GLOBAL HEADER FLOW STATUS IS: ' || OE_ORDER_UTIL.G_HEADER_REC.FLOW_STATUS_CODE,1);
1624: oe_debug_pub.add( 'GLOBAL HEADER OPERATION IS: ' || OE_ORDER_UTIL.G_HEADER_REC.OPERATION,1);
1625: END IF;
1626: END IF;
1627: -- bug 4732614
1620: OE_ORDER_UTIL.g_header_rec.last_update_date:=l_header_rec.last_update_date;
1621: OE_ORDER_UTIL.g_header_rec.operation:=OE_GLOBALS.G_OPR_UPDATE;
1622: IF l_debug_level > 0 THEN
1623: oe_debug_pub.add( 'GLOBAL HEADER FLOW STATUS IS: ' || OE_ORDER_UTIL.G_HEADER_REC.FLOW_STATUS_CODE,1);
1624: oe_debug_pub.add( 'GLOBAL HEADER OPERATION IS: ' || OE_ORDER_UTIL.G_HEADER_REC.OPERATION,1);
1625: END IF;
1626: END IF;
1627: -- bug 4732614
1628: IF l_debug_level > 0 THEN
1625: END IF;
1626: END IF;
1627: -- bug 4732614
1628: IF l_debug_level > 0 THEN
1629: oe_debug_pub.add('OEXUOWFB.pls: Calling Process_Requests_And_Notify......', 1);
1630: END IF;
1631:
1632: OE_Order_PVT.Process_Requests_And_Notify
1633: ( p_header_rec => l_header_rec
1635: ,x_return_status => l_return_status);
1636:
1637: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1638: IF l_debug_level > 0 THEN
1639: Oe_Debug_pub.Add('Process_Requests_And_Notify,return_status='||l_return_status||',Raising FND_API.G_EXC_ERROR exception',2);
1640: END IF;
1641: RAISE FND_API.G_EXC_ERROR;
1642: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1643: IF l_debug_level > 0 THEN
1640: END IF;
1641: RAISE FND_API.G_EXC_ERROR;
1642: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1643: IF l_debug_level > 0 THEN
1644: Oe_Debug_pub.Add('Process_Requests_And_Notify,return_status='||l_return_status||',Raising FND_API.G_EXC_UNEXPECTED_ERROR exception',2);
1645: END IF;
1646: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1647: END IF; -- bug 4732614 ends
1648: ELSIF p_sales_document_type_code = 'B' THEN -- Blanket Negotitation
1646: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1647: END IF; -- bug 4732614 ends
1648: ELSIF p_sales_document_type_code = 'B' THEN -- Blanket Negotitation
1649: IF l_debug_level > 0 THEN
1650: oe_debug_pub.add('Update_Flow_Status_Code for Blanket Negotiation:' || p_flow_status_code, 5 ) ;
1651: END IF;
1652:
1653: SELECT lock_control
1654: INTO l_blanket_lock_control
1685: END IF; --check sales_document_type_code
1686:
1687: ELSIF p_item_type = OE_GLOBALS.G_WFI_BKT THEN
1688: IF l_debug_level > 0 THEN
1689: oe_debug_pub.add('Update_Flow_Status_Code for Blanket Fulfillment:' || p_flow_status_code, 5 ) ;
1690: END IF;
1691:
1692: -- lock row or select for update here
1693: SELECT lock_control
1882: x_index => l_index,
1883: x_return_status => l_return_status);
1884:
1885: IF l_debug_level > 0 THEN
1886: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_WF_ORDER_UTIL.UPDATE LINE FLOW STATUS CODE IS: ' || L_RETURN_STATUS ) ;
1887: oe_debug_pub.add( 'INDEX IS: ' || L_INDEX , 1 ) ;
1888: END IF;
1889: --OE_DEBUG_PUB.ADD('Line Flow Status is: ' || p_flow_status_code ,1);
1890: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1883: x_return_status => l_return_status);
1884:
1885: IF l_debug_level > 0 THEN
1886: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_WF_ORDER_UTIL.UPDATE LINE FLOW STATUS CODE IS: ' || L_RETURN_STATUS ) ;
1887: oe_debug_pub.add( 'INDEX IS: ' || L_INDEX , 1 ) ;
1888: END IF;
1889: --OE_DEBUG_PUB.ADD('Line Flow Status is: ' || p_flow_status_code ,1);
1890: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1891: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1885: IF l_debug_level > 0 THEN
1886: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_WF_ORDER_UTIL.UPDATE LINE FLOW STATUS CODE IS: ' || L_RETURN_STATUS ) ;
1887: oe_debug_pub.add( 'INDEX IS: ' || L_INDEX , 1 ) ;
1888: END IF;
1889: --OE_DEBUG_PUB.ADD('Line Flow Status is: ' || p_flow_status_code ,1);
1890: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1891: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1892: END IF;
1893:
1904: OE_ORDER_UTIL.g_line_tbl(l_index).header_id:=l_line_tbl(1).header_id;
1905: OE_ORDER_UTIL.g_line_tbl(l_index).last_update_date:=l_line_tbl(1).last_update_date;
1906: OE_ORDER_UTIL.g_line_tbl(l_index).operation:=OE_GLOBALS.G_OPR_UPDATE;
1907: IF l_debug_level > 0 THEN
1908: oe_debug_pub.add( 'GLOBAL LINE FLOW STATUS IS: ' || OE_ORDER_UTIL.G_LINE_TBL ( L_INDEX ) .FLOW_STATUS_CODE , 1 ) ;
1909: oe_debug_pub.add( 'GLOBAL LINE OPERATION IS: ' || OE_ORDER_UTIL.G_LINE_TBL ( L_INDEX ) .OPERATION , 1 ) ;
1910: END IF;
1911: END IF;
1912: -- bug 4732614
1905: OE_ORDER_UTIL.g_line_tbl(l_index).last_update_date:=l_line_tbl(1).last_update_date;
1906: OE_ORDER_UTIL.g_line_tbl(l_index).operation:=OE_GLOBALS.G_OPR_UPDATE;
1907: IF l_debug_level > 0 THEN
1908: oe_debug_pub.add( 'GLOBAL LINE FLOW STATUS IS: ' || OE_ORDER_UTIL.G_LINE_TBL ( L_INDEX ) .FLOW_STATUS_CODE , 1 ) ;
1909: oe_debug_pub.add( 'GLOBAL LINE OPERATION IS: ' || OE_ORDER_UTIL.G_LINE_TBL ( L_INDEX ) .OPERATION , 1 ) ;
1910: END IF;
1911: END IF;
1912: -- bug 4732614
1913: IF l_debug_level > 0 THEN
1910: END IF;
1911: END IF;
1912: -- bug 4732614
1913: IF l_debug_level > 0 THEN
1914: oe_debug_pub.add('OEXUOWFB.pls: Calling Process_Requests_And_Notify......', 1);
1915: END IF;
1916:
1917: OE_Order_PVT.Process_Requests_And_Notify
1918: ( p_line_tbl => l_line_tbl
1920: ,x_return_status => l_return_status);
1921:
1922: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1923: IF l_debug_level > 0 THEN
1924: Oe_Debug_pub.Add('Process_Requests_And_Notify,return_status='||l_return_status||',Raising FND_API.G_EXC_ERROR exception',2);
1925: END IF;
1926: RAISE FND_API.G_EXC_ERROR;
1927: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1928: IF l_debug_level > 0 THEN
1925: END IF;
1926: RAISE FND_API.G_EXC_ERROR;
1927: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1928: IF l_debug_level > 0 THEN
1929: Oe_Debug_pub.Add('Process_Requests_And_Notify,return_status='||l_return_status||',Raising FND_API.G_EXC_UNEXPECTED_ERROR exception',2);
1930: END IF;
1931: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1932: END IF; -- bug 4732614 ends
1933: END IF; /*ASO installed */
1941: ***********************************************************/
1942: -- Corrected the debug message texts while working on
1943: -- Bug 7261522.
1944: IF l_debug_level > 0 THEN
1945: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - p_header_id: ' || p_header_id);
1946: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - p_line_id: ' || p_line_id);
1947: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_header_rec.order_source_id: ' || l_header_rec.order_source_id);
1948: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_order_source_id: ' || l_order_source_id);
1949: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_line_tbl(1).order_source_id: ' || l_line_tbl(1).order_source_id);
1942: -- Corrected the debug message texts while working on
1943: -- Bug 7261522.
1944: IF l_debug_level > 0 THEN
1945: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - p_header_id: ' || p_header_id);
1946: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - p_line_id: ' || p_line_id);
1947: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_header_rec.order_source_id: ' || l_header_rec.order_source_id);
1948: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_order_source_id: ' || l_order_source_id);
1949: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_line_tbl(1).order_source_id: ' || l_line_tbl(1).order_source_id);
1950: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_line_tbl(1).header_id: '||l_line_tbl(1).header_id);
1943: -- Bug 7261522.
1944: IF l_debug_level > 0 THEN
1945: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - p_header_id: ' || p_header_id);
1946: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - p_line_id: ' || p_line_id);
1947: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_header_rec.order_source_id: ' || l_header_rec.order_source_id);
1948: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_order_source_id: ' || l_order_source_id);
1949: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_line_tbl(1).order_source_id: ' || l_line_tbl(1).order_source_id);
1950: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_line_tbl(1).header_id: '||l_line_tbl(1).header_id);
1951: END IF;
1944: IF l_debug_level > 0 THEN
1945: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - p_header_id: ' || p_header_id);
1946: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - p_line_id: ' || p_line_id);
1947: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_header_rec.order_source_id: ' || l_header_rec.order_source_id);
1948: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_order_source_id: ' || l_order_source_id);
1949: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_line_tbl(1).order_source_id: ' || l_line_tbl(1).order_source_id);
1950: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_line_tbl(1).header_id: '||l_line_tbl(1).header_id);
1951: END IF;
1952:
1945: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - p_header_id: ' || p_header_id);
1946: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - p_line_id: ' || p_line_id);
1947: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_header_rec.order_source_id: ' || l_header_rec.order_source_id);
1948: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_order_source_id: ' || l_order_source_id);
1949: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_line_tbl(1).order_source_id: ' || l_line_tbl(1).order_source_id);
1950: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_line_tbl(1).header_id: '||l_line_tbl(1).header_id);
1951: END IF;
1952:
1953: -- This IF has been corrected during Bug 7261522 resolution.
1946: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - p_line_id: ' || p_line_id);
1947: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_header_rec.order_source_id: ' || l_header_rec.order_source_id);
1948: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_order_source_id: ' || l_order_source_id);
1949: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_line_tbl(1).order_source_id: ' || l_line_tbl(1).order_source_id);
1950: oe_debug_pub.add(' GENESIS : UPDATE FLOW STATUS - l_line_tbl(1).header_id: '||l_line_tbl(1).header_id);
1951: END IF;
1952:
1953: -- This IF has been corrected during Bug 7261522 resolution.
1954: IF (
1980: into l_itemkey_sso
1981: from dual;
1982:
1983: IF l_debug_level > 0 THEN
1984: oe_debug_pub.add( ' GENESIS : UPDATE FLOW STATUS - l_itemkey_sso'||l_itemkey_sso);
1985: END IF;
1986:
1987: IF l_debug_level > 0 THEN
1988: oe_debug_pub.add( ' GENESIS : UPDATE FLOW STATUS');
1984: oe_debug_pub.add( ' GENESIS : UPDATE FLOW STATUS - l_itemkey_sso'||l_itemkey_sso);
1985: END IF;
1986:
1987: IF l_debug_level > 0 THEN
1988: oe_debug_pub.add( ' GENESIS : UPDATE FLOW STATUS');
1989: END IF;
1990:
1991: OE_SYNC_ORDER_PVT.INSERT_SYNC_lINE(P_LINE_rec => l_line_tbl(1),
1992: p_change_type => 'LINE_STATUS',
2030: x_index => l_index,
2031: x_return_status => l_return_status);
2032:
2033: IF l_debug_level > 0 THEN
2034: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_WF_ORDER_UTIL.UPDATE HEADER FLOW STATUS CODE IS: ' || L_RETURN_STATUS ) ;
2035: oe_debug_pub.add( 'INDEX IS: ' || L_INDEX , 1 ) ;
2036: oe_debug_pub.add( 'HEADER FLOW STATUS IS: ' || P_FLOW_STATUS_CODE , 1 ) ;
2037: END IF;
2038: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2031: x_return_status => l_return_status);
2032:
2033: IF l_debug_level > 0 THEN
2034: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_WF_ORDER_UTIL.UPDATE HEADER FLOW STATUS CODE IS: ' || L_RETURN_STATUS ) ;
2035: oe_debug_pub.add( 'INDEX IS: ' || L_INDEX , 1 ) ;
2036: oe_debug_pub.add( 'HEADER FLOW STATUS IS: ' || P_FLOW_STATUS_CODE , 1 ) ;
2037: END IF;
2038: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2039: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2032:
2033: IF l_debug_level > 0 THEN
2034: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_WF_ORDER_UTIL.UPDATE HEADER FLOW STATUS CODE IS: ' || L_RETURN_STATUS ) ;
2035: oe_debug_pub.add( 'INDEX IS: ' || L_INDEX , 1 ) ;
2036: oe_debug_pub.add( 'HEADER FLOW STATUS IS: ' || P_FLOW_STATUS_CODE , 1 ) ;
2037: END IF;
2038: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2039: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2040: END IF;
2045: OE_ORDER_UTIL.g_header_rec.flow_status_code:=p_flow_status_code;
2046: OE_ORDER_UTIL.g_header_rec.last_update_date:=l_header_rec.last_update_date;
2047: OE_ORDER_UTIL.g_header_rec.operation:=OE_GLOBALS.G_OPR_UPDATE;
2048: IF l_debug_level > 0 THEN
2049: oe_debug_pub.add( 'GLOBAL HEADER FLOW STATUS IS: ' || OE_ORDER_UTIL.G_HEADER_REC.FLOW_STATUS_CODE , 1 ) ;
2050: oe_debug_pub.add( 'GLOBAL HEADER OPERATION IS: ' || OE_ORDER_UTIL.G_HEADER_REC.OPERATION , 1 ) ;
2051: END IF;
2052: END IF;
2053: -- bug 4732614
2046: OE_ORDER_UTIL.g_header_rec.last_update_date:=l_header_rec.last_update_date;
2047: OE_ORDER_UTIL.g_header_rec.operation:=OE_GLOBALS.G_OPR_UPDATE;
2048: IF l_debug_level > 0 THEN
2049: oe_debug_pub.add( 'GLOBAL HEADER FLOW STATUS IS: ' || OE_ORDER_UTIL.G_HEADER_REC.FLOW_STATUS_CODE , 1 ) ;
2050: oe_debug_pub.add( 'GLOBAL HEADER OPERATION IS: ' || OE_ORDER_UTIL.G_HEADER_REC.OPERATION , 1 ) ;
2051: END IF;
2052: END IF;
2053: -- bug 4732614
2054: IF l_debug_level > 0 THEN
2051: END IF;
2052: END IF;
2053: -- bug 4732614
2054: IF l_debug_level > 0 THEN
2055: oe_debug_pub.add('OEXUOWFB.pls: Calling Process_Requests_And_Notify......', 1);
2056: END IF;
2057:
2058: OE_Order_PVT.Process_Requests_And_Notify
2059: ( p_header_rec => l_header_rec
2061: ,x_return_status => l_return_status);
2062:
2063: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2064: IF l_debug_level > 0 THEN
2065: Oe_Debug_pub.Add('Process_Requests_And_Notify,return_status='||l_return_status||',Raising FND_API.G_EXC_ERROR exception',2);
2066: END IF;
2067: RAISE FND_API.G_EXC_ERROR;
2068: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2069: IF l_debug_level > 0 THEN
2066: END IF;
2067: RAISE FND_API.G_EXC_ERROR;
2068: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2069: IF l_debug_level > 0 THEN
2070: Oe_Debug_pub.Add('Process_Requests_And_Notify,return_status='||l_return_status||',Raising FND_API.G_EXC_UNEXPECTED_ERROR exception',2);
2071: END IF;
2072: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2073: END IF; -- bug 4732614 ends
2074: ELSE
2072: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2073: END IF; -- bug 4732614 ends
2074: ELSE
2075: IF l_debug_level > 0 THEN
2076: oe_debug_pub.add( 'UPDATE_FLOW_STATUS_CODE: HEADER_ID AND LINE_ID ARE NULL' ) ;
2077: END IF;
2078: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2079: END IF;
2080:
2083: --Bug 3356542
2084: OE_PC_Constraints_Admin_PVT.Clear_Cached_Results;
2085:
2086: IF l_debug_level > 0 THEN
2087: oe_debug_pub.add('ENTERING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
2088: oe_debug_pub.add('UFSC: GLOBAL RECURSION WITHOUT EXCEPTION: ' || OE_ORDER_UTIL.G_RECURSION_WITHOUT_EXCEPTION) ;
2089: oe_debug_pub.add('UFSC: GLOBAL CACHE BOOKED FLAG' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
2090: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
2091: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
2084: OE_PC_Constraints_Admin_PVT.Clear_Cached_Results;
2085:
2086: IF l_debug_level > 0 THEN
2087: oe_debug_pub.add('ENTERING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
2088: oe_debug_pub.add('UFSC: GLOBAL RECURSION WITHOUT EXCEPTION: ' || OE_ORDER_UTIL.G_RECURSION_WITHOUT_EXCEPTION) ;
2089: oe_debug_pub.add('UFSC: GLOBAL CACHE BOOKED FLAG' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
2090: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
2091: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
2092: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
2085:
2086: IF l_debug_level > 0 THEN
2087: oe_debug_pub.add('ENTERING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
2088: oe_debug_pub.add('UFSC: GLOBAL RECURSION WITHOUT EXCEPTION: ' || OE_ORDER_UTIL.G_RECURSION_WITHOUT_EXCEPTION) ;
2089: oe_debug_pub.add('UFSC: GLOBAL CACHE BOOKED FLAG' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
2090: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
2091: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
2092: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
2093: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
2086: IF l_debug_level > 0 THEN
2087: oe_debug_pub.add('ENTERING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
2088: oe_debug_pub.add('UFSC: GLOBAL RECURSION WITHOUT EXCEPTION: ' || OE_ORDER_UTIL.G_RECURSION_WITHOUT_EXCEPTION) ;
2089: oe_debug_pub.add('UFSC: GLOBAL CACHE BOOKED FLAG' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
2090: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
2091: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
2092: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
2093: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
2094: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
2087: oe_debug_pub.add('ENTERING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
2088: oe_debug_pub.add('UFSC: GLOBAL RECURSION WITHOUT EXCEPTION: ' || OE_ORDER_UTIL.G_RECURSION_WITHOUT_EXCEPTION) ;
2089: oe_debug_pub.add('UFSC: GLOBAL CACHE BOOKED FLAG' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
2090: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
2091: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
2092: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
2093: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
2094: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
2095: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
2088: oe_debug_pub.add('UFSC: GLOBAL RECURSION WITHOUT EXCEPTION: ' || OE_ORDER_UTIL.G_RECURSION_WITHOUT_EXCEPTION) ;
2089: oe_debug_pub.add('UFSC: GLOBAL CACHE BOOKED FLAG' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
2090: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
2091: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
2092: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
2093: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
2094: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
2095: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
2096: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
2089: oe_debug_pub.add('UFSC: GLOBAL CACHE BOOKED FLAG' || OE_ORDER_CACHE.G_HEADER_REC.BOOKED_FLAG ) ;
2090: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
2091: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
2092: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
2093: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
2094: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
2095: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
2096: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
2097: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
2090: oe_debug_pub.add('UFSC: GLOBAL PICTURE HEADER BOOKED FLAG' || OE_ORDER_UTIL.G_HEADER_REC.BOOKED_FLAG ) ;
2091: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
2092: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
2093: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
2094: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
2095: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
2096: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
2097: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
2098: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
2091: oe_debug_pub.add('UFSC: COUNT OF NEW LINE TABLE= '|| OE_ORDER_UTIL.G_LINE_TBL.COUNT ) ;
2092: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
2093: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
2094: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
2095: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
2096: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
2097: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
2098: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
2099: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
2092: oe_debug_pub.add('UFSC: COUNT OF OLD LINE TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_TBL.COUNT ) ;
2093: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
2094: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
2095: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
2096: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
2097: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
2098: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
2099: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
2100: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
2093: oe_debug_pub.add('UFSC: COUNT OF NEW LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_LINE_ADJ_TBL.COUNT ) ;
2094: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
2095: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
2096: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
2097: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
2098: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
2099: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
2100: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
2101: oe_debug_pub.add('UFSC: COUNT OF NEW LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_LOT_SERIAL_TBL.COUNT ) ;
2094: oe_debug_pub.add('UFSC: COUNT OF OLD LINE ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_ADJ_TBL.COUNT ) ;
2095: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
2096: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
2097: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
2098: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
2099: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
2100: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
2101: oe_debug_pub.add('UFSC: COUNT OF NEW LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_LOT_SERIAL_TBL.COUNT ) ;
2102: oe_debug_pub.add('UFSC: COUNT OF OLD LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_OLD_LOT_SERIAL_TBL.COUNT ) ;
2095: oe_debug_pub.add('UFSC: COUNT OF NEW HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_HEADER_ADJ_TBL.COUNT ) ;
2096: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
2097: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
2098: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
2099: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
2100: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
2101: oe_debug_pub.add('UFSC: COUNT OF NEW LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_LOT_SERIAL_TBL.COUNT ) ;
2102: oe_debug_pub.add('UFSC: COUNT OF OLD LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_OLD_LOT_SERIAL_TBL.COUNT ) ;
2103: oe_debug_pub.add('EXITING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
2096: oe_debug_pub.add('UFSC: COUNT OF OLD HDR ADJ TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_ADJ_TBL.COUNT ) ;
2097: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
2098: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
2099: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
2100: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
2101: oe_debug_pub.add('UFSC: COUNT OF NEW LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_LOT_SERIAL_TBL.COUNT ) ;
2102: oe_debug_pub.add('UFSC: COUNT OF OLD LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_OLD_LOT_SERIAL_TBL.COUNT ) ;
2103: oe_debug_pub.add('EXITING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
2104: END IF;
2097: oe_debug_pub.add('UFSC: COUNT OF NEW HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_HEADER_SCREDIT_TBL.COUNT ) ;
2098: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
2099: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
2100: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
2101: oe_debug_pub.add('UFSC: COUNT OF NEW LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_LOT_SERIAL_TBL.COUNT ) ;
2102: oe_debug_pub.add('UFSC: COUNT OF OLD LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_OLD_LOT_SERIAL_TBL.COUNT ) ;
2103: oe_debug_pub.add('EXITING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
2104: END IF;
2105:
2098: oe_debug_pub.add('UFSC: COUNT OF OLD HDR SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_HEADER_SCREDIT_TBL.COUNT ) ;
2099: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
2100: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
2101: oe_debug_pub.add('UFSC: COUNT OF NEW LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_LOT_SERIAL_TBL.COUNT ) ;
2102: oe_debug_pub.add('UFSC: COUNT OF OLD LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_OLD_LOT_SERIAL_TBL.COUNT ) ;
2103: oe_debug_pub.add('EXITING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
2104: END IF;
2105:
2106: EXCEPTION
2099: oe_debug_pub.add('UFSC: COUNT OF NEW LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_LINE_SCREDIT_TBL.COUNT ) ;
2100: oe_debug_pub.add('UFSC: COUNT OF OLD LINE SCREDIT TABLE= '|| OE_ORDER_UTIL.G_OLD_LINE_SCREDIT_TBL.COUNT ) ;
2101: oe_debug_pub.add('UFSC: COUNT OF NEW LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_LOT_SERIAL_TBL.COUNT ) ;
2102: oe_debug_pub.add('UFSC: COUNT OF OLD LOT SERIAL TABLE= '|| OE_ORDER_UTIL.G_OLD_LOT_SERIAL_TBL.COUNT ) ;
2103: oe_debug_pub.add('EXITING UPDATE_FLOW_STATUS_CODE' , 5 ) ;
2104: END IF;
2105:
2106: EXCEPTION
2107: WHEN NO_DATA_FOUND THEN
2107: WHEN NO_DATA_FOUND THEN
2108: ROLLBACK TO UPDATE_FLOW_STATUS_CODE;
2109:
2110: IF l_debug_level > 0 THEN
2111: oe_debug_pub.add( 'UPDATE_FLOW_STATUS_CODE: NO_DATA_FOUND' ) ;
2112: END IF;
2113: IF p_line_id IS NOT NULL THEN
2114: OE_MSG_PUB.Reset_Msg_Context('LINE');
2115: ELSIF p_header_id IS NOT NULL THEN
2117: END IF;
2118: WHEN FND_API.G_EXC_ERROR THEN
2119: ROLLBACK TO UPDATE_FLOW_STATUS_CODE;
2120: IF l_debug_level > 0 THEN
2121: oe_debug_pub.add( 'UPDATE_FLOW_STATUS_CODE: ERROR' , 5 ) ;
2122: END IF;
2123: x_return_status := FND_API.G_RET_STS_ERROR;
2124: IF p_line_id IS NOT NULL THEN
2125: OE_MSG_PUB.Reset_Msg_Context('LINE');
2128: END IF;
2129: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
2130: ROLLBACK TO UPDATE_FLOW_STATUS_CODE;
2131: IF l_debug_level > 0 THEN
2132: oe_debug_pub.add( 'UPDATE_FLOW_STATUS_CODE: LOCK EXC' , 5 ) ;
2133: END IF;
2134: x_return_status := FND_API.G_RET_STS_ERROR;
2135: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
2136: THEN
2144: END IF;
2145: WHEN OTHERS THEN
2146: ROLLBACK TO UPDATE_FLOW_STATUS_CODE;
2147: IF l_debug_level > 0 THEN
2148: oe_debug_pub.add( 'UPDATE_FLOW_STATUS_CODE: UNEXP ERROR' , 5 ) ;
2149: END IF;
2150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2151: IF FND_MSG_PUB.Check_Msg_Level
2152: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2176: l_type VARCHAR2(30);
2177: v_header_id NUMBER;
2178:
2179: --
2180: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2181: --
2182: BEGIN
2183:
2184: --
2295: l_index NUMBER;
2296: l_blanket_lock_control NUMBER;
2297: l_msg_count NUMBER;
2298: l_msg_data VARCHAR2(2000);
2299: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2300: l_updated_flag VARCHAR2(1) := 'N';
2301: l_sales_document_type_code VARCHAR2(30);
2302: l_line_id NUMBER;
2303: l_lock_control NUMBER;
2315: FOR UPDATE NOWAIT;
2316:
2317: BEGIN
2318: IF l_debug_level > 0 THEN
2319: oe_debug_pub.add( 'ENTERING UPDATE_QUOTE_BLANKET' , 5 ) ;
2320: END IF;
2321:
2322: SAVEPOINT UPDATE_QUOTE_BLANKET;
2323:
2450: x_index => l_index,
2451: x_return_status => l_return_status);
2452:
2453: IF l_debug_level > 0 THEN
2454: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_WF_ORDER_UTIL.UPDATE HEADER FLOW STATUS CODE IS: ' || L_RETURN_STATUS ) ;
2455: oe_debug_pub.add( 'INDEX IS: ' || L_INDEX , 1 ) ;
2456: oe_debug_pub.add( 'HEADER FLOW STATUS IS: ' || P_FLOW_STATUS_CODE , 1 ) ;
2457: END IF;
2458:
2451: x_return_status => l_return_status);
2452:
2453: IF l_debug_level > 0 THEN
2454: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_WF_ORDER_UTIL.UPDATE HEADER FLOW STATUS CODE IS: ' || L_RETURN_STATUS ) ;
2455: oe_debug_pub.add( 'INDEX IS: ' || L_INDEX , 1 ) ;
2456: oe_debug_pub.add( 'HEADER FLOW STATUS IS: ' || P_FLOW_STATUS_CODE , 1 ) ;
2457: END IF;
2458:
2459: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2452:
2453: IF l_debug_level > 0 THEN
2454: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_WF_ORDER_UTIL.UPDATE HEADER FLOW STATUS CODE IS: ' || L_RETURN_STATUS ) ;
2455: oe_debug_pub.add( 'INDEX IS: ' || L_INDEX , 1 ) ;
2456: oe_debug_pub.add( 'HEADER FLOW STATUS IS: ' || P_FLOW_STATUS_CODE , 1 ) ;
2457: END IF;
2458:
2459: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2460: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2474: END IF;
2475: OE_ORDER_UTIL.g_header_rec.last_update_date:=l_header_rec.last_update_date;
2476: OE_ORDER_UTIL.g_header_rec.operation:=OE_GLOBALS.G_OPR_UPDATE;
2477: IF l_debug_level > 0 THEN
2478: oe_debug_pub.add( 'GLOBAL HEADER FLOW STATUS IS: ' || OE_ORDER_UTIL.G_HEADER_REC.FLOW_STATUS_CODE , 1 );
2479: oe_debug_pub.add( 'GLOBAL HEADER OPEN_FLAG IS: ' || OE_ORDER_UTIL.G_HEADER_REC.OPEN_FLAG , 1 );
2480: oe_debug_pub.add( 'GLOBAL HEADER DRAFT_SUBMITTED_FLAG IS: ' || OE_ORDER_UTIL.G_HEADER_REC.DRAFT_SUBMITTED_FLAG , 1 );
2481: oe_debug_pub.add( 'GLOBAL HEADER OPERATION IS: ' || OE_ORDER_UTIL.G_HEADER_REC.OPERATION , 1 ) ;
2482: END IF;
2475: OE_ORDER_UTIL.g_header_rec.last_update_date:=l_header_rec.last_update_date;
2476: OE_ORDER_UTIL.g_header_rec.operation:=OE_GLOBALS.G_OPR_UPDATE;
2477: IF l_debug_level > 0 THEN
2478: oe_debug_pub.add( 'GLOBAL HEADER FLOW STATUS IS: ' || OE_ORDER_UTIL.G_HEADER_REC.FLOW_STATUS_CODE , 1 );
2479: oe_debug_pub.add( 'GLOBAL HEADER OPEN_FLAG IS: ' || OE_ORDER_UTIL.G_HEADER_REC.OPEN_FLAG , 1 );
2480: oe_debug_pub.add( 'GLOBAL HEADER DRAFT_SUBMITTED_FLAG IS: ' || OE_ORDER_UTIL.G_HEADER_REC.DRAFT_SUBMITTED_FLAG , 1 );
2481: oe_debug_pub.add( 'GLOBAL HEADER OPERATION IS: ' || OE_ORDER_UTIL.G_HEADER_REC.OPERATION , 1 ) ;
2482: END IF;
2483: END IF;
2476: OE_ORDER_UTIL.g_header_rec.operation:=OE_GLOBALS.G_OPR_UPDATE;
2477: IF l_debug_level > 0 THEN
2478: oe_debug_pub.add( 'GLOBAL HEADER FLOW STATUS IS: ' || OE_ORDER_UTIL.G_HEADER_REC.FLOW_STATUS_CODE , 1 );
2479: oe_debug_pub.add( 'GLOBAL HEADER OPEN_FLAG IS: ' || OE_ORDER_UTIL.G_HEADER_REC.OPEN_FLAG , 1 );
2480: oe_debug_pub.add( 'GLOBAL HEADER DRAFT_SUBMITTED_FLAG IS: ' || OE_ORDER_UTIL.G_HEADER_REC.DRAFT_SUBMITTED_FLAG , 1 );
2481: oe_debug_pub.add( 'GLOBAL HEADER OPERATION IS: ' || OE_ORDER_UTIL.G_HEADER_REC.OPERATION , 1 ) ;
2482: END IF;
2483: END IF;
2484: -- bug 4732614
2477: IF l_debug_level > 0 THEN
2478: oe_debug_pub.add( 'GLOBAL HEADER FLOW STATUS IS: ' || OE_ORDER_UTIL.G_HEADER_REC.FLOW_STATUS_CODE , 1 );
2479: oe_debug_pub.add( 'GLOBAL HEADER OPEN_FLAG IS: ' || OE_ORDER_UTIL.G_HEADER_REC.OPEN_FLAG , 1 );
2480: oe_debug_pub.add( 'GLOBAL HEADER DRAFT_SUBMITTED_FLAG IS: ' || OE_ORDER_UTIL.G_HEADER_REC.DRAFT_SUBMITTED_FLAG , 1 );
2481: oe_debug_pub.add( 'GLOBAL HEADER OPERATION IS: ' || OE_ORDER_UTIL.G_HEADER_REC.OPERATION , 1 ) ;
2482: END IF;
2483: END IF;
2484: -- bug 4732614
2485: IF l_debug_level > 0 THEN
2482: END IF;
2483: END IF;
2484: -- bug 4732614
2485: IF l_debug_level > 0 THEN
2486: oe_debug_pub.add('OEXUOWFB.pls: Calling Process_Requests_And_Notify......', 1);
2487: END IF;
2488:
2489: OE_Order_PVT.Process_Requests_And_Notify
2490: ( p_header_rec => l_header_rec
2492: ,x_return_status => l_return_status);
2493:
2494: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2495: IF l_debug_level > 0 THEN
2496: Oe_Debug_pub.Add('Process_Requests_And_Notify,return_status='||l_return_status||',Raising FND_API.G_EXC_ERROR exception',2);
2497: END IF;
2498: RAISE FND_API.G_EXC_ERROR;
2499: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2500: IF l_debug_level > 0 THEN
2497: END IF;
2498: RAISE FND_API.G_EXC_ERROR;
2499: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2500: IF l_debug_level > 0 THEN
2501: Oe_Debug_pub.Add('Process_Requests_And_Notify,return_status='||l_return_status||',Raising FND_API.G_EXC_UNEXPECTED_ERROR exception',2);
2502: END IF;
2503: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2504: END IF; -- bug 4732614 ends
2505: ELSIF l_sales_document_type_code = 'B' THEN -- Blanket Negotitation/Fulfillment
2543: SET OPEN_FLAG = p_open_flag
2544: WHERE HEADER_ID = l_header_id;
2545:
2546: -- ZB put the code here
2547: oe_debug_pub.add('Acquiring locks on blanket lines');
2548: open blanket_lines;
2549: loop
2550: fetch blanket_lines into l_line_id, l_lock_control;
2551: EXIT WHEN blanket_lines%NOTFOUND;
2551: EXIT WHEN blanket_lines%NOTFOUND;
2552: end loop;
2553: close blanket_lines;
2554:
2555: oe_debug_pub.add('Updating blanket lines 4 open flag');
2556: update OE_BLANKET_LINES_ALL
2557: SET OPEN_FLAG = p_open_flag
2558: WHERE HEADER_ID = l_header_id;
2559: -- End code
2578: -- Bug 3356542
2579: OE_PC_Constraints_Admin_PVT.Clear_Cached_Results;
2580:
2581: IF l_debug_level > 0 THEN
2582: oe_debug_pub.add( 'EXITING UPDATE_QUOTE_BLANKET' , 5 ) ;
2583: END IF;
2584:
2585: EXCEPTION
2586: WHEN NO_DATA_FOUND THEN
2585: EXCEPTION
2586: WHEN NO_DATA_FOUND THEN
2587: ROLLBACK TO UPDATE_QUOTE_BLANKET;
2588: IF l_debug_level > 0 THEN
2589: oe_debug_pub.add( 'UPDATE_QUOTE_BLANKET: NO_DATA_FOUND' ) ;
2590: END IF;
2591: x_return_status := FND_API.G_RET_STS_ERROR;
2592: IF l_header_id IS NOT NULL THEN
2593: OE_MSG_PUB.Reset_Msg_Context('HEADER');
2594: END IF;
2595: WHEN FND_API.G_EXC_ERROR THEN
2596: ROLLBACK TO UPDATE_QUOTE_BLANKET;
2597: IF l_debug_level > 0 THEN
2598: oe_debug_pub.add( 'UPDATE_QUOTE_BLANKET: ERROR' , 5 ) ;
2599: END IF;
2600: x_return_status := FND_API.G_RET_STS_ERROR;
2601: IF l_header_id IS NOT NULL THEN
2602: OE_MSG_PUB.Reset_Msg_Context('HEADER');
2603: END IF;
2604: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
2605: ROLLBACK TO UPDATE_QUOTE_BLANKET;
2606: IF l_debug_level > 0 THEN
2607: oe_debug_pub.add( 'UPDATE_QUOTE_BLANKET: LOCK EXC' , 5 ) ;
2608: END IF;
2609: x_return_status := FND_API.G_RET_STS_ERROR;
2610: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
2611: THEN
2617: END IF;
2618: WHEN OTHERS THEN
2619: ROLLBACK TO UPDATE_QUOTE_BLANKET;
2620: IF l_debug_level > 0 THEN
2621: oe_debug_pub.add( 'UPDATE_QUOTE_BLANKET: UNEXP ERROR' , 5 ) ;
2622: END IF;
2623: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2624: IF FND_MSG_PUB.Check_Msg_Level
2625: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2666: l_validate_user NUMBER;
2667: l_owner_role VARCHAR2(100);
2668:
2669: --
2670: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2671: --
2672: BEGIN
2673:
2674: IF l_debug_level > 0 THEN
2671: --
2672: BEGIN
2673:
2674: IF l_debug_level > 0 THEN
2675: oe_debug_pub.add( 'Entering Create_WorkItem_Upgrade. item_type/item_key=' || p_item_type || '/' || p_item_key, 1) ;
2676: END IF;
2677:
2678: -- validate the p_process_name is ok
2679: select name
2684: and runnable_flag = 'Y'
2685: and end_date is null;
2686:
2687: IF l_debug_level > 0 THEN
2688: oe_debug_pub.add( 'process_name: ' || l_valid_process, 4);
2689: END IF;
2690:
2691: IF p_sales_document_type_code = 'O' THEN
2692: fnd_message.set_name('ONT', 'OE_NTF_QUOTE');
2709: l_owner_role);
2710:
2711:
2712: IF l_debug_level > 0 THEN
2713: oe_debug_pub.add( 'After WF_ENGINE.CreateProcess', 4 ) ;
2714: END IF;
2715:
2716: -- Set various Header Attributes
2717: l_aname(1) := 'USER_ID';
2731: , l_avalue
2732: );
2733:
2734: IF l_debug_level > 0 THEN
2735: oe_debug_pub.add( 'EXITING CREATE_WORKITEM_UPGRADE' , 4) ;
2736: END IF;
2737:
2738: EXCEPTION
2739: WHEN OTHERS THEN
2755: p_sales_document_type_code IN VARCHAR2
2756: )
2757: IS
2758: --
2759: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2760: l_count NUMBER;
2761: --
2762: BEGIN
2763:
2761: --
2762: BEGIN
2763:
2764: IF l_debug_level > 0 THEN
2765: oe_debug_pub.add( 'IN CREATESTART_HDRINTERNAL' ) ;
2766: END IF;
2767:
2768: Create_HdrWorkItemInternal(p_item_type, p_header_id, p_transaction_number, p_sales_document_type_code);
2769:
2790:
2791: OE_GLOBALS.G_SALES_DOCUMENT_TYPE_CODE := p_sales_document_type_code;
2792:
2793: IF l_debug_level > 0 THEN
2794: oe_debug_pub.add( 'EXITING CREATESTART_HDRPROCESSINTERNAL' ) ;
2795: END IF;
2796:
2797: EXCEPTION
2798: WHEN FND_API.G_EXC_ERROR THEN
2837: l_sales_document_type VARCHAR2(240);
2838: l_owner_role VARCHAR2(100);
2839:
2840: --
2841: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2842: --
2843: BEGIN
2844:
2845: IF l_debug_level > 0 THEN
2842: --
2843: BEGIN
2844:
2845: IF l_debug_level > 0 THEN
2846: oe_debug_pub.add( 'IN CREATE_HDRWORKITEMINTERNAL, ITEM_TYPE/ITEM_KEY=' || p_item_type || '/' || to_char(p_header_id)) ;
2847: END IF;
2848:
2849: l_hdr_process_name := Get_ProcessName(p_itemtype=> p_item_type, p_itemkey=>p_header_id, p_SalesDocumentTypeCode=> p_sales_document_type_code);
2850:
2848:
2849: l_hdr_process_name := Get_ProcessName(p_itemtype=> p_item_type, p_itemkey=>p_header_id, p_SalesDocumentTypeCode=> p_sales_document_type_code);
2850:
2851: IF l_debug_level > 0 THEN
2852: oe_debug_pub.add( 'Get ProcessName: ' || l_hdr_process_name);
2853: END IF;
2854:
2855: -- set user key
2856: IF p_sales_document_type_code = 'O' THEN
2875: l_owner_role);
2876:
2877:
2878: IF l_debug_level > 0 THEN
2879: oe_debug_pub.add( 'AFTER WF_ENGINE.CREATEPROCESS' ) ;
2880: END IF;
2881:
2882: -- Set various Header Attributes
2883: l_aname(1) := 'USER_ID';
2939: );
2940: END IF; -- only need to set text item attr if it is OENH
2941:
2942: IF l_debug_level > 0 THEN
2943: oe_debug_pub.add( 'EXITING CREATE_HDRWORKITEMINTERNAL' ) ;
2944: END IF;
2945:
2946: EXCEPTION
2947: WHEN FND_API.G_EXC_ERROR THEN
3786: EXCEPTION
3787: WHEN NO_DATA_FOUND THEN
3788: l_result_out := 'N';
3789: --IF l_debug_level > 0 THEN
3790: -- oe_debug_pub.add( 'NO HOLDS FOUND FOR HEADER ID: ' || P_HDR_ID ) ;
3791: --END IF;
3792: WHEN TOO_MANY_ROWS THEN
3793: null;
3794: END;
3824: l_book_deferred VARCHAR2(1);
3825: l_booked_flag VARCHAR2(1);
3826: l_flow_status_code VARCHAR2(30);
3827: l_flow_status VARCHAR2(256);
3828: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3829:
3830: CURSOR c_eligible_activity IS
3831: select pa.activity_name
3832: from wf_item_activity_statuses s,
3868: AND WPA.instance_id = WIAS.process_activity;
3869:
3870: BEGIN
3871: IF l_debug_level > 0 THEN
3872: oe_debug_pub.add('In Complete_eligible_and_Book, header_id' || p_header_id);
3873: END IF;
3874:
3875:
3876: open c_eligible_activity;
3875:
3876: open c_eligible_activity;
3877: FETCH c_eligible_activity into l_activity;
3878: IF c_eligible_activity%NOTFOUND THEN
3879: oe_debug_pub.add('c_eligible_activity NOT FOUND');
3880: fnd_message.set_name('ONT','OE_NO_ELIGIBLE_ACTIVITIES');
3881: OE_MSG_PUB.ADD;
3882: ELSE
3883: close c_eligible_activity;
3881: OE_MSG_PUB.ADD;
3882: ELSE
3883: close c_eligible_activity;
3884: IF l_debug_level > 0 THEN
3885: oe_debug_pub.add('ELIGIBLE Activity: ' || l_activity);
3886: END IF;
3887:
3888: WF_ENGINE.CompleteActivityInternalName(OE_GLOBALS.G_WFI_NGO,
3889: to_char(p_header_id), l_activity, l_retval);
3892: into l_booked_flag, l_flow_status_code
3893: from oe_order_headers
3894: where header_id = p_header_id;
3895: IF l_debug_level > 0 THEN
3896: oe_debug_pub.add('l_booked_flag: ' || l_booked_flag);
3897: END IF;
3898:
3899: IF l_booked_flag = 'N' THEN
3900: -- If the order is book eligigble then try to book it also.
3901: OPEN book_eligible;
3902: FETCH book_eligible INTO l_book_eligible;
3903: IF (book_eligible%NOTFOUND) THEN
3904: IF l_debug_level > 0 THEN
3905: oe_debug_pub.add( 'BOOKING NOT ELIGIBLE' ) ;
3906: END IF;
3907: -- Booking can be a high cost activity and may be deferred
3908: OPEN book_deferred;
3909: FETCH book_deferred INTO l_book_deferred;
3908: OPEN book_deferred;
3909: FETCH book_deferred INTO l_book_deferred;
3910: IF (book_deferred%FOUND) THEN
3911: IF l_debug_level > 0 THEN
3912: oe_debug_pub.add('BOOKING IS DEFERRED' );
3913: END IF;
3914: FND_MESSAGE.SET_NAME('ONT','OE_ORDER_BOOK_DEFERRED');
3915: OE_MSG_PUB.ADD;
3916: CLOSE book_deferred;
3929: OE_MSG_PUB.ADD;
3930: END IF; -- book_deferred%FOUND
3931: ELSE -- book_eligible%NOTFOUND
3932: IF l_debug_level > 0 THEN
3933: oe_debug_pub.add('Calling OE_Order_Book_Util.Complete_Book_Eligible' ) ;
3934: END IF;
3935:
3936: OE_Order_Book_Util.Complete_Book_Eligible
3937: ( p_api_version_number => 1.0