[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
993:
994: IF pLower_Supplytype = 2 THEN
995:
996: IF PG_DEBUG <> 0 THEN
997: oe_debug_pub.add ('get_child_configurations: ' || 'Config children alone' ,1);
998: cto_wip_workflow_api_pk.cto_debug('get_child_configurations: ','Config children alone' );
999: END IF;
1000:
1001:
1025:
1026: EXIT when c_config_items%notfound;
1027:
1028: IF PG_DEBUG <> 0 THEN
1029: oe_debug_pub.add ('get_child_configurations: ' || 'item added' || pitems_table(l_index).item_name ,1);
1030:
1031: --Bugfix# 3418102
1032: oe_debug_pub.add ('get_child_configurations: ' || 'end_peeging_flag for project information' || pitems_table(l_index).pegging_flag ,3);
1033: END IF;
1028: IF PG_DEBUG <> 0 THEN
1029: oe_debug_pub.add ('get_child_configurations: ' || 'item added' || pitems_table(l_index).item_name ,1);
1030:
1031: --Bugfix# 3418102
1032: oe_debug_pub.add ('get_child_configurations: ' || 'end_peeging_flag for project information' || pitems_table(l_index).pegging_flag ,3);
1033: END IF;
1034:
1035: -- 5198966
1036: BEGIN
1066: );
1067:
1068: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1069: IF PG_DEBUG <> 0 THEN
1070: oe_debug_pub.add ('get_child_configurations: ' || 'failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1071: END IF;
1072: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1073: RAISE FND_API.G_EXC_ERROR;
1074: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1068: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1069: IF PG_DEBUG <> 0 THEN
1070: oe_debug_pub.add ('get_child_configurations: ' || 'failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1071: END IF;
1072: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1073: RAISE FND_API.G_EXC_ERROR;
1074: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1075: IF PG_DEBUG <> 0 THEN
1076: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1072: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1073: RAISE FND_API.G_EXC_ERROR;
1074: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1075: IF PG_DEBUG <> 0 THEN
1076: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1077: END IF;
1078: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1079: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1080: ELSE
1074: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1075: IF PG_DEBUG <> 0 THEN
1076: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1077: END IF;
1078: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1079: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1080: ELSE
1081:
1082: IF PG_DEBUG <> 0 THEN
1079: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1080: ELSE
1081:
1082: IF PG_DEBUG <> 0 THEN
1083: oe_debug_pub.add('get_child_configurations: ' || 'success from CTO_UTILITY_PK.QUERY_SOURCING_ORG ' ,1);
1084: END IF;
1085: END IF;
1086:
1087:
1109: OR
1110: pitems_table(l_index).cfm_routing_flag <> 1
1111: )
1112: ) THEN
1113: oe_debug_pub.add ('calling check_recurring_item' ,1);
1114: check_recurring_item
1115: ( p_cons_item_details => p_cons_item_details,
1116: p_parent_item_id => pitems_table(pParent_index).item_id,
1117: p_organization_id => pOrganization_id,
1226:
1227:
1228: EXIT when c_config_and_ato_items%notfound;
1229: IF PG_DEBUG <> 0 THEN
1230: oe_debug_pub.add ('get_child_configurations: ' || 'item added' || pitems_table(l_index).item_name ,1);
1231:
1232: --Bugfix# 3418102
1233: oe_debug_pub.add ('get_child_configurations: ' || 'end_pegging_flag for project information' || pitems_table(l_index).pegging_flag ,3);
1234: END IF;
1229: IF PG_DEBUG <> 0 THEN
1230: oe_debug_pub.add ('get_child_configurations: ' || 'item added' || pitems_table(l_index).item_name ,1);
1231:
1232: --Bugfix# 3418102
1233: oe_debug_pub.add ('get_child_configurations: ' || 'end_pegging_flag for project information' || pitems_table(l_index).pegging_flag ,3);
1234: END IF;
1235:
1236: -- 5198966
1237: BEGIN
1267:
1268:
1269: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1270: IF PG_DEBUG <> 0 THEN
1271: oe_debug_pub.add ('get_child_configurations: ' || 'failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1272: END IF;
1273: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1274: RAISE FND_API.G_EXC_ERROR;
1275: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1269: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1270: IF PG_DEBUG <> 0 THEN
1271: oe_debug_pub.add ('get_child_configurations: ' || 'failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1272: END IF;
1273: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1274: RAISE FND_API.G_EXC_ERROR;
1275: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1276: IF PG_DEBUG <> 0 THEN
1277: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1273: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1274: RAISE FND_API.G_EXC_ERROR;
1275: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1276: IF PG_DEBUG <> 0 THEN
1277: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1278: END IF;
1279: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1280: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1281: ELSE
1275: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1276: IF PG_DEBUG <> 0 THEN
1277: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to CTO_UTILITY_PK.QUERY_SOURCING_ORG with status ' || x_return_status ,1);
1278: END IF;
1279: --oe_debug_pub.add ('error message' || l_error_msg ,1);
1280: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1281: ELSE
1282:
1283: IF PG_DEBUG <> 0 THEN
1280: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1281: ELSE
1282:
1283: IF PG_DEBUG <> 0 THEN
1284: oe_debug_pub.add('get_child_configurations: ' || 'success from CTO_UTILITY_PK.QUERY_SOURCING_ORG ' ,1);
1285: END IF;
1286: END IF;
1287:
1288:
1309: OR
1310: pitems_table(l_index).cfm_routing_flag <> 1
1311: )
1312: ) THEN
1313: oe_debug_pub.add ('calling check_recurring_item for item ' ,1);
1314: check_recurring_item
1315: ( p_cons_item_details => p_cons_item_details,
1316: p_parent_item_id => pitems_table(pParent_index).item_id,
1317: p_organization_id => pOrganization_id,
1390: );
1391:
1392: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
1393: IF PG_DEBUG <> 0 THEN
1394: oe_debug_pub.add ('get_child_configurations: ' || 'failed after call to get_child_configurations with status ' || l_ret_status ,1);
1395:
1396: oe_debug_pub.add ('get_child_configurations: ' || 'error message' || l_error_message ,1);
1397: END IF;
1398: RAISE FND_API.G_EXC_ERROR;
1392: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
1393: IF PG_DEBUG <> 0 THEN
1394: oe_debug_pub.add ('get_child_configurations: ' || 'failed after call to get_child_configurations with status ' || l_ret_status ,1);
1395:
1396: oe_debug_pub.add ('get_child_configurations: ' || 'error message' || l_error_message ,1);
1397: END IF;
1398: RAISE FND_API.G_EXC_ERROR;
1399: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1400: IF PG_DEBUG <> 0 THEN
1397: END IF;
1398: RAISE FND_API.G_EXC_ERROR;
1399: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1400: IF PG_DEBUG <> 0 THEN
1401: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to get_child_configurations ' || l_ret_status ,1);
1402:
1403: oe_debug_pub.add ('get_child_configurations: ' || 'error message' || l_error_message ,1);
1404: END IF;
1405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1399: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1400: IF PG_DEBUG <> 0 THEN
1401: oe_debug_pub.add ('get_child_configurations: ' || ' failed after call to get_child_configurations ' || l_ret_status ,1);
1402:
1403: oe_debug_pub.add ('get_child_configurations: ' || 'error message' || l_error_message ,1);
1404: END IF;
1405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1406: ELSE
1407:
1405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1406: ELSE
1407:
1408: IF PG_DEBUG <> 0 THEN
1409: oe_debug_pub.add('get_child_configurations: ' || 'success from get_child_configurations ' ,1);
1410: END IF;
1411: END IF;
1412:
1413:
1434:
1435:
1436:
1437: IF PG_DEBUG <> 0 THEN
1438: oe_debug_pub.add('get_child_configurations: ' || 'CTOSUBSB.get_child_configuratiosn expected excpn: ' || x_error_message,1);
1439: END IF;
1440:
1441:
1442:
1447:
1448:
1449:
1450: IF PG_DEBUG <> 0 THEN
1451: oe_debug_pub.add('get_child_configurations: ' || 'CTOSUBSB.get_child_configurations UN expected excpn: ' || x_error_message,1);
1452: END IF;
1453:
1454:
1455:
1461: substrb(sqlerrm,1,100);
1462:
1463:
1464: IF PG_DEBUG <> 0 THEN
1465: oe_debug_pub.add('get_child_configurations: ' || 'CTOSUBSB.get_start_date OTHERS excpn: ' || x_error_message,1);
1466: END IF;
1467:
1468:
1469: /* OE_MSG_PUB.Add_Exc_Msg
1542:
1543:
1544: if (l_return_status = FND_API.G_RET_STS_ERROR) then --flow return status
1545: IF PG_DEBUG <> 0 THEN
1546: oe_debug_pub.add('create_flow_subassembly: ' || 'Expected error in Process Flow Schedule with status: ' || l_return_status, 1);
1547: END IF;
1548: raise FND_API.G_EXC_ERROR;
1549:
1550: elsif (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then --flow returns tatus
1548: raise FND_API.G_EXC_ERROR;
1549:
1550: elsif (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then --flow returns tatus
1551: IF PG_DEBUG <> 0 THEN
1552: oe_debug_pub.add('create_flow_subassembly: ' || 'UnExpected error in Process Flow Schedule with status: ' || l_return_status, 1);
1553: END IF;
1554: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1555:
1556: else --flow return status
1554: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1555:
1556: else --flow return status
1557: IF PG_DEBUG <> 0 THEN
1558: oe_debug_pub.add('create_flow_subassembly: ' || 'Success in Process Flow Schedule.');
1559: END IF;
1560: if (l_x_flow_schedule_rec.wip_entity_id is not NULL) then
1561: l_stmt_num := 100;
1562: IF (pflow_sch_details.count = 0 ) THEN
1620:
1621:
1622:
1623: IF PG_DEBUG <> 0 THEN
1624: oe_debug_pub.add('create_flow_subassembly: ' || 'alternate_bom_designator : ' ||l_x_flow_schedule_rec.alternate_bom_designator ,1);
1625:
1626: oe_debug_pub.add('create_flow_subassembly: ' || 'alternate_routing_desig ' ||l_x_flow_schedule_rec.alternate_routing_desig ,1);
1627:
1628: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision ' ||l_x_flow_schedule_rec.bom_revision,1);
1622:
1623: IF PG_DEBUG <> 0 THEN
1624: oe_debug_pub.add('create_flow_subassembly: ' || 'alternate_bom_designator : ' ||l_x_flow_schedule_rec.alternate_bom_designator ,1);
1625:
1626: oe_debug_pub.add('create_flow_subassembly: ' || 'alternate_routing_desig ' ||l_x_flow_schedule_rec.alternate_routing_desig ,1);
1627:
1628: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision ' ||l_x_flow_schedule_rec.bom_revision,1);
1629:
1630: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision_date ' ||l_x_flow_schedule_rec.bom_revision_date ,1);
1624: oe_debug_pub.add('create_flow_subassembly: ' || 'alternate_bom_designator : ' ||l_x_flow_schedule_rec.alternate_bom_designator ,1);
1625:
1626: oe_debug_pub.add('create_flow_subassembly: ' || 'alternate_routing_desig ' ||l_x_flow_schedule_rec.alternate_routing_desig ,1);
1627:
1628: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision ' ||l_x_flow_schedule_rec.bom_revision,1);
1629:
1630: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision_date ' ||l_x_flow_schedule_rec.bom_revision_date ,1);
1631:
1632: oe_debug_pub.add('create_flow_subassembly: ' || 'build_sequence ' ||l_x_flow_schedule_rec.build_sequence ,1);
1626: oe_debug_pub.add('create_flow_subassembly: ' || 'alternate_routing_desig ' ||l_x_flow_schedule_rec.alternate_routing_desig ,1);
1627:
1628: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision ' ||l_x_flow_schedule_rec.bom_revision,1);
1629:
1630: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision_date ' ||l_x_flow_schedule_rec.bom_revision_date ,1);
1631:
1632: oe_debug_pub.add('create_flow_subassembly: ' || 'build_sequence ' ||l_x_flow_schedule_rec.build_sequence ,1);
1633:
1634: oe_debug_pub.add('create_flow_subassembly: ' || 'class_code' ||l_x_flow_schedule_rec.class_code ,1);
1628: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision ' ||l_x_flow_schedule_rec.bom_revision,1);
1629:
1630: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision_date ' ||l_x_flow_schedule_rec.bom_revision_date ,1);
1631:
1632: oe_debug_pub.add('create_flow_subassembly: ' || 'build_sequence ' ||l_x_flow_schedule_rec.build_sequence ,1);
1633:
1634: oe_debug_pub.add('create_flow_subassembly: ' || 'class_code' ||l_x_flow_schedule_rec.class_code ,1);
1635:
1636: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_locator_id ' ||l_x_flow_schedule_rec.completion_locator_id ,1);
1630: oe_debug_pub.add('create_flow_subassembly: ' || 'bom_revision_date ' ||l_x_flow_schedule_rec.bom_revision_date ,1);
1631:
1632: oe_debug_pub.add('create_flow_subassembly: ' || 'build_sequence ' ||l_x_flow_schedule_rec.build_sequence ,1);
1633:
1634: oe_debug_pub.add('create_flow_subassembly: ' || 'class_code' ||l_x_flow_schedule_rec.class_code ,1);
1635:
1636: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_locator_id ' ||l_x_flow_schedule_rec.completion_locator_id ,1);
1637:
1638: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_subinventory ' ||l_x_flow_schedule_rec.completion_subinventory ,1);
1632: oe_debug_pub.add('create_flow_subassembly: ' || 'build_sequence ' ||l_x_flow_schedule_rec.build_sequence ,1);
1633:
1634: oe_debug_pub.add('create_flow_subassembly: ' || 'class_code' ||l_x_flow_schedule_rec.class_code ,1);
1635:
1636: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_locator_id ' ||l_x_flow_schedule_rec.completion_locator_id ,1);
1637:
1638: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_subinventory ' ||l_x_flow_schedule_rec.completion_subinventory ,1);
1639:
1640: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_class' ||l_x_flow_schedule_rec.demand_class ,1);
1634: oe_debug_pub.add('create_flow_subassembly: ' || 'class_code' ||l_x_flow_schedule_rec.class_code ,1);
1635:
1636: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_locator_id ' ||l_x_flow_schedule_rec.completion_locator_id ,1);
1637:
1638: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_subinventory ' ||l_x_flow_schedule_rec.completion_subinventory ,1);
1639:
1640: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_class' ||l_x_flow_schedule_rec.demand_class ,1);
1641:
1642: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_delivery' ||l_x_flow_schedule_rec.demand_source_delivery ,1);
1636: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_locator_id ' ||l_x_flow_schedule_rec.completion_locator_id ,1);
1637:
1638: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_subinventory ' ||l_x_flow_schedule_rec.completion_subinventory ,1);
1639:
1640: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_class' ||l_x_flow_schedule_rec.demand_class ,1);
1641:
1642: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_delivery' ||l_x_flow_schedule_rec.demand_source_delivery ,1);
1643:
1644: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_header_id ' ||l_x_flow_schedule_rec.demand_source_header_id ,1);
1638: oe_debug_pub.add('create_flow_subassembly: ' || 'completion_subinventory ' ||l_x_flow_schedule_rec.completion_subinventory ,1);
1639:
1640: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_class' ||l_x_flow_schedule_rec.demand_class ,1);
1641:
1642: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_delivery' ||l_x_flow_schedule_rec.demand_source_delivery ,1);
1643:
1644: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_header_id ' ||l_x_flow_schedule_rec.demand_source_header_id ,1);
1645:
1646: oe_debug_pub.add('create_flow_subassembly: ' || 'line_id' ||l_x_flow_schedule_rec.line_id ,1);
1640: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_class' ||l_x_flow_schedule_rec.demand_class ,1);
1641:
1642: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_delivery' ||l_x_flow_schedule_rec.demand_source_delivery ,1);
1643:
1644: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_header_id ' ||l_x_flow_schedule_rec.demand_source_header_id ,1);
1645:
1646: oe_debug_pub.add('create_flow_subassembly: ' || 'line_id' ||l_x_flow_schedule_rec.line_id ,1);
1647:
1648: oe_debug_pub.add('create_flow_subassembly: ' || 'organization_id ' ||l_x_flow_schedule_rec.organization_id ,1);
1642: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_delivery' ||l_x_flow_schedule_rec.demand_source_delivery ,1);
1643:
1644: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_header_id ' ||l_x_flow_schedule_rec.demand_source_header_id ,1);
1645:
1646: oe_debug_pub.add('create_flow_subassembly: ' || 'line_id' ||l_x_flow_schedule_rec.line_id ,1);
1647:
1648: oe_debug_pub.add('create_flow_subassembly: ' || 'organization_id ' ||l_x_flow_schedule_rec.organization_id ,1);
1649:
1650: oe_debug_pub.add('create_flow_subassembly: ' || 'planned_quantity' ||l_x_flow_schedule_rec.planned_quantity ,1);
1644: oe_debug_pub.add('create_flow_subassembly: ' || 'demand_source_header_id ' ||l_x_flow_schedule_rec.demand_source_header_id ,1);
1645:
1646: oe_debug_pub.add('create_flow_subassembly: ' || 'line_id' ||l_x_flow_schedule_rec.line_id ,1);
1647:
1648: oe_debug_pub.add('create_flow_subassembly: ' || 'organization_id ' ||l_x_flow_schedule_rec.organization_id ,1);
1649:
1650: oe_debug_pub.add('create_flow_subassembly: ' || 'planned_quantity' ||l_x_flow_schedule_rec.planned_quantity ,1);
1651:
1652: oe_debug_pub.add('create_flow_subassembly: ' || 'primary_item_id ' ||l_x_flow_schedule_rec.primary_item_id ,1);
1646: oe_debug_pub.add('create_flow_subassembly: ' || 'line_id' ||l_x_flow_schedule_rec.line_id ,1);
1647:
1648: oe_debug_pub.add('create_flow_subassembly: ' || 'organization_id ' ||l_x_flow_schedule_rec.organization_id ,1);
1649:
1650: oe_debug_pub.add('create_flow_subassembly: ' || 'planned_quantity' ||l_x_flow_schedule_rec.planned_quantity ,1);
1651:
1652: oe_debug_pub.add('create_flow_subassembly: ' || 'primary_item_id ' ||l_x_flow_schedule_rec.primary_item_id ,1);
1653:
1654: oe_debug_pub.add('create_flow_subassembly: ' || 'project_id ' ||l_x_flow_schedule_rec.project_id ,1);
1648: oe_debug_pub.add('create_flow_subassembly: ' || 'organization_id ' ||l_x_flow_schedule_rec.organization_id ,1);
1649:
1650: oe_debug_pub.add('create_flow_subassembly: ' || 'planned_quantity' ||l_x_flow_schedule_rec.planned_quantity ,1);
1651:
1652: oe_debug_pub.add('create_flow_subassembly: ' || 'primary_item_id ' ||l_x_flow_schedule_rec.primary_item_id ,1);
1653:
1654: oe_debug_pub.add('create_flow_subassembly: ' || 'project_id ' ||l_x_flow_schedule_rec.project_id ,1);
1655:
1656: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_completed ' ||l_x_flow_schedule_rec.quantity_completed ,1);
1650: oe_debug_pub.add('create_flow_subassembly: ' || 'planned_quantity' ||l_x_flow_schedule_rec.planned_quantity ,1);
1651:
1652: oe_debug_pub.add('create_flow_subassembly: ' || 'primary_item_id ' ||l_x_flow_schedule_rec.primary_item_id ,1);
1653:
1654: oe_debug_pub.add('create_flow_subassembly: ' || 'project_id ' ||l_x_flow_schedule_rec.project_id ,1);
1655:
1656: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_completed ' ||l_x_flow_schedule_rec.quantity_completed ,1);
1657:
1658: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_completion_date ' ||l_x_flow_schedule_rec.scheduled_completion_date ,1);
1652: oe_debug_pub.add('create_flow_subassembly: ' || 'primary_item_id ' ||l_x_flow_schedule_rec.primary_item_id ,1);
1653:
1654: oe_debug_pub.add('create_flow_subassembly: ' || 'project_id ' ||l_x_flow_schedule_rec.project_id ,1);
1655:
1656: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_completed ' ||l_x_flow_schedule_rec.quantity_completed ,1);
1657:
1658: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_completion_date ' ||l_x_flow_schedule_rec.scheduled_completion_date ,1);
1659:
1660: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_flag ' ||l_x_flow_schedule_rec.scheduled_flag ,1);
1654: oe_debug_pub.add('create_flow_subassembly: ' || 'project_id ' ||l_x_flow_schedule_rec.project_id ,1);
1655:
1656: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_completed ' ||l_x_flow_schedule_rec.quantity_completed ,1);
1657:
1658: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_completion_date ' ||l_x_flow_schedule_rec.scheduled_completion_date ,1);
1659:
1660: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_flag ' ||l_x_flow_schedule_rec.scheduled_flag ,1);
1661:
1662: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_start_date' ||l_x_flow_schedule_rec.scheduled_start_date ,1);
1656: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_completed ' ||l_x_flow_schedule_rec.quantity_completed ,1);
1657:
1658: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_completion_date ' ||l_x_flow_schedule_rec.scheduled_completion_date ,1);
1659:
1660: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_flag ' ||l_x_flow_schedule_rec.scheduled_flag ,1);
1661:
1662: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_start_date' ||l_x_flow_schedule_rec.scheduled_start_date ,1);
1663:
1664: oe_debug_pub.add('create_flow_subassembly: ' || 'task_id ' ||l_x_flow_schedule_rec.task_id ,1);
1658: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_completion_date ' ||l_x_flow_schedule_rec.scheduled_completion_date ,1);
1659:
1660: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_flag ' ||l_x_flow_schedule_rec.scheduled_flag ,1);
1661:
1662: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_start_date' ||l_x_flow_schedule_rec.scheduled_start_date ,1);
1663:
1664: oe_debug_pub.add('create_flow_subassembly: ' || 'task_id ' ||l_x_flow_schedule_rec.task_id ,1);
1665:
1666: oe_debug_pub.add('create_flow_subassembly: ' || 'wip_entity_id ' ||l_x_flow_schedule_rec.wip_entity_id ,1);
1660: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_flag ' ||l_x_flow_schedule_rec.scheduled_flag ,1);
1661:
1662: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_start_date' ||l_x_flow_schedule_rec.scheduled_start_date ,1);
1663:
1664: oe_debug_pub.add('create_flow_subassembly: ' || 'task_id ' ||l_x_flow_schedule_rec.task_id ,1);
1665:
1666: oe_debug_pub.add('create_flow_subassembly: ' || 'wip_entity_id ' ||l_x_flow_schedule_rec.wip_entity_id ,1);
1667:
1668: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_by' ||l_x_flow_schedule_rec.scheduled_by,1);
1662: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_start_date' ||l_x_flow_schedule_rec.scheduled_start_date ,1);
1663:
1664: oe_debug_pub.add('create_flow_subassembly: ' || 'task_id ' ||l_x_flow_schedule_rec.task_id ,1);
1665:
1666: oe_debug_pub.add('create_flow_subassembly: ' || 'wip_entity_id ' ||l_x_flow_schedule_rec.wip_entity_id ,1);
1667:
1668: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_by' ||l_x_flow_schedule_rec.scheduled_by,1);
1669:
1670: oe_debug_pub.add('create_flow_subassembly: ' || 'operation ' ||l_x_flow_schedule_rec.operation,1);
1664: oe_debug_pub.add('create_flow_subassembly: ' || 'task_id ' ||l_x_flow_schedule_rec.task_id ,1);
1665:
1666: oe_debug_pub.add('create_flow_subassembly: ' || 'wip_entity_id ' ||l_x_flow_schedule_rec.wip_entity_id ,1);
1667:
1668: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_by' ||l_x_flow_schedule_rec.scheduled_by,1);
1669:
1670: oe_debug_pub.add('create_flow_subassembly: ' || 'operation ' ||l_x_flow_schedule_rec.operation,1);
1671:
1672: oe_debug_pub.add('create_flow_subassembly: ' || 'db_flag ' ||l_x_flow_schedule_rec.db_flag ,1);
1666: oe_debug_pub.add('create_flow_subassembly: ' || 'wip_entity_id ' ||l_x_flow_schedule_rec.wip_entity_id ,1);
1667:
1668: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_by' ||l_x_flow_schedule_rec.scheduled_by,1);
1669:
1670: oe_debug_pub.add('create_flow_subassembly: ' || 'operation ' ||l_x_flow_schedule_rec.operation,1);
1671:
1672: oe_debug_pub.add('create_flow_subassembly: ' || 'db_flag ' ||l_x_flow_schedule_rec.db_flag ,1);
1673:
1674: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_scrapped ' ||l_x_flow_schedule_rec.quantity_scrapped ,1);
1668: oe_debug_pub.add('create_flow_subassembly: ' || 'scheduled_by' ||l_x_flow_schedule_rec.scheduled_by,1);
1669:
1670: oe_debug_pub.add('create_flow_subassembly: ' || 'operation ' ||l_x_flow_schedule_rec.operation,1);
1671:
1672: oe_debug_pub.add('create_flow_subassembly: ' || 'db_flag ' ||l_x_flow_schedule_rec.db_flag ,1);
1673:
1674: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_scrapped ' ||l_x_flow_schedule_rec.quantity_scrapped ,1);
1675:
1676: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_schedule_num' ||l_x_flow_schedule_rec.synch_schedule_num ,1);
1670: oe_debug_pub.add('create_flow_subassembly: ' || 'operation ' ||l_x_flow_schedule_rec.operation,1);
1671:
1672: oe_debug_pub.add('create_flow_subassembly: ' || 'db_flag ' ||l_x_flow_schedule_rec.db_flag ,1);
1673:
1674: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_scrapped ' ||l_x_flow_schedule_rec.quantity_scrapped ,1);
1675:
1676: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_schedule_num' ||l_x_flow_schedule_rec.synch_schedule_num ,1);
1677:
1678: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_operation_seq_num ' ||l_x_flow_schedule_rec.synch_operation_seq_num ,1);
1672: oe_debug_pub.add('create_flow_subassembly: ' || 'db_flag ' ||l_x_flow_schedule_rec.db_flag ,1);
1673:
1674: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_scrapped ' ||l_x_flow_schedule_rec.quantity_scrapped ,1);
1675:
1676: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_schedule_num' ||l_x_flow_schedule_rec.synch_schedule_num ,1);
1677:
1678: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_operation_seq_num ' ||l_x_flow_schedule_rec.synch_operation_seq_num ,1);
1679:
1680: oe_debug_pub.add('create_flow_subassembly: ' || 'roll_forwarded_flag ' ||l_x_flow_schedule_rec.roll_forwarded_flag ,1);
1674: oe_debug_pub.add('create_flow_subassembly: ' || 'quantity_scrapped ' ||l_x_flow_schedule_rec.quantity_scrapped ,1);
1675:
1676: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_schedule_num' ||l_x_flow_schedule_rec.synch_schedule_num ,1);
1677:
1678: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_operation_seq_num ' ||l_x_flow_schedule_rec.synch_operation_seq_num ,1);
1679:
1680: oe_debug_pub.add('create_flow_subassembly: ' || 'roll_forwarded_flag ' ||l_x_flow_schedule_rec.roll_forwarded_flag ,1);
1681:
1682: oe_debug_pub.add('create_flow_subassembly: ' || 'current_line_operation ' ||l_x_flow_schedule_rec.current_line_operation ,1);
1676: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_schedule_num' ||l_x_flow_schedule_rec.synch_schedule_num ,1);
1677:
1678: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_operation_seq_num ' ||l_x_flow_schedule_rec.synch_operation_seq_num ,1);
1679:
1680: oe_debug_pub.add('create_flow_subassembly: ' || 'roll_forwarded_flag ' ||l_x_flow_schedule_rec.roll_forwarded_flag ,1);
1681:
1682: oe_debug_pub.add('create_flow_subassembly: ' || 'current_line_operation ' ||l_x_flow_schedule_rec.current_line_operation ,1);
1683:
1684:
1678: oe_debug_pub.add('create_flow_subassembly: ' || 'synch_operation_seq_num ' ||l_x_flow_schedule_rec.synch_operation_seq_num ,1);
1679:
1680: oe_debug_pub.add('create_flow_subassembly: ' || 'roll_forwarded_flag ' ||l_x_flow_schedule_rec.roll_forwarded_flag ,1);
1681:
1682: oe_debug_pub.add('create_flow_subassembly: ' || 'current_line_operation ' ||l_x_flow_schedule_rec.current_line_operation ,1);
1683:
1684:
1685:
1686:
1702:
1703:
1704: IF PG_DEBUG <> 0 THEN
1705: IF PG_DEBUG <> 0 THEN
1706: oe_debug_pub.add('create_flow_subassembly: ' || 'CTOSUBSB.create_flow_subassembly expected excpn: ' || x_error_message,1);
1707: END IF;
1708: END IF;
1709:
1710:
1715:
1716:
1717: IF PG_DEBUG <> 0 THEN
1718: IF PG_DEBUG <> 0 THEN
1719: oe_debug_pub.add('create_flow_subassembly: ' || 'CTOSUBSB.create_flow_subassembly UN expected excpn: ' || x_error_message,1);
1720: END IF;
1721: END IF;
1722:
1723:
1728: substrb(sqlerrm,1,100);
1729:
1730: IF PG_DEBUG <> 0 THEN
1731: IF PG_DEBUG <> 0 THEN
1732: oe_debug_pub.add('create_flow_subassembly: ' || 'CTOSUBSB.create_flow_subassembly OTHERS excpn: ' || x_error_message,1);
1733: END IF;
1734: END IF;
1735:
1736:
1830:
1831: EXIT when c_order_details%notfound;
1832:
1833: If PG_DEBUG <> 0 Then
1834: oe_debug_pub.add(' SUPPLY FOR ORDER NUMBER = ' || l_order_number || 'LINE_ID = ' || l_order_line_id ,1);
1835: oe_debug_pub.add('-----------------------------------------------------------------------------------------',1);
1836:
1837: --CTO DEBUG FILE
1838: cto_wip_workflow_api_pk.cto_debug ('get_mlsupply_details',' SUPPLY FOR ORDER NUMBER = ' || l_order_number || 'LINE_ID = ' || l_order_line_id );
1831: EXIT when c_order_details%notfound;
1832:
1833: If PG_DEBUG <> 0 Then
1834: oe_debug_pub.add(' SUPPLY FOR ORDER NUMBER = ' || l_order_number || 'LINE_ID = ' || l_order_line_id ,1);
1835: oe_debug_pub.add('-----------------------------------------------------------------------------------------',1);
1836:
1837: --CTO DEBUG FILE
1838: cto_wip_workflow_api_pk.cto_debug ('get_mlsupply_details',' SUPPLY FOR ORDER NUMBER = ' || l_order_number || 'LINE_ID = ' || l_order_line_id );
1839: cto_wip_workflow_api_pk.cto_debug ('get_mlsupply_details','-----------------------------------------------------------------------------------------');
1838: cto_wip_workflow_api_pk.cto_debug ('get_mlsupply_details',' SUPPLY FOR ORDER NUMBER = ' || l_order_number || 'LINE_ID = ' || l_order_line_id );
1839: cto_wip_workflow_api_pk.cto_debug ('get_mlsupply_details','-----------------------------------------------------------------------------------------');
1840:
1841:
1842: oe_debug_pub.add('INDEX--'||'PARENT_INDEX--'||'ITEM_ID--'||'ITEM_NAME--'||'ITEM_QTY--'||'NEEDED_ITEM_QTY--'||
1843: 'CONFIG/ATO--'||'JOB_START_DATE--'||'JOB_COMPLETION_DATE--'||'SOURCED--'||'DISCREATE/FLOW/BUY--'||'COMMENTS',1);
1844:
1845:
1846: cto_wip_workflow_api_pk.cto_debug ('get_mlsupply_details','INDEX--'||'PARENT_INDEX--'||'ITEM_ID--'||'ITEM_NAME--'||'ITEM_QTY--'||'NEEDED_ITEM_QTY--'||
1913:
1914: END IF;--source type
1915:
1916: If PG_DEBUG <> 0 Then
1917: oe_debug_pub.add(l_item_index||' -- '||l_parent_index||' -- '||l_item_id||' -- '||l_item_name||' -- '||l_item_quantity||' -- '||
1918: l_needed_item_qty||' -- '||l_config_ato||' -- '||to_char(l_job_st_date,'mm/dd/yyyy hh24:mi:ss')||' -- '||
1919: to_char(l_job_completion_date,'mm/dd/yyyy hh24:mi:ss')||' -- '||l_sourced||' --'||l_supply_type||' -- '||l_comments,1);
1920:
1921:
1929: CLOSE c_supply_details;
1930:
1931: OPEN c_flow_supply;
1932: If PG_DEBUG <> 0 Then
1933: oe_debug_pub.add('INDEX(from above)--'||'SCHEDULE_NUMBER--'||'SCHEDULE_START_DATE--'||'SCHEDULE_COMPLETION_DATE--'||'PARENT_SCHEDULE_NUM(if flow parent)',1);
1934:
1935: 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)');
1936:
1937: End if;
1943: l_synch_schedule_num;
1944:
1945: EXIT when c_flow_supply%notfound;
1946: If PG_DEBUG <> 0 Then
1947: oe_debug_pub.add(l_item_index||' -- '||l_schedule_number||' -- '||to_char(l_scheduled_start_date,'mm/dd/yyyy hh24:mi:ss')||' -- '||
1948: to_char(l_scheduled_completion_date,'mm/dd/yyyy hh24:mi:ss')||' -- '||l_synch_schedule_num,1);
1949:
1950:
1951: cto_wip_workflow_api_pk.cto_debug ('get_mlsupply_details',l_item_index||' -- '||l_schedule_number||' -- '||
1965: CLOSE c_order_details;
1966:
1967: IF l_run_req_import_flag = 'Y' THEN
1968: --bugfix 2755695
1969: 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 );
1970: END IF;
1971:
1972:
1973:
2208:
2209:
2210: EXIT when c_flow_sch%notfound;
2211:
2212: oe_debug_pub.add('create_subassembly_supply'||'top most flow parent schdeule number' || l_flow_sch_details(flow_index).schedule_number);
2213:
2214:
2215:
2216: IF (flow_index = 1 ) THEN
2338: );
2339:
2340: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2341: IF PG_DEBUG <> 0 THEN
2342: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_child_configurations with status ' || l_return_status ,1);
2343:
2344: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2345: END IF;
2346: RAISE FND_API.G_EXC_ERROR;
2340: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2341: IF PG_DEBUG <> 0 THEN
2342: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_child_configurations with status ' || l_return_status ,1);
2343:
2344: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2345: END IF;
2346: RAISE FND_API.G_EXC_ERROR;
2347: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2348: IF PG_DEBUG <> 0 THEN
2345: END IF;
2346: RAISE FND_API.G_EXC_ERROR;
2347: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2348: IF PG_DEBUG <> 0 THEN
2349: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_child_configurations ' || l_return_status ,1);
2350:
2351: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2352: END IF;
2353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2347: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2348: IF PG_DEBUG <> 0 THEN
2349: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_child_configurations ' || l_return_status ,1);
2350:
2351: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2352: END IF;
2353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2354: ELSE
2355: IF PG_DEBUG <> 0 THEN
2352: END IF;
2353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2354: ELSE
2355: IF PG_DEBUG <> 0 THEN
2356: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from get_child_configurations ' ,1);
2357: END IF;
2358: END IF;
2359:
2360: IF (l_mlsupply_items.count = 1) THEN
2366:
2367:
2368: --getting completion date
2369:
2370: oe_debug_pub.add('Before starting logic of completion date',1);
2371:
2372:
2373: IF (l_mlsupply_items.count > 0) THEN --checks for uninitialized collection --bugfix2308063
2374:
2374:
2375: l_index := 2;--completion date is needed from 2nd level discrete item
2376: LOOP
2377:
2378: oe_debug_pub.add('Looping for item'||l_mlsupply_items(l_index).item_name,1);
2379: l_mlsupply_items(l_index).order_line_id := p_Top_Assembly_LineId;
2380:
2381: --insert data into MAIN table
2382:
2445: l_phantom := 'N';
2446:
2447: end;
2448:
2449: oe_debug_pub.add('Phantom flag'||l_phantom,1);
2450:
2451: IF l_phantom = 'Y' THEN
2452: oe_debug_pub.add('About to call process_phantoms',1);
2453: --call process children under phatom
2448:
2449: oe_debug_pub.add('Phantom flag'||l_phantom,1);
2450:
2451: IF l_phantom = 'Y' THEN
2452: oe_debug_pub.add('About to call process_phantoms',1);
2453: --call process children under phatom
2454: process_phantoms
2455: (
2456: pitems_table=>l_mlsupply_items,
2465:
2466: l_index := 2;--completion date is needed from 2nd level discrete item
2467: LOOP
2468:
2469: oe_debug_pub.add('Looping again for item'||l_mlsupply_items(l_index).item_name,1);
2470: l_mlsupply_items(l_index).order_line_id := p_Top_Assembly_LineId;
2471:
2472: -- rkaza. ireq project. 05/03/2005.
2473: -- Enabling 100% transfer rule supply creation for lower
2489: INTO l_finite_scheduler_flag
2490: FROM wip_parameters
2491: WHERE organization_id = l_ship_org;
2492:
2493: oe_debug_pub.add ('create_subassembly_jobs: ' || 'l_finite_scheduler_flag is '|| l_finite_scheduler_flag ,1);
2494:
2495: END IF;--finnite scheduler
2496:
2497:
2514:
2515:
2516: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2517: IF PG_DEBUG <> 0 THEN
2518: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_start_date with status ' || l_return_status ,1);
2519:
2520: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2521: END IF;
2522: RAISE FND_API.G_EXC_ERROR;
2516: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2517: IF PG_DEBUG <> 0 THEN
2518: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_start_date with status ' || l_return_status ,1);
2519:
2520: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2521: END IF;
2522: RAISE FND_API.G_EXC_ERROR;
2523: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2524: IF PG_DEBUG <> 0 THEN
2521: END IF;
2522: RAISE FND_API.G_EXC_ERROR;
2523: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2524: IF PG_DEBUG <> 0 THEN
2525: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_start_date ' || l_return_status ,1);
2526:
2527: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage,1);
2528: END IF;
2529: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2523: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2524: IF PG_DEBUG <> 0 THEN
2525: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_start_date ' || l_return_status ,1);
2526:
2527: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage,1);
2528: END IF;
2529: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2530: ELSE
2531: IF PG_DEBUG <> 0 THEN
2528: END IF;
2529: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2530: ELSE
2531: IF PG_DEBUG <> 0 THEN
2532: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from get_start_date ' ,1);
2533: END IF;
2534: END IF;
2535:
2536:
2541: --populate start date flag = 1implies insert satrt date in wjsi instead of completion date
2542: l_mlsupply_items(l_mlsupply_items(l_index).parent_index).populate_start_date := 1;
2543:
2544: IF PG_DEBUG <> 0 THEN
2545: oe_debug_pub.add('create_subassembly_jobs: ' || 'actual parent starts date is < sysdate ' ,1);
2546: END IF;
2547:
2548: ELSE
2549: l_mlsupply_items(l_mlsupply_items(l_index).parent_index).job_start_date := x_parent_job_start_date;
2546: END IF;
2547:
2548: ELSE
2549: l_mlsupply_items(l_mlsupply_items(l_index).parent_index).job_start_date := x_parent_job_start_date;
2550: oe_debug_pub.add('create_subassembly_jobs: ' || 'parent_start_date '|| to_char(x_parent_job_start_date,'mm/dd/yy hh24:mi:ss') ,1);
2551:
2552: END IF;
2553:
2554: ELSE
2552: END IF;
2553:
2554: ELSE
2555: l_mlsupply_items(l_mlsupply_items(l_index).parent_index).job_start_date := x_parent_job_start_date;
2556: oe_debug_pub.add('create_subassembly_jobs: ' || 'parent_start_date '|| to_char(x_parent_job_start_date,'mm/dd/yy hh:mi:ss') ,1);
2557: END IF ;
2558:
2559:
2560:
2590:
2591:
2592: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2593: IF PG_DEBUG <> 0 THEN
2594: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get-completion_date with status ' || l_return_status ,1);
2595:
2596: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2597: END IF;
2598: RAISE FND_API.G_EXC_ERROR;
2592: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2593: IF PG_DEBUG <> 0 THEN
2594: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get-completion_date with status ' || l_return_status ,1);
2595:
2596: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2597: END IF;
2598: RAISE FND_API.G_EXC_ERROR;
2599: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2600: IF PG_DEBUG <> 0 THEN
2597: END IF;
2598: RAISE FND_API.G_EXC_ERROR;
2599: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2600: IF PG_DEBUG <> 0 THEN
2601: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_completion_date ' || l_return_status ,1);
2602:
2603: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2604: END IF;
2605: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2599: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2600: IF PG_DEBUG <> 0 THEN
2601: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_completion_date ' || l_return_status ,1);
2602:
2603: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2604: END IF;
2605: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2606: ELSE
2607: IF PG_DEBUG <> 0 THEN
2604: END IF;
2605: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2606: ELSE
2607: IF PG_DEBUG <> 0 THEN
2608: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from get_completion_date ' ,1);
2609: oe_debug_pub.add('create_subassembly_jobs: ' || 'parent_start_date '|| to_char(x_parent_job_start_date,'mm/dd/yy hh:mi:ss') ,1);
2610: END IF;
2611: END IF;
2612:
2605: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2606: ELSE
2607: IF PG_DEBUG <> 0 THEN
2608: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from get_completion_date ' ,1);
2609: oe_debug_pub.add('create_subassembly_jobs: ' || 'parent_start_date '|| to_char(x_parent_job_start_date,'mm/dd/yy hh:mi:ss') ,1);
2610: END IF;
2611: END IF;
2612:
2613:
2656: );
2657:
2658: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2659: IF PG_DEBUG <> 0 THEN
2660: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_start_date with status ' || l_return_status ,1);
2661:
2662: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2663: END IF;
2664: RAISE FND_API.G_EXC_ERROR;
2658: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2659: IF PG_DEBUG <> 0 THEN
2660: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_start_date with status ' || l_return_status ,1);
2661:
2662: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2663: END IF;
2664: RAISE FND_API.G_EXC_ERROR;
2665: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2666: IF PG_DEBUG <> 0 THEN
2663: END IF;
2664: RAISE FND_API.G_EXC_ERROR;
2665: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2666: IF PG_DEBUG <> 0 THEN
2667: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_start_date ' || l_return_status ,1);
2668:
2669: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage,1);
2670: END IF;
2671: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2665: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2666: IF PG_DEBUG <> 0 THEN
2667: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_start_date ' || l_return_status ,1);
2668:
2669: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage,1);
2670: END IF;
2671: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2672: ELSE
2673: IF PG_DEBUG <> 0 THEN
2670: END IF;
2671: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2672: ELSE
2673: IF PG_DEBUG <> 0 THEN
2674: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from get_start_date ' ,1);
2675: END IF;
2676: END IF;
2677:
2678: IF (x_parent_job_start_date <= SYSDATE) THEN
2678: IF (x_parent_job_start_date <= SYSDATE) THEN
2679: l_mlsupply_items(l_index).job_start_date := SYSDATE;
2680:
2681: IF PG_DEBUG <> 0 THEN
2682: oe_debug_pub.add('create_subassembly_jobs: ' || 'actual parent starts date is < sysdate ' ,1);
2683: END IF;
2684:
2685: ELSE
2686: l_mlsupply_items(l_index).job_start_date := x_parent_job_start_date;
2683: END IF;
2684:
2685: ELSE
2686: l_mlsupply_items(l_index).job_start_date := x_parent_job_start_date;
2687: oe_debug_pub.add('create_subassembly_jobs: ' || 'parent_start_date '|| to_char(x_parent_job_start_date,'mm/dd/yy hh:mi:ss') ,1);
2688:
2689: END IF;
2690:
2691:
2740: l_stmt_num := 210;
2741: If PG_DEBUG <> 0 Then
2742: cto_wip_workflow_api_pk.cto_debug ('create_sub_assembly_jobs','calling create flow schedule for'|| l_mlsupply_items(l_index).item_id);
2743:
2744: oe_debug_pub.add('create_subassembly_jobs: ' || 'calling create flow schedule for'|| l_mlsupply_items(l_index).item_id);
2745: END IF;
2746:
2747: create_flow_subassembly (
2748: pflow_sch_details => l_flow_sch_details,
2758: );
2759:
2760: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2761: IF PG_DEBUG <> 0 THEN
2762: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to create_flow_subassembly with status ' || l_return_status ,1);
2763:
2764: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2765: END IF;
2766: RAISE FND_API.G_EXC_ERROR;
2760: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2761: IF PG_DEBUG <> 0 THEN
2762: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to create_flow_subassembly with status ' || l_return_status ,1);
2763:
2764: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2765: END IF;
2766: RAISE FND_API.G_EXC_ERROR;
2767: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2768: IF PG_DEBUG <> 0 THEN
2765: END IF;
2766: RAISE FND_API.G_EXC_ERROR;
2767: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2768: IF PG_DEBUG <> 0 THEN
2769: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to create_flow_subassembly ' || l_return_status ,1);
2770:
2771: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2772: END IF;
2773: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2767: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2768: IF PG_DEBUG <> 0 THEN
2769: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to create_flow_subassembly ' || l_return_status ,1);
2770:
2771: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2772: END IF;
2773: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2774: ELSE
2775:
2773: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2774: ELSE
2775:
2776: IF PG_DEBUG <> 0 THEN
2777: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from create_flow_subassembly ' ,1);
2778: END IF;
2779: END IF;
2780:
2781:
2783: END IF; --make
2784: ELSE --parent is flow item
2785:
2786:
2787: oe_debug_pub.add (l_mlsupply_items(l_index).item_name || ' parent is a flow item',1);
2788:
2789: -- if current item is discrete do not call feeder
2790: -- if current item is flow call feeder
2791:
2792:
2793:
2794: IF(l_mlsupply_items(l_index).cfm_routing_flag =1 ) THEN -- child is flow
2795:
2796: oe_debug_pub.add('checking if feeder is run',1);
2797: IF ( l_mlsupply_items(l_mlsupply_items(l_index).parent_index).feeder_run <> 'Y' ) THEN
2798: oe_debug_pub.add('calling feeder line api');
2799:
2800: l_stmt_num := 220;
2794: IF(l_mlsupply_items(l_index).cfm_routing_flag =1 ) THEN -- child is flow
2795:
2796: oe_debug_pub.add('checking if feeder is run',1);
2797: IF ( l_mlsupply_items(l_mlsupply_items(l_index).parent_index).feeder_run <> 'Y' ) THEN
2798: oe_debug_pub.add('calling feeder line api');
2799:
2800: l_stmt_num := 220;
2801: SELECT max(scheduled_completion_date)
2802: into max_completion_date
2803: from BOM_CTO_MLSUPPLY_FLOW_TEMP
2804: where item_index = l_mlsupply_items(l_index).parent_index
2805: and order_line_id = p_Top_Assembly_LineId ;
2806:
2807: oe_debug_pub.add('aparameters for feeder call');
2808: oe_debug_pub.add('max schcompletion date'||to_char(max_completion_date,'dd/mm/yy hh:mi:ss') );
2809: oe_debug_pub.add('LIne code :'||l_mlsupply_items(l_mlsupply_items(l_index).parent_index).line_code );
2810:
2811: --creating child supply on feeder line
2804: where item_index = l_mlsupply_items(l_index).parent_index
2805: and order_line_id = p_Top_Assembly_LineId ;
2806:
2807: oe_debug_pub.add('aparameters for feeder call');
2808: oe_debug_pub.add('max schcompletion date'||to_char(max_completion_date,'dd/mm/yy hh:mi:ss') );
2809: oe_debug_pub.add('LIne code :'||l_mlsupply_items(l_mlsupply_items(l_index).parent_index).line_code );
2810:
2811: --creating child supply on feeder line
2812: l_stmt_num := 230;
2805: and order_line_id = p_Top_Assembly_LineId ;
2806:
2807: oe_debug_pub.add('aparameters for feeder call');
2808: oe_debug_pub.add('max schcompletion date'||to_char(max_completion_date,'dd/mm/yy hh:mi:ss') );
2809: oe_debug_pub.add('LIne code :'||l_mlsupply_items(l_mlsupply_items(l_index).parent_index).line_code );
2810:
2811: --creating child supply on feeder line
2812: l_stmt_num := 230;
2813: FLM_CREATE_PRODUCT_SYNCH.create_schedules(
2819: to_char(SYSDATE-1,'YYYY/MM/DD hh:mm:ss'),
2820: to_char(max_completion_date,'YYYY/MM/DD hh:mm:ss'), --to_char(SYSDATE+7,'YYYY/MM/DD hh:mm:ss'),
2821: 'N');
2822:
2823: oe_debug_pub.add('After calklling feeder line api',1);
2824:
2825: --set parent feeder run flag to 'Y'
2826: l_mlsupply_items(l_mlsupply_items(l_index).parent_index).feeder_run := 'Y';
2827:
2881:
2882: END;
2883:
2884: IF PG_DEBUG <> 0 THEN
2885: oe_debug_pub.add ('create_subassembly_jobs: ' || 'operation seq id is' || l_operation_seq_id ,1);
2886:
2887:
2888: END IF;
2889:
2895: where item_index = l_mlsupply_items(l_index).parent_index;
2896:
2897: IF PG_DEBUG <> 0 THEN
2898:
2899: oe_debug_pub.add ('create_subassembly_jobs: ' || 'operation offsetd date is '|| l_child_operation_date,1);
2900:
2901: END IF;
2902:
2903: ELSE
2903: ELSE
2904:
2905: IF PG_DEBUG <> 0 THEN
2906:
2907: oe_debug_pub.add ('create_subassembly_jobs: ' || 'before entering get_operation offsetd ate' ,1);
2908:
2909: END IF;
2910:
2911: l_stmt_num := 241;
2914: from BOM_CTO_MLSUPPLY_FLOW_TEMP
2915: where item_index = l_mlsupply_items(l_index).parent_index;
2916:
2917: IF PG_DEBUG <> 0 THEN
2918: oe_debug_pub.add ('create_subassembly_jobs: ' || 'min schedule date' || to_char(l_min_completion_date,'mm/dd/yy hh:mi:ss') ,1);
2919:
2920: END IF;
2921:
2922:
2938:
2939: END IF;
2940:
2941: IF PG_DEBUG <> 0 THEN
2942: oe_debug_pub.add ('create_subassembly_jobs: ' || 'after get_ioperation offset date with date' || l_child_operation_date ,1);
2943:
2944: END IF;
2945:
2946: l_stmt_num := 244;
2955:
2956: x_child_completion_date := l_child_operation_date;
2957:
2958: IF PG_DEBUG <> 0 THEN
2959: oe_debug_pub.add ('create_subassembly_jobs: ' || 'lead time for buy child is ' || l_lead_time ,1);
2960:
2961: END IF;
2962:
2963: if l_mlsupply_items(l_index).source_type = 3 then
2977: end if;
2978:
2979: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2980: IF PG_DEBUG <> 0 THEN
2981: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after get_wroking_day' || l_return_status ,1);
2982:
2983: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2984: END IF;
2985: RAISE FND_API.G_EXC_ERROR;
2979: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
2980: IF PG_DEBUG <> 0 THEN
2981: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after get_wroking_day' || l_return_status ,1);
2982:
2983: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2984: END IF;
2985: RAISE FND_API.G_EXC_ERROR;
2986: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2987: IF PG_DEBUG <> 0 THEN
2984: END IF;
2985: RAISE FND_API.G_EXC_ERROR;
2986: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2987: IF PG_DEBUG <> 0 THEN
2988: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_working_day' || l_return_status ,1);
2989:
2990: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2991: END IF;
2992: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2986: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2987: IF PG_DEBUG <> 0 THEN
2988: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_working_day' || l_return_status ,1);
2989:
2990: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
2991: END IF;
2992: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2993: ELSE
2994:
2992: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2993: ELSE
2994:
2995: IF PG_DEBUG <> 0 THEN
2996: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from get_working_day ' ,1);
2997: END IF;
2998: END IF;
2999:
3000: IF (x_child_completion_date <= SYSDATE) THEN
2998: END IF;
2999:
3000: IF (x_child_completion_date <= SYSDATE) THEN
3001: IF PG_DEBUG <> 0 THEN
3002: oe_debug_pub.add('create_subassembly_jobs: ' || 'buy or IR job comp date is < than sysdate,so default to sysdate' ,1);
3003: oe_debug_pub.add('create_subassembly_jobs: ' || 'buy or IR job comp date is ' || x_child_completion_date,1);
3004: END IF;
3005:
3006: l_mlsupply_items(l_index).job_completion_date := SYSDATE;
2999:
3000: IF (x_child_completion_date <= SYSDATE) THEN
3001: IF PG_DEBUG <> 0 THEN
3002: oe_debug_pub.add('create_subassembly_jobs: ' || 'buy or IR job comp date is < than sysdate,so default to sysdate' ,1);
3003: oe_debug_pub.add('create_subassembly_jobs: ' || 'buy or IR job comp date is ' || x_child_completion_date,1);
3004: END IF;
3005:
3006: l_mlsupply_items(l_index).job_completion_date := SYSDATE;
3007:
3009:
3010: l_mlsupply_items(l_index).job_completion_date := x_child_completion_date;
3011:
3012: IF PG_DEBUG <> 0 THEN
3013: oe_debug_pub.add('create_subassembly_jobs: ' || 'buy or IR job comp date is ' || x_child_completion_date,1);
3014: END IF;
3015:
3016:
3017: END IF;
3031: INTO l_finite_scheduler_flag
3032: FROM wip_parameters
3033: WHERE organization_id = l_ship_org;
3034:
3035: oe_debug_pub.add ('create_subassembly_jobs: ' || 'l_finite_scheduler_flag is '|| l_finite_scheduler_flag ,1);
3036:
3037: END IF;--finnite scheduler
3038:
3039:
3039:
3040: IF (l_finite_scheduler_flag =1) THEN
3041:
3042: IF( l_child_operation_date <= SYSDATE) THEN --less than sysdate
3043: oe_debug_pub.add('create_subassembly_jobs: ' || 'Finite scheduler ON and DISCRETE job comp date is
3045: l_mlsupply_items(l_index).populate_start_date := 1; -- to insert wip inetrface with satrt date
3046:
3047: l_mlsupply_items(l_index).job_completion_date := SYSDATE;
3040: IF (l_finite_scheduler_flag =1) THEN
3041:
3042: IF( l_child_operation_date <= SYSDATE) THEN --less than sysdate
3043: oe_debug_pub.add('create_subassembly_jobs: ' || 'Finite scheduler ON and DISCRETE job comp date is
3045: l_mlsupply_items(l_index).populate_start_date := 1; -- to insert wip inetrface with satrt date
3046:
3047: l_mlsupply_items(l_index).job_completion_date := SYSDATE;
3048: l_mlsupply_items(l_index).job_start_date := SYSDATE;
3055:
3056: ELSE-- greater sysdate
3057:
3058: l_mlsupply_items(l_index).job_completion_date := l_child_operation_date;
3059: oe_debug_pub.add('create_subassembly_jobs: ' || 'DISCRETE job comp date is '|| l_mlsupply_items(l_index).job_completion_date,1);
3060:
3061:
3062: --if flow is top most item AND
3063: --if finite scheduler is on we calculate job start date
3081: );
3082:
3083: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
3084: IF PG_DEBUG <> 0 THEN
3085: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_start_date with status ' || l_return_status ,1);
3086:
3087: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
3088: END IF;
3089: RAISE FND_API.G_EXC_ERROR;
3083: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
3084: IF PG_DEBUG <> 0 THEN
3085: oe_debug_pub.add ('create_subassembly_jobs: ' || 'failed after call to get_start_date with status ' || l_return_status ,1);
3086:
3087: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage ,1);
3088: END IF;
3089: RAISE FND_API.G_EXC_ERROR;
3090: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3091: IF PG_DEBUG <> 0 THEN
3088: END IF;
3089: RAISE FND_API.G_EXC_ERROR;
3090: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3091: IF PG_DEBUG <> 0 THEN
3092: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_start_date ' || l_return_status ,1);
3093:
3094: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage,1);
3095: END IF;
3096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3090: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3091: IF PG_DEBUG <> 0 THEN
3092: oe_debug_pub.add ('create_subassembly_jobs: ' || ' failed after call to get_start_date ' || l_return_status ,1);
3093:
3094: oe_debug_pub.add ('create_subassembly_jobs: ' || 'error message' || l_error_messsage,1);
3095: END IF;
3096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3097: ELSE
3098: IF PG_DEBUG <> 0 THEN
3095: END IF;
3096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3097: ELSE
3098: IF PG_DEBUG <> 0 THEN
3099: oe_debug_pub.add('create_subassembly_jobs: ' || 'success from get_start_date ' ,1);
3100: END IF;
3101: END IF;
3102:
3103: IF (x_parent_job_start_date <= SYSDATE) THEN
3103: IF (x_parent_job_start_date <= SYSDATE) THEN
3104: l_mlsupply_items(l_index).job_start_date := SYSDATE;
3105:
3106: IF PG_DEBUG <> 0 THEN
3107: oe_debug_pub.add('create_subassembly_jobs: ' || 'actual parent starts date is < sysdate ' ,1);
3108: END IF;
3109:
3110: ELSE
3111: l_mlsupply_items(l_index).job_start_date := x_parent_job_start_date;
3108: END IF;
3109:
3110: ELSE
3111: l_mlsupply_items(l_index).job_start_date := x_parent_job_start_date;
3112: oe_debug_pub.add('create_subassembly_jobs: ' || 'parent_start_date '|| to_char(x_parent_job_start_date,'mm/dd/yy hh:mi:ss') ,1);
3113:
3114: END IF;
3115:
3116:
3128:
3129: l_mlsupply_items(l_index).job_completion_date := l_child_operation_date;
3130:
3131:
3132: oe_debug_pub.add('create_subassembly_jobs: ' || 'DISCRETE job comp date is '|| l_mlsupply_items(l_index).job_completion_date,1);
3133:
3134: update bom_cto_mlsupply_main_temp
3135: set job_completion_date = l_mlsupply_items(l_index).job_completion_date
3136: where item_index = l_index
3159:
3160:
3161: --reomve this part at end of UT
3162: If PG_DEBUG <> 0 Then
3163: oe_debug_pub.add ('DEBUG EMSSAEG AFTER COMPLETION DATE CALCULATION',1);
3164:
3165: cto_wip_workflow_api_pk.cto_debug('Completion date debug messages','after completion date calculations');
3166: End if;
3167: --displaying children
3166: End if;
3167: --displaying children
3168: IF (l_mlsupply_items.count > 0) THEN --checks for uninitialized collection --bugfix2308063
3169:
3170: oe_debug_pub.add ('index --'||'item_name--' || 'item_quantity--'||'needed_item_quantity--'||'OPERATION_LEAD_TIME_PERCENT--'||
3171: 'operation_seq_num--'|| 'cfm_routing_flag--'||'routing_sequence_id--'||'fixed_lead_time--'||
3172: 'variable_lead_time--' || 'processing_lead_time--' || 'postprocessing_lead_time--' ||
3173: 'bom_item_type --' || 'parent_index--'||'job_start_date --'||'job_completion_date --'||
3174: 'line_id--' || 'line_code--'||'source_type--' || 'feeder_run--' || 'flow_start_index--' ||
3176: );
3177:
3178: l_index := 1;--completion date is needed from 2nd level discrete item
3179: LOOP
3180: oe_debug_pub.add ('idx=>'||l_mlsupply_items(l_index).t_item_details_index || '--' ||
3181: 'name=>'||l_mlsupply_items(l_index).item_name||'--' ||
3182: 'qty=>'||l_mlsupply_items(l_index).item_quantity||'--'||
3183: 'qty=>'||l_mlsupply_items(l_index).needed_item_qty||'--'||
3184: 'LT%=>'||l_mlsupply_items(l_index).OPERATION_LEAD_TIME_PERCENT||'--'||
3256: LOOP
3257:
3258:
3259: IF PG_DEBUG <> 0 THEN
3260: oe_debug_pub.add('create_subassembly_jobs: ' || l_index||'-- '||
3261: l_mlsupply_items(l_index).parent_index||'-- '||
3262: l_mlsupply_items(l_index).item_id||' -- '||
3263: l_mlsupply_items(l_index).item_name||' -- '||
3264: l_mlsupply_items(l_index).job_start_date||' -- '||
3274: END IF;
3275:
3276:
3277: IF PG_DEBUG <> 0 THEN
3278: oe_debug_pub.add('create_subassembly_jobs: ' || 'before inserting children in wjsi ',1);
3279: END IF;
3280:
3281: --to test submission of wip concurrent program from PL/SQL
3282:
3301: cto_wip_workflow_api_pk.cto_debug ('create_sub_assembly_jobs','need aty'||l_mlsupply_items(l_index).needed_item_qty);
3302: End if;
3303:
3304: IF PG_DEBUG <> 0 THEN
3305: oe_debug_pub.add('create_subassembly_jobs: ' || 'insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3306: oe_debug_pub.add('create_sub_assembly_jobs insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3307: 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'));
3308: oe_debug_pub.add('create_sub_assembly_jobs need aty'||l_mlsupply_items(l_index).needed_item_qty);
3309:
3302: End if;
3303:
3304: IF PG_DEBUG <> 0 THEN
3305: oe_debug_pub.add('create_subassembly_jobs: ' || 'insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3306: oe_debug_pub.add('create_sub_assembly_jobs insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3307: 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'));
3308: oe_debug_pub.add('create_sub_assembly_jobs need aty'||l_mlsupply_items(l_index).needed_item_qty);
3309:
3310: END IF;
3303:
3304: IF PG_DEBUG <> 0 THEN
3305: oe_debug_pub.add('create_subassembly_jobs: ' || 'insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3306: oe_debug_pub.add('create_sub_assembly_jobs insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3307: 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'));
3308: oe_debug_pub.add('create_sub_assembly_jobs need aty'||l_mlsupply_items(l_index).needed_item_qty);
3309:
3310: END IF;
3311:
3304: IF PG_DEBUG <> 0 THEN
3305: oe_debug_pub.add('create_subassembly_jobs: ' || 'insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3306: oe_debug_pub.add('create_sub_assembly_jobs insert po_interafce'|| l_mlsupply_items(l_index).item_id);
3307: 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'));
3308: oe_debug_pub.add('create_sub_assembly_jobs need aty'||l_mlsupply_items(l_index).needed_item_qty);
3309:
3310: END IF;
3311:
3312: l_req_input_data.source_type := l_mlsupply_items(l_index).source_type;
3339: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3340: ELSE
3341:
3342: IF PG_DEBUG <> 0 THEN
3343: oe_debug_pub.add('create_subassembly_jobs: ' || 'Req Insert successful for '|| l_mlsupply_items(l_index).item_id ,1);
3344: END IF;
3345: IF ( l_sub_level_buy_item = 'N') THEN
3346: l_sub_level_buy_item := 'Y';
3347: END IF;
3358: If(l_mlsupply_items(l_index).cfm_routing_flag = 2 OR
3359: l_mlsupply_items(l_index).cfm_routing_flag = -99) THEN -- discrete routing
3360:
3361: IF PG_DEBUG <> 0 THEN
3362: oe_debug_pub.add('create_subassembly_jobs: ' || 'Status passed into lower level supply code is ' || p_status_type);
3363: END IF;
3364:
3365: IF(l_mlsupply_items(1).cfm_routing_flag = 2 OR
3366: l_mlsupply_items(1).cfm_routing_flag = -99) THEN --top most parent is discrete
3473:
3474:
3475: if (SQL%ROWCOUNT > 0) then
3476: IF PG_DEBUG <> 0 THEN
3477: oe_debug_pub.add('create_subassembly_jobs: ' || 'Number of Rows Inserted in WJSI for children : ' || to_char(SQL%ROWCOUNT));
3478:
3479: oe_debug_pub.add('create_subassembly_jobs: ' || 'GROUP ID Inserted in WJSI for children : ' || x_groupID);
3480: END IF;
3481: x_return_status := FND_API.G_RET_STS_SUCCESS;
3475: if (SQL%ROWCOUNT > 0) then
3476: IF PG_DEBUG <> 0 THEN
3477: oe_debug_pub.add('create_subassembly_jobs: ' || 'Number of Rows Inserted in WJSI for children : ' || to_char(SQL%ROWCOUNT));
3478:
3479: oe_debug_pub.add('create_subassembly_jobs: ' || 'GROUP ID Inserted in WJSI for children : ' || x_groupID);
3480: END IF;
3481: x_return_status := FND_API.G_RET_STS_SUCCESS;
3482: else
3483: x_return_status := FND_API.G_RET_STS_ERROR;
3615: );
3616:
3617: if (SQL%ROWCOUNT > 0) then
3618: IF PG_DEBUG <> 0 THEN
3619: oe_debug_pub.add('create_subassembly_jobs: ' || 'Number of Rows Inserted in WJSI for children : ' || to_char(SQL%ROWCOUNT));
3620:
3621: oe_debug_pub.add('create_subassembly_jobs: ' || 'GROUP ID Inserted in WJSI for children : ' || x_groupID);
3622: END IF;
3623:
3617: if (SQL%ROWCOUNT > 0) then
3618: IF PG_DEBUG <> 0 THEN
3619: oe_debug_pub.add('create_subassembly_jobs: ' || 'Number of Rows Inserted in WJSI for children : ' || to_char(SQL%ROWCOUNT));
3620:
3621: oe_debug_pub.add('create_subassembly_jobs: ' || 'GROUP ID Inserted in WJSI for children : ' || x_groupID);
3622: END IF;
3623:
3624: end if;
3625:
3637: -- for multiple sources.
3638: ELSIF (l_mlsupply_items(l_index).source_type = 66) THEN
3639: -- 66 = multiple sources
3640: IF PG_DEBUG <> 0 THEN
3641: 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');
3642: END IF;
3643:
3644: END IF; --source_type
3645:
3700: x_errMsg := fnd_message.get;
3701: ROLLBACK TO REBUILD;
3702: else
3703: IF PG_DEBUG <> 0 THEN
3704: oe_debug_pub.add('create_subassembly_jobs: ' || 'REQUEST ID Inserted in WJSI for children : ' || l_requestId);
3705: cto_wip_workflow_api_pk.cto_debug ('Requets id is=> ', l_requestId);
3706:
3707: l_token(1).token_name := 'REQUEST_ID';
3708: l_token(1).token_value := l_requestId;
3738: substrb(sqlerrm,1,100) ;
3739:
3740:
3741: IF PG_DEBUG <> 0 THEN
3742: oe_debug_pub.add('create_subassembly_jobs: ' || 'CTOSUBSB.create_sub_assembly_jobs expected excpn: ' || x_error_message,1);
3743: END IF;
3744:
3745:
3746:
3750: substrb(sqlerrm,1,100);
3751:
3752:
3753: IF PG_DEBUG <> 0 THEN
3754: oe_debug_pub.add('create_subassembly_jobs: ' || 'CTOSUBSB.create_sub_assembly_jobs UN expected excpn: ' || x_error_message,1);
3755: END IF;
3756:
3757:
3758:
3763: substrb(sqlerrm,1,100);
3764:
3765:
3766: IF PG_DEBUG <> 0 THEN
3767: oe_debug_pub.add('create_subassembly_jobs: ' || 'CTOSUBSB.create_sub_assembly_jobs OTHERS excpn: ' || x_error_message,1);
3768: END IF;
3769:
3770: END create_subassembly_jobs;
3771:
3792:
3793: l_stmt_num number;
3794:
3795: BEGIN
3796: oe_debug_pub.add('Inside process_phantoms',1);
3797: --replace phatom's parent idx with its first non-phatom parent idx in chain
3798: l_stmt_num :=10;
3799: l_index := 2;
3800: Loop
3831: l_last_index := pitems_table.count;
3832:
3833: IF PG_DEBUG = 5 THEN
3834: FOR i IN 1..l_last_index LOOP
3835: oe_debug_pub.add('index=>'||i||
3836: 'item_id=>'||pitems_table(i).item_id||
3837: 'parent_idx=>'||pitems_table(i).parent_index||
3838: 'actual_parent_idx=>'||pitems_table(i).actual_parent_idx||
3839: 'wip_supply_type=>'||pitems_table(i).wip_supply_type,5);
3890: IF pitems_table(l_index).parent_index <> pitems_table(l_index).actual_parent_idx THEN -- implies child of pH
3891: l_parent_index := pitems_table(l_index).parent_index;
3892:
3893: IF PG_DEBUG <> 0 THEN
3894: oe_debug_pub.add('ENTERED IF BLOCK',5);
3895: oe_debug_pub.add('parent_item_id=>'||pitems_table(l_parent_index).item_id ,5);
3896: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id ,5);
3897: oe_debug_pub.add('operation_seq_num=>'||pitems_table(l_index).operation_seq_num ,5);
3898: END IF;
3891: l_parent_index := pitems_table(l_index).parent_index;
3892:
3893: IF PG_DEBUG <> 0 THEN
3894: oe_debug_pub.add('ENTERED IF BLOCK',5);
3895: oe_debug_pub.add('parent_item_id=>'||pitems_table(l_parent_index).item_id ,5);
3896: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id ,5);
3897: oe_debug_pub.add('operation_seq_num=>'||pitems_table(l_index).operation_seq_num ,5);
3898: END IF;
3899:
3892:
3893: IF PG_DEBUG <> 0 THEN
3894: oe_debug_pub.add('ENTERED IF BLOCK',5);
3895: oe_debug_pub.add('parent_item_id=>'||pitems_table(l_parent_index).item_id ,5);
3896: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id ,5);
3897: oe_debug_pub.add('operation_seq_num=>'||pitems_table(l_index).operation_seq_num ,5);
3898: END IF;
3899:
3900: BEGIN
3893: IF PG_DEBUG <> 0 THEN
3894: oe_debug_pub.add('ENTERED IF BLOCK',5);
3895: oe_debug_pub.add('parent_item_id=>'||pitems_table(l_parent_index).item_id ,5);
3896: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id ,5);
3897: oe_debug_pub.add('operation_seq_num=>'||pitems_table(l_index).operation_seq_num ,5);
3898: END IF;
3899:
3900: BEGIN
3901: l_stmt_num := 70;
3911: and nvl( bos_p.operation_type,1)=1; ---consider event only for flm routing 5676839
3912: Exception
3913: WHEN no_data_found then
3914: pitems_table(l_index).operation_lead_time_percent := 0;
3915: oe_debug_pub.add('lead_time=>'||pitems_table(l_index).operation_lead_time_percent,1);
3916:
3917: END;
3918:
3919: oe_debug_pub.add('lead_time=>'||pitems_table(l_index).operation_lead_time_percent,1);
3915: oe_debug_pub.add('lead_time=>'||pitems_table(l_index).operation_lead_time_percent,1);
3916:
3917: END;
3918:
3919: oe_debug_pub.add('lead_time=>'||pitems_table(l_index).operation_lead_time_percent,1);
3920: l_stmt_num := 80;
3921: update BOM_CTO_MLSUPPLY_MAIN_TEMP
3922: set --operation_seq_num = pitems_table(l_index).operation_seq_num,
3923: OPERATION_LEAD_TIME_PERCENT = pitems_table(l_index).OPERATION_LEAD_TIME_PERCENT
3933:
3934:
3935: IF PG_DEBUG = 5 THEN
3936: FOR i IN 1..l_last_index LOOP
3937: oe_debug_pub.add('index=>'||i||
3938: 'item_id=>'||pitems_table(i).item_id||
3939: 'parent_idx=>'||pitems_table(i).parent_index||
3940: 'actual_parent_idx=>'||pitems_table(i).actual_parent_idx||
3941: 'wip_supply_type=>'||pitems_table(i).wip_supply_type||
3963: )
3964: )
3965: THEN
3966: IF PG_DEBUG <> 0 THEN
3967: oe_debug_pub.add('ENTERED MIN OP SEQ BLOCK',5);
3968: END IF;
3969:
3970: l_stmt_num := 90;
3971: select min(OPERATION_SEQ_NUM),sum(needed_item_qty)
3974: WHERE parent_index = pitems_table(l_index).parent_index
3975: AND item_id = pitems_table(l_index).item_id;
3976:
3977: IF PG_DEBUG <> 0 THEN
3978: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id,5);
3979: oe_debug_pub.add('x_min_op_seq_num=>'||x_min_op_seq_num,5);
3980: oe_debug_pub.add('l_cons_item_qty=>'||l_cons_item_qty,5);
3981: oe_debug_pub.add('parent_index=>'||pitems_table(l_index).parent_index,5);
3982: END IF;
3975: AND item_id = pitems_table(l_index).item_id;
3976:
3977: IF PG_DEBUG <> 0 THEN
3978: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id,5);
3979: oe_debug_pub.add('x_min_op_seq_num=>'||x_min_op_seq_num,5);
3980: oe_debug_pub.add('l_cons_item_qty=>'||l_cons_item_qty,5);
3981: oe_debug_pub.add('parent_index=>'||pitems_table(l_index).parent_index,5);
3982: END IF;
3983:
3976:
3977: IF PG_DEBUG <> 0 THEN
3978: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id,5);
3979: oe_debug_pub.add('x_min_op_seq_num=>'||x_min_op_seq_num,5);
3980: oe_debug_pub.add('l_cons_item_qty=>'||l_cons_item_qty,5);
3981: oe_debug_pub.add('parent_index=>'||pitems_table(l_index).parent_index,5);
3982: END IF;
3983:
3984: l_stmt_num := 100;
3977: IF PG_DEBUG <> 0 THEN
3978: oe_debug_pub.add('item_id=>'||pitems_table(l_index).item_id,5);
3979: oe_debug_pub.add('x_min_op_seq_num=>'||x_min_op_seq_num,5);
3980: oe_debug_pub.add('l_cons_item_qty=>'||l_cons_item_qty,5);
3981: oe_debug_pub.add('parent_index=>'||pitems_table(l_index).parent_index,5);
3982: END IF;
3983:
3984: l_stmt_num := 100;
3985: Update bom_cto_mlsupply_main_temp
4005: END LOOP;
4006:
4007: IF PG_DEBUG = 5 THEN
4008: FOR i IN 1..l_last_index LOOP
4009: oe_debug_pub.add('index=>'||i||
4010: 'item_id=>'||pitems_table(i).item_id||
4011: 'parent_idx=>'||pitems_table(i).parent_index||
4012: 'actual_parent_idx=>'||pitems_table(i).actual_parent_idx||
4013: 'wip_supply_type=>'||pitems_table(i).wip_supply_type||
4026:
4027:
4028: IF PG_DEBUG <> 0 THEN
4029: IF PG_DEBUG <> 0 THEN
4030: oe_debug_pub.add('process_phantoms: ' || 'CTOSUBSB.create_flow_subassembly expected excpn: ' || x_error_message,1);
4031: END IF;
4032: END IF;
4033:
4034:
4039:
4040:
4041: IF PG_DEBUG <> 0 THEN
4042: IF PG_DEBUG <> 0 THEN
4043: oe_debug_pub.add('process_phantoms: ' || 'CTOSUBSB.create_flow_subassembly UN expected excpn: ' || x_error_message,1);
4044: END IF;
4045: END IF;
4046:
4047:
4052: substrb(sqlerrm,1,100);
4053:
4054: IF PG_DEBUG <> 0 THEN
4055: IF PG_DEBUG <> 0 THEN
4056: oe_debug_pub.add('process_phantoms: ' || 'CTOSUBSB.create_flow_subassembly OTHERS excpn: ' || x_error_message,1);
4057: END IF;
4058: END IF;
4059:
4060: