[Home] [Help]
243: l_stmt_num number;
244:
245: BEGIN
246: IF PG_DEBUG <> 0 THEN
247: oe_debug_pub.add ('Entered check_recurred_item',1);
248: END IF;
249: x_recurred_item_flag := 1;
250: l_stmt_num :=10;
251: If (p_cons_item_details.count > 0) THEN--checks for unintialized collection
249: x_recurred_item_flag := 1;
250: l_stmt_num :=10;
251: If (p_cons_item_details.count > 0) THEN--checks for unintialized collection
252: IF PG_DEBUG <> 0 THEN
253: oe_debug_pub.add ('inside the IF after checking for initialized collection',1);
254: END IF;
255:
256: Loop
257: oe_debug_pub.add ('inside the loop aftr chking for intiliazed colelc',1);
253: oe_debug_pub.add ('inside the IF after checking for initialized collection',1);
254: END IF;
255:
256: Loop
257: oe_debug_pub.add ('inside the loop aftr chking for intiliazed colelc',1);
258: l_stmt_num:=20;
259: if p_cons_item_details(i).item_id = p_item_id THEN
260: x_recurred_item_flag := 3; --recurred item
261: oe_debug_pub.add ('check_recureed_item, returning with status 3',1);
257: oe_debug_pub.add ('inside the loop aftr chking for intiliazed colelc',1);
258: l_stmt_num:=20;
259: if p_cons_item_details(i).item_id = p_item_id THEN
260: x_recurred_item_flag := 3; --recurred item
261: oe_debug_pub.add ('check_recureed_item, returning with status 3',1);
262: RETURN;--to calling program
263: END IF;
264:
265: EXIT WHEN i =p_cons_item_details.LAST;
295: /* LBM Project */
296: exception
297: when no_data_found then
298: x_recurred_item_flag := 1;--single item not recurring
299: oe_debug_pub.add ('check_recureed_item, returning with status 1',1);
300: return;--to calling program
301: END;
302: END IF;
303:
304: l_stmt_num :=60;
305: IF (v_recurr_flag = 'Y') THEN
306:
307: x_recurred_item_flag := 2 ;--first item recurred
308: oe_debug_pub.add ('check_recureed_item, returning with status 2',1);
309:
310: l_stmt_num :=70;
311: select min(OPERATION_SEQ_NUM)
312: into x_min_op_seq_num
321: and bom.ALTERNATE_BOM_DESIGNATOR is null; --bug 4998922
322:
323: l_stmt_num :=75;
324: IF PG_DEBUG <> 0 THEN
325: oe_debug_pub.add ('check_recureed_item, min op seq'|| x_min_op_seq_num,1);
326: END IF;
327:
328: BEGIN
329: l_stmt_num :=80;
355: END;
356:
357:
358: IF PG_DEBUG <> 0 THEN
359: oe_debug_pub.add ('check_recureed_item, x_oper_lead_time_per'|| x_oper_lead_time_per ,1);
360: END IF;
361:
362: l_stmt_num :=90;
363: If (p_cons_item_details.count > 0) THEN
362: l_stmt_num :=90;
363: If (p_cons_item_details.count > 0) THEN
364: l_stmt_num :=91;
365: IF PG_DEBUG <> 0 THEN
366: oe_debug_pub.add ('check_recureed_item,count more than 0',1);
367: END IF;
368: l_index := p_cons_item_details.LAST+1;
369: p_cons_item_details(l_index).item_id := p_item_id;
370: p_cons_item_details(l_index).op_seq := x_min_op_seq_num ;
375:
376: ELSE
377: l_stmt_num :=92;
378: IF PG_DEBUG <> 0 THEN
379: oe_debug_pub.add ('check_recureed_item,first item',1);
380: END IF;
381: p_cons_item_details(1).item_id := p_item_id;
382: p_cons_item_details(1).op_seq := x_min_op_seq_num ;
383:
393:
394: EXCEPTION
395: WHEN FND_API.G_EXC_ERROR THEN
396: IF PG_DEBUG <> 0 THEN
397: oe_debug_pub.add('CTO_SUBASSEMBLY_SUP_PK: ' || 'check_recurring_item::exp error::'||to_char(l_stmt_num)||'::'||sqlerrm,1);
398: END IF;
399: RAISE FND_API.G_EXC_ERROR;
400: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
401: IF PG_DEBUG <> 0 THEN
398: END IF;
399: RAISE FND_API.G_EXC_ERROR;
400: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
401: IF PG_DEBUG <> 0 THEN
402: oe_debug_pub.add('CTO_SUBASSEMBLY_SUP_PK: ' || 'check_recurring_item::unexp error::'||to_char(l_stmt_num)||'::'||sqlerrm,1);
403: END IF;
404: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
405: WHEN OTHERS THEN
406: IF PG_DEBUG <> 0 THEN
403: END IF;
404: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
405: WHEN OTHERS THEN
406: IF PG_DEBUG <> 0 THEN
407: oe_debug_pub.add('CTO_SUBASSEMBLY_SUP_PK: ' || 'check_recurring_item::other error::'||to_char(l_stmt_num)||'::'||sqlerrm,1);
408: END IF;
409: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
410:
411:
429: BEGIN
430:
431: x_return_status := FND_API.G_RET_STS_SUCCESS ;
432: IF PG_DEBUG <> 0 THEN
433: oe_debug_pub.add ('get_working_day: ' || 'Pdate=>' ||to_char(Pdate,'mm/dd/yyyy hh24:mi:ss'),5);
434: oe_debug_pub.add ('get_working_day: ' || 'trunc_Pdate=>' ||to_char(TRUNC(Pdate),'mm/dd/yyyy hh24:mi:ss'),5);
435: oe_debug_pub.add ('get_working_day: ' || 'pleadtime =>' ||pleadtime ,5);
436:
437: END IF;
430:
431: x_return_status := FND_API.G_RET_STS_SUCCESS ;
432: IF PG_DEBUG <> 0 THEN
433: oe_debug_pub.add ('get_working_day: ' || 'Pdate=>' ||to_char(Pdate,'mm/dd/yyyy hh24:mi:ss'),5);
434: oe_debug_pub.add ('get_working_day: ' || 'trunc_Pdate=>' ||to_char(TRUNC(Pdate),'mm/dd/yyyy hh24:mi:ss'),5);
435: oe_debug_pub.add ('get_working_day: ' || 'pleadtime =>' ||pleadtime ,5);
436:
437: END IF;
438:
431: x_return_status := FND_API.G_RET_STS_SUCCESS ;
432: IF PG_DEBUG <> 0 THEN
433: oe_debug_pub.add ('get_working_day: ' || 'Pdate=>' ||to_char(Pdate,'mm/dd/yyyy hh24:mi:ss'),5);
434: oe_debug_pub.add ('get_working_day: ' || 'trunc_Pdate=>' ||to_char(TRUNC(Pdate),'mm/dd/yyyy hh24:mi:ss'),5);
435: oe_debug_pub.add ('get_working_day: ' || 'pleadtime =>' ||pleadtime ,5);
436:
437: END IF;
438:
439: IF (pdirection = 'B') THEN
468:
469: x_ret_date := l_new_date + (Pdate - TRUNC(Pdate));
470: IF PG_DEBUG <> 0 THEN
471: null;
472: oe_debug_pub.add ('get_working_day: ' || 'l_new_date=>' ||to_char(l_new_date,'mm/dd/yyyy hh24:mi:ss'),5);
473: oe_debug_pub.add ('get_working_day: ' || 'trunc_Pdate=>' ||to_char(TRUNC(Pdate),'mm/dd/yyyy hh24:mi:ss'),5);
474: oe_debug_pub.add ('get_working_day: ' || ' x_ret_date=>' ||to_char(x_ret_date,'mm/dd/yyyy hh24:mi:ss'),5);
475:
476:
469: x_ret_date := l_new_date + (Pdate - TRUNC(Pdate));
470: IF PG_DEBUG <> 0 THEN
471: null;
472: oe_debug_pub.add ('get_working_day: ' || 'l_new_date=>' ||to_char(l_new_date,'mm/dd/yyyy hh24:mi:ss'),5);
473: oe_debug_pub.add ('get_working_day: ' || 'trunc_Pdate=>' ||to_char(TRUNC(Pdate),'mm/dd/yyyy hh24:mi:ss'),5);
474: oe_debug_pub.add ('get_working_day: ' || ' x_ret_date=>' ||to_char(x_ret_date,'mm/dd/yyyy hh24:mi:ss'),5);
475:
476:
477: END IF;
470: IF PG_DEBUG <> 0 THEN
471: null;
472: oe_debug_pub.add ('get_working_day: ' || 'l_new_date=>' ||to_char(l_new_date,'mm/dd/yyyy hh24:mi:ss'),5);
473: oe_debug_pub.add ('get_working_day: ' || 'trunc_Pdate=>' ||to_char(TRUNC(Pdate),'mm/dd/yyyy hh24:mi:ss'),5);
474: oe_debug_pub.add ('get_working_day: ' || ' x_ret_date=>' ||to_char(x_ret_date,'mm/dd/yyyy hh24:mi:ss'),5);
475:
476:
477: END IF;
478:
483: x_error_message := 'CTOSUBSB.get_working_day OTHERS excpn: ' || to_char(l_stmt_num)||':' ||
484: substrb(sqlerrm,1,100);
485: IF PG_DEBUG <> 0 THEN
486:
487: oe_debug_pub.add('get_working_day: ' || 'CTOSUBSB.get_working_day OTHERS excpn: ' || x_error_message,1);
488:
489: END IF;
490:
491: /* OE_MSG_PUB.Add_Exc_Msg
538: l_total_lead_time := CEIL( nvl(pfixed_leadtime,0) +( pQty * nvl(pvariable_leadtime,0) ) ); --bugfix 2827357
539:
540: IF PG_DEBUG <> 0 THEN
541:
542: oe_debug_pub.add ('get_start_date: ' || 'pCompletion_date=>' ||to_char(pCompletion_date,'mm/dd/yyyy hh24:mi:ss'),5);
543: oe_debug_pub.add ('get_start_date: ' || 'l_total_lead_time=>' ||l_total_lead_time,5);
544:
545:
546: END IF;
539:
540: IF PG_DEBUG <> 0 THEN
541:
542: oe_debug_pub.add ('get_start_date: ' || 'pCompletion_date=>' ||to_char(pCompletion_date,'mm/dd/yyyy hh24:mi:ss'),5);
543: oe_debug_pub.add ('get_start_date: ' || 'l_total_lead_time=>' ||l_total_lead_time,5);
544:
545:
546: END IF;
547:
562: );
563:
564: /* if ( l_return_status <> FND_API.G_RET_STS_SUCCESS) then
565: IF PG_DEBUG <> 0 THEN
566: oe_debug_pub.add ('get_start_date: ' || 'get_start_date: failed after call to get_working_day with status ' || l_return_status ,1);
567:
568: oe_debug_pub.add ('get_start_date: ' || 'error message' || l_error_msg ,1);
569: END IF;
570: RAISE subprogram_exp ;
564: /* if ( l_return_status <> FND_API.G_RET_STS_SUCCESS) then
565: IF PG_DEBUG <> 0 THEN
566: oe_debug_pub.add ('get_start_date: ' || 'get_start_date: failed after call to get_working_day with status ' || l_return_status ,1);
567:
568: oe_debug_pub.add ('get_start_date: ' || 'error message' || l_error_msg ,1);
569: END IF;
570: RAISE subprogram_exp ;
571:
572: end if; */
572: end if; */
573:
574: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
575: IF PG_DEBUG <> 0 THEN
576: oe_debug_pub.add ('get_start_date: ' || 'get_start_date: failed after call to get_working_day with status ' || l_return_status ,1);
577:
578: oe_debug_pub.add ('get_start_date: ' || 'error message' || l_error_msg ,1);
579: END IF;
580: RAISE FND_API.G_EXC_ERROR;
574: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
575: IF PG_DEBUG <> 0 THEN
576: oe_debug_pub.add ('get_start_date: ' || 'get_start_date: failed after call to get_working_day with status ' || l_return_status ,1);
577:
578: oe_debug_pub.add ('get_start_date: ' || 'error message' || l_error_msg ,1);
579: END IF;
580: RAISE FND_API.G_EXC_ERROR;
581: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
582: IF PG_DEBUG <> 0 THEN
579: END IF;
580: RAISE FND_API.G_EXC_ERROR;
581: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
582: IF PG_DEBUG <> 0 THEN
583: oe_debug_pub.add ('get_start_date: ' || 'get_start_date: failed after call to get_working_day with status ' || l_return_status ,1);
584:
585: oe_debug_pub.add ('get_start_date: ' || 'error message' || l_error_msg ,1);
586: END IF;
587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
581: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
582: IF PG_DEBUG <> 0 THEN
583: oe_debug_pub.add ('get_start_date: ' || 'get_start_date: failed after call to get_working_day with status ' || l_return_status ,1);
584:
585: oe_debug_pub.add ('get_start_date: ' || 'error message' || l_error_msg ,1);
586: END IF;
587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
588: ELSE
589:
587: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
588: ELSE
589:
590: IF PG_DEBUG <> 0 THEN
591: oe_debug_pub.add('get_start_date: ' || 'success from get_working_day ' ,1);
592: END IF;
593: END IF;
594:
595:
598:
599: END IF;
600:
601: IF PG_DEBUG <> 0 THEN
602: oe_debug_pub.add ('get_start_date: ' || 'x_start_date=>' ||to_char(x_start_date,'mm/dd/yyyy hh24:mi:ss'),5);
603:
604: END IF;
605:
606: EXCEPTION
613: substrb(sqlerrm,1,100) ;
614:
615:
616: IF PG_DEBUG <> 0 THEN
617: oe_debug_pub.add('get_start_date: ' || 'CTOSUBSB.get_start_date expected excpn: ' || x_error_message,1);
618: END IF;
619:
620:
621:
625: substrb(sqlerrm,1,100) ;
626:
627:
628: IF PG_DEBUG <> 0 THEN
629: oe_debug_pub.add('get_start_date: ' || 'CTOSUBSB.get_start_date UN expected excpn: ' || x_error_message,1);
630: END IF;
631:
632:
633:
638: substrb(sqlerrm,1,100) ;
639:
640:
641: IF PG_DEBUG <> 0 THEN
642: oe_debug_pub.add('get_start_date: ' || 'CTOSUBSB.get_start_date OTHERS excpn: ' || x_error_message,1);
643: END IF;
644:
645:
646: /* OE_MSG_PUB.Add_Exc_Msg
723: );
724:
725: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
726: IF PG_DEBUG <> 0 THEN
727: oe_debug_pub.add ('get_completion_date: ' || ' failed in call to get_working_day with status ' || l_return_status ,1);
728:
729: oe_debug_pub.add ('get_completion_date: ' || 'error message' || l_error_msg ,1);
730: END IF;
731: RAISE FND_API.G_EXC_ERROR;
725: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
726: IF PG_DEBUG <> 0 THEN
727: oe_debug_pub.add ('get_completion_date: ' || ' failed in call to get_working_day with status ' || l_return_status ,1);
728:
729: oe_debug_pub.add ('get_completion_date: ' || 'error message' || l_error_msg ,1);
730: END IF;
731: RAISE FND_API.G_EXC_ERROR;
732: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
733: IF PG_DEBUG <> 0 THEN
730: END IF;
731: RAISE FND_API.G_EXC_ERROR;
732: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
733: IF PG_DEBUG <> 0 THEN
734: oe_debug_pub.add ('get_completion_date: ' || 'get_start_date: failed after call to get_working_day with status ' || l_return_status ,1);
735:
736: oe_debug_pub.add ('get_completion_date: ' || 'error message' || l_error_msg ,1);
737: END IF;
738: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
732: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
733: IF PG_DEBUG <> 0 THEN
734: oe_debug_pub.add ('get_completion_date: ' || 'get_start_date: failed after call to get_working_day with status ' || l_return_status ,1);
735:
736: oe_debug_pub.add ('get_completion_date: ' || 'error message' || l_error_msg ,1);
737: END IF;
738: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
739: ELSE
740:
738: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
739: ELSE
740:
741: IF PG_DEBUG <> 0 THEN
742: oe_debug_pub.add('get_completion_date: ' || 'success from get_working_day ' ,1);
743: END IF;
744: END IF;
745: ELSIF ( l_total_lead_time < 0 ) THEN
746: l_total_lead_time := FLOOR(l_total_lead_time);
761: );
762:
763: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
764: IF PG_DEBUG <> 0 THEN
765: oe_debug_pub.add ('get_completion_date: ' || ' failed in call to get_working_day with status ' || l_return_status ,1);
766:
767: oe_debug_pub.add ('get_completion_date: ' || 'error message' || l_error_msg ,1);
768: END IF;
769: RAISE FND_API.G_EXC_ERROR;
763: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
764: IF PG_DEBUG <> 0 THEN
765: oe_debug_pub.add ('get_completion_date: ' || ' failed in call to get_working_day with status ' || l_return_status ,1);
766:
767: oe_debug_pub.add ('get_completion_date: ' || 'error message' || l_error_msg ,1);
768: END IF;
769: RAISE FND_API.G_EXC_ERROR;
770: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
771: IF PG_DEBUG <> 0 THEN
768: END IF;
769: RAISE FND_API.G_EXC_ERROR;
770: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
771: IF PG_DEBUG <> 0 THEN
772: oe_debug_pub.add ('get_completion_date: ' || 'get_start_date: failed after call to get_working_day with status ' || l_return_status ,1);
773:
774: oe_debug_pub.add ('get_completion_date: ' || 'error message' || l_error_msg ,1);
775: END IF;
776: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
770: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
771: IF PG_DEBUG <> 0 THEN
772: oe_debug_pub.add ('get_completion_date: ' || 'get_start_date: failed after call to get_working_day with status ' || l_return_status ,1);
773:
774: oe_debug_pub.add ('get_completion_date: ' || 'error message' || l_error_msg ,1);
775: END IF;
776: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
777: ELSE
778:
776: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
777: ELSE
778:
779: IF PG_DEBUG <> 0 THEN
780: oe_debug_pub.add('get_completion_date: ' || 'success from get_working_day ' ,1);
781: END IF;
782: END IF; --PO return status
783:
784:
800:
801:
802:
803: IF PG_DEBUG <> 0 THEN
804: oe_debug_pub.add('get_completion_date: ' || 'CTOSUBSB.get_completion_date expected excpn: ' || x_error_message,1);
805: END IF;
806:
807:
808:
813:
814:
815:
816: IF PG_DEBUG <> 0 THEN
817: oe_debug_pub.add('get_completion_date: ' || 'CTOSUBSB.get_completion_date UN expected excpn: ' || x_error_message,1);
818: END IF;
819:
820:
821:
827: substrb(sqlerrm,1,100);
828:
829:
830: IF PG_DEBUG <> 0 THEN
831: oe_debug_pub.add('get_completion_date: ' || 'CTOSUBSB.get_start_date OTHERS excpn: ' || x_error_message,1);
832: END IF;
833:
834:
835: /* OE_MSG_PUB.Add_Exc_Msg
1001:
1002: IF pLower_Supplytype = 2 THEN
1003:
1004: IF PG_DEBUG <> 0 THEN
1005: oe_debug_pub.add ('get_child_configurations: ' || 'Config children alone' ,1);
1006: --Bugfix 8913125: Added these messages.
1007: oe_debug_pub.add ('get_child_configurations: Parent Item:' || pParentItemId, 1);
1008: oe_debug_pub.add ('get_child_configurations: Org:' || pOrganization_id ,1);
1009: cto_wip_workflow_api_pk.cto_debug('get_child_configurations: ','Config children alone' );
1003:
1004: IF PG_DEBUG <> 0 THEN
1005: oe_debug_pub.add ('get_child_configurations: ' || 'Config children alone' ,1);
1006: --Bugfix 8913125: Added these messages.
1007: oe_debug_pub.add ('get_child_configurations: Parent Item:' || pParentItemId, 1);
1008: oe_debug_pub.add ('get_child_configurations: Org:' || pOrganization_id ,1);
1009: cto_wip_workflow_api_pk.cto_debug('get_child_configurations: ','Config children alone' );
1010: END IF;
1011:
1004: IF PG_DEBUG <> 0 THEN
1005: oe_debug_pub.add ('get_child_configurations: ' || 'Config children alone' ,1);
1006: --Bugfix 8913125: Added these messages.
1007: oe_debug_pub.add ('get_child_configurations: Parent Item:' || pParentItemId, 1);
1008: oe_debug_pub.add ('get_child_configurations: Org:' || pOrganization_id ,1);
1009: cto_wip_workflow_api_pk.cto_debug('get_child_configurations: ','Config children alone' );
1010: END IF;
1011:
1012:
1036:
1037: EXIT when c_config_items%notfound;
1038:
1039: IF PG_DEBUG <> 0 THEN
1040: oe_debug_pub.add ('get_child_configurations: ' || 'item added' || pitems_table(l_index).item_name ,1);
1041:
1042: --Bugfix# 3418102
1043: oe_debug_pub.add ('get_child_configurations: ' || 'end_peeging_flag for project information' || pitems_table(l_index).pegging_flag ,3);
1044: END IF;
1039: IF PG_DEBUG <> 0 THEN
1040: oe_debug_pub.add ('get_child_configurations: ' || 'item added' || pitems_table(l_index).item_name ,1);
1041:
1042: --Bugfix# 3418102
1043: oe_debug_pub.add ('get_child_configurations: ' || 'end_peeging_flag for project information' || pitems_table(l_index).pegging_flag ,3);
1044: END IF;
1045:
1046: -- 5198966
1047: BEGIN
1064: pitems_table(l_index).operation_lead_time_percent := 0;
1065: END;
1066:
1067: IF PG_DEBUG <> 0 THEN
1068: oe_debug_pub.add('get_child_configurations::configs only::oltp:' || pitems_table(l_index).operation_lead_time_percent);
1069: END IF;
1070:
1071: pitems_table(l_index).parent_index := pParent_index;
1072: pitems_table(l_index).feeder_run := 'N';
1085: );
1086:
1087: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1088: IF PG_DEBUG <> 0 THEN
1089: oe_debug_pub.add ('get_child_configurations: ' || 'failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1090: END IF;
1091: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1092: RAISE FND_API.G_EXC_ERROR;
1093: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1087: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1088: IF PG_DEBUG <> 0 THEN
1089: oe_debug_pub.add ('get_child_configurations: ' || 'failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1090: END IF;
1091: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1092: RAISE FND_API.G_EXC_ERROR;
1093: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1094: IF PG_DEBUG <> 0 THEN
1095: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1091: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1092: RAISE FND_API.G_EXC_ERROR;
1093: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1094: IF PG_DEBUG <> 0 THEN
1095: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1096: END IF;
1097: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1098: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1099: ELSE
1093: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1094: IF PG_DEBUG <> 0 THEN
1095: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1096: END IF;
1097: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1098: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1099: ELSE
1100:
1101: IF PG_DEBUG <> 0 THEN
1098: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1099: ELSE
1100:
1101: IF PG_DEBUG <> 0 THEN
1102: oe_debug_pub.add('get_child_configurations: ' || 'success from CTO_UTILITY_PK.QUERY_SOURCING_ORG ' ,1);
1103: END IF;
1104: END IF;
1105:
1106:
1128: OR
1129: pitems_table(l_index).cfm_routing_flag <> 1
1130: )
1131: ) THEN
1132: oe_debug_pub.add ('calling check_recurring_item' ,1);
1133: check_recurring_item
1134: ( p_cons_item_details => p_cons_item_details,
1135: p_parent_item_id => pitems_table(pParent_index).item_id,
1136: p_organization_id => pOrganization_id,
1216:
1217: If PG_DEBUG <> 0 Then
1218: cto_wip_workflow_api_pk.cto_debug('get_child_configurations: ','Config and ato item children' );
1219: --Bugfix 8913125: Added these messages.
1220: oe_debug_pub.add ('get_child_configurations: Config and ato item children', 1);
1221: oe_debug_pub.add ('get_child_configurations: Parent Item:' || pParentItemId, 1);
1222: oe_debug_pub.add ('get_child_configurations: Org:' || pOrganization_id ,1);
1223: End if;
1224:
1217: If PG_DEBUG <> 0 Then
1218: cto_wip_workflow_api_pk.cto_debug('get_child_configurations: ','Config and ato item children' );
1219: --Bugfix 8913125: Added these messages.
1220: oe_debug_pub.add ('get_child_configurations: Config and ato item children', 1);
1221: oe_debug_pub.add ('get_child_configurations: Parent Item:' || pParentItemId, 1);
1222: oe_debug_pub.add ('get_child_configurations: Org:' || pOrganization_id ,1);
1223: End if;
1224:
1225: OPEN c_config_and_ato_items;
1218: cto_wip_workflow_api_pk.cto_debug('get_child_configurations: ','Config and ato item children' );
1219: --Bugfix 8913125: Added these messages.
1220: oe_debug_pub.add ('get_child_configurations: Config and ato item children', 1);
1221: oe_debug_pub.add ('get_child_configurations: Parent Item:' || pParentItemId, 1);
1222: oe_debug_pub.add ('get_child_configurations: Org:' || pOrganization_id ,1);
1223: End if;
1224:
1225: OPEN c_config_and_ato_items;
1226:
1250:
1251:
1252: EXIT when c_config_and_ato_items%notfound;
1253: IF PG_DEBUG <> 0 THEN
1254: oe_debug_pub.add ('get_child_configurations: ' || 'item added' || pitems_table(l_index).item_name ,1);
1255:
1256: --Bugfix# 3418102
1257: oe_debug_pub.add ('get_child_configurations: ' || 'end_pegging_flag for project information' || pitems_table(l_index).pegging_flag ,3);
1258: END IF;
1253: IF PG_DEBUG <> 0 THEN
1254: oe_debug_pub.add ('get_child_configurations: ' || 'item added' || pitems_table(l_index).item_name ,1);
1255:
1256: --Bugfix# 3418102
1257: oe_debug_pub.add ('get_child_configurations: ' || 'end_pegging_flag for project information' || pitems_table(l_index).pegging_flag ,3);
1258: END IF;
1259: l_stmt_num := 71;
1260:
1261: --Bugfix 8913125: Added these messages.
1259: l_stmt_num := 71;
1260:
1261: --Bugfix 8913125: Added these messages.
1262: If PG_DEBUG <> 0 Then
1263: oe_debug_pub.add ('get_child_configurations:stmt:l_stmt_num' || l_stmt_num);
1264: oe_debug_pub.add ('get_child_configurations:stmt:l_index:' || l_index);
1265: oe_debug_pub.add ('get_child_configurations:stmt:item_id:' || pitems_table(l_index).item_id);
1266: oe_debug_pub.add ('get_child_configurations:stmt:operation_seq_num:' || pitems_table(l_index).operation_seq_num);
1267: oe_debug_pub.add ('get_child_configurations:stmt:routing_sequence_id:' || pitems_table(l_index).routing_sequence_id);
1260:
1261: --Bugfix 8913125: Added these messages.
1262: If PG_DEBUG <> 0 Then
1263: oe_debug_pub.add ('get_child_configurations:stmt:l_stmt_num' || l_stmt_num);
1264: oe_debug_pub.add ('get_child_configurations:stmt:l_index:' || l_index);
1265: oe_debug_pub.add ('get_child_configurations:stmt:item_id:' || pitems_table(l_index).item_id);
1266: oe_debug_pub.add ('get_child_configurations:stmt:operation_seq_num:' || pitems_table(l_index).operation_seq_num);
1267: oe_debug_pub.add ('get_child_configurations:stmt:routing_sequence_id:' || pitems_table(l_index).routing_sequence_id);
1268: End If;
1261: --Bugfix 8913125: Added these messages.
1262: If PG_DEBUG <> 0 Then
1263: oe_debug_pub.add ('get_child_configurations:stmt:l_stmt_num' || l_stmt_num);
1264: oe_debug_pub.add ('get_child_configurations:stmt:l_index:' || l_index);
1265: oe_debug_pub.add ('get_child_configurations:stmt:item_id:' || pitems_table(l_index).item_id);
1266: oe_debug_pub.add ('get_child_configurations:stmt:operation_seq_num:' || pitems_table(l_index).operation_seq_num);
1267: oe_debug_pub.add ('get_child_configurations:stmt:routing_sequence_id:' || pitems_table(l_index).routing_sequence_id);
1268: End If;
1269:
1262: If PG_DEBUG <> 0 Then
1263: oe_debug_pub.add ('get_child_configurations:stmt:l_stmt_num' || l_stmt_num);
1264: oe_debug_pub.add ('get_child_configurations:stmt:l_index:' || l_index);
1265: oe_debug_pub.add ('get_child_configurations:stmt:item_id:' || pitems_table(l_index).item_id);
1266: oe_debug_pub.add ('get_child_configurations:stmt:operation_seq_num:' || pitems_table(l_index).operation_seq_num);
1267: oe_debug_pub.add ('get_child_configurations:stmt:routing_sequence_id:' || pitems_table(l_index).routing_sequence_id);
1268: End If;
1269:
1270: -- 5198966
1263: oe_debug_pub.add ('get_child_configurations:stmt:l_stmt_num' || l_stmt_num);
1264: oe_debug_pub.add ('get_child_configurations:stmt:l_index:' || l_index);
1265: oe_debug_pub.add ('get_child_configurations:stmt:item_id:' || pitems_table(l_index).item_id);
1266: oe_debug_pub.add ('get_child_configurations:stmt:operation_seq_num:' || pitems_table(l_index).operation_seq_num);
1267: oe_debug_pub.add ('get_child_configurations:stmt:routing_sequence_id:' || pitems_table(l_index).routing_sequence_id);
1268: End If;
1269:
1270: -- 5198966
1271: BEGIN
1284: and effectivity_date <= SYSDATE
1285: and nvl(disable_date, SYSDATE + 1) > SYSDATE;
1286:
1287: If PG_DEBUG <> 0 Then
1288: oe_debug_pub.add ('get_child_configurations: oltp:' ||pitems_table(l_index).operation_lead_time_percent,1);
1289: End If;
1290: --End Bugfix 8913125
1291:
1292: Exception
1313: );
1314:
1315: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1316: IF PG_DEBUG <> 0 THEN
1317: oe_debug_pub.add ('get_child_configurations: ' || 'failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1318: END IF;
1319: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1320: RAISE FND_API.G_EXC_ERROR;
1321: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1315: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1316: IF PG_DEBUG <> 0 THEN
1317: oe_debug_pub.add ('get_child_configurations: ' || 'failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1318: END IF;
1319: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1320: RAISE FND_API.G_EXC_ERROR;
1321: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1322: IF PG_DEBUG <> 0 THEN
1323: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1319: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1320: RAISE FND_API.G_EXC_ERROR;
1321: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1322: IF PG_DEBUG <> 0 THEN
1323: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1324: END IF;
1325: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1326: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1327: ELSE
1321: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1322: IF PG_DEBUG <> 0 THEN
1323: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1324: END IF;
1325: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1326: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1327: ELSE
1328:
1329: IF PG_DEBUG <> 0 THEN
1326: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1327: ELSE
1328:
1329: IF PG_DEBUG <> 0 THEN
1330: oe_debug_pub.add('get_child_configurations: ' || 'success from CTO_UTILITY_PK.QUERY_SOURCING_ORG ' ,1);
1331: END IF;
1332: END IF;
1333:
1334:
1356: OR
1357: pitems_table(l_index).cfm_routing_flag <> 1
1358: )
1359: ) THEN
1360: oe_debug_pub.add ('calling check_recurring_item for item ' ,1);
1361: check_recurring_item
1362: ( p_cons_item_details => p_cons_item_details,
1363: p_parent_item_id => pitems_table(pParent_index).item_id,
1364: p_organization_id => pOrganization_id,
1437: );
1438:
1439: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
1440: IF PG_DEBUG <> 0 THEN
1441: oe_debug_pub.add ('get_child_configurations: ' || 'failed after call to get_child_configurations with status ' || l_ret_status ,1);
1442:
1443: oe_debug_pub.add ('get_child_configurations: ' || 'error message' || l_error_message ,1);
1444: END IF;
1445: RAISE FND_API.G_EXC_ERROR;
1439: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
1440: IF PG_DEBUG <> 0 THEN
1441: oe_debug_pub.add ('get_child_configurations: ' || 'failed after call to get_child_configurations with status ' || l_ret_status ,1);
1442:
1443: oe_debug_pub.add ('get_child_configurations: ' || 'error message' || l_error_message ,1);
1444: END IF;
1445: RAISE FND_API.G_EXC_ERROR;
1446: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1447: IF PG_DEBUG <> 0 THEN
1444: END IF;
1445: RAISE FND_API.G_EXC_ERROR;
1446: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1447: IF PG_DEBUG <> 0 THEN
1448: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to get_child_configurations ' || l_ret_status ,1);
1449:
1450: oe_debug_pub.add ('get_child_configurations: ' || 'error message' || l_error_message ,1);
1451: END IF;
1452: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1446: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1447: IF PG_DEBUG <> 0 THEN
1448: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to get_child_configurations ' || l_ret_status ,1);
1449:
1450: oe_debug_pub.add ('get_child_configurations: ' || 'error message' || l_error_message ,1);
1451: END IF;
1452: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1453: ELSE
1454:
1452: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1453: ELSE
1454:
1455: IF PG_DEBUG <> 0 THEN
1456: oe_debug_pub.add('get_child_configurations: ' || 'success from get_child_configurations ' ,1);
1457: END IF;
1458: END IF;
1459:
1460:
1479: --Bugfix 8913125
1480: x_error_message := to_char(l_stmt_num)|| ': ' || substrb(sqlerrm,1,50);
1481:
1482: IF PG_DEBUG <> 0 THEN
1483: oe_debug_pub.add('get_child_configurations: ' || 'CTOSUBSB.get_child_configurations expected excpn: ' || x_error_message,1);
1484: END IF;
1485:
1486:
1487: when FND_API.G_EXC_UNEXPECTED_ERROR then
1489: --Bugfix 8913125
1490: x_error_message := to_char(l_stmt_num)|| ': ' || substrb(sqlerrm,1,50);
1491:
1492: IF PG_DEBUG <> 0 THEN
1493: oe_debug_pub.add('get_child_configurations: ' || 'CTOSUBSB.get_child_configurations UN expected excpn: ' || x_error_message,1);
1494: END IF;
1495:
1496:
1497: when OTHERS then
1499: --Bugfix 8913125
1500: x_error_message := to_char(l_stmt_num)|| ': ' || substrb(sqlerrm,1,50);
1501:
1502: IF PG_DEBUG <> 0 THEN
1503: oe_debug_pub.add('get_child_configurations: ' || 'CTOSUBSB.get_child_configurations OTHERS excpn: ' || x_error_message,1);
1504: END IF;
1505:
1506:
1507: /* OE_MSG_PUB.Add_Exc_Msg
1580:
1581:
1582: if (l_return_status = FND_API.G_RET_STS_ERROR) then --flow return status
1583: IF PG_DEBUG <> 0 THEN
1584: oe_debug_pub.add('create_flow_subassembly: ' || 'Expected error in Process Flow Schedule with status: ' || l_return_status, 1);
1585: END IF;
1586: raise FND_API.G_EXC_ERROR;
1587:
1588: elsif (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then --flow returns tatus
1586: raise FND_API.G_EXC_ERROR;
1587:
1588: elsif (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then --flow returns tatus
1589: IF PG_DEBUG <> 0 THEN
1590: oe_debug_pub.add('create_flow_subassembly: ' || 'UnExpected error in Process Flow Schedule with status: ' || l_return_status, 1);
1591: END IF;
1592: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1593:
1594: else --flow return status
1592: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1593:
1594: else --flow return status
1595: IF PG_DEBUG <> 0 THEN
1596: oe_debug_pub.add('create_flow_subassembly: ' || 'Success in Process Flow Schedule.');
1597: END IF;
1598: if (l_x_flow_schedule_rec.wip_entity_id is not NULL) then
1599: l_stmt_num := 100;
1600: IF (pflow_sch_details.count = 0 ) THEN
1658:
1659:
1660:
1661: IF PG_DEBUG <> 0 THEN
1662: oe_debug_pub.add('create_flow_subassembly: ' || 'alternate_bom_designator : ' ||l_x_flow_schedule_rec.alternate_bom_designator ,1);
1663:
1664: oe_debug_pub.add('create_flow_subassembly: ' || 'alternate_routing_desig ' ||l_x_flow_schedule_rec.alternate_routing_desig ,1);
1665:
1666: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision ' ||l_x_flow_schedule_rec.bom_revision,1);
1660:
1661: IF PG_DEBUG <> 0 THEN
1662: oe_debug_pub.add('create_flow_subassembly: ' || 'alternate_bom_designator : ' ||l_x_flow_schedule_rec.alternate_bom_designator ,1);
1663:
1664: oe_debug_pub.add('create_flow_subassembly: ' || 'alternate_routing_desig ' ||l_x_flow_schedule_rec.alternate_routing_desig ,1);
1665:
1666: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision ' ||l_x_flow_schedule_rec.bom_revision,1);
1667:
1668: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision_date ' ||l_x_flow_schedule_rec.bom_revision_date ,1);
1662: oe_debug_pub.add('create_flow_subassembly: ' || 'alternate_bom_designator : ' ||l_x_flow_schedule_rec.alternate_bom_designator ,1);
1663:
1664: oe_debug_pub.add('create_flow_subassembly: ' || 'alternate_routing_desig ' ||l_x_flow_schedule_rec.alternate_routing_desig ,1);
1665:
1666: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision ' ||l_x_flow_schedule_rec.bom_revision,1);
1667:
1668: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision_date ' ||l_x_flow_schedule_rec.bom_revision_date ,1);
1669:
1670: oe_debug_pub.add('create_flow_subassembly: ' || 'build_sequence ' ||l_x_flow_schedule_rec.build_sequence ,1);
1664: oe_debug_pub.add('create_flow_subassembly: ' || 'alternate_routing_desig ' ||l_x_flow_schedule_rec.alternate_routing_desig ,1);
1665:
1666: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision ' ||l_x_flow_schedule_rec.bom_revision,1);
1667:
1668: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision_date ' ||l_x_flow_schedule_rec.bom_revision_date ,1);
1669:
1670: oe_debug_pub.add('create_flow_subassembly: ' || 'build_sequence ' ||l_x_flow_schedule_rec.build_sequence ,1);
1671:
1672: oe_debug_pub.add('create_flow_subassembly: ' || 'class_code' ||l_x_flow_schedule_rec.class_code ,1);
1666: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision ' ||l_x_flow_schedule_rec.bom_revision,1);
1667:
1668: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision_date ' ||l_x_flow_schedule_rec.bom_revision_date ,1);
1669:
1670: oe_debug_pub.add('create_flow_subassembly: ' || 'build_sequence ' ||l_x_flow_schedule_rec.build_sequence ,1);
1671:
1672: oe_debug_pub.add('create_flow_subassembly: ' || 'class_code' ||l_x_flow_schedule_rec.class_code ,1);
1673:
1674: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_locator_id ' ||l_x_flow_schedule_rec.completion_locator_id ,1);
1668: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision_date ' ||l_x_flow_schedule_rec.bom_revision_date ,1);
1669:
1670: oe_debug_pub.add('create_flow_subassembly: ' || 'build_sequence ' ||l_x_flow_schedule_rec.build_sequence ,1);
1671:
1672: oe_debug_pub.add('create_flow_subassembly: ' || 'class_code' ||l_x_flow_schedule_rec.class_code ,1);
1673:
1674: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_locator_id ' ||l_x_flow_schedule_rec.completion_locator_id ,1);
1675:
1676: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_subinventory ' ||l_x_flow_schedule_rec.completion_subinventory ,1);
1670: oe_debug_pub.add('create_flow_subassembly: ' || 'build_sequence ' ||l_x_flow_schedule_rec.build_sequence ,1);
1671:
1672: oe_debug_pub.add('create_flow_subassembly: ' || 'class_code' ||l_x_flow_schedule_rec.class_code ,1);
1673:
1674: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_locator_id ' ||l_x_flow_schedule_rec.completion_locator_id ,1);
1675:
1676: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_subinventory ' ||l_x_flow_schedule_rec.completion_subinventory ,1);
1677:
1678: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_class' ||l_x_flow_schedule_rec.demand_class ,1);
1672: oe_debug_pub.add('create_flow_subassembly: ' || 'class_code' ||l_x_flow_schedule_rec.class_code ,1);
1673:
1674: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_locator_id ' ||l_x_flow_schedule_rec.completion_locator_id ,1);
1675:
1676: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_subinventory ' ||l_x_flow_schedule_rec.completion_subinventory ,1);
1677:
1678: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_class' ||l_x_flow_schedule_rec.demand_class ,1);
1679:
1680: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_delivery' ||l_x_flow_schedule_rec.demand_source_delivery ,1);
1674: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_locator_id ' ||l_x_flow_schedule_rec.completion_locator_id ,1);
1675:
1676: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_subinventory ' ||l_x_flow_schedule_rec.completion_subinventory ,1);
1677:
1678: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_class' ||l_x_flow_schedule_rec.demand_class ,1);
1679:
1680: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_delivery' ||l_x_flow_schedule_rec.demand_source_delivery ,1);
1681:
1682: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_header_id ' ||l_x_flow_schedule_rec.demand_source_header_id ,1);
1676: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_subinventory ' ||l_x_flow_schedule_rec.completion_subinventory ,1);
1677:
1678: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_class' ||l_x_flow_schedule_rec.demand_class ,1);
1679:
1680: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_delivery' ||l_x_flow_schedule_rec.demand_source_delivery ,1);
1681:
1682: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_header_id ' ||l_x_flow_schedule_rec.demand_source_header_id ,1);
1683:
1684: oe_debug_pub.add('create_flow_subassembly: ' || 'line_id' ||l_x_flow_schedule_rec.line_id ,1);
1678: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_class' ||l_x_flow_schedule_rec.demand_class ,1);
1679:
1680: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_delivery' ||l_x_flow_schedule_rec.demand_source_delivery ,1);
1681:
1682: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_header_id ' ||l_x_flow_schedule_rec.demand_source_header_id ,1);
1683:
1684: oe_debug_pub.add('create_flow_subassembly: ' || 'line_id' ||l_x_flow_schedule_rec.line_id ,1);
1685:
1686: oe_debug_pub.add('create_flow_subassembly: ' || 'organization_id ' ||l_x_flow_schedule_rec.organization_id ,1);
1680: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_delivery' ||l_x_flow_schedule_rec.demand_source_delivery ,1);
1681:
1682: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_header_id ' ||l_x_flow_schedule_rec.demand_source_header_id ,1);
1683:
1684: oe_debug_pub.add('create_flow_subassembly: ' || 'line_id' ||l_x_flow_schedule_rec.line_id ,1);
1685:
1686: oe_debug_pub.add('create_flow_subassembly: ' || 'organization_id ' ||l_x_flow_schedule_rec.organization_id ,1);
1687:
1688: oe_debug_pub.add('create_flow_subassembly: ' || 'planned_quantity' ||l_x_flow_schedule_rec.planned_quantity ,1);
1682: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_header_id ' ||l_x_flow_schedule_rec.demand_source_header_id ,1);
1683:
1684: oe_debug_pub.add('create_flow_subassembly: ' || 'line_id' ||l_x_flow_schedule_rec.line_id ,1);
1685:
1686: oe_debug_pub.add('create_flow_subassembly: ' || 'organization_id ' ||l_x_flow_schedule_rec.organization_id ,1);
1687:
1688: oe_debug_pub.add('create_flow_subassembly: ' || 'planned_quantity' ||l_x_flow_schedule_rec.planned_quantity ,1);
1689:
1690: oe_debug_pub.add('create_flow_subassembly: ' || 'primary_item_id ' ||l_x_flow_schedule_rec.primary_item_id ,1);
1684: oe_debug_pub.add('create_flow_subassembly: ' || 'line_id' ||l_x_flow_schedule_rec.line_id ,1);
1685:
1686: oe_debug_pub.add('create_flow_subassembly: ' || 'organization_id ' ||l_x_flow_schedule_rec.organization_id ,1);
1687:
1688: oe_debug_pub.add('create_flow_subassembly: ' || 'planned_quantity' ||l_x_flow_schedule_rec.planned_quantity ,1);
1689:
1690: oe_debug_pub.add('create_flow_subassembly: ' || 'primary_item_id ' ||l_x_flow_schedule_rec.primary_item_id ,1);
1691:
1692: oe_debug_pub.add('create_flow_subassembly: ' || 'project_id ' ||l_x_flow_schedule_rec.project_id ,1);
1686: oe_debug_pub.add('create_flow_subassembly: ' || 'organization_id ' ||l_x_flow_schedule_rec.organization_id ,1);
1687:
1688: oe_debug_pub.add('create_flow_subassembly: ' || 'planned_quantity' ||l_x_flow_schedule_rec.planned_quantity ,1);
1689:
1690: oe_debug_pub.add('create_flow_subassembly: ' || 'primary_item_id ' ||l_x_flow_schedule_rec.primary_item_id ,1);
1691:
1692: oe_debug_pub.add('create_flow_subassembly: ' || 'project_id ' ||l_x_flow_schedule_rec.project_id ,1);
1693:
1694: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_completed ' ||l_x_flow_schedule_rec.quantity_completed ,1);
1688: oe_debug_pub.add('create_flow_subassembly: ' || 'planned_quantity' ||l_x_flow_schedule_rec.planned_quantity ,1);
1689:
1690: oe_debug_pub.add('create_flow_subassembly: ' || 'primary_item_id ' ||l_x_flow_schedule_rec.primary_item_id ,1);
1691:
1692: oe_debug_pub.add('create_flow_subassembly: ' || 'project_id ' ||l_x_flow_schedule_rec.project_id ,1);
1693:
1694: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_completed ' ||l_x_flow_schedule_rec.quantity_completed ,1);
1695:
1696: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_completion_date ' ||l_x_flow_schedule_rec.scheduled_completion_date ,1);
1690: oe_debug_pub.add('create_flow_subassembly: ' || 'primary_item_id ' ||l_x_flow_schedule_rec.primary_item_id ,1);
1691:
1692: oe_debug_pub.add('create_flow_subassembly: ' || 'project_id ' ||l_x_flow_schedule_rec.project_id ,1);
1693:
1694: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_completed ' ||l_x_flow_schedule_rec.quantity_completed ,1);
1695:
1696: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_completion_date ' ||l_x_flow_schedule_rec.scheduled_completion_date ,1);
1697:
1698: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_flag ' ||l_x_flow_schedule_rec.scheduled_flag ,1);
1692: oe_debug_pub.add('create_flow_subassembly: ' || 'project_id ' ||l_x_flow_schedule_rec.project_id ,1);
1693:
1694: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_completed ' ||l_x_flow_schedule_rec.quantity_completed ,1);
1695:
1696: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_completion_date ' ||l_x_flow_schedule_rec.scheduled_completion_date ,1);
1697:
1698: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_flag ' ||l_x_flow_schedule_rec.scheduled_flag ,1);
1699:
1700: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_start_date' ||l_x_flow_schedule_rec.scheduled_start_date ,1);
1694: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_completed ' ||l_x_flow_schedule_rec.quantity_completed ,1);
1695:
1696: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_completion_date ' ||l_x_flow_schedule_rec.scheduled_completion_date ,1);
1697:
1698: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_flag ' ||l_x_flow_schedule_rec.scheduled_flag ,1);
1699:
1700: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_start_date' ||l_x_flow_schedule_rec.scheduled_start_date ,1);
1701:
1702: oe_debug_pub.add('create_flow_subassembly: ' || 'task_id ' ||l_x_flow_schedule_rec.task_id ,1);
1696: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_completion_date ' ||l_x_flow_schedule_rec.scheduled_completion_date ,1);
1697:
1698: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_flag ' ||l_x_flow_schedule_rec.scheduled_flag ,1);
1699:
1700: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_start_date' ||l_x_flow_schedule_rec.scheduled_start_date ,1);
1701:
1702: oe_debug_pub.add('create_flow_subassembly: ' || 'task_id ' ||l_x_flow_schedule_rec.task_id ,1);
1703:
1704: oe_debug_pub.add('create_flow_subassembly: ' || 'wip_entity_id ' ||l_x_flow_schedule_rec.wip_entity_id ,1);
1698: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_flag ' ||l_x_flow_schedule_rec.scheduled_flag ,1);
1699:
1700: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_start_date' ||l_x_flow_schedule_rec.scheduled_start_date ,1);
1701:
1702: oe_debug_pub.add('create_flow_subassembly: ' || 'task_id ' ||l_x_flow_schedule_rec.task_id ,1);
1703:
1704: oe_debug_pub.add('create_flow_subassembly: ' || 'wip_entity_id ' ||l_x_flow_schedule_rec.wip_entity_id ,1);
1705:
1706: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_by' ||l_x_flow_schedule_rec.scheduled_by,1);
1700: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_start_date' ||l_x_flow_schedule_rec.scheduled_start_date ,1);
1701:
1702: oe_debug_pub.add('create_flow_subassembly: ' || 'task_id ' ||l_x_flow_schedule_rec.task_id ,1);
1703:
1704: oe_debug_pub.add('create_flow_subassembly: ' || 'wip_entity_id ' ||l_x_flow_schedule_rec.wip_entity_id ,1);
1705:
1706: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_by' ||l_x_flow_schedule_rec.scheduled_by,1);
1707:
1708: oe_debug_pub.add('create_flow_subassembly: ' || 'operation ' ||l_x_flow_schedule_rec.operation,1);
1702: oe_debug_pub.add('create_flow_subassembly: ' || 'task_id ' ||l_x_flow_schedule_rec.task_id ,1);
1703:
1704: oe_debug_pub.add('create_flow_subassembly: ' || 'wip_entity_id ' ||l_x_flow_schedule_rec.wip_entity_id ,1);
1705:
1706: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_by' ||l_x_flow_schedule_rec.scheduled_by,1);
1707:
1708: oe_debug_pub.add('create_flow_subassembly: ' || 'operation ' ||l_x_flow_schedule_rec.operation,1);
1709:
1710: oe_debug_pub.add('create_flow_subassembly: ' || 'db_flag ' ||l_x_flow_schedule_rec.db_flag ,1);
1704: oe_debug_pub.add('create_flow_subassembly: ' || 'wip_entity_id ' ||l_x_flow_schedule_rec.wip_entity_id ,1);
1705:
1706: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_by' ||l_x_flow_schedule_rec.scheduled_by,1);
1707:
1708: oe_debug_pub.add('create_flow_subassembly: ' || 'operation ' ||l_x_flow_schedule_rec.operation,1);
1709:
1710: oe_debug_pub.add('create_flow_subassembly: ' || 'db_flag ' ||l_x_flow_schedule_rec.db_flag ,1);
1711:
1712: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_scrapped ' ||l_x_flow_schedule_rec.quantity_scrapped ,1);
1706: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_by' ||l_x_flow_schedule_rec.scheduled_by,1);
1707:
1708: oe_debug_pub.add('create_flow_subassembly: ' || 'operation ' ||l_x_flow_schedule_rec.operation,1);
1709:
1710: oe_debug_pub.add('create_flow_subassembly: ' || 'db_flag ' ||l_x_flow_schedule_rec.db_flag ,1);
1711:
1712: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_scrapped ' ||l_x_flow_schedule_rec.quantity_scrapped ,1);
1713:
1714: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_schedule_num' ||l_x_flow_schedule_rec.synch_schedule_num ,1);
1708: oe_debug_pub.add('create_flow_subassembly: ' || 'operation ' ||l_x_flow_schedule_rec.operation,1);
1709:
1710: oe_debug_pub.add('create_flow_subassembly: ' || 'db_flag ' ||l_x_flow_schedule_rec.db_flag ,1);
1711:
1712: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_scrapped ' ||l_x_flow_schedule_rec.quantity_scrapped ,1);
1713:
1714: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_schedule_num' ||l_x_flow_schedule_rec.synch_schedule_num ,1);
1715:
1716: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_operation_seq_num ' ||l_x_flow_schedule_rec.synch_operation_seq_num ,1);
1710: oe_debug_pub.add('create_flow_subassembly: ' || 'db_flag ' ||l_x_flow_schedule_rec.db_flag ,1);
1711:
1712: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_scrapped ' ||l_x_flow_schedule_rec.quantity_scrapped ,1);
1713:
1714: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_schedule_num' ||l_x_flow_schedule_rec.synch_schedule_num ,1);
1715:
1716: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_operation_seq_num ' ||l_x_flow_schedule_rec.synch_operation_seq_num ,1);
1717:
1718: oe_debug_pub.add('create_flow_subassembly: ' || 'roll_forwarded_flag ' ||l_x_flow_schedule_rec.roll_forwarded_flag ,1);
1712: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_scrapped ' ||l_x_flow_schedule_rec.quantity_scrapped ,1);
1713:
1714: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_schedule_num' ||l_x_flow_schedule_rec.synch_schedule_num ,1);
1715:
1716: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_operation_seq_num ' ||l_x_flow_schedule_rec.synch_operation_seq_num ,1);
1717:
1718: oe_debug_pub.add('create_flow_subassembly: ' || 'roll_forwarded_flag ' ||l_x_flow_schedule_rec.roll_forwarded_flag ,1);
1719:
1720: oe_debug_pub.add('create_flow_subassembly: ' || 'current_line_operation ' ||l_x_flow_schedule_rec.current_line_operation ,1);
1714: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_schedule_num' ||l_x_flow_schedule_rec.synch_schedule_num ,1);
1715:
1716: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_operation_seq_num ' ||l_x_flow_schedule_rec.synch_operation_seq_num ,1);
1717:
1718: oe_debug_pub.add('create_flow_subassembly: ' || 'roll_forwarded_flag ' ||l_x_flow_schedule_rec.roll_forwarded_flag ,1);
1719:
1720: oe_debug_pub.add('create_flow_subassembly: ' || 'current_line_operation ' ||l_x_flow_schedule_rec.current_line_operation ,1);
1721:
1722:
1716: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_operation_seq_num ' ||l_x_flow_schedule_rec.synch_operation_seq_num ,1);
1717:
1718: oe_debug_pub.add('create_flow_subassembly: ' || 'roll_forwarded_flag ' ||l_x_flow_schedule_rec.roll_forwarded_flag ,1);
1719:
1720: oe_debug_pub.add('create_flow_subassembly: ' || 'current_line_operation ' ||l_x_flow_schedule_rec.current_line_operation ,1);
1721:
1722:
1723:
1724:
1740:
1741:
1742: IF PG_DEBUG <> 0 THEN
1743: IF PG_DEBUG <> 0 THEN
1744: oe_debug_pub.add('create_flow_subassembly: ' || 'CTOSUBSB.create_flow_subassembly expected excpn: ' || x_error_message,1);
1745: END IF;
1746: END IF;
1747:
1748:
1753:
1754:
1755: IF PG_DEBUG <> 0 THEN
1756: IF PG_DEBUG <> 0 THEN
1757: oe_debug_pub.add('create_flow_subassembly: ' || 'CTOSUBSB.create_flow_subassembly UN expected excpn: ' || x_error_message,1);
1758: END IF;
1759: END IF;
1760:
1761:
1766: substrb(sqlerrm,1,100);
1767:
1768: IF PG_DEBUG <> 0 THEN
1769: IF PG_DEBUG <> 0 THEN
1770: oe_debug_pub.add('create_flow_subassembly: ' || 'CTOSUBSB.create_flow_subassembly OTHERS excpn: ' || x_error_message,1);
1771: END IF;
1772: END IF;
1773:
1774:
1854: IF (p_order_details_tab.COUNT <> 0) THEN
1855: FOR order_details_cntr IN 1..p_order_details_tab.COUNT
1856: LOOP
1857: IF PG_DEBUG <> 0 THEN
1858: oe_debug_pub.add(' SUPPLY FOR ORDER NUMBER = ' || p_order_details_tab(order_details_cntr).order_number ||
1859: 'LINE_ID = ' || p_order_details_tab(order_details_cntr).order_line_id ,1);
1860: oe_debug_pub.add('-----------------------------------------------------------------------------------------',1);
1861: --CTO DEBUG FILE
1862: cto_wip_workflow_api_pk.cto_debug ('get_mlsupply_details',' SUPPLY FOR ORDER NUMBER = ' || p_order_details_tab(order_details_cntr).order_number ||
1856: LOOP
1857: IF PG_DEBUG <> 0 THEN
1858: oe_debug_pub.add(' SUPPLY FOR ORDER NUMBER = ' || p_order_details_tab(order_details_cntr).order_number ||
1859: 'LINE_ID = ' || p_order_details_tab(order_details_cntr).order_line_id ,1);
1860: oe_debug_pub.add('-----------------------------------------------------------------------------------------',1);
1861: --CTO DEBUG FILE
1862: cto_wip_workflow_api_pk.cto_debug ('get_mlsupply_details',' SUPPLY FOR ORDER NUMBER = ' || p_order_details_tab(order_details_cntr).order_number ||
1863: 'LINE_ID = ' || p_order_details_tab(order_details_cntr).order_line_id );
1864: cto_wip_workflow_api_pk.cto_debug ('get_mlsupply_details','-----------------------------------------------------------------------------------------');
1861: --CTO DEBUG FILE
1862: cto_wip_workflow_api_pk.cto_debug ('get_mlsupply_details',' SUPPLY FOR ORDER NUMBER = ' || p_order_details_tab(order_details_cntr).order_number ||
1863: 'LINE_ID = ' || p_order_details_tab(order_details_cntr).order_line_id );
1864: cto_wip_workflow_api_pk.cto_debug ('get_mlsupply_details','-----------------------------------------------------------------------------------------');
1865: oe_debug_pub.add('INDEX--'||'PARENT_INDEX--'||'ITEM_ID--'||'ITEM_NAME--'||'ITEM_QTY--'||
1866: 'NEEDED_ITEM_QTY--'|| 'CONFIG/ATO--'||'JOB_START_DATE--'||'JOB_COMPLETION_DATE--'||
1867: 'SOURCED--'||'DISCREATE/FLOW/BUY--'||'COMMENTS',1);
1868: cto_wip_workflow_api_pk.cto_debug ('get_mlsupply_details','INDEX--'||'PARENT_INDEX--'||'ITEM_ID--'||'ITEM_NAME--'||'ITEM_QTY--'||
1869: 'NEEDED_ITEM_QTY--'|| 'CONFIG/ATO--'||'JOB_START_DATE--'||'JOB_COMPLETION_DATE--'||
1914: END IF; --cfm flag
1915: END IF; --source type
1916:
1917: IF PG_DEBUG <> 0 THEN
1918: oe_debug_pub.add(p_supply_details_tab(supply_details_cntr).item_index
1919: ||' -- '||p_supply_details_tab(supply_details_cntr).parent_index
1920: ||' -- '||p_supply_details_tab(supply_details_cntr).item_id
1921: ||' -- '||p_supply_details_tab(supply_details_cntr).item_name
1922: ||' -- '||p_supply_details_tab(supply_details_cntr).item_quantity
1949: CLOSE c_flow_supply ;
1950:
1951: IF (p_flow_supply_tab.COUNT <> 0) THEN
1952: IF PG_DEBUG <> 0 THEN
1953: oe_debug_pub.add('INDEX(from above)--'||'SCHEDULE_NUMBER--'||'SCHEDULE_START_DATE--'||'SCHEDULE_COMPLETION_DATE--'||'PARENT_SCHEDULE_NUM(if flow parent)',1);
1954: cto_wip_workflow_api_pk.cto_debug ('get_mlsupply_details','INDEX(from above)--'||'SCHEDULE_NUMBER--'||'SCHEDULE_START_DATE--'||'SCHEDULE_COMPLETION_DATE--'||'PARENT_SCHEDULE_NUM(if flow parent)');
1955: END IF;
1956:
1957: FOR flow_supply_cntr IN 1..p_flow_supply_tab.COUNT
1956:
1957: FOR flow_supply_cntr IN 1..p_flow_supply_tab.COUNT
1958: LOOP
1959: IF PG_DEBUG <> 0 THEN
1960: oe_debug_pub.add(p_flow_supply_tab(flow_supply_cntr).item_index
1961: ||' -- '||p_flow_supply_tab(flow_supply_cntr).schedule_number
1962: ||' -- '||TO_CHAR(p_flow_supply_tab(flow_supply_cntr).scheduled_start_date,'mm/dd/yyyy hh24:mi:ss')
1963: ||' -- '|| TO_CHAR(p_flow_supply_tab(flow_supply_cntr).scheduled_completion_date,'mm/dd/yyyy hh24:mi:ss')
1964: ||' -- '||p_flow_supply_tab(flow_supply_cntr).synch_schedule_num,1);
1975: END IF;
1976:
1977: IF l_run_req_import_flag = 'Y' THEN
1978: --bugfix 2755695
1979: oe_debug_pub.add('SUB-ASSEMBLY(S) WITH BUY or TRANSFER SOURCING RULE EXIST(S) , PLEASE RUN REQUISITION IMPORT PROGRAM WITH IMPORT SOURCE => CTO-LOWER LEVEL ',1 );
1980: END IF;
1981: END get_mlsupply_details;
1982:
1983:
2216:
2217:
2218: EXIT when c_flow_sch%notfound;
2219:
2220: oe_debug_pub.add('create_subassembly_supply'||'top most flow parent schdeule number' || l_flow_sch_details(flow_index).schedule_number);
2221:
2222:
2223:
2224: IF (flow_index = 1 ) THEN
2330:
2331: l_stmt_num := 190;
2332: If PG_DEBUG <> 0 Then
2333: cto_wip_workflow_api_pk.cto_debug('Create_sub_assembly_jobs','Before calling get_child_configurations' );
2334: oe_debug_pub.add ('create_subassembly_jobs: ' || 'Before calling get_child_configurations',1);
2335: End if;
2336: get_child_configurations
2337: (
2338: pParentItemId =>l_mlsupply_items(1).item_id,
2348: l_stmt_num := 19100;
2349:
2350: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2351: IF PG_DEBUG <> 0 THEN
2352: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_child_configurations with status ' || l_return_status ,1);
2353:
2354: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2355: END IF;
2356: RAISE FND_API.G_EXC_ERROR;
2350: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2351: IF PG_DEBUG <> 0 THEN
2352: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_child_configurations with status ' || l_return_status ,1);
2353:
2354: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2355: END IF;
2356: RAISE FND_API.G_EXC_ERROR;
2357: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2358: IF PG_DEBUG <> 0 THEN
2355: END IF;
2356: RAISE FND_API.G_EXC_ERROR;
2357: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2358: IF PG_DEBUG <> 0 THEN
2359: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_child_configurations ' || l_return_status ,1);
2360:
2361: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2362: END IF;
2363: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2357: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2358: IF PG_DEBUG <> 0 THEN
2359: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_child_configurations ' || l_return_status ,1);
2360:
2361: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2362: END IF;
2363: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2364: ELSE
2365: IF PG_DEBUG <> 0 THEN
2362: END IF;
2363: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2364: ELSE
2365: IF PG_DEBUG <> 0 THEN
2366: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from get_child_configurations ' ,1);
2367: END IF;
2368: END IF;
2369: l_stmt_num := 19101;
2370:
2378:
2379:
2380: --getting completion date
2381:
2382: oe_debug_pub.add('Before starting logic of completion date',1);
2383:
2384:
2385: IF (l_mlsupply_items.count > 0) THEN --checks for uninitialized collection --bugfix2308063
2386:
2387: l_index := 2;--completion date is needed from 2nd level discrete item
2388: l_stmt_num := 19103;
2389: LOOP
2390:
2391: oe_debug_pub.add('Looping for item'||l_mlsupply_items(l_index).item_name,1);
2392: l_mlsupply_items(l_index).order_line_id := p_Top_Assembly_LineId;
2393:
2394: --insert data into MAIN table
2395:
2458: l_phantom := 'N';
2459:
2460: end;
2461:
2462: oe_debug_pub.add('Phantom flag'||l_phantom,1);
2463:
2464: IF l_phantom = 'Y' THEN
2465: oe_debug_pub.add('About to call process_phantoms',1);
2466: --call process children under phatom
2461:
2462: oe_debug_pub.add('Phantom flag'||l_phantom,1);
2463:
2464: IF l_phantom = 'Y' THEN
2465: oe_debug_pub.add('About to call process_phantoms',1);
2466: --call process children under phatom
2467: process_phantoms
2468: (
2469: pitems_table=>l_mlsupply_items,
2478:
2479: l_index := 2;--completion date is needed from 2nd level discrete item
2480: LOOP
2481:
2482: oe_debug_pub.add('Looping again for item'||l_mlsupply_items(l_index).item_name,1);
2483: l_mlsupply_items(l_index).order_line_id := p_Top_Assembly_LineId;
2484:
2485: -- rkaza. ireq project. 05/03/2005.
2486: -- Enabling 100% transfer rule supply creation for lower
2502: INTO l_finite_scheduler_flag
2503: FROM wip_parameters
2504: WHERE organization_id = l_ship_org;
2505:
2506: oe_debug_pub.add ('create_subassembly_jobs: ' || 'l_finite_scheduler_flag is '|| l_finite_scheduler_flag ,1);
2507:
2508: END IF;--finnite scheduler
2509:
2510:
2527:
2528:
2529: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2530: IF PG_DEBUG <> 0 THEN
2531: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_start_date with status ' || l_return_status ,1);
2532:
2533: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2534: END IF;
2535: RAISE FND_API.G_EXC_ERROR;
2529: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2530: IF PG_DEBUG <> 0 THEN
2531: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_start_date with status ' || l_return_status ,1);
2532:
2533: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2534: END IF;
2535: RAISE FND_API.G_EXC_ERROR;
2536: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2537: IF PG_DEBUG <> 0 THEN
2534: END IF;
2535: RAISE FND_API.G_EXC_ERROR;
2536: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2537: IF PG_DEBUG <> 0 THEN
2538: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_start_date ' || l_return_status ,1);
2539:
2540: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage,1);
2541: END IF;
2542: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2536: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2537: IF PG_DEBUG <> 0 THEN
2538: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_start_date ' || l_return_status ,1);
2539:
2540: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage,1);
2541: END IF;
2542: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2543: ELSE
2544: IF PG_DEBUG <> 0 THEN
2541: END IF;
2542: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2543: ELSE
2544: IF PG_DEBUG <> 0 THEN
2545: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from get_start_date ' ,1);
2546: END IF;
2547: END IF;
2548:
2549:
2554: --populate start date flag = 1implies insert satrt date in wjsi instead of completion date
2555: l_mlsupply_items(l_mlsupply_items(l_index).parent_index).populate_start_date := 1;
2556:
2557: IF PG_DEBUG <> 0 THEN
2558: oe_debug_pub.add('create_subassembly_jobs: ' || 'actual parent starts date is < sysdate ' ,1);
2559: END IF;
2560:
2561: ELSE
2562: l_mlsupply_items(l_mlsupply_items(l_index).parent_index).job_start_date := x_parent_job_start_date;
2559: END IF;
2560:
2561: ELSE
2562: l_mlsupply_items(l_mlsupply_items(l_index).parent_index).job_start_date := x_parent_job_start_date;
2563: oe_debug_pub.add('create_subassembly_jobs: ' || 'parent_start_date '|| to_char(x_parent_job_start_date,'mm/dd/yy hh24:mi:ss') ,1);
2564:
2565: END IF;
2566:
2567: ELSE
2565: END IF;
2566:
2567: ELSE
2568: l_mlsupply_items(l_mlsupply_items(l_index).parent_index).job_start_date := x_parent_job_start_date;
2569: oe_debug_pub.add('create_subassembly_jobs: ' || 'parent_start_date '|| to_char(x_parent_job_start_date,'mm/dd/yy hh:mi:ss') ,1);
2570: END IF ;
2571:
2572:
2573:
2603:
2604:
2605: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2606: IF PG_DEBUG <> 0 THEN
2607: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get-completion_date with status ' || l_return_status ,1);
2608:
2609: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2610: END IF;
2611: RAISE FND_API.G_EXC_ERROR;
2605: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2606: IF PG_DEBUG <> 0 THEN
2607: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get-completion_date with status ' || l_return_status ,1);
2608:
2609: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2610: END IF;
2611: RAISE FND_API.G_EXC_ERROR;
2612: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2613: IF PG_DEBUG <> 0 THEN
2610: END IF;
2611: RAISE FND_API.G_EXC_ERROR;
2612: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2613: IF PG_DEBUG <> 0 THEN
2614: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_completion_date ' || l_return_status ,1);
2615:
2616: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2617: END IF;
2618: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2612: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2613: IF PG_DEBUG <> 0 THEN
2614: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_completion_date ' || l_return_status ,1);
2615:
2616: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2617: END IF;
2618: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2619: ELSE
2620: IF PG_DEBUG <> 0 THEN
2617: END IF;
2618: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2619: ELSE
2620: IF PG_DEBUG <> 0 THEN
2621: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from get_completion_date ' ,1);
2622: oe_debug_pub.add('create_subassembly_jobs: ' || 'parent_start_date '|| to_char(x_parent_job_start_date,'mm/dd/yy hh:mi:ss') ,1);
2623: END IF;
2624: END IF;
2625:
2618: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2619: ELSE
2620: IF PG_DEBUG <> 0 THEN
2621: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from get_completion_date ' ,1);
2622: oe_debug_pub.add('create_subassembly_jobs: ' || 'parent_start_date '|| to_char(x_parent_job_start_date,'mm/dd/yy hh:mi:ss') ,1);
2623: END IF;
2624: END IF;
2625:
2626:
2669: );
2670:
2671: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2672: IF PG_DEBUG <> 0 THEN
2673: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_start_date with status ' || l_return_status ,1);
2674:
2675: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2676: END IF;
2677: RAISE FND_API.G_EXC_ERROR;
2671: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2672: IF PG_DEBUG <> 0 THEN
2673: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_start_date with status ' || l_return_status ,1);
2674:
2675: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2676: END IF;
2677: RAISE FND_API.G_EXC_ERROR;
2678: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2679: IF PG_DEBUG <> 0 THEN
2676: END IF;
2677: RAISE FND_API.G_EXC_ERROR;
2678: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2679: IF PG_DEBUG <> 0 THEN
2680: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_start_date ' || l_return_status ,1);
2681:
2682: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage,1);
2683: END IF;
2684: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2678: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2679: IF PG_DEBUG <> 0 THEN
2680: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_start_date ' || l_return_status ,1);
2681:
2682: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage,1);
2683: END IF;
2684: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2685: ELSE
2686: IF PG_DEBUG <> 0 THEN
2683: END IF;
2684: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2685: ELSE
2686: IF PG_DEBUG <> 0 THEN
2687: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from get_start_date ' ,1);
2688: END IF;
2689: END IF;
2690:
2691: IF (x_parent_job_start_date <= SYSDATE) THEN
2691: IF (x_parent_job_start_date <= SYSDATE) THEN
2692: l_mlsupply_items(l_index).job_start_date := SYSDATE;
2693:
2694: IF PG_DEBUG <> 0 THEN
2695: oe_debug_pub.add('create_subassembly_jobs: ' || 'actual parent starts date is < sysdate ' ,1);
2696: END IF;
2697:
2698: ELSE
2699: l_mlsupply_items(l_index).job_start_date := x_parent_job_start_date;
2696: END IF;
2697:
2698: ELSE
2699: l_mlsupply_items(l_index).job_start_date := x_parent_job_start_date;
2700: oe_debug_pub.add('create_subassembly_jobs: ' || 'parent_start_date '|| to_char(x_parent_job_start_date,'mm/dd/yy hh:mi:ss') ,1);
2701:
2702: END IF;
2703:
2704:
2753: l_stmt_num := 210;
2754: If PG_DEBUG <> 0 Then
2755: cto_wip_workflow_api_pk.cto_debug ('create_sub_assembly_jobs','calling create flow schedule for'|| l_mlsupply_items(l_index).item_id);
2756:
2757: oe_debug_pub.add('create_subassembly_jobs: ' || 'calling create flow schedule for'|| l_mlsupply_items(l_index).item_id);
2758: END IF;
2759:
2760: create_flow_subassembly (
2761: pflow_sch_details => l_flow_sch_details,
2771: );
2772:
2773: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2774: IF PG_DEBUG <> 0 THEN
2775: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to create_flow_subassembly with status ' || l_return_status ,1);
2776:
2777: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2778: END IF;
2779: RAISE FND_API.G_EXC_ERROR;
2773: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2774: IF PG_DEBUG <> 0 THEN
2775: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to create_flow_subassembly with status ' || l_return_status ,1);
2776:
2777: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2778: END IF;
2779: RAISE FND_API.G_EXC_ERROR;
2780: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2781: IF PG_DEBUG <> 0 THEN
2778: END IF;
2779: RAISE FND_API.G_EXC_ERROR;
2780: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2781: IF PG_DEBUG <> 0 THEN
2782: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to create_flow_subassembly ' || l_return_status ,1);
2783:
2784: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2785: END IF;
2786: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2780: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2781: IF PG_DEBUG <> 0 THEN
2782: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to create_flow_subassembly ' || l_return_status ,1);
2783:
2784: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2785: END IF;
2786: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2787: ELSE
2788:
2786: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2787: ELSE
2788:
2789: IF PG_DEBUG <> 0 THEN
2790: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from create_flow_subassembly ' ,1);
2791: END IF;
2792: END IF;
2793:
2794:
2796: END IF; --make
2797: ELSE --parent is flow item
2798:
2799:
2800: oe_debug_pub.add (l_mlsupply_items(l_index).item_name || ' parent is a flow item',1);
2801:
2802: -- if current item is discrete do not call feeder
2803: -- if current item is flow call feeder
2804:
2805:
2806:
2807: IF(l_mlsupply_items(l_index).cfm_routing_flag =1 ) THEN -- child is flow
2808:
2809: oe_debug_pub.add('checking if feeder is run',1);
2810: IF ( l_mlsupply_items(l_mlsupply_items(l_index).parent_index).feeder_run <> 'Y' ) THEN
2811: oe_debug_pub.add('calling feeder line api');
2812:
2813: l_stmt_num := 220;
2807: IF(l_mlsupply_items(l_index).cfm_routing_flag =1 ) THEN -- child is flow
2808:
2809: oe_debug_pub.add('checking if feeder is run',1);
2810: IF ( l_mlsupply_items(l_mlsupply_items(l_index).parent_index).feeder_run <> 'Y' ) THEN
2811: oe_debug_pub.add('calling feeder line api');
2812:
2813: l_stmt_num := 220;
2814: SELECT max(scheduled_completion_date)
2815: into max_completion_date
2816: from BOM_CTO_MLSUPPLY_FLOW_TEMP
2817: where item_index = l_mlsupply_items(l_index).parent_index
2818: and order_line_id = p_Top_Assembly_LineId ;
2819:
2820: oe_debug_pub.add('aparameters for feeder call');
2821: oe_debug_pub.add('max schcompletion date'||to_char(max_completion_date,'dd/mm/yy hh:mi:ss') );
2822: oe_debug_pub.add('LIne code :'||l_mlsupply_items(l_mlsupply_items(l_index).parent_index).line_code );
2823:
2824: --creating child supply on feeder line
2817: where item_index = l_mlsupply_items(l_index).parent_index
2818: and order_line_id = p_Top_Assembly_LineId ;
2819:
2820: oe_debug_pub.add('aparameters for feeder call');
2821: oe_debug_pub.add('max schcompletion date'||to_char(max_completion_date,'dd/mm/yy hh:mi:ss') );
2822: oe_debug_pub.add('LIne code :'||l_mlsupply_items(l_mlsupply_items(l_index).parent_index).line_code );
2823:
2824: --creating child supply on feeder line
2825: l_stmt_num := 230;
2818: and order_line_id = p_Top_Assembly_LineId ;
2819:
2820: oe_debug_pub.add('aparameters for feeder call');
2821: oe_debug_pub.add('max schcompletion date'||to_char(max_completion_date,'dd/mm/yy hh:mi:ss') );
2822: oe_debug_pub.add('LIne code :'||l_mlsupply_items(l_mlsupply_items(l_index).parent_index).line_code );
2823:
2824: --creating child supply on feeder line
2825: l_stmt_num := 230;
2826: FLM_CREATE_PRODUCT_SYNCH.create_schedules(
2832: to_char(SYSDATE-1,'YYYY/MM/DD hh:mm:ss'),
2833: to_char(max_completion_date,'YYYY/MM/DD hh:mm:ss'), --to_char(SYSDATE+7,'YYYY/MM/DD hh:mm:ss'),
2834: 'N');
2835:
2836: oe_debug_pub.add('After calklling feeder line api',1);
2837:
2838: --set parent feeder run flag to 'Y'
2839: l_mlsupply_items(l_mlsupply_items(l_index).parent_index).feeder_run := 'Y';
2840:
2894:
2895: END;
2896:
2897: IF PG_DEBUG <> 0 THEN
2898: oe_debug_pub.add ('create_subassembly_jobs: ' || 'operation seq id is' || l_operation_seq_id ,1);
2899:
2900:
2901: END IF;
2902:
2908: where item_index = l_mlsupply_items(l_index).parent_index;
2909:
2910: IF PG_DEBUG <> 0 THEN
2911:
2912: oe_debug_pub.add ('create_subassembly_jobs: ' || 'operation offsetd date is '|| l_child_operation_date,1);
2913:
2914: END IF;
2915:
2916: ELSE
2916: ELSE
2917:
2918: IF PG_DEBUG <> 0 THEN
2919:
2920: oe_debug_pub.add ('create_subassembly_jobs: ' || 'before entering get_operation offsetd ate' ,1);
2921:
2922: END IF;
2923:
2924: l_stmt_num := 241;
2927: from BOM_CTO_MLSUPPLY_FLOW_TEMP
2928: where item_index = l_mlsupply_items(l_index).parent_index;
2929:
2930: IF PG_DEBUG <> 0 THEN
2931: oe_debug_pub.add ('create_subassembly_jobs: ' || 'min schedule date' || to_char(l_min_completion_date,'mm/dd/yy hh:mi:ss') ,1);
2932:
2933: END IF;
2934:
2935:
2951:
2952: END IF;
2953:
2954: IF PG_DEBUG <> 0 THEN
2955: oe_debug_pub.add ('create_subassembly_jobs: ' || 'after get_ioperation offset date with date' || l_child_operation_date ,1);
2956:
2957: END IF;
2958:
2959: l_stmt_num := 244;
2968:
2969: x_child_completion_date := l_child_operation_date;
2970:
2971: IF PG_DEBUG <> 0 THEN
2972: oe_debug_pub.add ('create_subassembly_jobs: ' || 'lead time for buy child is ' || l_lead_time ,1);
2973:
2974: END IF;
2975:
2976: if l_mlsupply_items(l_index).source_type = 3 then
2990: end if;
2991:
2992: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2993: IF PG_DEBUG <> 0 THEN
2994: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after get_wroking_day' || l_return_status ,1);
2995:
2996: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2997: END IF;
2998: RAISE FND_API.G_EXC_ERROR;
2992: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2993: IF PG_DEBUG <> 0 THEN
2994: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after get_wroking_day' || l_return_status ,1);
2995:
2996: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2997: END IF;
2998: RAISE FND_API.G_EXC_ERROR;
2999: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3000: IF PG_DEBUG <> 0 THEN
2997: END IF;
2998: RAISE FND_API.G_EXC_ERROR;
2999: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3000: IF PG_DEBUG <> 0 THEN
3001: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_working_day' || l_return_status ,1);
3002:
3003: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
3004: END IF;
3005: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2999: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3000: IF PG_DEBUG <> 0 THEN
3001: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_working_day' || l_return_status ,1);
3002:
3003: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
3004: END IF;
3005: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3006: ELSE
3007:
3005: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3006: ELSE
3007:
3008: IF PG_DEBUG <> 0 THEN
3009: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from get_working_day ' ,1);
3010: END IF;
3011: END IF;
3012:
3013: IF (x_child_completion_date <= SYSDATE) THEN
3011: END IF;
3012:
3013: IF (x_child_completion_date <= SYSDATE) THEN
3014: IF PG_DEBUG <> 0 THEN
3015: oe_debug_pub.add('create_subassembly_jobs: ' || 'buy or IR job comp date is < than sysdate,so default to sysdate' ,1);
3016: oe_debug_pub.add('create_subassembly_jobs: ' || 'buy or IR job comp date is ' || x_child_completion_date,1);
3017: END IF;
3018:
3019: l_mlsupply_items(l_index).job_completion_date := SYSDATE;
3012:
3013: IF (x_child_completion_date <= SYSDATE) THEN
3014: IF PG_DEBUG <> 0 THEN
3015: oe_debug_pub.add('create_subassembly_jobs: ' || 'buy or IR job comp date is < than sysdate,so default to sysdate' ,1);
3016: oe_debug_pub.add('create_subassembly_jobs: ' || 'buy or IR job comp date is ' || x_child_completion_date,1);
3017: END IF;
3018:
3019: l_mlsupply_items(l_index).job_completion_date := SYSDATE;
3020:
3022:
3023: l_mlsupply_items(l_index).job_completion_date := x_child_completion_date;
3024:
3025: IF PG_DEBUG <> 0 THEN
3026: oe_debug_pub.add('create_subassembly_jobs: ' || 'buy or IR job comp date is ' || x_child_completion_date,1);
3027: END IF;
3028:
3029:
3030: END IF;
3044: INTO l_finite_scheduler_flag
3045: FROM wip_parameters
3046: WHERE organization_id = l_ship_org;
3047:
3048: oe_debug_pub.add ('create_subassembly_jobs: ' || 'l_finite_scheduler_flag is '|| l_finite_scheduler_flag ,1);
3049:
3050: END IF;--finnite scheduler
3051:
3052:
3052:
3053: IF (l_finite_scheduler_flag =1) THEN
3054:
3055: IF( l_child_operation_date <= SYSDATE) THEN --less than sysdate
3056: oe_debug_pub.add('create_subassembly_jobs: ' || 'Finite scheduler ON and DISCRETE job comp date is
3058: l_mlsupply_items(l_index).populate_start_date := 1; -- to insert wip inetrface with satrt date
3059:
3060: l_mlsupply_items(l_index).job_completion_date := SYSDATE;
3053: IF (l_finite_scheduler_flag =1) THEN
3054:
3055: IF( l_child_operation_date <= SYSDATE) THEN --less than sysdate
3056: oe_debug_pub.add('create_subassembly_jobs: ' || 'Finite scheduler ON and DISCRETE job comp date is
3058: l_mlsupply_items(l_index).populate_start_date := 1; -- to insert wip inetrface with satrt date
3059:
3060: l_mlsupply_items(l_index).job_completion_date := SYSDATE;
3061: l_mlsupply_items(l_index).job_start_date := SYSDATE;
3068:
3069: ELSE-- greater sysdate
3070:
3071: l_mlsupply_items(l_index).job_completion_date := l_child_operation_date;
3072: oe_debug_pub.add('create_subassembly_jobs: ' || 'DISCRETE job comp date is '|| l_mlsupply_items(l_index).job_completion_date,1);
3073:
3074:
3075: --if flow is top most item AND
3076: --if finite scheduler is on we calculate job start date
3094: );
3095:
3096: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
3097: IF PG_DEBUG <> 0 THEN
3098: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_start_date with status ' || l_return_status ,1);
3099:
3100: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
3101: END IF;
3102: RAISE FND_API.G_EXC_ERROR;
3096: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
3097: IF PG_DEBUG <> 0 THEN
3098: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_start_date with status ' || l_return_status ,1);
3099:
3100: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
3101: END IF;
3102: RAISE FND_API.G_EXC_ERROR;
3103: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3104: IF PG_DEBUG <> 0 THEN
3101: END IF;
3102: RAISE FND_API.G_EXC_ERROR;
3103: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3104: IF PG_DEBUG <> 0 THEN
3105: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_start_date ' || l_return_status ,1);
3106:
3107: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage,1);
3108: END IF;
3109: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3103: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3104: IF PG_DEBUG <> 0 THEN
3105: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_start_date ' || l_return_status ,1);
3106:
3107: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage,1);
3108: END IF;
3109: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3110: ELSE
3111: IF PG_DEBUG <> 0 THEN
3108: END IF;
3109: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3110: ELSE
3111: IF PG_DEBUG <> 0 THEN
3112: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from get_start_date ' ,1);
3113: END IF;
3114: END IF;
3115:
3116: IF (x_parent_job_start_date <= SYSDATE) THEN
3116: IF (x_parent_job_start_date <= SYSDATE) THEN
3117: l_mlsupply_items(l_index).job_start_date := SYSDATE;
3118:
3119: IF PG_DEBUG <> 0 THEN
3120: oe_debug_pub.add('create_subassembly_jobs: ' || 'actual parent starts date is < sysdate ' ,1);
3121: END IF;
3122:
3123: ELSE
3124: l_mlsupply_items(l_index).job_start_date := x_parent_job_start_date;
3121: END IF;
3122:
3123: ELSE
3124: l_mlsupply_items(l_index).job_start_date := x_parent_job_start_date;
3125: oe_debug_pub.add('create_subassembly_jobs: ' || 'parent_start_date '|| to_char(x_parent_job_start_date,'mm/dd/yy hh:mi:ss') ,1);
3126:
3127: END IF;
3128:
3129:
3141:
3142: l_mlsupply_items(l_index).job_completion_date := l_child_operation_date;
3143:
3144:
3145: oe_debug_pub.add('create_subassembly_jobs: ' || 'DISCRETE job comp date is '|| l_mlsupply_items(l_index).job_completion_date,1);
3146:
3147: update bom_cto_mlsupply_main_temp
3148: set job_completion_date = l_mlsupply_items(l_index).job_completion_date
3149: where item_index = l_index
3172:
3173:
3174: --reomve this part at end of UT
3175: If PG_DEBUG <> 0 Then
3176: oe_debug_pub.add ('DEBUG EMSSAEG AFTER COMPLETION DATE CALCULATION',1);
3177:
3178: cto_wip_workflow_api_pk.cto_debug('Completion date debug messages','after completion date calculations');
3179: End if;
3180: --displaying children
3179: End if;
3180: --displaying children
3181: IF (l_mlsupply_items.count > 0) THEN --checks for uninitialized collection --bugfix2308063
3182:
3183: oe_debug_pub.add ('index --'||'item_name--' || 'item_quantity--'||'needed_item_quantity--'||'OPERATION_LEAD_TIME_PERCENT--'||
3184: 'operation_seq_num--'|| 'cfm_routing_flag--'||'routing_sequence_id--'||'fixed_lead_time--'||
3185: 'variable_lead_time--' || 'processing_lead_time--' || 'postprocessing_lead_time--' ||
3186: 'bom_item_type --' || 'parent_index--'||'job_start_date --'||'job_completion_date --'||
3187: 'line_id--' || 'line_code--'||'source_type--' || 'feeder_run--' || 'flow_start_index--' ||
3189: );
3190:
3191: l_index := 1;--completion date is needed from 2nd level discrete item
3192: LOOP
3193: oe_debug_pub.add ('idx=>'||l_mlsupply_items(l_index).t_item_details_index || '--' ||
3194: 'name=>'||l_mlsupply_items(l_index).item_name||'--' ||
3195: 'qty=>'||l_mlsupply_items(l_index).item_quantity||'--'||
3196: 'qty=>'||l_mlsupply_items(l_index).needed_item_qty||'--'||
3197: 'LT%=>'||l_mlsupply_items(l_index).OPERATION_LEAD_TIME_PERCENT||'--'||
3269: LOOP
3270:
3271:
3272: IF PG_DEBUG <> 0 THEN
3273: oe_debug_pub.add('create_subassembly_jobs: ' || l_index||'-- '||
3274: l_mlsupply_items(l_index).parent_index||'-- '||
3275: l_mlsupply_items(l_index).item_id||' -- '||
3276: l_mlsupply_items(l_index).item_name||' -- '||
3277: l_mlsupply_items(l_index).job_start_date||' -- '||
3287: END IF;
3288:
3289:
3290: IF PG_DEBUG <> 0 THEN
3291: oe_debug_pub.add('create_subassembly_jobs: ' || 'before inserting children in wjsi ',1);
3292: END IF;
3293:
3294: --to test submission of wip concurrent program from PL/SQL
3295:
3314: cto_wip_workflow_api_pk.cto_debug ('create_sub_assembly_jobs','need aty'||l_mlsupply_items(l_index).needed_item_qty);
3315: End if;
3316:
3317: IF PG_DEBUG <> 0 THEN
3318: oe_debug_pub.add('create_subassembly_jobs: ' || 'insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3319: oe_debug_pub.add('create_sub_assembly_jobs insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3320: oe_debug_pub.add('create_sub_assembly_jobs need by date'|| to_char(l_mlsupply_items(l_index).job_completion_date,'mm/dd/yy/ hh:mi:ss'));
3321: oe_debug_pub.add('create_sub_assembly_jobs need aty'||l_mlsupply_items(l_index).needed_item_qty);
3322:
3315: End if;
3316:
3317: IF PG_DEBUG <> 0 THEN
3318: oe_debug_pub.add('create_subassembly_jobs: ' || 'insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3319: oe_debug_pub.add('create_sub_assembly_jobs insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3320: oe_debug_pub.add('create_sub_assembly_jobs need by date'|| to_char(l_mlsupply_items(l_index).job_completion_date,'mm/dd/yy/ hh:mi:ss'));
3321: oe_debug_pub.add('create_sub_assembly_jobs need aty'||l_mlsupply_items(l_index).needed_item_qty);
3322:
3323: END IF;
3316:
3317: IF PG_DEBUG <> 0 THEN
3318: oe_debug_pub.add('create_subassembly_jobs: ' || 'insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3319: oe_debug_pub.add('create_sub_assembly_jobs insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3320: oe_debug_pub.add('create_sub_assembly_jobs need by date'|| to_char(l_mlsupply_items(l_index).job_completion_date,'mm/dd/yy/ hh:mi:ss'));
3321: oe_debug_pub.add('create_sub_assembly_jobs need aty'||l_mlsupply_items(l_index).needed_item_qty);
3322:
3323: END IF;
3324:
3317: IF PG_DEBUG <> 0 THEN
3318: oe_debug_pub.add('create_subassembly_jobs: ' || 'insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3319: oe_debug_pub.add('create_sub_assembly_jobs insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3320: oe_debug_pub.add('create_sub_assembly_jobs need by date'|| to_char(l_mlsupply_items(l_index).job_completion_date,'mm/dd/yy/ hh:mi:ss'));
3321: oe_debug_pub.add('create_sub_assembly_jobs need aty'||l_mlsupply_items(l_index).needed_item_qty);
3322:
3323: END IF;
3324:
3325: l_req_input_data.source_type := l_mlsupply_items(l_index).source_type;
3352: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3353: ELSE
3354:
3355: IF PG_DEBUG <> 0 THEN
3356: oe_debug_pub.add('create_subassembly_jobs: ' || 'Req Insert successful for '|| l_mlsupply_items(l_index).item_id ,1);
3357: END IF;
3358: IF ( l_sub_level_buy_item = 'N') THEN
3359: l_sub_level_buy_item := 'Y';
3360: END IF;
3371: If(l_mlsupply_items(l_index).cfm_routing_flag = 2 OR
3372: l_mlsupply_items(l_index).cfm_routing_flag = -99) THEN -- discrete routing
3373:
3374: IF PG_DEBUG <> 0 THEN
3375: oe_debug_pub.add('create_subassembly_jobs: ' || 'Status passed into lower level supply code is ' || p_status_type);
3376: END IF;
3377:
3378: IF(l_mlsupply_items(1).cfm_routing_flag = 2 OR
3379: l_mlsupply_items(1).cfm_routing_flag = -99) THEN --top most parent is discrete
3381: l_stmt_num := 280;
3382:
3383: --Bugfix 14157494: Begin -- Check if any routing is present for the line_id
3384: IF PG_DEBUG <> 0 THEN
3385: oe_debug_pub.add('create_subassembly_jobs: p_Top_Assembly_LineId: '|| p_Top_Assembly_LineId,2);
3386: END IF;
3387:
3388: SELECT count(1)
3389: INTO l_routing_count_sa
3394: AND oel.ship_from_org_id = bor.organization_id
3395: AND ROWNUM = 1;
3396:
3397: IF PG_DEBUG <> 0 THEN
3398: oe_debug_pub.add('create_subassembly_jobs: INVENTORY_ITEM_ID :'|| l_mlsupply_items(l_index).item_id , 1);
3399: oe_debug_pub.add('create_subassembly_jobs: l_routing_count_sa :'|| to_char(l_routing_count_sa) ,1);
3400: oe_debug_pub.add('create_subassembly_jobs: Status passed into lower level supply code is: ' || p_status_type);
3401: END IF;
3402: --Bugfix 14157494: End
3395: AND ROWNUM = 1;
3396:
3397: IF PG_DEBUG <> 0 THEN
3398: oe_debug_pub.add('create_subassembly_jobs: INVENTORY_ITEM_ID :'|| l_mlsupply_items(l_index).item_id , 1);
3399: oe_debug_pub.add('create_subassembly_jobs: l_routing_count_sa :'|| to_char(l_routing_count_sa) ,1);
3400: oe_debug_pub.add('create_subassembly_jobs: Status passed into lower level supply code is: ' || p_status_type);
3401: END IF;
3402: --Bugfix 14157494: End
3403:
3396:
3397: IF PG_DEBUG <> 0 THEN
3398: oe_debug_pub.add('create_subassembly_jobs: INVENTORY_ITEM_ID :'|| l_mlsupply_items(l_index).item_id , 1);
3399: oe_debug_pub.add('create_subassembly_jobs: l_routing_count_sa :'|| to_char(l_routing_count_sa) ,1);
3400: oe_debug_pub.add('create_subassembly_jobs: Status passed into lower level supply code is: ' || p_status_type);
3401: END IF;
3402: --Bugfix 14157494: End
3403:
3404: l_stmt_num := 281;
3507: cnt_wjsi := sql%rowcount;
3508:
3509: if (cnt_wjsi > 0) then --Bugfix 8913125: Replaced sql%rowcount with cnt_wjsi
3510: IF PG_DEBUG <> 0 THEN
3511: oe_debug_pub.add('create_subassembly_jobs: ' || 'Number of Rows Inserted in WJSI for children : ' || to_char(cnt_wjsi));
3512:
3513: oe_debug_pub.add('create_subassembly_jobs: ' || 'GROUP ID Inserted in WJSI for children : ' || x_groupID);
3514: END IF;
3515: x_return_status := FND_API.G_RET_STS_SUCCESS;
3509: if (cnt_wjsi > 0) then --Bugfix 8913125: Replaced sql%rowcount with cnt_wjsi
3510: IF PG_DEBUG <> 0 THEN
3511: oe_debug_pub.add('create_subassembly_jobs: ' || 'Number of Rows Inserted in WJSI for children : ' || to_char(cnt_wjsi));
3512:
3513: oe_debug_pub.add('create_subassembly_jobs: ' || 'GROUP ID Inserted in WJSI for children : ' || x_groupID);
3514: END IF;
3515: x_return_status := FND_API.G_RET_STS_SUCCESS;
3516: else
3517: x_return_status := FND_API.G_RET_STS_ERROR;
3651: );
3652:
3653: if (SQL%ROWCOUNT > 0) then
3654: IF PG_DEBUG <> 0 THEN
3655: oe_debug_pub.add('create_subassembly_jobs: ' || 'Number of Rows Inserted in WJSI for children : ' || to_char(SQL%ROWCOUNT));
3656:
3657: oe_debug_pub.add('create_subassembly_jobs: ' || 'GROUP ID Inserted in WJSI for children : ' || x_groupID);
3658: END IF;
3659:
3653: if (SQL%ROWCOUNT > 0) then
3654: IF PG_DEBUG <> 0 THEN
3655: oe_debug_pub.add('create_subassembly_jobs: ' || 'Number of Rows Inserted in WJSI for children : ' || to_char(SQL%ROWCOUNT));
3656:
3657: oe_debug_pub.add('create_subassembly_jobs: ' || 'GROUP ID Inserted in WJSI for children : ' || x_groupID);
3658: END IF;
3659:
3660: end if;
3661:
3673: -- for multiple sources.
3674: ELSIF (l_mlsupply_items(l_index).source_type = 66) THEN
3675: -- 66 = multiple sources
3676: IF PG_DEBUG <> 0 THEN
3677: oe_debug_pub.add('create_subassembly_jobs: ' || 'item ' ||l_mlsupply_items(l_index).item_id || ' --'||l_mlsupply_items(l_index).item_name||'has multiple sources');
3678: END IF;
3679:
3680: END IF; --source_type
3681:
3736: x_errMsg := fnd_message.get;
3737: ROLLBACK TO REBUILD;
3738: else
3739: IF PG_DEBUG <> 0 THEN
3740: oe_debug_pub.add('create_subassembly_jobs: ' || 'REQUEST ID Inserted in WJSI for children : ' || l_requestId);
3741: cto_wip_workflow_api_pk.cto_debug ('Requets id is=> ', l_requestId);
3742:
3743: l_token(1).token_name := 'REQUEST_ID';
3744: l_token(1).token_value := l_requestId;
3775: --Bugfix 8913125
3776: x_error_message := to_char(l_stmt_num)|| ': ' || substrb(sqlerrm,1,50);
3777:
3778: IF PG_DEBUG <> 0 THEN
3779: oe_debug_pub.add('create_subassembly_jobs: ' || 'CTOSUBSB.create_sub_assembly_jobs expected excpn: ' || x_error_message,1);
3780: END IF;
3781:
3782:
3783: when FND_API.G_EXC_UNEXPECTED_ERROR then
3785: --Bugfix 8913125
3786: x_error_message := to_char(l_stmt_num)|| ': ' || substrb(sqlerrm,1,50);
3787:
3788: IF PG_DEBUG <> 0 THEN
3789: oe_debug_pub.add('create_subassembly_jobs: ' || 'CTOSUBSB.create_sub_assembly_jobs UN expected excpn: ' || x_error_message,1);
3790: END IF;
3791:
3792:
3793: when OTHERS then
3795: --Bugfix 8913125
3796: x_error_message := to_char(l_stmt_num)|| ': ' || substrb(sqlerrm,1,50);
3797:
3798: IF PG_DEBUG <> 0 THEN
3799: oe_debug_pub.add('create_subassembly_jobs: ' || 'CTOSUBSB.create_sub_assembly_jobs OTHERS excpn: ' || x_error_message,1);
3800: END IF;
3801:
3802: END create_subassembly_jobs;
3803:
3824:
3825: l_stmt_num number;
3826:
3827: BEGIN
3828: oe_debug_pub.add('Inside process_phantoms',1);
3829: --replace phatom's parent idx with its first non-phatom parent idx in chain
3830: l_stmt_num :=10;
3831: l_index := 2;
3832: Loop
3863: l_last_index := pitems_table.count;
3864:
3865: IF PG_DEBUG = 5 THEN
3866: FOR i IN 1..l_last_index LOOP
3867: oe_debug_pub.add('index=>'||i||
3868: 'item_id=>'||pitems_table(i).item_id||
3869: 'parent_idx=>'||pitems_table(i).parent_index||
3870: 'actual_parent_idx=>'||pitems_table(i).actual_parent_idx||
3871: 'wip_supply_type=>'||pitems_table(i).wip_supply_type,5);
3922: IF pitems_table(l_index).parent_index <> pitems_table(l_index).actual_parent_idx THEN -- implies child of pH
3923: l_parent_index := pitems_table(l_index).parent_index;
3924:
3925: IF PG_DEBUG <> 0 THEN
3926: oe_debug_pub.add('ENTERED IF BLOCK',5);
3927: oe_debug_pub.add('parent_item_id=>'||pitems_table(l_parent_index).item_id ,5);
3928: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id ,5);
3929: oe_debug_pub.add('operation_seq_num=>'||pitems_table(l_index).operation_seq_num ,5);
3930: END IF;
3923: l_parent_index := pitems_table(l_index).parent_index;
3924:
3925: IF PG_DEBUG <> 0 THEN
3926: oe_debug_pub.add('ENTERED IF BLOCK',5);
3927: oe_debug_pub.add('parent_item_id=>'||pitems_table(l_parent_index).item_id ,5);
3928: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id ,5);
3929: oe_debug_pub.add('operation_seq_num=>'||pitems_table(l_index).operation_seq_num ,5);
3930: END IF;
3931:
3924:
3925: IF PG_DEBUG <> 0 THEN
3926: oe_debug_pub.add('ENTERED IF BLOCK',5);
3927: oe_debug_pub.add('parent_item_id=>'||pitems_table(l_parent_index).item_id ,5);
3928: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id ,5);
3929: oe_debug_pub.add('operation_seq_num=>'||pitems_table(l_index).operation_seq_num ,5);
3930: END IF;
3931:
3932: BEGIN
3925: IF PG_DEBUG <> 0 THEN
3926: oe_debug_pub.add('ENTERED IF BLOCK',5);
3927: oe_debug_pub.add('parent_item_id=>'||pitems_table(l_parent_index).item_id ,5);
3928: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id ,5);
3929: oe_debug_pub.add('operation_seq_num=>'||pitems_table(l_index).operation_seq_num ,5);
3930: END IF;
3931:
3932: BEGIN
3933: l_stmt_num := 70;
3948: Exception
3949: WHEN no_data_found then
3950: pitems_table(l_index).operation_lead_time_percent := 0;
3951: IF PG_DEBUG <> 0 THEN
3952: oe_debug_pub.add('lead_time=>'||pitems_table(l_index).operation_lead_time_percent,1);
3953: END IF;
3954: END;
3955:
3956: IF PG_DEBUG <> 0 THEN
3953: END IF;
3954: END;
3955:
3956: IF PG_DEBUG <> 0 THEN
3957: oe_debug_pub.add('process_phantoms:lead_time=>'||pitems_table(l_index).operation_lead_time_percent,1);
3958: END IF;
3959:
3960: l_stmt_num := 80;
3961: update BOM_CTO_MLSUPPLY_MAIN_TEMP
3973:
3974:
3975: IF PG_DEBUG = 5 THEN
3976: FOR i IN 1..l_last_index LOOP
3977: oe_debug_pub.add('index=>'||i||
3978: 'item_id=>'||pitems_table(i).item_id||
3979: 'parent_idx=>'||pitems_table(i).parent_index||
3980: 'actual_parent_idx=>'||pitems_table(i).actual_parent_idx||
3981: 'wip_supply_type=>'||pitems_table(i).wip_supply_type||
4003: )
4004: )
4005: THEN
4006: IF PG_DEBUG <> 0 THEN
4007: oe_debug_pub.add('ENTERED MIN OP SEQ BLOCK',5);
4008: END IF;
4009:
4010: l_stmt_num := 90;
4011: select min(OPERATION_SEQ_NUM),sum(needed_item_qty)
4014: WHERE parent_index = pitems_table(l_index).parent_index
4015: AND item_id = pitems_table(l_index).item_id;
4016:
4017: IF PG_DEBUG <> 0 THEN
4018: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id,5);
4019: oe_debug_pub.add('x_min_op_seq_num=>'||x_min_op_seq_num,5);
4020: oe_debug_pub.add('l_cons_item_qty=>'||l_cons_item_qty,5);
4021: oe_debug_pub.add('parent_index=>'||pitems_table(l_index).parent_index,5);
4022: END IF;
4015: AND item_id = pitems_table(l_index).item_id;
4016:
4017: IF PG_DEBUG <> 0 THEN
4018: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id,5);
4019: oe_debug_pub.add('x_min_op_seq_num=>'||x_min_op_seq_num,5);
4020: oe_debug_pub.add('l_cons_item_qty=>'||l_cons_item_qty,5);
4021: oe_debug_pub.add('parent_index=>'||pitems_table(l_index).parent_index,5);
4022: END IF;
4023:
4016:
4017: IF PG_DEBUG <> 0 THEN
4018: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id,5);
4019: oe_debug_pub.add('x_min_op_seq_num=>'||x_min_op_seq_num,5);
4020: oe_debug_pub.add('l_cons_item_qty=>'||l_cons_item_qty,5);
4021: oe_debug_pub.add('parent_index=>'||pitems_table(l_index).parent_index,5);
4022: END IF;
4023:
4024: l_stmt_num := 100;
4017: IF PG_DEBUG <> 0 THEN
4018: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id,5);
4019: oe_debug_pub.add('x_min_op_seq_num=>'||x_min_op_seq_num,5);
4020: oe_debug_pub.add('l_cons_item_qty=>'||l_cons_item_qty,5);
4021: oe_debug_pub.add('parent_index=>'||pitems_table(l_index).parent_index,5);
4022: END IF;
4023:
4024: l_stmt_num := 100;
4025: Update bom_cto_mlsupply_main_temp
4045: END LOOP;
4046:
4047: IF PG_DEBUG = 5 THEN
4048: FOR i IN 1..l_last_index LOOP
4049: oe_debug_pub.add('index=>'||i||
4050: 'item_id=>'||pitems_table(i).item_id||
4051: 'parent_idx=>'||pitems_table(i).parent_index||
4052: 'actual_parent_idx=>'||pitems_table(i).actual_parent_idx||
4053: 'wip_supply_type=>'||pitems_table(i).wip_supply_type||
4066:
4067:
4068: IF PG_DEBUG <> 0 THEN
4069: IF PG_DEBUG <> 0 THEN
4070: oe_debug_pub.add('process_phantoms: ' || 'CTOSUBSB.create_flow_subassembly expected excpn: ' || x_error_message,1);
4071: END IF;
4072: END IF;
4073:
4074:
4079:
4080:
4081: IF PG_DEBUG <> 0 THEN
4082: IF PG_DEBUG <> 0 THEN
4083: oe_debug_pub.add('process_phantoms: ' || 'CTOSUBSB.create_flow_subassembly UN expected excpn: ' || x_error_message,1);
4084: END IF;
4085: END IF;
4086:
4087:
4092: substrb(sqlerrm,1,100);
4093:
4094: IF PG_DEBUG <> 0 THEN
4095: IF PG_DEBUG <> 0 THEN
4096: oe_debug_pub.add('process_phantoms: ' || 'CTOSUBSB.create_flow_subassembly OTHERS excpn: ' || x_error_message,1);
4097: END IF;
4098: END IF;
4099:
4100: