[Home] [Help]
250:
251: BEGIN
252:
253: IF PG_DEBUG <> 0 THEN
254: oe_debug_pub.add('populate_plan_level: ' || 'Populate_Src_Orgs::pTopAtoLineId::'||to_char(pTopAtoLineId),1);
255: END IF;
256:
257: --
258: -- For each model item in all possible receiving orgs, call
260: --
261:
262: lStmtNumber := 20;
263: IF PG_DEBUG <> 0 THEN
264: oe_debug_pub.add('populate_plan_level: ' || 'before loop',2);
265: END IF;
266:
267:
268: FOR v_model_lines IN c_model_lines LOOP
268: FOR v_model_lines IN c_model_lines LOOP
269:
270:
271: IF PG_DEBUG <> 0 THEN
272: oe_debug_pub.add('populate_plan_level: ' || 'loop::item::'||to_char(v_model_lines.inventory_item_id)||
273: '::line_id::'||to_char(v_model_lines.line_id),2);
274: END IF;
275: lStmtNumber := 30;
276:
275: lStmtNumber := 30;
276:
277: IF v_model_lines.ato_line_id = v_model_lines.line_id THEN
278: IF PG_DEBUG <> 0 THEN
279: oe_debug_pub.add('populate_plan_level: ' || 'ato_line_id = line_id',2);
280: END IF;
281:
282:
283: lStmtNumber := 40;
287: where line_id = v_model_lines.line_id;
288:
289: lStmtNumber := 50;
290: IF PG_DEBUG <> 0 THEN
291: oe_debug_pub.add('populate_plan_level: ' || 'before calling GAIO',2);
292:
293: oe_debug_pub.add('populate_plan_level: ' || 'line_id::'||to_char(v_model_lines.line_id)||
294: '::inv_id::'||to_char(v_model_lines.inventory_item_id)||
295: '::ship_from_org::'||to_char(lShipFromOrgId),2);
289: lStmtNumber := 50;
290: IF PG_DEBUG <> 0 THEN
291: oe_debug_pub.add('populate_plan_level: ' || 'before calling GAIO',2);
292:
293: oe_debug_pub.add('populate_plan_level: ' || 'line_id::'||to_char(v_model_lines.line_id)||
294: '::inv_id::'||to_char(v_model_lines.inventory_item_id)||
295: '::ship_from_org::'||to_char(lShipFromOrgId),2);
296: END IF;
297:
304: x_msg_data);
305:
306: IF (lStatus <> 1) AND (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
307: IF PG_DEBUG <> 0 THEN
308: oe_debug_pub.add('populate_plan_level: ' || 'GAIO returned with unexp error',1);
309: END IF;
310: raise FND_API.G_EXC_UNEXPECTED_ERROR;
311:
312: ELSIF (lStatus <> 1) AND (x_return_status = FND_API.G_RET_STS_ERROR) THEN
310: raise FND_API.G_EXC_UNEXPECTED_ERROR;
311:
312: ELSIF (lStatus <> 1) AND (x_return_status = FND_API.G_RET_STS_ERROR) THEN
313: IF PG_DEBUG <> 0 THEN
314: oe_debug_pub.add('populate_plan_level: ' || 'GAIO returned with exp error',1);
315: END IF;
316: raise FND_API.G_EXC_ERROR;
317: END IF;
318: IF PG_DEBUG <> 0 THEN
315: END IF;
316: raise FND_API.G_EXC_ERROR;
317: END IF;
318: IF PG_DEBUG <> 0 THEN
319: oe_debug_pub.add('populate_plan_level: ' || 'after calling GAIO::lStatus::'||to_char(lStatus),2);
320: END IF;
321: ELSE
322: IF PG_DEBUG <> 0 THEN
323: oe_debug_pub.add('populate_plan_level: ' || 'ato_line_id <> line_id',2);
319: oe_debug_pub.add('populate_plan_level: ' || 'after calling GAIO::lStatus::'||to_char(lStatus),2);
320: END IF;
321: ELSE
322: IF PG_DEBUG <> 0 THEN
323: oe_debug_pub.add('populate_plan_level: ' || 'ato_line_id <> line_id',2);
324: END IF;
325: lStmtNumber := 60;
326: lLineId := v_model_lines.line_id;
327: IF PG_DEBUG <> 0 THEN
324: END IF;
325: lStmtNumber := 60;
326: lLineId := v_model_lines.line_id;
327: IF PG_DEBUG <> 0 THEN
328: oe_debug_pub.add('populate_plan_level: ' || 'before PSO loop',2);
329: END IF;
330:
331: FOR v_parent_src_ogs IN c_parent_src_orgs LOOP
332: IF PG_DEBUG <> 0 THEN
329: END IF;
330:
331: FOR v_parent_src_ogs IN c_parent_src_orgs LOOP
332: IF PG_DEBUG <> 0 THEN
333: oe_debug_pub.add('populate_plan_level: ' || 'in PSO loop::rcv org::'||
334: to_char(v_parent_src_ogs.organization_id),2);
335:
336: oe_debug_pub.add('populate_plan_level: ' || 'in PSO loop::item id::'||
337: to_char(v_model_lines.inventory_item_id),2);
332: IF PG_DEBUG <> 0 THEN
333: oe_debug_pub.add('populate_plan_level: ' || 'in PSO loop::rcv org::'||
334: to_char(v_parent_src_ogs.organization_id),2);
335:
336: oe_debug_pub.add('populate_plan_level: ' || 'in PSO loop::item id::'||
337: to_char(v_model_lines.inventory_item_id),2);
338:
339: oe_debug_pub.add('populate_plan_level: ' || 'in PSO loop::line id::'||
340: to_char(v_model_lines.line_id),2);
335:
336: oe_debug_pub.add('populate_plan_level: ' || 'in PSO loop::item id::'||
337: to_char(v_model_lines.inventory_item_id),2);
338:
339: oe_debug_pub.add('populate_plan_level: ' || 'in PSO loop::line id::'||
340: to_char(v_model_lines.line_id),2);
341: END IF;
342: lStmtNumber := 70;
343: lStatus := get_all_item_orgs(v_model_lines.line_id,
348: x_msg_data);
349:
350: IF (lStatus <> 1) AND (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
351: IF PG_DEBUG <> 0 THEN
352: oe_debug_pub.add('populate_plan_level: ' || 'GAIO returned with unexp error',1);
353: END IF;
354: raise FND_API.G_EXC_UNEXPECTED_ERROR;
355:
356: ELSIF (lStatus <> 1) AND (x_return_status = FND_API.G_RET_STS_ERROR) THEN
354: raise FND_API.G_EXC_UNEXPECTED_ERROR;
355:
356: ELSIF (lStatus <> 1) AND (x_return_status = FND_API.G_RET_STS_ERROR) THEN
357: IF PG_DEBUG <> 0 THEN
358: oe_debug_pub.add('populate_plan_level: ' || 'GAIO returned with exp error',1);
359: END IF;
360: raise FND_API.G_EXC_ERROR;
361: END IF;
362:
365:
366: END LOOP;
367:
368: IF PG_DEBUG <> 0 THEN
369: oe_debug_pub.add('populate_plan_level: ' || 'end of loop',1);
370:
371: oe_debug_pub.add('populate_plan_level: ' || 'printing out bcso :', 2);
372:
373: oe_debug_pub.add('populate_plan_level: ' || 'line_id model_item_id rcv_org_id org_id create_bom create_src_rules', 2);
367:
368: IF PG_DEBUG <> 0 THEN
369: oe_debug_pub.add('populate_plan_level: ' || 'end of loop',1);
370:
371: oe_debug_pub.add('populate_plan_level: ' || 'printing out bcso :', 2);
372:
373: oe_debug_pub.add('populate_plan_level: ' || 'line_id model_item_id rcv_org_id org_id create_bom create_src_rules', 2);
374: END IF;
375:
369: oe_debug_pub.add('populate_plan_level: ' || 'end of loop',1);
370:
371: oe_debug_pub.add('populate_plan_level: ' || 'printing out bcso :', 2);
372:
373: oe_debug_pub.add('populate_plan_level: ' || 'line_id model_item_id rcv_org_id org_id create_bom create_src_rules', 2);
374: END IF;
375:
376: FOR v_debug IN c_debug LOOP
377: IF PG_DEBUG <> 0 THEN
374: END IF;
375:
376: FOR v_debug IN c_debug LOOP
377: IF PG_DEBUG <> 0 THEN
378: oe_debug_pub.add('populate_plan_level: ' || to_char(v_debug.line_id)||' '||
379: to_char(v_debug.model_item_id)||' '||
380: nvl(to_char(v_debug.rcv_org_id),null)||' '||
381: to_char(v_debug.organization_id)||' '||
382: nvl(v_debug.create_bom, null)||' '||
389: EXCEPTION
390:
391: when FND_API.G_EXC_UNEXPECTED_ERROR then
392: IF PG_DEBUG <> 0 THEN
393: oe_debug_pub.add('populate_plan_level: ' || 'Populate_Src_Orgs::unexp error::'||lStmtNumber||sqlerrm,1);
394: END IF;
395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
396: CTO_MSG_PUB.Count_And_Get
397: (p_msg_count => x_msg_count
400: return(0);
401:
402: when FND_API.G_EXC_ERROR then
403: IF PG_DEBUG <> 0 THEN
404: oe_debug_pub.add('populate_plan_level: ' || 'Populate_Src_Orgs::exp error::'||lStmtNumber||sqlerrm,1);
405: END IF;
406: x_return_status := FND_API.G_RET_STS_ERROR;
407: CTO_MSG_PUB.Count_And_Get
408: (p_msg_count => x_msg_count
410: return(0);
411:
412: when others then
413: IF PG_DEBUG <> 0 THEN
414: oe_debug_pub.add('populate_plan_level: ' || 'Populate_Src_Orgs::others::'||lStmtNumber||sqlerrm,1);
415: END IF;
416: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
417: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
418: FND_MSG_PUB.Add_Exc_Msg
569: Null;
570: END;
571:
572: IF PG_DEBUG <> 0 THEN
573: oe_debug_pub.add('populate_plan_level: ' || 'top ato line id::'||to_char(lTopAtoLineId),2);
574:
575: oe_debug_pub.add('populate_plan_level: ' || 'rcv org id::'||to_char(pRcvOrgId),2);
576:
577: oe_debug_pub.add('populate_plan_level: ' || 'model item id::'||to_char(pModelItemId),2);
571:
572: IF PG_DEBUG <> 0 THEN
573: oe_debug_pub.add('populate_plan_level: ' || 'top ato line id::'||to_char(lTopAtoLineId),2);
574:
575: oe_debug_pub.add('populate_plan_level: ' || 'rcv org id::'||to_char(pRcvOrgId),2);
576:
577: oe_debug_pub.add('populate_plan_level: ' || 'model item id::'||to_char(pModelItemId),2);
578: END IF;
579:
573: oe_debug_pub.add('populate_plan_level: ' || 'top ato line id::'||to_char(lTopAtoLineId),2);
574:
575: oe_debug_pub.add('populate_plan_level: ' || 'rcv org id::'||to_char(pRcvOrgId),2);
576:
577: oe_debug_pub.add('populate_plan_level: ' || 'model item id::'||to_char(pModelItemId),2);
578: END IF;
579:
580: -- Added by Renga Kannan on 08/23/01 for procuring configuration
581:
579:
580: -- Added by Renga Kannan on 08/23/01 for procuring configuration
581:
582: IF PG_DEBUG <> 0 THEN
583: oe_debug_pub.add('populate_plan_level: ' || 'Parent ATO line id = '||l_parent_ato_line_id,1);
584:
585: oe_debug_pub.add('populate_plan_level: ' || 'Parent source type = '||l_source_type,1);
586: END IF;
587:
581:
582: IF PG_DEBUG <> 0 THEN
583: oe_debug_pub.add('populate_plan_level: ' || 'Parent ATO line id = '||l_parent_ato_line_id,1);
584:
585: oe_debug_pub.add('populate_plan_level: ' || 'Parent source type = '||l_source_type,1);
586: END IF;
587:
588:
589:
594:
595: v_source_type_code := 'INTERNAL' ;
596:
597: IF PG_DEBUG <> 0 THEN
598: oe_debug_pub.add('populate_plan_level: ' || ' pc bom source type code = '|| v_source_type_code ,1);
599: END IF;
600: else
601:
602: select source_type_code
604: from oe_order_lines_all
605: where line_id = pLineId ;
606:
607: IF PG_DEBUG <> 0 THEN
608: oe_debug_pub.add('populate_plan_level: ' || ' non pc bom source type code = '|| v_source_type_code ,1);
609: END IF;
610:
611: end if ;
612:
610:
611: end if ;
612:
613: IF PG_DEBUG <> 0 THEN
614: oe_debug_pub.add('populate_plan_level: ' || 'source type code = '|| v_source_type_code ,1);
615: END IF;
616:
617:
618: lStmtNumber := 30;
634: -- will be copied
635: lStmtNumber := 35;
636: l_source_type := 4;
637: IF PG_DEBUG <> 0 THEN
638: oe_debug_pub.add('populate_plan_level: ' || ' This is part of Buy model... No need to look for sourcing...',1);
639: END IF;
640:
641:
642:
652:
653:
654: l_source_type := 6 ;
655: IF PG_DEBUG <> 0 THEN
656: oe_debug_pub.add('populate_plan_level: ' || ' This is part of Drop Ship model...',1);
657: END IF;
658:
659:
660:
662: ELSE
663:
664: IF lMrpAssignmentSet is null THEN
665: IF PG_DEBUG <> 0 THEN
666: oe_debug_pub.add('populate_plan_level: ' || 'Default assignment set is null',1);
667: END IF;
668:
669:
670: -- added by Renga Kannan on 08/21/01
685: and organization_id = pRcvOrgId;
686:
687:
688: IF PG_DEBUG <> 0 THEN
689: oe_debug_pub.add('populate_plan_level: ' || 'Make buy code:: 1 means make 2 means buy',1);
690:
691: oe_debug_pub.add('populate_plan_level: ' || 'Planning make buy code for this item is ='||to_char(l_make_buy_code),1);
692: END IF;
693:
687:
688: IF PG_DEBUG <> 0 THEN
689: oe_debug_pub.add('populate_plan_level: ' || 'Make buy code:: 1 means make 2 means buy',1);
690:
691: oe_debug_pub.add('populate_plan_level: ' || 'Planning make buy code for this item is ='||to_char(l_make_buy_code),1);
692: END IF;
693:
694: IF l_make_buy_code = 2 then
695: l_source_type := 3; ----- Buy Type
706:
707:
708: ELSE
709: IF PG_DEBUG <> 0 THEN
710: oe_debug_pub.add('populate_plan_level: ' || 'Default assignment set is '||to_char(lMrpAssignmentSet),2);
711: END IF;
712:
713:
714: --
734: BEGIN
735:
736: lStmtNumber := 50;
737: IF PG_DEBUG <> 0 THEN
738: oe_debug_pub.add('populate_plan_level: ' || 'Getting source for rcv org::'||to_char(l_curr_RcvOrgId), 2);
739: END IF;
740:
741: -- Modified by Renga Kannan on 08/21/01 to honor the BUY sourcing and make_buy_code also
742: -- The where condition in the select statement for source_type is removed. The source_type
780:
781: end if ;
782:
783: IF PG_DEBUG <> 0 THEN
784: oe_debug_pub.add('populate_plan_level: ' || 'Source for this rcv org::'||to_char(l_curr_src_org),2);
785:
786: oe_debug_pub.add('populate_plan_level: ' || 'Source type = '||to_char(l_source_type),2);
787: END IF;
788:
782:
783: IF PG_DEBUG <> 0 THEN
784: oe_debug_pub.add('populate_plan_level: ' || 'Source for this rcv org::'||to_char(l_curr_src_org),2);
785:
786: oe_debug_pub.add('populate_plan_level: ' || 'Source type = '||to_char(l_source_type),2);
787: END IF;
788:
789: EXCEPTION
790:
813: IF l_sourcing_rule_count > 0 then
814:
815: -- multiple sources defined
816: IF PG_DEBUG <> 0 THEN
817: oe_debug_pub.add('populate_plan_level: ' || 'Multiple sources defined for model '||to_char(pModelItemId)
818: ||', org '||to_char(l_curr_RcvOrgId), 1);
819: END IF;
820:
821:
829: raise FND_API.G_EXC_ERROR;
830: ELSE
831:
832: IF PG_DEBUG <> 0 THEN
833: oe_debug_pub.add('populate_plan_level: ' || 'This model is having buy sourcing rule...',1);
834: END IF;
835:
836:
837: if( v_source_type_code = 'INTERNAL' ) then
868:
869: -- end of chain, exit out of loop
870: -- update final src for BOM creation
871: IF PG_DEBUG <> 0 THEN
872: oe_debug_pub.add('populate_plan_level: ' || 'NDF::End of chain for model '||to_char(pModelItemId), 1);
873: END IF;
874:
875: -- added by Renga Kannan on 08/21/01
876: -- When there is no sourcing rule defined we need to check for the make_buy_type of the
896: EXCEPTION
897: WHEN NO_DATA_FOUND THEN
898:
899: IF PG_DEBUG <> 0 THEN
900: oe_debug_pub.add('populate_plan_level: ' || 'Inventory_item_id = '|| to_char(pModelItemId),1);
901:
902: oe_debug_pub.add('populate_plan_level: ' || 'Organization id = '|| to_char(l_curr_RcvOrgId),1);
903:
904: oe_debug_pub.add('populate_plan_level: ' || 'ERROR::The item is not defined in the sourcing org',1);
898:
899: IF PG_DEBUG <> 0 THEN
900: oe_debug_pub.add('populate_plan_level: ' || 'Inventory_item_id = '|| to_char(pModelItemId),1);
901:
902: oe_debug_pub.add('populate_plan_level: ' || 'Organization id = '|| to_char(l_curr_RcvOrgId),1);
903:
904: oe_debug_pub.add('populate_plan_level: ' || 'ERROR::The item is not defined in the sourcing org',1);
905: END IF;
906:
900: oe_debug_pub.add('populate_plan_level: ' || 'Inventory_item_id = '|| to_char(pModelItemId),1);
901:
902: oe_debug_pub.add('populate_plan_level: ' || 'Organization id = '|| to_char(l_curr_RcvOrgId),1);
903:
904: oe_debug_pub.add('populate_plan_level: ' || 'ERROR::The item is not defined in the sourcing org',1);
905: END IF;
906:
907:
908: -- The following message handling is modified by Renga Kannan
918:
919: -- End of addition by Renga on 11/07/01
920:
921: IF PG_DEBUG <> 0 THEN
922: oe_debug_pub.add('populate_plan_level: ' || 'Planning Make_buy_code for this model = '||l_make_buy_code,1);
923: END IF;
924:
925: IF l_make_buy_code = 2 then
926: l_source_type := 3; ----- Buy Type
924:
925: IF l_make_buy_code = 2 then
926: l_source_type := 3; ----- Buy Type
927: IF PG_DEBUG <> 0 THEN
928: oe_debug_pub.add('populate_plan_level: ' || 'This model is a buy model...',1);
929: END IF;
930: END IF;
931:
932:
936: l_source_type := 5; ----- Drop Ship Type
937: l_curr_src_org := l_curr_RcvOrgId;
938: l_curr_rank := null;
939: IF PG_DEBUG <> 0 THEN
940: oe_debug_pub.add('populate_plan_level: ' || 'This model is a buy model...',1);
941: END IF;
942:
943: end if ;
944:
951: and model_item_id = pModelItemId
952: and organization_id = l_curr_src_org;
953:
954: IF PG_DEBUG <> 0 THEN
955: oe_debug_pub.add('populate_plan_level: ' || 'Rows updated::'||sql%rowcount,2);
956: END IF;
957: EXIT;
958:
959:
969: IF l_circular_src = 'Y' THEN
970: -- circular sourcing defined
971: lStmtNumber := 110;
972: IF PG_DEBUG <> 0 THEN
973: oe_debug_pub.add('populate_plan_level: ' || 'Circular sourcing defined for model '
974: ||to_char(pModelItemId)
975: ||' in org '
976: ||to_char(pRcvOrgId), 1);
977: END IF;
1034: IF (l_curr_src_org = l_curr_RcvOrgId) THEN
1035: -- end of chain, exit out of loop
1036: -- update final src for BOM creation
1037: IF PG_DEBUG <> 0 THEN
1038: oe_debug_pub.add('populate_plan_level: ' || 'End of chain for model '||to_char(pModelItemId), 1);
1039: END IF;
1040:
1041:
1042: --- The source type column is added by Renga Kannan on 08/21/01
1052: EXIT;
1053: END IF;
1054:
1055: IF PG_DEBUG <> 0 THEN
1056: oe_debug_pub.add('populate_plan_level: ' || 'inserted rcv org::'||to_char(l_curr_RcvOrgId)||' src org::'||to_char(l_curr_src_org), 2);
1057: END IF;
1058: l_curr_RcvOrgId := l_curr_src_org;
1059:
1060: END LOOP;
1059:
1060: END LOOP;
1061: --<
1062: IF PG_DEBUG <> 0 THEN
1063: oe_debug_pub.add('populate_plan_level: ' || 'after insert 1',2);
1064: END IF;
1065: END IF; /* MRP profile is not null */
1066:
1067: END IF; /* check for DROP SHIP , BUY_ITEM_FLAG is not Y */
1123: where line_id = pLineId
1124: and model_item_id = pModelItemId);
1125:
1126: IF PG_DEBUG <> 0 THEN
1127: oe_debug_pub.add('populate_plan_level: ' || 'after insert 2',2);
1128: END IF;
1129:
1130: --
1131: -- Next, populate bom_cto_src_orgs with the
1187: and model_item_id = pModelItemId
1188: and organization_id = pRcvOrgId);
1189:
1190: IF PG_DEBUG <> 0 THEN
1191: oe_debug_pub.add('populate_plan_level: ' || 'after insert 3',2);
1192: END IF;
1193:
1194: --
1195: -- Next, get the OE validation org and populate it in
1198: -- do nothing, else insert a new row
1199: --
1200: lStmtNumber := 170;
1201: IF PG_DEBUG <> 0 THEN
1202: oe_debug_pub.add('populate_plan_level: ' || 'Before getting validation org',2);
1203: END IF;
1204:
1205: lStmtNumber := 180;
1206:
1226:
1227: */
1228:
1229: IF PG_DEBUG <> 0 THEN
1230: oe_debug_pub.add('populate_plan_level: ' || 'Going to fetch Validation Org ' ,2);
1231: END IF;
1232:
1233:
1234: select nvl( oe_sys_parameters.value( 'MASTER_ORGANIZATION_ID' , oel.org_id) , -99)
1244: cto_msg_pub.cto_message('BOM','CTO_INVALID_SOURCING');
1245: raise FND_API.G_EXC_ERROR;
1246: end if;
1247: IF PG_DEBUG <> 0 THEN
1248: oe_debug_pub.add('populate_plan_level: ' || 'Validation Org is :' || lValidationOrg,2);
1249: END IF;
1250:
1251: lStmtNumber := 190;
1252:
1300: and model_item_id = pModelItemId
1301: and organization_id = lVAlidationOrg);
1302:
1303: IF PG_DEBUG <> 0 THEN
1304: oe_debug_pub.add('populate_plan_level: ' || 'after insert 4',2);
1305: END IF;
1306:
1307: --
1308: -- Next, get the PO validation org and populate it in
1312: -- If the org already exists for this item,
1313: -- do nothing, else insert a new row
1314: --
1315: IF PG_DEBUG <> 0 THEN
1316: oe_debug_pub.add('populate_plan_level: ' || 'Before getting validation org',2);
1317: END IF;
1318:
1319: lStmtNumber := 200;
1320: BEGIN
1362: end if ;
1363:
1364:
1365: IF PG_DEBUG <> 0 THEN
1366: oe_debug_pub.add('populate_plan_level: ' || 'Po Validation Org ='||to_char(lpovalidationorg),1);
1367: END IF;
1368:
1369:
1370:
1381: IF l_source_type in (3,4, 5, 6 ) THEN
1382:
1383: if lPoVAlidationOrg = -99 then --bugfix 2646849
1384: IF PG_DEBUG <> 0 THEN
1385: oe_debug_pub.add('populate_plan_level: ' || 'No Povalidation org is defined .. Need to error out..',1);
1386: END IF;
1387: cto_msg_pub.cto_message('BOM','CTO_PO_VALIDATION');
1388: raise po_multiorg_error;
1389: end if;
1397:
1398: -- End of addition
1399:
1400: IF PG_DEBUG <> 0 THEN
1401: oe_debug_pub.add('populate_plan_level: ' || 'PO Validation Org is :' ||lPoValidationOrg,2);
1402: END IF;
1403:
1404: lStmtNumber := 210;
1405:
1453: and model_item_id = pModelItemId
1454: and organization_id = lPoVAlidationOrg);
1455:
1456: IF PG_DEBUG <> 0 THEN
1457: oe_debug_pub.add('populate_plan_level: ' || 'after insert 5',2);
1458: END IF;
1459:
1460:
1461: -- Added By Renga Kannan on 10/31/02 for Global Purchase agreement
1516:
1517: EXCEPTION
1518: WHEN no_data_found THEN
1519: IF PG_DEBUG <> 0 THEN
1520: oe_debug_pub.add('populate_plan_level: ' || 'PO validation org is NULL, not inserting row for PO val org',2);
1521: END IF;
1522: null;
1523: WHEN po_multiorg_error THEN
1524: IF PG_DEBUG <> 0 THEN
1521: END IF;
1522: null;
1523: WHEN po_multiorg_error THEN
1524: IF PG_DEBUG <> 0 THEN
1525: oe_debug_pub.add('populate_plan_level: ' || 'po_multiorg_error, not inserting row for PO val org',2);
1526: END IF;
1527: Raise FND_API.G_EXC_ERROR;
1528: WHEN others THEN
1529: IF PG_DEBUG <> 0 THEN
1526: END IF;
1527: Raise FND_API.G_EXC_ERROR;
1528: WHEN others THEN
1529: IF PG_DEBUG <> 0 THEN
1530: oe_debug_pub.add('populate_plan_level: ' || 'others exception in PO validation block, not inserting row for PO val org',2);
1531: END IF;
1532: null;
1533: END;
1534: return(1);
1535:
1536: EXCEPTION
1537: when FND_API.G_EXC_ERROR then
1538: IF PG_DEBUG <> 0 THEN
1539: oe_debug_pub.add('populate_plan_level: ' || 'Get_All_item_orgs::exp error::'||to_char(lStmtNumber)||'::'||sqlerrm,1);
1540: END IF;
1541: x_return_status := FND_API.G_RET_STS_ERROR;
1542: CTO_MSG_PUB.Count_And_Get
1543: (p_msg_count => x_msg_count
1546: return(0);
1547:
1548: when FND_API.G_EXC_UNEXPECTED_ERROR then
1549: IF PG_DEBUG <> 0 THEN
1550: oe_debug_pub.add('populate_plan_level: ' || 'Get_All_item_orgs::unexp error::'||to_char(lStmtNumber)||'::'||sqlerrm,1);
1551: END IF;
1552: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1553: CTO_MSG_PUB.Count_And_Get (
1554: p_msg_count => x_msg_count
1557: return(0);
1558:
1559: when OTHERS then
1560: IF PG_DEBUG <> 0 THEN
1561: oe_debug_pub.add('populate_plan_level: ' || 'Get_All_item_orgs::others::'||to_char(lStmtNumber)||'::'||sqlerrm,1);
1562: END IF;
1563: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1564: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1565: FND_MSG_PUB.Add_Exc_Msg
1602: and inventory_item_id = pModelId;
1603:
1604: if sql%notfound then
1605: IF PG_DEBUG <> 0 THEN
1606: oe_debug_pub.add('populate_plan_level: ' || 'Update_Order_Lines:: ndf::model line does not exist in bcol'||to_char(lStmtNumber)||sqlerrm,1);
1607: END IF;
1608: return(0);
1609: else
1610: return(1);
1612:
1613: EXCEPTION
1614: when others then
1615: IF PG_DEBUG <> 0 THEN
1616: oe_debug_pub.add('populate_plan_level: ' || 'Update_Order_Lines:: others exception'||to_char(lStmtNumber)||sqlerrm,1);
1617: END IF;
1618: return(0);
1619:
1620: END Update_Order_Lines;
1643: and model_item_id = pModelId;
1644:
1645: if sql%notfound then
1646: IF PG_DEBUG <> 0 THEN
1647: oe_debug_pub.add('populate_plan_level: ' || 'Update_Src_Orgs:: Could not update the config item: '||sqlerrm,1);
1648: END IF;
1649: return(0);
1650: else
1651: return(1);
1655: EXCEPTION
1656:
1657: when others then
1658: IF PG_DEBUG <> 0 THEN
1659: oe_debug_pub.add('populate_plan_level: ' || 'Update_Src_Orgs:: others exception'||sqlerrm,1);
1660: END IF;
1661: return(0);
1662:
1663: END Update_Src_Orgs;
1709: lMrpAssignmentSet := to_number(FND_PROFILE.VALUE('MRP_DEFAULT_ASSIGNMENT_SET'));
1710:
1711: IF lMrpAssignmentSet is null THEN
1712: IF PG_DEBUG <> 0 THEN
1713: oe_debug_pub.add('populate_plan_level: ' || 'Default assignment set is null, returning from create_sourcing_rules procedure',1);
1714: END IF;
1715: return;
1716: ELSE
1717: IF PG_DEBUG <> 0 THEN
1714: END IF;
1715: return;
1716: ELSE
1717: IF PG_DEBUG <> 0 THEN
1718: oe_debug_pub.add('populate_plan_level: ' || 'Default assignment set is '||to_char(lMrpAssignmentSet),2);
1719: END IF;
1720: END IF;
1721:
1722: --
1757: EXCEPTION
1758: WHEN NO_DATA_FOUND THEN
1759:
1760: IF PG_DEBUG <> 0 THEN
1761: oe_debug_pub.add('populate_plan_level: ' || 'There is no sourcing rule defined ',1);
1762: END IF;
1763: raise no_sourcing_defined;
1764:
1765: END;
1765: END;
1766:
1767:
1768: IF PG_DEBUG <> 0 THEN
1769: oe_debug_pub.add('populate_plan_level: ' || 'lAssnType::'||to_char(lAssignmentType)||'::lAssnId::'||to_char(lAssignmentId),2);
1770: END IF;
1771:
1772: --
1773: -- copy assignment into lAssignmentRec
1863: FROM MRP_SR_ASSIGNMENTS
1864: WHERE ASSIGNMENT_ID = lAssignmentId;
1865:
1866: IF PG_DEBUG <> 0 THEN
1867: oe_debug_pub.add('populate_plan_level: ' || 'after query row',2);
1868: END IF;
1869:
1870: --
1871: -- check if this assignment already exists for config item
1873: lStmtNum := 35;
1874: BEGIN
1875:
1876: IF PG_DEBUG <> 0 THEN
1877: oe_debug_pub.add('populate_plan_level: ' || 'assignment_set_id::'||to_char(lAssignmentRec.assignment_set_id),2);
1878:
1879: oe_debug_pub.add('populate_plan_level: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);
1880:
1881: oe_debug_pub.add('populate_plan_level: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);
1875:
1876: IF PG_DEBUG <> 0 THEN
1877: oe_debug_pub.add('populate_plan_level: ' || 'assignment_set_id::'||to_char(lAssignmentRec.assignment_set_id),2);
1878:
1879: oe_debug_pub.add('populate_plan_level: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);
1880:
1881: oe_debug_pub.add('populate_plan_level: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);
1882:
1883: oe_debug_pub.add('populate_plan_level: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);
1877: oe_debug_pub.add('populate_plan_level: ' || 'assignment_set_id::'||to_char(lAssignmentRec.assignment_set_id),2);
1878:
1879: oe_debug_pub.add('populate_plan_level: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);
1880:
1881: oe_debug_pub.add('populate_plan_level: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);
1882:
1883: oe_debug_pub.add('populate_plan_level: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);
1884:
1885: oe_debug_pub.add('populate_plan_level: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);
1879: oe_debug_pub.add('populate_plan_level: ' || 'assignment_type::'||to_char(lAssignmentRec.assignment_type),2);
1880:
1881: oe_debug_pub.add('populate_plan_level: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);
1882:
1883: oe_debug_pub.add('populate_plan_level: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);
1884:
1885: oe_debug_pub.add('populate_plan_level: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);
1886:
1887: oe_debug_pub.add('populate_plan_level: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);
1881: oe_debug_pub.add('populate_plan_level: ' || 'organization_id::'||to_char(lAssignmentRec.organization_id),2);
1882:
1883: oe_debug_pub.add('populate_plan_level: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);
1884:
1885: oe_debug_pub.add('populate_plan_level: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);
1886:
1887: oe_debug_pub.add('populate_plan_level: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);
1888:
1889: oe_debug_pub.add('populate_plan_level: ' || 'inventory_item_id:: '||to_char(pConfigId),2);
1883: oe_debug_pub.add('populate_plan_level: ' || 'customer_id::'||to_char(lAssignmentRec.customer_id),2);
1884:
1885: oe_debug_pub.add('populate_plan_level: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);
1886:
1887: oe_debug_pub.add('populate_plan_level: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);
1888:
1889: oe_debug_pub.add('populate_plan_level: ' || 'inventory_item_id:: '||to_char(pConfigId),2);
1890:
1891: oe_debug_pub.add('populate_plan_level: ' || 'category_id:: '||to_char(lAssignmentRec.category_id),2);
1885: oe_debug_pub.add('populate_plan_level: ' || 'ship_to_site_id::'||to_char(lAssignmentRec.ship_to_site_id),2);
1886:
1887: oe_debug_pub.add('populate_plan_level: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);
1888:
1889: oe_debug_pub.add('populate_plan_level: ' || 'inventory_item_id:: '||to_char(pConfigId),2);
1890:
1891: oe_debug_pub.add('populate_plan_level: ' || 'category_id:: '||to_char(lAssignmentRec.category_id),2);
1892: END IF;
1893:
1887: oe_debug_pub.add('populate_plan_level: ' || 'sourcing_rule_type::'||to_char(lAssignmentRec.sourcing_rule_type),2);
1888:
1889: oe_debug_pub.add('populate_plan_level: ' || 'inventory_item_id:: '||to_char(pConfigId),2);
1890:
1891: oe_debug_pub.add('populate_plan_level: ' || 'category_id:: '||to_char(lAssignmentRec.category_id),2);
1892: END IF;
1893:
1894: -- bug 6617686
1895: IF pConfigId IS NOT NULL THEN
1920: -- end: bug 6617686
1921:
1922: IF lAssignmentExists = 1 THEN
1923: IF PG_DEBUG <> 0 THEN
1924: oe_debug_pub.add('populate_plan_level: ' || 'assignment exists already, do not recreate',2);
1925: END IF;
1926: return;
1927: END IF;
1928:
1928:
1929: EXCEPTION
1930: when NO_DATA_FOUND then
1931: IF PG_DEBUG <> 0 THEN
1932: oe_debug_pub.add('populate_plan_level: ' || 'assignment does not exist, create it',2);
1933: END IF;
1934: when OTHERS then
1935: IF PG_DEBUG <> 0 THEN
1936: oe_debug_pub.add('populate_plan_level: ' || 'others exception while checking ifassignment exists, not handling, creating assignment:: '||sqlerrm,2);
1932: oe_debug_pub.add('populate_plan_level: ' || 'assignment does not exist, create it',2);
1933: END IF;
1934: when OTHERS then
1935: IF PG_DEBUG <> 0 THEN
1936: oe_debug_pub.add('populate_plan_level: ' || 'others exception while checking ifassignment exists, not handling, creating assignment:: '||sqlerrm,2);
1937: END IF;
1938: END;
1939:
1940: --
1989: lAssignmentTbl(1).db_flag := NULL;
1990: lAssignmentTbl(1).operation := MRP_Globals.G_OPR_CREATE;
1991:
1992: IF PG_DEBUG <> 0 THEN
1993: oe_debug_pub.add('populate_plan_level: ' || 'after forming lAssignmentTbl',2);
1994: END IF;
1995:
1996: --
1997: -- form lAssignmentSetRec
1998: --
1999: lStmtNum := 50;
2000: lAssignmentSetRec.operation := MRP_Globals.G_OPR_NONE;
2001: IF PG_DEBUG <> 0 THEN
2002: oe_debug_pub.add('populate_plan_level: ' || 'after forming lAssignmentSetRec',2);
2003: END IF;
2004:
2005: --
2006: -- call mrp API to insert rec into assignment set
2006: -- call mrp API to insert rec into assignment set
2007: --
2008: lStmtNum := 60;
2009: IF PG_DEBUG <> 0 THEN
2010: oe_debug_pub.add('populate_plan_level: ' || 'before Process_Assignment',2);
2011: END IF;
2012:
2013: -- currently, not passing commented out parameters, need to
2014: -- confirm with raghu, confirmed with stupe
2032: );
2033:
2034: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2035: IF PG_DEBUG <> 0 THEN
2036: oe_debug_pub.add('populate_plan_level: ' || 'unexp error in process_assignment::'||sqlerrm,1);
2037: END IF;
2038: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2039:
2040: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2038: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2039:
2040: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2041: IF PG_DEBUG <> 0 THEN
2042: oe_debug_pub.add('populate_plan_level: ' || 'error in process_assignment::'||sqlerrm,1);
2043: END IF;
2044: raise FND_API.G_EXC_ERROR;
2045:
2046: END IF;
2044: raise FND_API.G_EXC_ERROR;
2045:
2046: END IF;
2047: IF PG_DEBUG <> 0 THEN
2048: oe_debug_pub.add('populate_plan_level: ' || 'success in process_assignment',2);
2049: END IF;
2050:
2051: EXCEPTION
2052: When NO_sourcing_defined THEN
2053: null;
2054:
2055: when FND_API.G_EXC_ERROR then
2056: IF PG_DEBUG <> 0 THEN
2057: oe_debug_pub.add('populate_plan_level: ' || 'Create_Src_Rules::exp error::'||to_char(lStmtNum)||'::'||sqlerrm,1);
2058: END IF;
2059: x_return_status := FND_API.G_RET_STS_ERROR;
2060: CTO_MSG_PUB.Count_And_Get
2061: (p_msg_count => x_msg_count
2063: );
2064:
2065: when FND_API.G_EXC_UNEXPECTED_ERROR then
2066: IF PG_DEBUG <> 0 THEN
2067: oe_debug_pub.add('populate_plan_level: ' || 'Create_Src_Rules::unexp error::'||to_char(lStmtNum)||'::'||sqlerrm,1);
2068: END IF;
2069: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2070: CTO_MSG_PUB.Count_And_Get
2071: (p_msg_count => x_msg_count
2073: );
2074:
2075: when OTHERS then
2076: IF PG_DEBUG <> 0 THEN
2077: oe_debug_pub.add('populate_plan_level: ' || 'Create_Src_Rules::others::'||to_char(lStmtNum)||'::'||sqlerrm,1);
2078: END IF;
2079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2080: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2081: FND_MSG_PUB.Add_Exc_Msg
2206: into v_mfg_comp_seq_id
2207: from dual;
2208:
2209: IF PG_DEBUG <> 0 THEN
2210: oe_debug_pub.add('populate_bcol: ' || ' sequence ' || v_mfg_comp_seq_id , 3);
2211: END IF;
2212:
2213:
2214: v_step := 'Step A2' ;
2220: and line_id = p_bcol_line_id ;
2221:
2222:
2223: IF PG_DEBUG <> 0 THEN
2224: oe_debug_pub.add('populate_bcol: ' || ' inventory item id ' || v_inventory_item_id , 3);
2225: END IF;
2226:
2227:
2228: v_step := 'Step A3' ;
2242:
2243:
2244:
2245: IF PG_DEBUG <> 0 THEN
2246: oe_debug_pub.add('populate_bcol: ' || 'Going to fetch Validation Org ' ,2);
2247: END IF;
2248:
2249:
2250: select nvl( oe_sys_parameters.value( 'MASTER_ORGANIZATION_ID' , oel.org_id) , -99)
2255:
2256:
2257:
2258: IF PG_DEBUG <> 0 THEN
2259: oe_debug_pub.add('populate_bcol: ' || ' master org id ' || v_organization_id , 3 );
2260: END IF;
2261:
2262: /*
2263: ** If the profile BOM:Allow Multilevel ATO is set to "NO" then
2268: /* v_multilevel := FND_PROFILE.VALUE('BOM:MULTILEVEL_ATO');
2269: ** v_multilevel := nvl(v_multilevel , 'N' ) ;
2270:
2271:
2272: ** oe_debug_pub.add('ML profile is '||v_multilevel, 2);
2273: */
2274:
2275:
2276: lMatchProfile := FND_PROFILE.Value('BOM:MATCH_CONFIG');
2355: end if;
2356:
2357:
2358:
2359: oe_debug_pub.add('bcol info : CONC REQ PARAMS ' , 3) ;
2360: oe_debug_pub.add('bcol info : CONC REQ ' || FND_GLOBAL.CONC_REQUEST_ID , 3 );
2361: oe_debug_pub.add('bcol info : CONC PROG ' || FND_GLOBAL.CONC_PROGRAM_ID , 3 );
2362: oe_debug_pub.add('bcol info : PROG APPL ' || FND_GLOBAL.PROG_APPL_ID , 3 );
2363:
2356:
2357:
2358:
2359: oe_debug_pub.add('bcol info : CONC REQ PARAMS ' , 3) ;
2360: oe_debug_pub.add('bcol info : CONC REQ ' || FND_GLOBAL.CONC_REQUEST_ID , 3 );
2361: oe_debug_pub.add('bcol info : CONC PROG ' || FND_GLOBAL.CONC_PROGRAM_ID , 3 );
2362: oe_debug_pub.add('bcol info : PROG APPL ' || FND_GLOBAL.PROG_APPL_ID , 3 );
2363:
2364:
2357:
2358:
2359: oe_debug_pub.add('bcol info : CONC REQ PARAMS ' , 3) ;
2360: oe_debug_pub.add('bcol info : CONC REQ ' || FND_GLOBAL.CONC_REQUEST_ID , 3 );
2361: oe_debug_pub.add('bcol info : CONC PROG ' || FND_GLOBAL.CONC_PROGRAM_ID , 3 );
2362: oe_debug_pub.add('bcol info : PROG APPL ' || FND_GLOBAL.PROG_APPL_ID , 3 );
2363:
2364:
2365: t_bcol(v_bcol_line_id).Request_Id := FND_GLOBAL.CONC_REQUEST_ID;
2358:
2359: oe_debug_pub.add('bcol info : CONC REQ PARAMS ' , 3) ;
2360: oe_debug_pub.add('bcol info : CONC REQ ' || FND_GLOBAL.CONC_REQUEST_ID , 3 );
2361: oe_debug_pub.add('bcol info : CONC PROG ' || FND_GLOBAL.CONC_PROGRAM_ID , 3 );
2362: oe_debug_pub.add('bcol info : PROG APPL ' || FND_GLOBAL.PROG_APPL_ID , 3 );
2363:
2364:
2365: t_bcol(v_bcol_line_id).Request_Id := FND_GLOBAL.CONC_REQUEST_ID;
2366: t_bcol(v_bcol_line_id).Program_Id := FND_GLOBAL.CONC_PROGRAM_ID;
2370:
2371: /* set plan level to 0 for top level item */
2372: t_bcol(v_bcol_line_id).plan_level := 0 ;
2373: IF PG_DEBUG <> 0 THEN
2374: oe_debug_pub.add('populate_bcol: ' || ' ----- setting plan level = 0 for base item ' , 3 );
2375: END IF;
2376:
2377: exception
2378: when others then
2376:
2377: exception
2378: when others then
2379: IF PG_DEBUG <> 0 THEN
2380: oe_debug_pub.add('populate_bcol: ' || ' got into exception for top level item at ' || v_step , 1 );
2381:
2382: oe_debug_pub.add('populate_bcol: ' || 'error in top ato model line id::'||sqlerrm , 1 );
2383: END IF;
2384: cto_msg_pub.cto_message('BOM','CTO_CREATE_ITEM_ERROR');
2378: when others then
2379: IF PG_DEBUG <> 0 THEN
2380: oe_debug_pub.add('populate_bcol: ' || ' got into exception for top level item at ' || v_step , 1 );
2381:
2382: oe_debug_pub.add('populate_bcol: ' || 'error in top ato model line id::'||sqlerrm , 1 );
2383: END IF;
2384: cto_msg_pub.cto_message('BOM','CTO_CREATE_ITEM_ERROR');
2385: raise FND_API.G_EXC_ERROR;
2386:
2435: if( upper( v_bcol_item_type_code) = 'CONFIG' ) then
2436: /* you need to error out as the config item exists */
2437:
2438: IF PG_DEBUG <> 0 THEN
2439: oe_debug_pub.add('populate_bcol: ' || ' ---- CONFIG Exists ', 1 );
2440: END IF;
2441:
2442: cto_msg_pub.cto_message('BOM','CTO_CONFIG_ITEM_EXISTS');
2443: raise FND_API.G_EXC_ERROR;
2472: else
2473: t_bcol(v_bcol_line_id).perform_match := 'N' ;
2474: end if;
2475:
2476: oe_debug_pub.add('bcol info : CONC REQ PARAMS ' , 3) ;
2477: oe_debug_pub.add('bcol info : CONC REQ ' || FND_GLOBAL.CONC_REQUEST_ID , 3 );
2478: oe_debug_pub.add('bcol info : CONC PROG ' || FND_GLOBAL.CONC_PROGRAM_ID , 3 );
2479: oe_debug_pub.add('bcol info : PROG APPL ' || FND_GLOBAL.PROG_APPL_ID , 3 );
2480:
2473: t_bcol(v_bcol_line_id).perform_match := 'N' ;
2474: end if;
2475:
2476: oe_debug_pub.add('bcol info : CONC REQ PARAMS ' , 3) ;
2477: oe_debug_pub.add('bcol info : CONC REQ ' || FND_GLOBAL.CONC_REQUEST_ID , 3 );
2478: oe_debug_pub.add('bcol info : CONC PROG ' || FND_GLOBAL.CONC_PROGRAM_ID , 3 );
2479: oe_debug_pub.add('bcol info : PROG APPL ' || FND_GLOBAL.PROG_APPL_ID , 3 );
2480:
2481:
2474: end if;
2475:
2476: oe_debug_pub.add('bcol info : CONC REQ PARAMS ' , 3) ;
2477: oe_debug_pub.add('bcol info : CONC REQ ' || FND_GLOBAL.CONC_REQUEST_ID , 3 );
2478: oe_debug_pub.add('bcol info : CONC PROG ' || FND_GLOBAL.CONC_PROGRAM_ID , 3 );
2479: oe_debug_pub.add('bcol info : PROG APPL ' || FND_GLOBAL.PROG_APPL_ID , 3 );
2480:
2481:
2482: t_bcol(v_bcol_line_id).Request_Id := FND_GLOBAL.CONC_REQUEST_ID;
2475:
2476: oe_debug_pub.add('bcol info : CONC REQ PARAMS ' , 3) ;
2477: oe_debug_pub.add('bcol info : CONC REQ ' || FND_GLOBAL.CONC_REQUEST_ID , 3 );
2478: oe_debug_pub.add('bcol info : CONC PROG ' || FND_GLOBAL.CONC_PROGRAM_ID , 3 );
2479: oe_debug_pub.add('bcol info : PROG APPL ' || FND_GLOBAL.PROG_APPL_ID , 3 );
2480:
2481:
2482: t_bcol(v_bcol_line_id).Request_Id := FND_GLOBAL.CONC_REQUEST_ID;
2483: t_bcol(v_bcol_line_id).Program_Id := FND_GLOBAL.CONC_PROGRAM_ID;
2497: ** this loop can be discarded
2498: */
2499:
2500: IF PG_DEBUG <> 0 THEN
2501: oe_debug_pub.add('populate_bcol: ' || 'source data ' , 3 );
2502:
2503: oe_debug_pub.add('populate_bcol: ' || 'line_id top_model ato link_to plan_level ', 1 );
2504: END IF;
2505:
2499:
2500: IF PG_DEBUG <> 0 THEN
2501: oe_debug_pub.add('populate_bcol: ' || 'source data ' , 3 );
2502:
2503: oe_debug_pub.add('populate_bcol: ' || 'line_id top_model ato link_to plan_level ', 1 );
2504: END IF;
2505:
2506: v_step := 'Step A8' ;
2507:
2514: loop
2515:
2516: if( t_bcol.exists(i) ) then
2517: IF PG_DEBUG <> 0 THEN
2518: oe_debug_pub.add('populate_bcol: ' || t_bcol(i).line_id || ' ' || t_bcol(i).top_model_line_id
2519: || ' A ' || t_bcol(i).ato_line_id
2520: || ' LN ' || t_bcol(i).link_to_line_id
2521: || ' PAL ' || t_bcol(i).parent_ato_line_id
2522: || ' P ' || t_bcol(i).plan_level
2541: , l_return_status );
2542:
2543: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2544: IF PG_DEBUG <> 0 THEN
2545: oe_debug_pub.add('populate_bcol: ' || 'unexp error in update_mfg_comp_seq_id::'||sqlerrm , 1 );
2546: END IF;
2547: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2548:
2549: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2547: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2548:
2549: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2550: IF PG_DEBUG <> 0 THEN
2551: oe_debug_pub.add('populate_bcol: ' || 'error in update_mfg_comp_seq_id::'||sqlerrm , 1 );
2552: END IF;
2553: raise FND_API.G_EXC_ERROR;
2554: END IF;
2555:
2589: */
2590: t_bcol(p_bcol_line_id).parent_ato_line_id := p_bcol_line_id;
2591:
2592: IF PG_DEBUG <> 0 THEN
2593: oe_debug_pub.add('populate_bcol: ' || 'processed data ' , 4 );
2594:
2595: oe_debug_pub.add('populate_bcol: ' || 'line_id top_model ato link_to plan_level ' , 3 );
2596:
2597: oe_debug_pub.add('populate_bcol: ' || 'going to check for invalid model setup ' , 4 );
2591:
2592: IF PG_DEBUG <> 0 THEN
2593: oe_debug_pub.add('populate_bcol: ' || 'processed data ' , 4 );
2594:
2595: oe_debug_pub.add('populate_bcol: ' || 'line_id top_model ato link_to plan_level ' , 3 );
2596:
2597: oe_debug_pub.add('populate_bcol: ' || 'going to check for invalid model setup ' , 4 );
2598:
2599: END IF;
2593: oe_debug_pub.add('populate_bcol: ' || 'processed data ' , 4 );
2594:
2595: oe_debug_pub.add('populate_bcol: ' || 'line_id top_model ato link_to plan_level ' , 3 );
2596:
2597: oe_debug_pub.add('populate_bcol: ' || 'going to check for invalid model setup ' , 4 );
2598:
2599: END IF;
2600:
2601:
2612:
2613: if( t_bcol(t_bcol(i).parent_ato_line_id).config_creation = 3) then
2614:
2615: IF PG_DEBUG <> 0 THEN
2616: oe_debug_pub.add('populate_bcol: ' || 'INVALID MODEL SETUP exists for line id ' || t_bcol(i).line_id
2617: || ' model item ' || t_bcol(i).inventory_item_id
2618: || ' item type ' || t_bcol(i).config_creation
2619: , 1 );
2620: oe_debug_pub.add('populate_bcol: ' || ' parent line id ' || t_bcol(t_bcol(i).parent_ato_line_id).line_id
2616: oe_debug_pub.add('populate_bcol: ' || 'INVALID MODEL SETUP exists for line id ' || t_bcol(i).line_id
2617: || ' model item ' || t_bcol(i).inventory_item_id
2618: || ' item type ' || t_bcol(i).config_creation
2619: , 1 );
2620: oe_debug_pub.add('populate_bcol: ' || ' parent line id ' || t_bcol(t_bcol(i).parent_ato_line_id).line_id
2621: || ' parent model item ' || t_bcol(t_bcol(i).parent_ato_line_id).inventory_item_id
2622: || ' parent item type ' || t_bcol(t_bcol(i).parent_ato_line_id).config_creation
2623: , 1 );
2624:
2643: ** PENDING WORK!!!!
2644: */
2645:
2646: if( lMatchProfile = 1 ) then
2647: oe_debug_pub.add('populate_bcol: ' || ' preparing information for v_match_flag_tab ' , 3 );
2648: i :=t_bcol.first ;
2649:
2650: while i is not null
2651: loop
2662:
2663: end loop ;
2664:
2665:
2666: oe_debug_pub.add('populate_bcol: ' || ' going to call cto_match_config.evaluate_n_pop_match_flag ' , 3 );
2667:
2668: cto_match_config.evaluate_n_pop_match_flag( p_match_flag_tab => v_match_flag_tab
2669: , x_sparse_tab => v_sparse_tab
2670: , x_return_status => x_return_status
2674:
2675:
2676:
2677:
2678: oe_debug_pub.add('populate_bcol: ' || ' populating match flag from results ' , 3 );
2679:
2680: i := v_sparse_tab.first ;
2681:
2682: while i is not null
2687: i := v_sparse_tab.next(i) ;
2688:
2689: end loop ;
2690:
2691: oe_debug_pub.add('populate_bcol: ' || ' done populating match flag from results ' , 3 );
2692:
2693:
2694: else
2695:
2692:
2693:
2694: else
2695:
2696: oe_debug_pub.add('populate_bcol: ' || ' will not be calling cto_match_config.evaluate_n_pop_match_flag ' , 3 );
2697:
2698: end if ;
2699:
2700:
2713: if( t_bcol.exists(i) ) then
2714:
2715: IF PG_DEBUG <> 0 THEN
2716:
2717: oe_debug_pub.add('populate_bcol: ' || t_bcol(i).line_id || ' ' || t_bcol(i).top_model_line_id
2718: || ' A ' || t_bcol(i).ato_line_id
2719: || ' LN ' || t_bcol(i).link_to_line_id
2720: || ' PAL ' || t_bcol(i).parent_ato_line_id
2721: || ' P ' || t_bcol(i).plan_level
2810: ,t_bcol(i).config_creation );
2811:
2812:
2813: IF PG_DEBUG <> 0 THEN
2814: oe_debug_pub.add('populate_bcol: bcol ' || t_bcol(i).line_id , 1 );
2815: END IF;
2816:
2817:
2818: else
2891: ,t_bcol(i).SHIP_FROM_ORG_ID --bugfix 3555026
2892: ) ;
2893:
2894: IF PG_DEBUG <> 0 THEN
2895: oe_debug_pub.add('populate_bcol: bcol_gt ' || t_bcol(i).line_id , 1 );
2896: END IF;
2897:
2898:
2899: end if ; /* check for reschedule flag */
2907:
2908:
2909:
2910: IF PG_DEBUG <> 0 THEN
2911: oe_debug_pub.add('populate_bcol: ' || 'success in populate bcol ', 1 );
2912: END IF;
2913:
2914: exception
2915:
2914: exception
2915:
2916: when FND_API.G_EXC_ERROR then
2917: IF PG_DEBUG <> 0 THEN
2918: oe_debug_pub.add('populate_bcol: ' || 'populate_Bcol::exp error::'|| v_step ||'::'||sqlerrm , 1);
2919: END IF;
2920: x_return_status := FND_API.G_RET_STS_ERROR;
2921: CTO_MSG_PUB.Count_And_Get
2922: (p_msg_count => x_msg_count
2924: );
2925:
2926: when FND_API.G_EXC_UNEXPECTED_ERROR then
2927: IF PG_DEBUG <> 0 THEN
2928: oe_debug_pub.add('populate_bcol: ' || 'populate_Bcol::unexp error::'|| v_step ||'::'||sqlerrm , 1);
2929: END IF;
2930: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2931: CTO_MSG_PUB.Count_And_Get
2932: (p_msg_count => x_msg_count
2934: );
2935:
2936: when OTHERS then
2937: IF PG_DEBUG <> 0 THEN
2938: oe_debug_pub.add('populate_bcol: ' || 'populate_Bcol::others::'|| v_step ||'::'||sqlerrm , 1 );
2939: END IF;
2940: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2941: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2942: FND_MSG_PUB.Add_Exc_Msg
3088: v_src_point := i ;
3089: /* please note, here it stores the index which is the same as line_id due to sparse array*/
3090:
3091: IF PG_DEBUG <> 0 THEN
3092: oe_debug_pub.add('populate_parent_ato: ' || ' processing ' || to_char( v_src_point ) , 3 );
3093: END IF;
3094: /*
3095: ** resolve parent ato line id for item.
3096: */
3107: v_src_point := p_t_bcol(v_src_point).link_to_line_id ;
3108:
3109:
3110: IF PG_DEBUG <> 0 THEN
3111: oe_debug_pub.add('populate_parent_ato: ' || 'prev point ' || to_char( v_prev_src_point ) || ' bcol ' || to_char( p_bcol_line_id ) , 3 );
3112: END IF;
3113:
3114:
3115: if( v_src_point is null or v_prev_src_point = p_bcol_line_id ) then
3202: -- The following initialize_assignment_set is used to initialize the global variable
3203:
3204: IF gMrpAssignmentSet is null THEN
3205: IF PG_DEBUG <> 0 THEN
3206: oe_debug_pub.add('query_sourcing_org: ' || 'Initializing the assignment set',5);
3207: END IF;
3208: initialize_assignment_set(x_return_status);
3209: if x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3210: IF PG_DEBUG <> 0 THEN
3207: END IF;
3208: initialize_assignment_set(x_return_status);
3209: if x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3210: IF PG_DEBUG <> 0 THEN
3211: oe_debug_pub.add('query_sourcing_org: ' || 'Error in initializing assignment set',5);
3212: END IF;
3213: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3214: end if;
3215: End IF;
3303: --- For procuring config project change.
3304: elsif (v_source_type = 3) then
3305: p_sourcing_rule_exists := FND_API.G_TRUE ;
3306: IF PG_DEBUG <> 0 THEN
3307: oe_debug_pub.add('query_sourcing_org: ' || 'Buy Sourcing rule exists...',1);
3308: END IF;
3309: end if ;
3310:
3311:
3309: end if ;
3310:
3311:
3312: IF PG_DEBUG <> 0 THEN
3313: oe_debug_pub.add('query_sourcing_org: ' || '****$$$$ IID ' || p_inventory_item_id || ' in org ' ||
3314: p_organization_id || ' is sourced from org ' || p_sourcing_org ||
3315: ' type ' || v_source_type || ' $$$$****' , 1 );
3316: END IF;
3317:
3317:
3318: EXCEPTION
3319: WHEN NO_DATA_FOUND THEN
3320: IF PG_DEBUG <> 0 THEN
3321: oe_debug_pub.add('query_sourcing_org: ' || ' came into no data when finding source ' || to_char(l_stmt_num ) , 1 );
3322: END IF;
3323: /* removed no sourcing flag as cascading of sourcing rules will
3324: ** be continued till no more sourcing rules can be cascaded
3325: */
3349:
3350:
3351: WHEN TOO_MANY_ROWS THEN
3352: IF PG_DEBUG <> 0 THEN
3353: oe_debug_pub.add('query_sourcing_org: ' || ' came into too_many when finding source ' || to_char(l_stmt_num) , 1 );
3354: END IF;
3355: select count(*)
3356: into v_sourcing_rule_count
3357: from mrp_sources_v msv
3389:
3390:
3391: WHEN OTHERS THEN
3392: IF PG_DEBUG <> 0 THEN
3393: oe_debug_pub.add('query_sourcing_org: ' || 'QUERY_SOURCING_ORG::others:: ' ||
3394: to_char(l_stmt_num) || '::' ||
3395: ' came into others when finding source ' , 1 );
3396:
3397: oe_debug_pub.add('query_sourcing_org: ' || ' SQLCODE ' || SQLCODE , 1 );
3393: oe_debug_pub.add('query_sourcing_org: ' || 'QUERY_SOURCING_ORG::others:: ' ||
3394: to_char(l_stmt_num) || '::' ||
3395: ' came into others when finding source ' , 1 );
3396:
3397: oe_debug_pub.add('query_sourcing_org: ' || ' SQLCODE ' || SQLCODE , 1 );
3398:
3399: oe_debug_pub.add('query_sourcing_org: ' || ' SQLERRM ' || SQLERRM , 1 );
3400:
3401: oe_debug_pub.add('query_sourcing_org: ' || ' came into others when finding source ' , 1 );
3395: ' came into others when finding source ' , 1 );
3396:
3397: oe_debug_pub.add('query_sourcing_org: ' || ' SQLCODE ' || SQLCODE , 1 );
3398:
3399: oe_debug_pub.add('query_sourcing_org: ' || ' SQLERRM ' || SQLERRM , 1 );
3400:
3401: oe_debug_pub.add('query_sourcing_org: ' || ' came into others when finding source ' , 1 );
3402: END IF;
3403:
3397: oe_debug_pub.add('query_sourcing_org: ' || ' SQLCODE ' || SQLCODE , 1 );
3398:
3399: oe_debug_pub.add('query_sourcing_org: ' || ' SQLERRM ' || SQLERRM , 1 );
3400:
3401: oe_debug_pub.add('query_sourcing_org: ' || ' came into others when finding source ' , 1 );
3402: END IF;
3403:
3404: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3405:
3439:
3440: IF( gMrpAssignmentSet is null )
3441: THEN
3442: IF PG_DEBUG <> 0 THEN
3443: oe_debug_pub.add('initialize_assignment_set: ' || '**$$ Default assignment set is null', 1);
3444: END IF;
3445:
3446: ELSE
3447: IF PG_DEBUG <> 0 THEN
3444: END IF;
3445:
3446: ELSE
3447: IF PG_DEBUG <> 0 THEN
3448: oe_debug_pub.add('initialize_assignment_set: ' || 'Default assignment set is '||to_char(gMrpAssignmentSet),2);
3449: END IF;
3450:
3451: l_stmt_num := 10 ;
3452:
3459:
3460: exception
3461: when no_data_found then
3462: IF PG_DEBUG <> 0 THEN
3463: oe_debug_pub.add('initialize_assignment_set: ' || 'The assignment set pointed by the
3464: profile MRP_DEFAULT_ASSIGNMENT_SET
3465: does not exist in the database ' ,1);
3466: END IF;
3467:
3472: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
3473: end ;
3474:
3475: IF PG_DEBUG <> 0 THEN
3476: oe_debug_pub.add('initialize_assignment_set: ' || 'Default assignment set name is '||
3477: assign_set_name ,2);
3478: END IF;
3479:
3480: END IF;
3484: when INVALID_MRP_ASSIGNMENT_SET then
3485: x_return_status := FND_API.G_RET_STS_ERROR;
3486:
3487: IF PG_DEBUG <> 0 THEN
3488: oe_debug_pub.add('initialize_assignment_set: ' || 'INITIALIZE_ASSIGNMENT_SET::INVALID ASSIGNMENT SET ::'||to_char(l_stmt_num)||'::'||sqlerrm,1);
3489: END IF;
3490:
3491:
3492: when FND_API.G_EXC_UNEXPECTED_ERROR then
3491:
3492: when FND_API.G_EXC_UNEXPECTED_ERROR then
3493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3494: IF PG_DEBUG <> 0 THEN
3495: oe_debug_pub.add('initialize_assignment_set: ' || 'INITIALIZE_ASSIGNMENT_SET::unexp error::'||to_char(l_stmt_num)||'::'||sqlerrm,1);
3496: END IF;
3497:
3498:
3499: when OTHERS then
3498:
3499: when OTHERS then
3500: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3501: IF PG_DEBUG <> 0 THEN
3502: oe_debug_pub.add('initialize_assignment_set: ' || 'INITIALIZE_ASSIGNMENT_SET::others::'||to_char(l_stmt_num)||'::'||sqlerrm,1);
3503: END IF;
3504:
3505:
3506: END initialize_assignment_set ;
3657: if( v_circular_sourcing )
3658: then
3659: x_exp_error_code := 66 ;
3660: IF PG_DEBUG <> 0 THEN
3661: oe_debug_pub.add('get_model_sourcing_org: ' || ' circular sourcing problem ' , 1 );
3662: END IF;
3663:
3664: --bugfix 2813271: Added message to show the user
3665: cto_msg_pub.cto_message('BOM','CTO_INVALID_SOURCING'); -- bugfix 2813271
3669:
3670: p_sourcing_org := v_organization_id ;
3671:
3672: IF PG_DEBUG <> 0 THEN
3673: oe_debug_pub.add('get_model_sourcing_org: ' || 'sourcing org is ' || p_sourcing_org || ' lead time ' || to_char( p_transit_lead_time ) , 1 );
3674: END IF;
3675:
3676: exception
3677: when FND_API.G_EXC_ERROR then
3675:
3676: exception
3677: when FND_API.G_EXC_ERROR then
3678: IF PG_DEBUG <> 0 THEN
3679: oe_debug_pub.add('get_model_sourcing_org: ' || 'GET_MODEL_SOURCING_ORG::exp error::'||to_char(l_stmt_num)||'::'||sqlerrm,1);
3680: END IF;
3681: x_return_status := FND_API.G_RET_STS_ERROR;
3682:
3683: CTO_MSG_PUB.Count_And_Get(
3686: );
3687:
3688: when FND_API.G_EXC_UNEXPECTED_ERROR then
3689: IF PG_DEBUG <> 0 THEN
3690: oe_debug_pub.add('get_model_sourcing_org: ' || 'GET_MODEL_SOURCING_ORG::unexp error::'||to_char(l_stmt_num)||'::'||sqlerrm,1);
3691: END IF;
3692: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3693:
3694: CTO_MSG_PUB.Count_And_Get(
3697: );
3698:
3699: when OTHERS then
3700: IF PG_DEBUG <> 0 THEN
3701: oe_debug_pub.add('get_model_sourcing_org: ' || 'GET_MODEL_SOURCING_ORG::others::'||to_char(l_stmt_num)||'::'||sqlerrm,1);
3702: END IF;
3703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3704:
3705: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3783: l_source_document_type_id number;
3784: BEGIN
3785:
3786: IF PG_DEBUG <> 0 THEN
3787: oe_debug_pub.add('get_source_document_id: ' || 'CTOUTILB: get_source_document_id: Fetching the source document type id', 1);
3788: END IF;
3789:
3790: select h.source_document_type_id
3791: into l_source_document_type_id
3794: and l.line_id = pLineId
3795: and rownum = 1;
3796:
3797: IF PG_DEBUG <> 0 THEN
3798: oe_debug_pub.add('get_source_document_id: ' || 'CTOUTILB: get_source_document_id: source document type id = '||l_source_document_type_id, 1);
3799: END IF;
3800:
3801: return (l_source_document_type_id);
3802:
3913: CTO_WIP_WORKFLOW_API_PK.cto_debug('check_rsv_qty', 'allowed_unreservation_qty = '||allowed_unreservation_qty);
3914: End if;
3915:
3916: IF PG_DEBUG <> 0 THEN
3917: oe_debug_pub.add('check_rsv_quantity: ' || 'check_rsv_qty: l_shipped_qty = '||l_shipped_qty ||
3918: ' l_reservation_qty = '||l_reservation_qty ||
3919: ' allowed_unreservation_qty = '||allowed_unreservation_qty, 2);
3920: END IF;
3921:
3934: EXCEPTION
3935:
3936: when others then
3937: IF PG_DEBUG <> 0 THEN
3938: oe_debug_pub.add ('check_rsv_quantity: ' || 'OTHERS excpn while checking for unreserved qty :' ||substr(sqlerrm,1,150));
3939: END IF;
3940: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3941:
3942: END CHECK_RSV_QUANTITY;
3974: and fdt.language = userenv('LANG');
3975:
3976: if l_blob_loc is null then
3977: x_return_status := fnd_api.g_ret_sts_error;
3978: oe_debug_pub.add('get_cto_item_attachment: ' || 'File attachment is null. Nothing to convert to clob... returning null', 1);
3979: return null;
3980: end if;
3981:
3982: l_lob_length := dbms_lob.getlength(l_blob_loc);
4020:
4021: when no_data_found then
4022: x_return_status := fnd_api.g_ret_sts_error;
4023: IF PG_DEBUG <> 0 THEN
4024: oe_debug_pub.add('get_cto_item_attachment: ' || 'no file attachment existsfor given item and org', 1);
4025: END IF;
4026: return null;
4027:
4028: when others then
4027:
4028: when others then
4029: x_return_status := fnd_api.g_ret_sts_unexp_error;
4030: IF PG_DEBUG <> 0 THEN
4031: oe_debug_pub.add('get_cto_item_attachment: ' || 'When others exception ..' || sqlerrm, 1);
4032: END IF;
4033: return null;
4034:
4035: END get_cto_item_attachment;
4063: x_return_status := FND_API.G_RET_STS_SUCCESS;
4064:
4065: l_stmt := 10;
4066: IF PG_DEBUG <> 0 THEN
4067: oe_debug_pub.add('create_attachment: ' || 'Entering Create_attachment...',1);
4068:
4069: oe_debug_pub.add('create_attachment: ' || 'Attachment desc = '||p_desc,1);
4070: END IF;
4071:
4065: l_stmt := 10;
4066: IF PG_DEBUG <> 0 THEN
4067: oe_debug_pub.add('create_attachment: ' || 'Entering Create_attachment...',1);
4068:
4069: oe_debug_pub.add('create_attachment: ' || 'Attachment desc = '||p_desc,1);
4070: END IF;
4071:
4072: -- The following FND API will create a document with the given Text information.
4073:
4119: ,x_title => p_desc);
4120:
4121:
4122: IF PG_DEBUG <> 0 THEN
4123: oe_debug_pub.add('create_attachment: ' || 'The document is created with the following id....'||to_char(l_doc_id),1);
4124:
4125: oe_debug_pub.add('create_attachment: ' || 'Media id ...'||to_char(l_media_id),1);
4126: END IF;
4127:
4121:
4122: IF PG_DEBUG <> 0 THEN
4123: oe_debug_pub.add('create_attachment: ' || 'The document is created with the following id....'||to_char(l_doc_id),1);
4124:
4125: oe_debug_pub.add('create_attachment: ' || 'Media id ...'||to_char(l_media_id),1);
4126: END IF;
4127:
4128: -- The following insert is inserting into the media and text infor into fnd_documents_long_text
4129:
4212: EXCEPTION
4213:
4214: when FND_API.G_EXC_UNEXPECTED_ERROR then
4215: IF PG_DEBUG <> 0 THEN
4216: oe_debug_pub.add('create_attachment: ' || 'Create_attachment::unexp error::'||l_Stmt||'::'||sqlerrm,1);
4217: END IF;
4218: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4219:
4220: when FND_API.G_EXC_ERROR then
4218: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4219:
4220: when FND_API.G_EXC_ERROR then
4221: IF PG_DEBUG <> 0 THEN
4222: oe_debug_pub.add('create_attachment: ' || 'Create_attachment::exp error::'||l_Stmt||'::'||sqlerrm,1);
4223: END IF;
4224: x_return_status := FND_API.G_RET_STS_ERROR;
4225:
4226: when others then
4224: x_return_status := FND_API.G_RET_STS_ERROR;
4225:
4226: when others then
4227: IF PG_DEBUG <> 0 THEN
4228: oe_debug_pub.add('create_attachment: ' || 'Create_attachment::OTHERS error::'||l_Stmt||'::'||sqlerrm,1);
4229: END IF;
4230: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4231:
4232:
4302:
4303: begin
4304:
4305: IF PG_DEBUG <> 0 THEN
4306: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'Entering GENERATE_BOM_ATTACH_TEXT',1);
4307:
4308: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'line_id =>'||p_line_id,1);
4309: END IF;
4310:
4304:
4305: IF PG_DEBUG <> 0 THEN
4306: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'Entering GENERATE_BOM_ATTACH_TEXT',1);
4307:
4308: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'line_id =>'||p_line_id,1);
4309: END IF;
4310:
4311:
4312: x_return_status := FND_API.G_RET_STS_SUCCESS;
4350:
4351: l_stmt := 20;
4352:
4353: IF PG_DEBUG <> 0 THEN
4354: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'before starting the loop (inorder to get bcol lines)',1);
4355: END IF;
4356: for comp_cur in components
4357:
4358: loop
4360: if l_loop_switch then
4361: l_model_ord_qty := comp_cur.ordered_qty;
4362: l_loop_switch := false;
4363: IF PG_DEBUG <> 0 THEN
4364: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'in IF block of loop_siwtch,model_ord_qty=>l_model_ord_qty',1);
4365: END IF;
4366: end if;
4367:
4368: --for text attachment
4375: --x_text := concat(x_text,l_hdr_text);
4376: l_test_text := concat(l_test_text,l_hdr_text);
4377: l_line_count := 0;
4378: IF PG_DEBUG <> 0 THEN
4379: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'should start on new line as l_line_count = 15',1);
4380: END IF;
4381: elsif nvl(l_line_count,0) = 0 then
4382: --
4383: -- bug 6717456
4385: --
4386: --x_text := concat(x_text,l_hdr_text);
4387: l_test_text := concat(l_test_text,l_hdr_text);
4388: IF PG_DEBUG <> 0 THEN
4389: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'adding header text as l_line_count = 0',1);
4390: END IF;
4391: end if;
4392:
4393:
4440: x_text := l_test_text;
4441:
4442: l_line_count := nvl(l_line_count,0) + 1;
4443: IF PG_DEBUG <> 0 THEN
4444: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'value of l_line_count'||l_line_count,4);
4445: END IF;
4446:
4447:
4448: end loop;
4447:
4448: end loop;
4449:
4450: IF PG_DEBUG <> 0 THEN
4451: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'End of LOOP in generate BOM attachment',1);
4452: END IF;
4453:
4454:
4455: EXCEPTION
4455: EXCEPTION
4456:
4457: when FND_API.G_EXC_UNEXPECTED_ERROR then
4458: IF PG_DEBUG <> 0 THEN
4459: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'GENERATE_BOM_ATTACH_TEXT::unexp error::'||l_Stmt||sqlerrm,1);
4460: END IF;
4461: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4462:
4463: when FND_API.G_EXC_ERROR then
4461: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4462:
4463: when FND_API.G_EXC_ERROR then
4464: IF PG_DEBUG <> 0 THEN
4465: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'GENERATE_BOM_ATTACH_TEXT::exp error::'||l_Stmt||sqlerrm,1);
4466: END IF;
4467: x_return_status := FND_API.G_RET_STS_ERROR;
4468:
4469: --
4471: -- ntungare
4472: --
4473: when text_too_long THEN
4474: IF PG_DEBUG <> 0 THEN
4475: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'GENERATE_BOM_ATTACH_TEXT::text too long exception::'||l_Stmt||sqlerrm,1);
4476: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'GENERATE_BOM_ATTACH_TEXT::text too long exception:: continuing..',1);
4477: END IF;
4478:
4479: when others then
4472: --
4473: when text_too_long THEN
4474: IF PG_DEBUG <> 0 THEN
4475: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'GENERATE_BOM_ATTACH_TEXT::text too long exception::'||l_Stmt||sqlerrm,1);
4476: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'GENERATE_BOM_ATTACH_TEXT::text too long exception:: continuing..',1);
4477: END IF;
4478:
4479: when others then
4480: IF PG_DEBUG <> 0 THEN
4477: END IF;
4478:
4479: when others then
4480: IF PG_DEBUG <> 0 THEN
4481: oe_debug_pub.add('GENERATE_BOM_ATTACH_TEXT: ' || 'GENERATE_BOM_ATTACH_TEXT::OTHERS error::'||l_Stmt||sqlerrm,1);
4482: END IF;
4483: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4484:
4485: END GENERATE_BOM_ATTACH_TEXT;
4588:
4589: BEGIN
4590:
4591: IF PG_DEBUG <> 0 THEN
4592: oe_debug_pub.add('chk_all_rsv_details: ' || 'Entered CTO_UTILITY_PK.chk_all_rsv_details',1);
4593: END IF;
4594: x_return_status := FND_API.G_RET_STS_SUCCESS;
4595:
4596:
4621: IF (p_rsv_details.count>0) THEN
4622: l_index := p_rsv_details.FIRST;
4623: LOOP
4624: IF PG_DEBUG <> 0 THEN
4625: oe_debug_pub.add('chk_all_rsv_details: ' || 'rsv id '||p_rsv_details(l_index).l_reservation_id,5);
4626:
4627: oe_debug_pub.add('chk_all_rsv_details: ' || 'rsv qty '||p_rsv_details(l_index).l_reservation_quantity,5);
4628:
4629: oe_debug_pub.add('chk_all_rsv_details: ' || 'suppy sourc '||p_rsv_details(l_index).l_supply_source_type_id,5);
4623: LOOP
4624: IF PG_DEBUG <> 0 THEN
4625: oe_debug_pub.add('chk_all_rsv_details: ' || 'rsv id '||p_rsv_details(l_index).l_reservation_id,5);
4626:
4627: oe_debug_pub.add('chk_all_rsv_details: ' || 'rsv qty '||p_rsv_details(l_index).l_reservation_quantity,5);
4628:
4629: oe_debug_pub.add('chk_all_rsv_details: ' || 'suppy sourc '||p_rsv_details(l_index).l_supply_source_type_id,5);
4630: END IF;
4631:
4625: oe_debug_pub.add('chk_all_rsv_details: ' || 'rsv id '||p_rsv_details(l_index).l_reservation_id,5);
4626:
4627: oe_debug_pub.add('chk_all_rsv_details: ' || 'rsv qty '||p_rsv_details(l_index).l_reservation_quantity,5);
4628:
4629: oe_debug_pub.add('chk_all_rsv_details: ' || 'suppy sourc '||p_rsv_details(l_index).l_supply_source_type_id,5);
4630: END IF;
4631:
4632: EXIT WHEN l_index = p_rsv_details.LAST;
4633: l_index := p_rsv_details.NEXT(l_index);
4647: EXCEPTION
4648: when others then
4649: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4650: IF PG_DEBUG <> 0 THEN
4651: oe_debug_pub.add ('chk_all_rsv_details: ' || 'unexpected error in called program chk_all_rsv_details'|| l_stmt||sqlerrm , 1);
4652: END IF;
4653: if fnd_msg_pub.check_msg_level
4654: (fnd_msg_pub.g_msg_lvl_unexp_error)
4655: then
4742: , null
4743: ) ;
4744:
4745: IF PG_DEBUG <> 0 THEN
4746: oe_debug_pub.add('isModelMLMO: ' || ' after get model source status ' || x_return_status, 4 );
4747: END IF;
4748:
4749:
4750: IF x_return_status = FND_API.G_RET_STS_ERROR
4935:
4936: rowcount := SQL%ROWCOUNT;
4937:
4938: IF PG_DEBUG <> 0 THEN
4939: oe_debug_pub.add ('Row Count : ' || rowcount, 2);
4940: END IF;
4941:
4942: If PG_DEBUG <> 0 Then
4943: cto_wip_workflow_api_pk.cto_debug('create_isp_bom', 'Row Count:'||rowcount);
4956: and nvl(msi.auto_created_config_flag, 'N') = 'Y');
4957:
4958: rowcount := SQL%ROWCOUNT;
4959: IF PG_DEBUG <> 0 THEN
4960: oe_debug_pub.add ('Deleted Row Count : ' || rowcount, 2);
4961: END IF;
4962:
4963: If PG_DEBUG <> 0 Then
4964: cto_wip_workflow_api_pk.cto_debug('create_isp_bom', 'Deleted Row Count:'||rowcount);
5136: and C.organization_id = p_organization_id
5137: and C.cost_type_id = p_src_cost_type_id;
5138:
5139: IF PG_DEBUG <> 0 THEN
5140: oe_debug_pub.add('copy_cost: ' || 'after insert:CST_ITEM_COSTS',2);
5141:
5142: oe_debug_pub.add('copy_cost: ' || 'after insert:CST_ITEM_COSTS' || sql%rowcount ,2);
5143: END IF;
5144:
5138:
5139: IF PG_DEBUG <> 0 THEN
5140: oe_debug_pub.add('copy_cost: ' || 'after insert:CST_ITEM_COSTS',2);
5141:
5142: oe_debug_pub.add('copy_cost: ' || 'after insert:CST_ITEM_COSTS' || sql%rowcount ,2);
5143: END IF;
5144:
5145: /*------ ----------------------------------------------+
5146: Insert rows into the cst_item_cost_details table
5243: and C.organization_id = p_organization_id
5244: and C.cost_type_id = p_src_cost_type_id ;
5245:
5246: IF PG_DEBUG <> 0 THEN
5247: oe_debug_pub.add('copy_cost: ' || 'after insert:cst_item_cost_details',2);
5248:
5249: oe_debug_pub.add('copy_cost: ' || 'after insert:cst_item_cost_details' || sql%rowcount ,2);
5250: END IF;
5251:
5245:
5246: IF PG_DEBUG <> 0 THEN
5247: oe_debug_pub.add('copy_cost: ' || 'after insert:cst_item_cost_details',2);
5248:
5249: oe_debug_pub.add('copy_cost: ' || 'after insert:cst_item_cost_details' || sql%rowcount ,2);
5250: END IF;
5251:
5252:
5253: exception
5258: xMessageName := 'CTO_CALC_COST_ROLLUP_ERROR';
5259: */
5260:
5261: IF PG_DEBUG <> 0 THEN
5262: oe_debug_pub.add('copy_cost: ' || 'copy_ctocost_to_frozen no data found ',2);
5263: END IF;
5264:
5265: when OTHERS THEN
5266: /*
5270: xMessageName := 'CTO_CALC_COST_ROLLUP_ERROR';
5271: */
5272:
5273: IF PG_DEBUG <> 0 THEN
5274: oe_debug_pub.add('copy_cost: ' || 'copy_ctocost_to_frozen others ',2);
5275: END IF;
5276:
5277:
5278:
5318: x_return_status := FND_API.G_RET_STS_SUCCESS;
5319: x_can_create_supply := 'Y';
5320:
5321: IF PG_DEBUG <> 0 THEN
5322: oe_debug_pub.add('check_cto_can_create_supply : ' ||'ENTERED',1);
5323: END IF;
5324:
5325: --call custom API
5326: lStmtNum := 10;
5327: P_custom_in_params_rec.CONFIG_ITEM_ID := P_config_item_id;
5328: P_custom_in_params_rec.Org_id := P_org_id ;
5329:
5330: IF PG_DEBUG <> 0 THEN
5331: oe_debug_pub.add('check_cto_can_create_supply : ' ||'P_config_item_id'
5332: ||P_config_item_id,1);
5333: oe_debug_pub.add('check_cto_can_create_supply : ' ||'P_org_id'
5334: ||P_org_id,1);
5335: END IF;
5329:
5330: IF PG_DEBUG <> 0 THEN
5331: oe_debug_pub.add('check_cto_can_create_supply : ' ||'P_config_item_id'
5332: ||P_config_item_id,1);
5333: oe_debug_pub.add('check_cto_can_create_supply : ' ||'P_org_id'
5334: ||P_org_id,1);
5335: END IF;
5336:
5337:
5352: X_custom_out_params_rec.can_cto_create_supply = 'Y' THEN
5353:
5354:
5355: IF PG_DEBUG <> 0 THEN
5356: oe_debug_pub.add('check_cto_can_create_supply : '
5357: ||'success from custom API',5);
5358: END IF;
5359:
5360:
5374:
5375: lStmtNum:=50;
5376: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
5377: IF PG_DEBUG <> 0 THEN
5378: oe_debug_pub.add('check_cto_can_create_supply : '
5379: ||'success from query sourcing org',5);
5380: END IF;
5381:
5382: -- 100% trasfer rule = 1 and multiple sources = 66
5385: -- Now CTO can create supply for 1. So removed it in if condition.
5386: IF p_source_type = 66 THEN
5387:
5388: IF PG_DEBUG <> 0 THEN
5389: oe_debug_pub.add('check_cto_can_create_supply : '
5390: ||'P_source_type'||p_source_type,5);
5391: END IF;
5392: x_can_create_supply := 'N';
5393: x_message := 'MULTIPLE SOURCES PRESENT';
5401: IF INV_GMI_RSV_BRANCH.Process_Branch
5402: (p_organization_id =>P_org_id) THEN
5403:
5404: IF PG_DEBUG <> 0 THEN
5405: oe_debug_pub.add('check_cto_can_create_supply : '
5406: ||'MAKE in a process org not allowed',1);
5407: END IF;
5408:
5409: x_can_create_supply := 'N';
5415:
5416:
5417: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5418: IF PG_DEBUG <> 0 THEN
5419: oe_debug_pub.add('check_cto_can_create_supply : ' || 'Unexpected Error in the sourcing rule.',1);
5420: END IF;
5421: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5422:
5423: END IF;
5425: ELSIF X_return_status = FND_API.G_RET_STS_SUCCESS --cutsom API's out param
5426: and X_custom_out_params_rec.can_cto_create_supply = 'N' THEN
5427:
5428: IF PG_DEBUG <> 0 THEN
5429: oe_debug_pub.add('check_cto_can_create_supply : '
5430: ||'from custom api:can_create_supply is N',5);
5431: END IF;
5432:
5433: x_can_create_supply := 'N';
5444: EXCEPTION
5445:
5446: WHEN fnd_api.g_exc_error THEN
5447: IF PG_DEBUG <> 0 THEN
5448: oe_debug_pub.add('check_cto_can_create_supply: ' || 'Exception in stmt num: '
5449: || to_char(lStmtNum), 1);
5450: END IF;
5451: x_return_status := FND_API.G_RET_STS_ERROR;
5452: -- Get message count and data
5455: , p_msg_data => x_msg_data
5456: );
5457: WHEN fnd_api.g_exc_unexpected_error THEN
5458: IF PG_DEBUG <> 0 THEN
5459: oe_debug_pub.add('check_cto_can_create_supply: ' || ' Unexpected Exception in stmt num: '
5460: || to_char(lStmtNum), 1);
5461: END IF;
5462: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5463: -- Get message count and data
5467: );
5468: WHEN OTHERS then
5469: IF PG_DEBUG <> 0 THEN
5470:
5471: oe_debug_pub.add('check_cto_can_create_supply: ' || 'Others Exception in stmt num: '
5472: || to_char(lStmtNum), 1);
5473: oe_debug_pub.add('check_cto_can_create_supply: ' || 'errormsg='||sqlerrm, 1);
5474: END IF;
5475: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5469: IF PG_DEBUG <> 0 THEN
5470:
5471: oe_debug_pub.add('check_cto_can_create_supply: ' || 'Others Exception in stmt num: '
5472: || to_char(lStmtNum), 1);
5473: oe_debug_pub.add('check_cto_can_create_supply: ' || 'errormsg='||sqlerrm, 1);
5474: END IF;
5475: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5476: -- Get message count and data
5477: cto_msg_pub.count_and_get
5510: begin
5511:
5512:
5513:
5514: oe_debug_pub.add('CTOUTILB.split_line: entered split_line ' , 1);
5515:
5516:
5517:
5518:
5529:
5530:
5531:
5532: IF PG_DEBUG <> 0 THEN
5533: oe_debug_pub.add('CTOUTILB.split_line: ' || 'Going to fetch Validation Org ' ,2);
5534: END IF;
5535:
5536:
5537: select nvl( oe_sys_parameters.value( 'MASTER_ORGANIZATION_ID' , oel.org_id) , -99)
5554: /* reschedule should be always No for Split Line
5555: */
5556:
5557:
5558: oe_debug_pub.add('CTOUTILB.split_line: opening config_update cursor ' , 1);
5559:
5560:
5561:
5562: lstmtnum := 20 ;
5571:
5572: exit when config_update%notfound ;
5573:
5574:
5575: oe_debug_pub.add('CTOUTILB.split_line: line ' || v_config.line_id , 1);
5576: oe_debug_pub.add('CTOUTILB.split_line: split line ' ||
5577: v_config.split_from_line_id , 1);
5578:
5579:
5572: exit when config_update%notfound ;
5573:
5574:
5575: oe_debug_pub.add('CTOUTILB.split_line: line ' || v_config.line_id , 1);
5576: oe_debug_pub.add('CTOUTILB.split_line: split line ' ||
5577: v_config.split_from_line_id , 1);
5578:
5579:
5580: update bom_cto_order_lines set config_item_id = ( select bcol1.config_item_id
5581: from bom_cto_order_lines bcol1
5582: where bcol1.line_id = v_config.split_from_line_id )
5583: where line_id = v_config.line_id ;
5584:
5585: oe_debug_pub.add('CTOUTILB.split_line: update cnt ' || SQL%ROWCOUNT , 1);
5586:
5587:
5588: end loop ;
5589:
5592: exception
5593: when others then
5594: IF PG_DEBUG <> 0 THEN
5595:
5596: oe_debug_pub.add('CTO_UTILITY_PK.split_line: ' || 'Others Exception in stmt num : '
5597: || to_char(lStmtNum), 1);
5598: oe_debug_pub.add('CTO_UTILITY_PK.split_line: ' || 'errormsg='||sqlerrm, 1);
5599:
5600: END IF;
5594: IF PG_DEBUG <> 0 THEN
5595:
5596: oe_debug_pub.add('CTO_UTILITY_PK.split_line: ' || 'Others Exception in stmt num : '
5597: || to_char(lStmtNum), 1);
5598: oe_debug_pub.add('CTO_UTILITY_PK.split_line: ' || 'errormsg='||sqlerrm, 1);
5599:
5600: END IF;
5601: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5602:
5612: )
5613: is
5614: begin
5615:
5616: oe_debug_pub.add('CTO_UTILITY_PK.adjust_bcol_for_split: entered ' || p_ato_line_id , 1);
5617:
5618: update bom_cto_order_lines bcol
5619: set ordered_quantity = ( select ordered_quantity
5620: from oe_order_lines_all
5621: where ato_line_id = bcol.ato_line_id
5622: and line_id = bcol.line_id )
5623: where ato_line_id = p_ato_line_id ;
5624:
5625: oe_debug_pub.add('CTO_UTILITY_PK.adjust_bcol_for_split: upd cnt ' || SQL%ROWCOUNT , 1);
5626:
5627: end adjust_bcol_for_split ;
5628:
5629:
5635: )
5636: is
5637: begin
5638:
5639: oe_debug_pub.add('CTO_UTILITY_PK.adjust_bcol_for_warehouse: entered ' || p_ato_line_id , 1);
5640:
5641: update bom_cto_order_lines bcol
5642: set ship_from_org_id = ( select ship_from_org_id
5643: from oe_order_lines_all
5644: where ato_line_id = bcol.ato_line_id
5645: and line_id = bcol.line_id )
5646: where ato_line_id = p_ato_line_id ;
5647:
5648: oe_debug_pub.add('CTO_UTILITY_PK.adjust_bcol_for_warehouse: upd cnt ' || SQL%ROWCOUNT , 1);
5649:
5650:
5651:
5652: end adjust_bcol_for_warehouse;
5663:
5664: BEGIN
5665:
5666: IF PG_DEBUG <> 0 THEN
5667: oe_debug_pub.add('Reservation_Exists: ' || 'Entering into Reservation_exists procedure....',1);
5668: END IF;
5669: -- Check if flow schedule exists . If not check some inv/work order Reservation
5670: -- exists. If both of them does'nt exists then return false. Other wise return true.
5671:
5671:
5672: IF CTO_WORKFLOW.flow_sch_exists(pconfigLineId) <> TRUE THEN
5673:
5674: IF PG_DEBUG <> 0 THEN
5675: oe_debug_pub.add('Reservation_Exists: ' || 'flow Reservation not exists..',5);
5676:
5677: oe_debug_pub.add('Reservation_Exists: ' || 'The line_id passed for reservation = '||to_char(pconfiglineid),5);
5678: END IF;
5679:
5673:
5674: IF PG_DEBUG <> 0 THEN
5675: oe_debug_pub.add('Reservation_Exists: ' || 'flow Reservation not exists..',5);
5676:
5677: oe_debug_pub.add('Reservation_Exists: ' || 'The line_id passed for reservation = '||to_char(pconfiglineid),5);
5678: END IF;
5679:
5680: SELECT reservation_id
5681: INTO l_reservation_id
5704: INV_RESERVATION_GLOBAL.g_source_type_oe) --bugfix 1799874
5705: and mr.reservation_quantity > 0
5706: and rownum = 1;
5707: IF PG_DEBUG <> 0 THEN
5708: oe_debug_pub.add('Reservation_Exists: ' || 'Work order/Inv reservation Exists..',5);
5709: END IF;
5710: END IF;
5711:
5712: x_result := TRUE;
5714:
5715: EXCEPTION
5716: WHEN no_data_found THEN
5717: IF PG_DEBUG <> 0 THEN
5718: oe_debug_pub.add('Reservation_Exists: ' || 'Coming out of reservation_exists procedure with FALSE...',2);
5719: END IF;
5720: x_return_status := FND_API.G_RET_STS_SUCCESS;
5721: x_result := FALSE;
5722:
5721: x_result := FALSE;
5722:
5723: WHEN others THEN
5724: IF PG_DEBUG <> 0 THEN
5725: oe_debug_pub.add('Reservation_Exists: ' || 'OTHERS excpn occured in Reservation_Exists procedure..',2);
5726:
5727: oe_debug_pub.add('Reservation_Exists: ' || 'Error message is : '||sqlerrm,1);
5728: END IF;
5729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5723: WHEN others THEN
5724: IF PG_DEBUG <> 0 THEN
5725: oe_debug_pub.add('Reservation_Exists: ' || 'OTHERS excpn occured in Reservation_Exists procedure..',2);
5726:
5727: oe_debug_pub.add('Reservation_Exists: ' || 'Error message is : '||sqlerrm,1);
5728: END IF;
5729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5730: x_result := FALSE;
5731:
5742: is
5743: lStmtNumber number;
5744: begin
5745:
5746: oe_debug_pub.add( ' entered copy bcol_gt to bcol' , 1) ;
5747:
5748: insert into bom_cto_order_lines (
5749: LINE_ID
5750: ,HEADER_ID
5813: ,CONFIG_CREATION
5814: from bom_cto_order_lines_gt
5815: where ato_line_id = p_ato_line_id ;
5816:
5817: oe_debug_pub.add( ' copied bcol_gt to bcol ' || SQL%ROWCOUNT , 1) ;
5818:
5819:
5820:
5821:
5831: is
5832: lStmtNumber number;
5833: begin
5834:
5835: oe_debug_pub.add( ' entered copy bcol to bcol_gt ' , 1) ;
5836: --bugfix#3756670
5837: delete from bom_cto_order_lines_gt
5838: where ato_line_id = p_ato_line_id ;
5839:
5909: where ato_line_id = p_ato_line_id ;
5910:
5911:
5912:
5913: oe_debug_pub.add( ' copied bcol to bcol_gt ' || SQL%ROWCOUNT , 1) ;
5914:
5915:
5916: end copy_bcol_bcolgt ;
5917:
5964:
5965:
5966: litem_key := to_char(p_line_id)||to_char(sysdate,'mmddyyhhmiss' );
5967:
5968: oe_debug_pub.add( 'SEND_NOTIFICATION item_key ' || litem_key , 1 ) ;
5969: g_error_seq := g_error_seq + 1 ;
5970: oe_debug_pub.add( 'error_seq is ' || g_error_seq , 1 ) ;
5971:
5972: luser_key := litem_key;
5966: litem_key := to_char(p_line_id)||to_char(sysdate,'mmddyyhhmiss' );
5967:
5968: oe_debug_pub.add( 'SEND_NOTIFICATION item_key ' || litem_key , 1 ) ;
5969: g_error_seq := g_error_seq + 1 ;
5970: oe_debug_pub.add( 'error_seq is ' || g_error_seq , 1 ) ;
5971:
5972: luser_key := litem_key;
5973:
5974: lplanner_code := P_NOTIFY_USER ;
6069:
6070: lstmt_num := 50 ;
6071:
6072: if( P_PROCESS = 'NOTIFY_OID_IC' ) then
6073: oe_debug_pub.add( ' going to create process 1 ' || P_PROCESS ) ;
6074:
6075: litem_key := litem_key || to_char( g_error_seq ) || '1111' ;
6076:
6077: oe_debug_pub.add( 'SEND_NOTIFICATION modified item_key ' || litem_key , 1 ) ;
6073: oe_debug_pub.add( ' going to create process 1 ' || P_PROCESS ) ;
6074:
6075: litem_key := litem_key || to_char( g_error_seq ) || '1111' ;
6076:
6077: oe_debug_pub.add( 'SEND_NOTIFICATION modified item_key ' || litem_key , 1 ) ;
6078:
6079: wf_engine.CreateProcess (ItemType=> 'CTOEXCP',ItemKey=>litem_key,Process=>'NOTIFY_OID_IC');
6080:
6081: elsif( P_PROCESS = 'NOTIFY_OID_INC' ) then
6081: elsif( P_PROCESS = 'NOTIFY_OID_INC' ) then
6082:
6083: litem_key := litem_key || to_char( g_error_seq ) || '2222' ;
6084:
6085: oe_debug_pub.add( 'SEND_NOTIFICATION modified item_key ' || litem_key , 1 ) ;
6086:
6087: oe_debug_pub.add( ' going to create process 2 ' || P_PROCESS ) ;
6088: wf_engine.CreateProcess (ItemType=> 'CTOEXCP',ItemKey=>litem_key,Process=>'NOTIFY_OID_INC');
6089:
6083: litem_key := litem_key || to_char( g_error_seq ) || '2222' ;
6084:
6085: oe_debug_pub.add( 'SEND_NOTIFICATION modified item_key ' || litem_key , 1 ) ;
6086:
6087: oe_debug_pub.add( ' going to create process 2 ' || P_PROCESS ) ;
6088: wf_engine.CreateProcess (ItemType=> 'CTOEXCP',ItemKey=>litem_key,Process=>'NOTIFY_OID_INC');
6089:
6090: elsif( P_PROCESS = 'NOTIFY_OEE_INC' ) then
6091:
6090: elsif( P_PROCESS = 'NOTIFY_OEE_INC' ) then
6091:
6092: litem_key := litem_key || to_char( g_error_seq ) || '3333' ;
6093:
6094: oe_debug_pub.add( 'SEND_NOTIFICATION modified item_key ' || litem_key , 1 ) ;
6095:
6096:
6097: oe_debug_pub.add( ' going to create process 3 ' || P_PROCESS ) ;
6098: wf_engine.CreateProcess (ItemType=> 'CTOEXCP',ItemKey=>litem_key,Process=>'NOTIFY_OEE_INC');
6093:
6094: oe_debug_pub.add( 'SEND_NOTIFICATION modified item_key ' || litem_key , 1 ) ;
6095:
6096:
6097: oe_debug_pub.add( ' going to create process 3 ' || P_PROCESS ) ;
6098: wf_engine.CreateProcess (ItemType=> 'CTOEXCP',ItemKey=>litem_key,Process=>'NOTIFY_OEE_INC');
6099:
6100: elsif( P_PROCESS = 'NOTIFY_OEE_IC' ) then
6101:
6100: elsif( P_PROCESS = 'NOTIFY_OEE_IC' ) then
6101:
6102: litem_key := litem_key || to_char(g_error_seq ) || '4444' ;
6103:
6104: oe_debug_pub.add( 'SEND_NOTIFICATION modified item_key ' || litem_key , 1 ) ;
6105:
6106:
6107:
6108: oe_debug_pub.add( ' going to create process 4 ' || P_PROCESS ) ;
6104: oe_debug_pub.add( 'SEND_NOTIFICATION modified item_key ' || litem_key , 1 ) ;
6105:
6106:
6107:
6108: oe_debug_pub.add( ' going to create process 4 ' || P_PROCESS ) ;
6109: wf_engine.CreateProcess (ItemType=> 'CTOEXCP',ItemKey=>litem_key,Process=>'NOTIFY_OEE_IC');
6110:
6111: end if;
6112:
6122: -- Get the default adminstrator value from Workflow Attributes.
6123: lplanner_code := wf_engine.getItemAttrText(ItemType => 'CTOEXCP',
6124: ItemKey => litem_key,
6125: aname => 'WF_ADMINISTRATOR');
6126: oe_debug_pub.add('start_work_flow: ' || 'Planner code is not a valid workflow user...Defaulting to'||lplanner_code,5);
6127:
6128: ELSE
6129:
6130: oe_debug_pub.add('start_work_flow: ' || 'Planner code is a valid workflow user...' ,5);
6126: oe_debug_pub.add('start_work_flow: ' || 'Planner code is not a valid workflow user...Defaulting to'||lplanner_code,5);
6127:
6128: ELSE
6129:
6130: oe_debug_pub.add('start_work_flow: ' || 'Planner code is a valid workflow user...' ,5);
6131:
6132: END IF;
6133:
6134:
6163: lstmt_num := 130 ;
6164: wf_engine.StartProcess(itemtype=>'CTOEXCP',ItemKey=>litem_key);
6165:
6166:
6167: oe_debug_pub.add( ' done till stmt ' || lstmt_num ) ;
6168:
6169:
6170:
6171: exception
6170:
6171: exception
6172: when others then
6173:
6174: oe_debug_pub.add( ' exception in others at stmt ' || lstmt_num ) ;
6175: oe_debug_pub.add( ' exception in others ' || SQLCODE ) ;
6176: oe_debug_pub.add( ' exception in others ' || SQLERRM ) ;
6177:
6178:
6171: exception
6172: when others then
6173:
6174: oe_debug_pub.add( ' exception in others at stmt ' || lstmt_num ) ;
6175: oe_debug_pub.add( ' exception in others ' || SQLCODE ) ;
6176: oe_debug_pub.add( ' exception in others ' || SQLERRM ) ;
6177:
6178:
6179: end send_notification ;
6172: when others then
6173:
6174: oe_debug_pub.add( ' exception in others at stmt ' || lstmt_num ) ;
6175: oe_debug_pub.add( ' exception in others ' || SQLCODE ) ;
6176: oe_debug_pub.add( ' exception in others ' || SQLERRM ) ;
6177:
6178:
6179: end send_notification ;
6180:
6205:
6206:
6207: begin
6208:
6209: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: ******** BEGIN AUTONOMOUS TRANSACTION **********' , 1 );
6210:
6211:
6212:
6213: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: msg count ' || P_MSG_COUNT , 1 );
6209: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: ******** BEGIN AUTONOMOUS TRANSACTION **********' , 1 );
6210:
6211:
6212:
6213: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: msg count ' || P_MSG_COUNT , 1 );
6214:
6215:
6216: if ( nvl( p_msg_count , 0 ) = 0 ) then
6217: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: nothing to notify' , 1 );
6213: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: msg count ' || P_MSG_COUNT , 1 );
6214:
6215:
6216: if ( nvl( p_msg_count , 0 ) = 0 ) then
6217: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: nothing to notify' , 1 );
6218: return ;
6219: end if;
6220:
6221:
6226: l_msg_data := substr(fnd_msg_pub.get(
6227: p_msg_index => l_index,
6228: p_encoded => FND_API.G_FALSE),1,2000);
6229:
6230: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_error: '||substr(l_msg_data,1,250));
6231:
6232: -- Fixed bug 5639511
6233: -- Added Substr fucntion to avoid buffer overflow error
6234:
6239: if( length (v_error_message ) >= 2000 ) then
6240:
6241: v_error_message := substr(v_error_message, 1 , 2000) ;
6242:
6243: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_error: truncated v_error_message to 4000 chars ' );
6244: exit; -- Added exit statement for bug fix 5639511
6245: end if;
6246:
6247:
6247:
6248: END LOOP;
6249:
6250:
6251: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: error_message : ' || v_error_message );
6252:
6253: g_t_expected_error_info(1).NOTIFY_USER := P_NOTIFY_USER ;
6254: g_t_expected_error_info(1).SALES_ORDER_NUM := P_SALES_ORDER_NUM ;
6255: g_t_expected_error_info(1).TOP_MODEL_NAME := p_top_model_name ;
6275: g_t_dropped_item_type(v_table_count).ERROR_ORG_ID := pOrgId ;
6276: */
6277:
6278:
6279: oe_debug_pub.add( 'PROCESS: ' || g_t_expected_error_info(1).PROCESS , 1 ) ;
6280: oe_debug_pub.add( 'LINE_ID: ' || g_t_expected_error_info(1).LINE_ID , 1 ) ;
6281: oe_debug_pub.add( 'SALES_ORDER_NUM: ' || g_t_expected_error_info(1).SALES_ORDER_NUM ,1 );
6282: oe_debug_pub.add( 'ERROR_MESSAGE: ' || g_t_expected_error_info(1).ERROR_MESSAGE , 1 ) ;
6283: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || g_t_expected_error_info(1).TOP_MODEL_NAME , 1 ) ;
6276: */
6277:
6278:
6279: oe_debug_pub.add( 'PROCESS: ' || g_t_expected_error_info(1).PROCESS , 1 ) ;
6280: oe_debug_pub.add( 'LINE_ID: ' || g_t_expected_error_info(1).LINE_ID , 1 ) ;
6281: oe_debug_pub.add( 'SALES_ORDER_NUM: ' || g_t_expected_error_info(1).SALES_ORDER_NUM ,1 );
6282: oe_debug_pub.add( 'ERROR_MESSAGE: ' || g_t_expected_error_info(1).ERROR_MESSAGE , 1 ) ;
6283: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || g_t_expected_error_info(1).TOP_MODEL_NAME , 1 ) ;
6284: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).TOP_MODEL_LINE_NUM , 1 ) ;
6277:
6278:
6279: oe_debug_pub.add( 'PROCESS: ' || g_t_expected_error_info(1).PROCESS , 1 ) ;
6280: oe_debug_pub.add( 'LINE_ID: ' || g_t_expected_error_info(1).LINE_ID , 1 ) ;
6281: oe_debug_pub.add( 'SALES_ORDER_NUM: ' || g_t_expected_error_info(1).SALES_ORDER_NUM ,1 );
6282: oe_debug_pub.add( 'ERROR_MESSAGE: ' || g_t_expected_error_info(1).ERROR_MESSAGE , 1 ) ;
6283: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || g_t_expected_error_info(1).TOP_MODEL_NAME , 1 ) ;
6284: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).TOP_MODEL_LINE_NUM , 1 ) ;
6285: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || g_t_expected_error_info(1).TOP_CONFIG_NAME , 1 ) ;
6278:
6279: oe_debug_pub.add( 'PROCESS: ' || g_t_expected_error_info(1).PROCESS , 1 ) ;
6280: oe_debug_pub.add( 'LINE_ID: ' || g_t_expected_error_info(1).LINE_ID , 1 ) ;
6281: oe_debug_pub.add( 'SALES_ORDER_NUM: ' || g_t_expected_error_info(1).SALES_ORDER_NUM ,1 );
6282: oe_debug_pub.add( 'ERROR_MESSAGE: ' || g_t_expected_error_info(1).ERROR_MESSAGE , 1 ) ;
6283: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || g_t_expected_error_info(1).TOP_MODEL_NAME , 1 ) ;
6284: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).TOP_MODEL_LINE_NUM , 1 ) ;
6285: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || g_t_expected_error_info(1).TOP_CONFIG_NAME , 1 ) ;
6286: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || g_t_expected_error_info(1).TOP_CONFIG_LINE_NUM , 1) ;
6279: oe_debug_pub.add( 'PROCESS: ' || g_t_expected_error_info(1).PROCESS , 1 ) ;
6280: oe_debug_pub.add( 'LINE_ID: ' || g_t_expected_error_info(1).LINE_ID , 1 ) ;
6281: oe_debug_pub.add( 'SALES_ORDER_NUM: ' || g_t_expected_error_info(1).SALES_ORDER_NUM ,1 );
6282: oe_debug_pub.add( 'ERROR_MESSAGE: ' || g_t_expected_error_info(1).ERROR_MESSAGE , 1 ) ;
6283: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || g_t_expected_error_info(1).TOP_MODEL_NAME , 1 ) ;
6284: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).TOP_MODEL_LINE_NUM , 1 ) ;
6285: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || g_t_expected_error_info(1).TOP_CONFIG_NAME , 1 ) ;
6286: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || g_t_expected_error_info(1).TOP_CONFIG_LINE_NUM , 1) ;
6287: oe_debug_pub.add( 'PROBLEM_MODEL: ' || g_t_expected_error_info(1).PROBLEM_MODEL , 1 ) ;
6280: oe_debug_pub.add( 'LINE_ID: ' || g_t_expected_error_info(1).LINE_ID , 1 ) ;
6281: oe_debug_pub.add( 'SALES_ORDER_NUM: ' || g_t_expected_error_info(1).SALES_ORDER_NUM ,1 );
6282: oe_debug_pub.add( 'ERROR_MESSAGE: ' || g_t_expected_error_info(1).ERROR_MESSAGE , 1 ) ;
6283: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || g_t_expected_error_info(1).TOP_MODEL_NAME , 1 ) ;
6284: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).TOP_MODEL_LINE_NUM , 1 ) ;
6285: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || g_t_expected_error_info(1).TOP_CONFIG_NAME , 1 ) ;
6286: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || g_t_expected_error_info(1).TOP_CONFIG_LINE_NUM , 1) ;
6287: oe_debug_pub.add( 'PROBLEM_MODEL: ' || g_t_expected_error_info(1).PROBLEM_MODEL , 1 ) ;
6288: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6281: oe_debug_pub.add( 'SALES_ORDER_NUM: ' || g_t_expected_error_info(1).SALES_ORDER_NUM ,1 );
6282: oe_debug_pub.add( 'ERROR_MESSAGE: ' || g_t_expected_error_info(1).ERROR_MESSAGE , 1 ) ;
6283: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || g_t_expected_error_info(1).TOP_MODEL_NAME , 1 ) ;
6284: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).TOP_MODEL_LINE_NUM , 1 ) ;
6285: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || g_t_expected_error_info(1).TOP_CONFIG_NAME , 1 ) ;
6286: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || g_t_expected_error_info(1).TOP_CONFIG_LINE_NUM , 1) ;
6287: oe_debug_pub.add( 'PROBLEM_MODEL: ' || g_t_expected_error_info(1).PROBLEM_MODEL , 1 ) ;
6288: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6289: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || g_t_expected_error_info(1).PROBLEM_CONFIG , 1) ;
6282: oe_debug_pub.add( 'ERROR_MESSAGE: ' || g_t_expected_error_info(1).ERROR_MESSAGE , 1 ) ;
6283: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || g_t_expected_error_info(1).TOP_MODEL_NAME , 1 ) ;
6284: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).TOP_MODEL_LINE_NUM , 1 ) ;
6285: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || g_t_expected_error_info(1).TOP_CONFIG_NAME , 1 ) ;
6286: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || g_t_expected_error_info(1).TOP_CONFIG_LINE_NUM , 1) ;
6287: oe_debug_pub.add( 'PROBLEM_MODEL: ' || g_t_expected_error_info(1).PROBLEM_MODEL , 1 ) ;
6288: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6289: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || g_t_expected_error_info(1).PROBLEM_CONFIG , 1) ;
6290: oe_debug_pub.add( 'ERROR_ORG: ' || g_t_expected_error_info(1).ERROR_ORG , 1 ) ;
6283: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || g_t_expected_error_info(1).TOP_MODEL_NAME , 1 ) ;
6284: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).TOP_MODEL_LINE_NUM , 1 ) ;
6285: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || g_t_expected_error_info(1).TOP_CONFIG_NAME , 1 ) ;
6286: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || g_t_expected_error_info(1).TOP_CONFIG_LINE_NUM , 1) ;
6287: oe_debug_pub.add( 'PROBLEM_MODEL: ' || g_t_expected_error_info(1).PROBLEM_MODEL , 1 ) ;
6288: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6289: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || g_t_expected_error_info(1).PROBLEM_CONFIG , 1) ;
6290: oe_debug_pub.add( 'ERROR_ORG: ' || g_t_expected_error_info(1).ERROR_ORG , 1 ) ;
6291: oe_debug_pub.add( 'ERROR_ORG_ID: ' || g_t_expected_error_info(1).ERROR_ORG_ID , 1) ;
6284: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).TOP_MODEL_LINE_NUM , 1 ) ;
6285: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || g_t_expected_error_info(1).TOP_CONFIG_NAME , 1 ) ;
6286: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || g_t_expected_error_info(1).TOP_CONFIG_LINE_NUM , 1) ;
6287: oe_debug_pub.add( 'PROBLEM_MODEL: ' || g_t_expected_error_info(1).PROBLEM_MODEL , 1 ) ;
6288: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6289: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || g_t_expected_error_info(1).PROBLEM_CONFIG , 1) ;
6290: oe_debug_pub.add( 'ERROR_ORG: ' || g_t_expected_error_info(1).ERROR_ORG , 1 ) ;
6291: oe_debug_pub.add( 'ERROR_ORG_ID: ' || g_t_expected_error_info(1).ERROR_ORG_ID , 1) ;
6292: oe_debug_pub.add( 'NOTIFY_USER: ' || g_t_expected_error_info(1).NOTIFY_USER, 1) ;
6285: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || g_t_expected_error_info(1).TOP_CONFIG_NAME , 1 ) ;
6286: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || g_t_expected_error_info(1).TOP_CONFIG_LINE_NUM , 1) ;
6287: oe_debug_pub.add( 'PROBLEM_MODEL: ' || g_t_expected_error_info(1).PROBLEM_MODEL , 1 ) ;
6288: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6289: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || g_t_expected_error_info(1).PROBLEM_CONFIG , 1) ;
6290: oe_debug_pub.add( 'ERROR_ORG: ' || g_t_expected_error_info(1).ERROR_ORG , 1 ) ;
6291: oe_debug_pub.add( 'ERROR_ORG_ID: ' || g_t_expected_error_info(1).ERROR_ORG_ID , 1) ;
6292: oe_debug_pub.add( 'NOTIFY_USER: ' || g_t_expected_error_info(1).NOTIFY_USER, 1) ;
6293: oe_debug_pub.add( 'REQUEST_ID: ' || g_t_expected_error_info(1).REQUEST_ID , 1 ) ;
6286: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || g_t_expected_error_info(1).TOP_CONFIG_LINE_NUM , 1) ;
6287: oe_debug_pub.add( 'PROBLEM_MODEL: ' || g_t_expected_error_info(1).PROBLEM_MODEL , 1 ) ;
6288: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6289: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || g_t_expected_error_info(1).PROBLEM_CONFIG , 1) ;
6290: oe_debug_pub.add( 'ERROR_ORG: ' || g_t_expected_error_info(1).ERROR_ORG , 1 ) ;
6291: oe_debug_pub.add( 'ERROR_ORG_ID: ' || g_t_expected_error_info(1).ERROR_ORG_ID , 1) ;
6292: oe_debug_pub.add( 'NOTIFY_USER: ' || g_t_expected_error_info(1).NOTIFY_USER, 1) ;
6293: oe_debug_pub.add( 'REQUEST_ID: ' || g_t_expected_error_info(1).REQUEST_ID , 1 ) ;
6294:
6287: oe_debug_pub.add( 'PROBLEM_MODEL: ' || g_t_expected_error_info(1).PROBLEM_MODEL , 1 ) ;
6288: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6289: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || g_t_expected_error_info(1).PROBLEM_CONFIG , 1) ;
6290: oe_debug_pub.add( 'ERROR_ORG: ' || g_t_expected_error_info(1).ERROR_ORG , 1 ) ;
6291: oe_debug_pub.add( 'ERROR_ORG_ID: ' || g_t_expected_error_info(1).ERROR_ORG_ID , 1) ;
6292: oe_debug_pub.add( 'NOTIFY_USER: ' || g_t_expected_error_info(1).NOTIFY_USER, 1) ;
6293: oe_debug_pub.add( 'REQUEST_ID: ' || g_t_expected_error_info(1).REQUEST_ID , 1 ) ;
6294:
6295:
6288: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || g_t_expected_error_info(1).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6289: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || g_t_expected_error_info(1).PROBLEM_CONFIG , 1) ;
6290: oe_debug_pub.add( 'ERROR_ORG: ' || g_t_expected_error_info(1).ERROR_ORG , 1 ) ;
6291: oe_debug_pub.add( 'ERROR_ORG_ID: ' || g_t_expected_error_info(1).ERROR_ORG_ID , 1) ;
6292: oe_debug_pub.add( 'NOTIFY_USER: ' || g_t_expected_error_info(1).NOTIFY_USER, 1) ;
6293: oe_debug_pub.add( 'REQUEST_ID: ' || g_t_expected_error_info(1).REQUEST_ID , 1 ) ;
6294:
6295:
6296: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: done expected errors ' , 1 );
6289: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || g_t_expected_error_info(1).PROBLEM_CONFIG , 1) ;
6290: oe_debug_pub.add( 'ERROR_ORG: ' || g_t_expected_error_info(1).ERROR_ORG , 1 ) ;
6291: oe_debug_pub.add( 'ERROR_ORG_ID: ' || g_t_expected_error_info(1).ERROR_ORG_ID , 1) ;
6292: oe_debug_pub.add( 'NOTIFY_USER: ' || g_t_expected_error_info(1).NOTIFY_USER, 1) ;
6293: oe_debug_pub.add( 'REQUEST_ID: ' || g_t_expected_error_info(1).REQUEST_ID , 1 ) ;
6294:
6295:
6296: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: done expected errors ' , 1 );
6297:
6292: oe_debug_pub.add( 'NOTIFY_USER: ' || g_t_expected_error_info(1).NOTIFY_USER, 1) ;
6293: oe_debug_pub.add( 'REQUEST_ID: ' || g_t_expected_error_info(1).REQUEST_ID , 1 ) ;
6294:
6295:
6296: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: done expected errors ' , 1 );
6297:
6298:
6299:
6300:
6297:
6298:
6299:
6300:
6301: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: going to call send notification ' , 1 );
6302:
6303: send_notification (
6304: P_PROCESS => g_t_expected_error_info(1).process
6305: ,P_LINE_ID => g_t_expected_error_info(1).line_id
6319:
6320: commit ; /* COMMIT FOR AUTONOMOUS TRANSACTION */
6321:
6322:
6323: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: done send notification ' , 1 );
6324:
6325: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: ******** END AUTONOMOUS TRANSACTION FOR NOTIFY_EXPECTED_ERRORS **********' , 1 );
6326: end notify_expected_errors ;
6327:
6321:
6322:
6323: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: done send notification ' , 1 );
6324:
6325: oe_debug_pub.add('CTO_UTILITY_PK.notify_expected_errors: ******** END AUTONOMOUS TRANSACTION FOR NOTIFY_EXPECTED_ERRORS **********' , 1 );
6326: end notify_expected_errors ;
6327:
6328:
6329: PROCEDURE APPLY_CREATE_CONFIG_HOLD( p_line_id in number
6340:
6341: BEGIN
6342:
6343: IF PG_DEBUG <> 0 THEN
6344: oe_debug_pub.add('******************APPLY_CREATE_CONFIG_HOLD:BEGIN APPLY AUTONOMOUS TRANSACTION **************** ' ,1);
6345: END IF;
6346:
6347:
6348:
6347:
6348:
6349:
6350: IF PG_DEBUG <> 0 THEN
6351: oe_debug_pub.add('APPLY_CREATE_CONFIG_HOLD:Calling OM api to apply create config activity hold.' ,1);
6352: END IF;
6353:
6354: l_hold_source_rec.hold_entity_code := 'O';
6355: l_hold_source_rec.hold_id := 60 ; /* Change hold id 1062 to 60 after getting script from gayatri */
6365: , x_msg_data => x_msg_data);
6366:
6367: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
6368: IF PG_DEBUG <> 0 THEN
6369: oe_debug_pub.add('CTOCITMB:Failed in Apply Holds with expected error.' ,1);
6370: END IF;
6371: raise FND_API.G_EXC_ERROR;
6372:
6373: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
6371: raise FND_API.G_EXC_ERROR;
6372:
6373: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
6374: IF PG_DEBUG <> 0 THEN
6375: oe_debug_pub.add('CTOCITMB:Failed in Apply Holds with unexpected error.' ,1);
6376: END IF;
6377: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6378: END IF;
6379:
6380: commit ; /* COMMIT FOR AUTONOMOUS TRANSACTION */
6381:
6382:
6383: IF PG_DEBUG <> 0 THEN
6384: oe_debug_pub.add('******************APPLY_CREATE_CONFIG_HOLD:END APPLY AUTONOMOUS TRANSACTION **************** ' ,1);
6385: END IF;
6386:
6387:
6388: END APPLY_CREATE_CONFIG_HOLD ;
6393: is
6394: PRAGMA AUTONOMOUS_TRANSACTION ;
6395: begin
6396:
6397: oe_debug_pub.add('SEND_OID_NOTIFICATION : ******** BEGIN AUTONOMOUS TRANSACTION FOR SEND_OID_NOTIFICATION **********' , 1 );
6398:
6399:
6400: if( CTO_CONFIG_BOM_PK.g_t_dropped_item_type.count > 0 ) then
6401:
6401:
6402:
6403:
6404:
6405: oe_debug_pub.add( 'DROPPED ITEM TABLE ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type.count , 1 ) ;
6406:
6407: for i in 1..CTO_CONFIG_BOM_PK.g_t_dropped_item_type.count
6408: loop
6409: oe_debug_pub.add( 'PROCESS: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROCESS , 1 ) ;
6405: oe_debug_pub.add( 'DROPPED ITEM TABLE ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type.count , 1 ) ;
6406:
6407: for i in 1..CTO_CONFIG_BOM_PK.g_t_dropped_item_type.count
6408: loop
6409: oe_debug_pub.add( 'PROCESS: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROCESS , 1 ) ;
6410: oe_debug_pub.add( 'LINE_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).LINE_ID , 1 ) ;
6411: oe_debug_pub.add( 'SALES_ORDER_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).SALES_ORDER_NUM ,1 );
6412: oe_debug_pub.add( 'ERROR_MESSAGE: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_MESSAGE , 1 ) ;
6413: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_NAME , 1 ) ;
6406:
6407: for i in 1..CTO_CONFIG_BOM_PK.g_t_dropped_item_type.count
6408: loop
6409: oe_debug_pub.add( 'PROCESS: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROCESS , 1 ) ;
6410: oe_debug_pub.add( 'LINE_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).LINE_ID , 1 ) ;
6411: oe_debug_pub.add( 'SALES_ORDER_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).SALES_ORDER_NUM ,1 );
6412: oe_debug_pub.add( 'ERROR_MESSAGE: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_MESSAGE , 1 ) ;
6413: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_NAME , 1 ) ;
6414: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_LINE_NUM , 1 ) ;
6407: for i in 1..CTO_CONFIG_BOM_PK.g_t_dropped_item_type.count
6408: loop
6409: oe_debug_pub.add( 'PROCESS: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROCESS , 1 ) ;
6410: oe_debug_pub.add( 'LINE_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).LINE_ID , 1 ) ;
6411: oe_debug_pub.add( 'SALES_ORDER_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).SALES_ORDER_NUM ,1 );
6412: oe_debug_pub.add( 'ERROR_MESSAGE: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_MESSAGE , 1 ) ;
6413: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_NAME , 1 ) ;
6414: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_LINE_NUM , 1 ) ;
6415: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_NAME , 1 ) ;
6408: loop
6409: oe_debug_pub.add( 'PROCESS: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROCESS , 1 ) ;
6410: oe_debug_pub.add( 'LINE_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).LINE_ID , 1 ) ;
6411: oe_debug_pub.add( 'SALES_ORDER_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).SALES_ORDER_NUM ,1 );
6412: oe_debug_pub.add( 'ERROR_MESSAGE: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_MESSAGE , 1 ) ;
6413: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_NAME , 1 ) ;
6414: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_LINE_NUM , 1 ) ;
6415: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_NAME , 1 ) ;
6416: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_LINE_NUM , 1) ;
6409: oe_debug_pub.add( 'PROCESS: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROCESS , 1 ) ;
6410: oe_debug_pub.add( 'LINE_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).LINE_ID , 1 ) ;
6411: oe_debug_pub.add( 'SALES_ORDER_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).SALES_ORDER_NUM ,1 );
6412: oe_debug_pub.add( 'ERROR_MESSAGE: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_MESSAGE , 1 ) ;
6413: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_NAME , 1 ) ;
6414: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_LINE_NUM , 1 ) ;
6415: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_NAME , 1 ) ;
6416: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_LINE_NUM , 1) ;
6417: oe_debug_pub.add( 'PROBLEM_MODEL: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL , 1 ) ;
6410: oe_debug_pub.add( 'LINE_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).LINE_ID , 1 ) ;
6411: oe_debug_pub.add( 'SALES_ORDER_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).SALES_ORDER_NUM ,1 );
6412: oe_debug_pub.add( 'ERROR_MESSAGE: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_MESSAGE , 1 ) ;
6413: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_NAME , 1 ) ;
6414: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_LINE_NUM , 1 ) ;
6415: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_NAME , 1 ) ;
6416: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_LINE_NUM , 1) ;
6417: oe_debug_pub.add( 'PROBLEM_MODEL: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL , 1 ) ;
6418: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6411: oe_debug_pub.add( 'SALES_ORDER_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).SALES_ORDER_NUM ,1 );
6412: oe_debug_pub.add( 'ERROR_MESSAGE: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_MESSAGE , 1 ) ;
6413: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_NAME , 1 ) ;
6414: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_LINE_NUM , 1 ) ;
6415: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_NAME , 1 ) ;
6416: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_LINE_NUM , 1) ;
6417: oe_debug_pub.add( 'PROBLEM_MODEL: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL , 1 ) ;
6418: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6419: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_CONFIG , 1) ;
6412: oe_debug_pub.add( 'ERROR_MESSAGE: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_MESSAGE , 1 ) ;
6413: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_NAME , 1 ) ;
6414: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_LINE_NUM , 1 ) ;
6415: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_NAME , 1 ) ;
6416: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_LINE_NUM , 1) ;
6417: oe_debug_pub.add( 'PROBLEM_MODEL: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL , 1 ) ;
6418: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6419: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_CONFIG , 1) ;
6420: oe_debug_pub.add( 'ERROR_ORG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG , 1 ) ;
6413: oe_debug_pub.add( 'TOP_MODEL_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_NAME , 1 ) ;
6414: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_LINE_NUM , 1 ) ;
6415: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_NAME , 1 ) ;
6416: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_LINE_NUM , 1) ;
6417: oe_debug_pub.add( 'PROBLEM_MODEL: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL , 1 ) ;
6418: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6419: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_CONFIG , 1) ;
6420: oe_debug_pub.add( 'ERROR_ORG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG , 1 ) ;
6421: oe_debug_pub.add( 'ERROR_ORG_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG_ID , 1) ;
6414: oe_debug_pub.add( 'TOP_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_MODEL_LINE_NUM , 1 ) ;
6415: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_NAME , 1 ) ;
6416: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_LINE_NUM , 1) ;
6417: oe_debug_pub.add( 'PROBLEM_MODEL: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL , 1 ) ;
6418: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6419: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_CONFIG , 1) ;
6420: oe_debug_pub.add( 'ERROR_ORG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG , 1 ) ;
6421: oe_debug_pub.add( 'ERROR_ORG_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG_ID , 1) ;
6422: oe_debug_pub.add( 'NOTIFY_USER: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).NOTIFY_USER, 1) ;
6415: oe_debug_pub.add( 'TOP_CONFIG_NAME: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_NAME , 1 ) ;
6416: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_LINE_NUM , 1) ;
6417: oe_debug_pub.add( 'PROBLEM_MODEL: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL , 1 ) ;
6418: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6419: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_CONFIG , 1) ;
6420: oe_debug_pub.add( 'ERROR_ORG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG , 1 ) ;
6421: oe_debug_pub.add( 'ERROR_ORG_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG_ID , 1) ;
6422: oe_debug_pub.add( 'NOTIFY_USER: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).NOTIFY_USER, 1) ;
6423: oe_debug_pub.add( 'REQUEST_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).REQUEST_ID , 1 ) ;
6416: oe_debug_pub.add( 'TOP_CONFIG_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).TOP_CONFIG_LINE_NUM , 1) ;
6417: oe_debug_pub.add( 'PROBLEM_MODEL: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL , 1 ) ;
6418: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6419: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_CONFIG , 1) ;
6420: oe_debug_pub.add( 'ERROR_ORG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG , 1 ) ;
6421: oe_debug_pub.add( 'ERROR_ORG_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG_ID , 1) ;
6422: oe_debug_pub.add( 'NOTIFY_USER: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).NOTIFY_USER, 1) ;
6423: oe_debug_pub.add( 'REQUEST_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).REQUEST_ID , 1 ) ;
6424:
6417: oe_debug_pub.add( 'PROBLEM_MODEL: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL , 1 ) ;
6418: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6419: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_CONFIG , 1) ;
6420: oe_debug_pub.add( 'ERROR_ORG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG , 1 ) ;
6421: oe_debug_pub.add( 'ERROR_ORG_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG_ID , 1) ;
6422: oe_debug_pub.add( 'NOTIFY_USER: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).NOTIFY_USER, 1) ;
6423: oe_debug_pub.add( 'REQUEST_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).REQUEST_ID , 1 ) ;
6424:
6425: if( CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).MFG_REL_DATE is not null ) then
6418: oe_debug_pub.add( 'PROBLEM_MODEL_LINE_NUM: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_MODEL_LINE_NUM , 1 ) ;
6419: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_CONFIG , 1) ;
6420: oe_debug_pub.add( 'ERROR_ORG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG , 1 ) ;
6421: oe_debug_pub.add( 'ERROR_ORG_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG_ID , 1) ;
6422: oe_debug_pub.add( 'NOTIFY_USER: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).NOTIFY_USER, 1) ;
6423: oe_debug_pub.add( 'REQUEST_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).REQUEST_ID , 1 ) ;
6424:
6425: if( CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).MFG_REL_DATE is not null ) then
6426: oe_debug_pub.add( 'MFG_REL_DATE: ' || to_char(CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).MFG_REL_DATE) , 1 ) ;
6419: oe_debug_pub.add( 'PROBLEM_CONFIG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).PROBLEM_CONFIG , 1) ;
6420: oe_debug_pub.add( 'ERROR_ORG: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG , 1 ) ;
6421: oe_debug_pub.add( 'ERROR_ORG_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).ERROR_ORG_ID , 1) ;
6422: oe_debug_pub.add( 'NOTIFY_USER: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).NOTIFY_USER, 1) ;
6423: oe_debug_pub.add( 'REQUEST_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).REQUEST_ID , 1 ) ;
6424:
6425: if( CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).MFG_REL_DATE is not null ) then
6426: oe_debug_pub.add( 'MFG_REL_DATE: ' || to_char(CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).MFG_REL_DATE) , 1 ) ;
6427: else
6422: oe_debug_pub.add( 'NOTIFY_USER: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).NOTIFY_USER, 1) ;
6423: oe_debug_pub.add( 'REQUEST_ID: ' || CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).REQUEST_ID , 1 ) ;
6424:
6425: if( CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).MFG_REL_DATE is not null ) then
6426: oe_debug_pub.add( 'MFG_REL_DATE: ' || to_char(CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).MFG_REL_DATE) , 1 ) ;
6427: else
6428:
6429: oe_debug_pub.add( 'MFG REL DATE is null ' , 1 ) ;
6430: end if;
6425: if( CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).MFG_REL_DATE is not null ) then
6426: oe_debug_pub.add( 'MFG_REL_DATE: ' || to_char(CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).MFG_REL_DATE) , 1 ) ;
6427: else
6428:
6429: oe_debug_pub.add( 'MFG REL DATE is null ' , 1 ) ;
6430: end if;
6431:
6432:
6433:
6430: end if;
6431:
6432:
6433:
6434: oe_debug_pub.add( 'DROPPED ITEM TABLE ' || ' going to send notification ' , 1 ) ;
6435:
6436: CTO_UTILITY_PK.send_notification (
6437: P_PROCESS => CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).process
6438: ,P_LINE_ID => CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).line_id
6449: ,P_NOTIFY_USER => CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).notify_user
6450: ,P_REQUEST_ID => CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).request_id
6451: ,P_MFG_REL_DATE => CTO_CONFIG_BOM_PK.g_t_dropped_item_type(i).mfg_rel_date );
6452:
6453: oe_debug_pub.add( 'DROPPED ITEM TABLE ' || ' sent notification ' , 1 ) ;
6454:
6455:
6456: end loop ;
6457:
6456: end loop ;
6457:
6458: else
6459:
6460: oe_debug_pub.add( 'DROPPED ITEM TABLE ' || ' is empty ' , 1 ) ;
6461:
6462: end if ;
6463:
6464:
6463:
6464:
6465: commit ; -- AUTONOMOUS TRANSACTION
6466:
6467: oe_debug_pub.add('SEND_OID_NOTIFICATION : ******** END AUTONOMOUS TRANSACTION FOR SEND_OID_NOTIFICATION **********' , 1 );
6468: CTO_CONFIG_BOM_PK.g_t_dropped_item_type.delete;
6469:
6470: end send_oid_notification ;
6471:
6479: is
6480: begin
6481:
6482: IF PG_DEBUG <> 0 THEN
6483: oe_debug_pub.add('create_bom_ml: ' || 'Getting the planner code ..',3);
6484: END IF;
6485:
6486: BEGIN
6487: -- bugfix 2203802: Instead of getting the planner code directly from MSI,
6498: and p.planner_code = item.planner_code
6499: and p.employee_id = u.employee_id(+); --outer join b'cos employee need not be an fnd user.
6500:
6501:
6502: oe_debug_pub.add('create_bom_ml: ' || '****PLANNER CODE DATA' || x_planner_code ,2);
6503:
6504:
6505: EXCEPTION
6506:
6505: EXCEPTION
6506:
6507: WHEN OTHERS THEN
6508: IF PG_DEBUG <> 0 THEN
6509: oe_debug_pub.add('create_bom_ml: ' || 'Error in getting the planner code data. Defaulting to SYSADMIN.',2);
6510:
6511: oe_debug_pub.add('create_bom_ml: ' || 'Error Message : '||sqlerrm,2);
6512:
6513: x_planner_code := 'SYSADMIN' ;
6507: WHEN OTHERS THEN
6508: IF PG_DEBUG <> 0 THEN
6509: oe_debug_pub.add('create_bom_ml: ' || 'Error in getting the planner code data. Defaulting to SYSADMIN.',2);
6510:
6511: oe_debug_pub.add('create_bom_ml: ' || 'Error Message : '||sqlerrm,2);
6512:
6513: x_planner_code := 'SYSADMIN' ;
6514:
6515: END IF;
6515: END IF;
6516: END;
6517:
6518:
6519: oe_debug_pub.add('create_bom_ml: ' || '****PLANNER CODE DATA' || x_planner_code ,2);
6520:
6521: end get_planner_code ;
6522:
6523:
6538: v_recipient varchar2(200) ;
6539: begin
6540:
6541: IF PG_DEBUG <> 0 THEN
6542: oe_debug_pub.add('handle_expected_error: entered handle_expected_error ' , 3);
6543: oe_debug_pub.add('handle_expected_error: p_inventory_item_id ' || p_inventory_item_id , 3);
6544: oe_debug_pub.add('handle_expected_error: p_organization_id ' || p_organization_id , 3);
6545: oe_debug_pub.add('handle_expected_error: p_line_id ' || p_line_id , 3);
6546: oe_debug_pub.add('handle_expected_error: p_sales_order_num ' || p_sales_order_num , 3);
6539: begin
6540:
6541: IF PG_DEBUG <> 0 THEN
6542: oe_debug_pub.add('handle_expected_error: entered handle_expected_error ' , 3);
6543: oe_debug_pub.add('handle_expected_error: p_inventory_item_id ' || p_inventory_item_id , 3);
6544: oe_debug_pub.add('handle_expected_error: p_organization_id ' || p_organization_id , 3);
6545: oe_debug_pub.add('handle_expected_error: p_line_id ' || p_line_id , 3);
6546: oe_debug_pub.add('handle_expected_error: p_sales_order_num ' || p_sales_order_num , 3);
6547: oe_debug_pub.add('handle_expected_error: p_top_model_name ' || p_top_model_name , 3);
6540:
6541: IF PG_DEBUG <> 0 THEN
6542: oe_debug_pub.add('handle_expected_error: entered handle_expected_error ' , 3);
6543: oe_debug_pub.add('handle_expected_error: p_inventory_item_id ' || p_inventory_item_id , 3);
6544: oe_debug_pub.add('handle_expected_error: p_organization_id ' || p_organization_id , 3);
6545: oe_debug_pub.add('handle_expected_error: p_line_id ' || p_line_id , 3);
6546: oe_debug_pub.add('handle_expected_error: p_sales_order_num ' || p_sales_order_num , 3);
6547: oe_debug_pub.add('handle_expected_error: p_top_model_name ' || p_top_model_name , 3);
6548: oe_debug_pub.add('handle_expected_error: p_top_model_line_num ' || p_top_model_line_num , 3);
6541: IF PG_DEBUG <> 0 THEN
6542: oe_debug_pub.add('handle_expected_error: entered handle_expected_error ' , 3);
6543: oe_debug_pub.add('handle_expected_error: p_inventory_item_id ' || p_inventory_item_id , 3);
6544: oe_debug_pub.add('handle_expected_error: p_organization_id ' || p_organization_id , 3);
6545: oe_debug_pub.add('handle_expected_error: p_line_id ' || p_line_id , 3);
6546: oe_debug_pub.add('handle_expected_error: p_sales_order_num ' || p_sales_order_num , 3);
6547: oe_debug_pub.add('handle_expected_error: p_top_model_name ' || p_top_model_name , 3);
6548: oe_debug_pub.add('handle_expected_error: p_top_model_line_num ' || p_top_model_line_num , 3);
6549: oe_debug_pub.add('handle_expected_error: p_top_config_name ' || p_top_config_name , 3);
6542: oe_debug_pub.add('handle_expected_error: entered handle_expected_error ' , 3);
6543: oe_debug_pub.add('handle_expected_error: p_inventory_item_id ' || p_inventory_item_id , 3);
6544: oe_debug_pub.add('handle_expected_error: p_organization_id ' || p_organization_id , 3);
6545: oe_debug_pub.add('handle_expected_error: p_line_id ' || p_line_id , 3);
6546: oe_debug_pub.add('handle_expected_error: p_sales_order_num ' || p_sales_order_num , 3);
6547: oe_debug_pub.add('handle_expected_error: p_top_model_name ' || p_top_model_name , 3);
6548: oe_debug_pub.add('handle_expected_error: p_top_model_line_num ' || p_top_model_line_num , 3);
6549: oe_debug_pub.add('handle_expected_error: p_top_config_name ' || p_top_config_name , 3);
6550: oe_debug_pub.add('handle_expected_error: p_top_config_line_num ' || p_top_config_line_num , 3);
6543: oe_debug_pub.add('handle_expected_error: p_inventory_item_id ' || p_inventory_item_id , 3);
6544: oe_debug_pub.add('handle_expected_error: p_organization_id ' || p_organization_id , 3);
6545: oe_debug_pub.add('handle_expected_error: p_line_id ' || p_line_id , 3);
6546: oe_debug_pub.add('handle_expected_error: p_sales_order_num ' || p_sales_order_num , 3);
6547: oe_debug_pub.add('handle_expected_error: p_top_model_name ' || p_top_model_name , 3);
6548: oe_debug_pub.add('handle_expected_error: p_top_model_line_num ' || p_top_model_line_num , 3);
6549: oe_debug_pub.add('handle_expected_error: p_top_config_name ' || p_top_config_name , 3);
6550: oe_debug_pub.add('handle_expected_error: p_top_config_line_num ' || p_top_config_line_num , 3);
6551: oe_debug_pub.add('handle_expected_error: p_msg_count ' || p_msg_count , 3);
6544: oe_debug_pub.add('handle_expected_error: p_organization_id ' || p_organization_id , 3);
6545: oe_debug_pub.add('handle_expected_error: p_line_id ' || p_line_id , 3);
6546: oe_debug_pub.add('handle_expected_error: p_sales_order_num ' || p_sales_order_num , 3);
6547: oe_debug_pub.add('handle_expected_error: p_top_model_name ' || p_top_model_name , 3);
6548: oe_debug_pub.add('handle_expected_error: p_top_model_line_num ' || p_top_model_line_num , 3);
6549: oe_debug_pub.add('handle_expected_error: p_top_config_name ' || p_top_config_name , 3);
6550: oe_debug_pub.add('handle_expected_error: p_top_config_line_num ' || p_top_config_line_num , 3);
6551: oe_debug_pub.add('handle_expected_error: p_msg_count ' || p_msg_count , 3);
6552: oe_debug_pub.add('handle_expected_error: p_planner_code ' || p_planner_code , 3);
6545: oe_debug_pub.add('handle_expected_error: p_line_id ' || p_line_id , 3);
6546: oe_debug_pub.add('handle_expected_error: p_sales_order_num ' || p_sales_order_num , 3);
6547: oe_debug_pub.add('handle_expected_error: p_top_model_name ' || p_top_model_name , 3);
6548: oe_debug_pub.add('handle_expected_error: p_top_model_line_num ' || p_top_model_line_num , 3);
6549: oe_debug_pub.add('handle_expected_error: p_top_config_name ' || p_top_config_name , 3);
6550: oe_debug_pub.add('handle_expected_error: p_top_config_line_num ' || p_top_config_line_num , 3);
6551: oe_debug_pub.add('handle_expected_error: p_msg_count ' || p_msg_count , 3);
6552: oe_debug_pub.add('handle_expected_error: p_planner_code ' || p_planner_code , 3);
6553: oe_debug_pub.add('handle_expected_error: p_request_id ' || p_request_id , 3);
6546: oe_debug_pub.add('handle_expected_error: p_sales_order_num ' || p_sales_order_num , 3);
6547: oe_debug_pub.add('handle_expected_error: p_top_model_name ' || p_top_model_name , 3);
6548: oe_debug_pub.add('handle_expected_error: p_top_model_line_num ' || p_top_model_line_num , 3);
6549: oe_debug_pub.add('handle_expected_error: p_top_config_name ' || p_top_config_name , 3);
6550: oe_debug_pub.add('handle_expected_error: p_top_config_line_num ' || p_top_config_line_num , 3);
6551: oe_debug_pub.add('handle_expected_error: p_msg_count ' || p_msg_count , 3);
6552: oe_debug_pub.add('handle_expected_error: p_planner_code ' || p_planner_code , 3);
6553: oe_debug_pub.add('handle_expected_error: p_request_id ' || p_request_id , 3);
6554: oe_debug_pub.add('handle_expected_error: ******** P_PROCESS ******** ' || p_process , 3);
6547: oe_debug_pub.add('handle_expected_error: p_top_model_name ' || p_top_model_name , 3);
6548: oe_debug_pub.add('handle_expected_error: p_top_model_line_num ' || p_top_model_line_num , 3);
6549: oe_debug_pub.add('handle_expected_error: p_top_config_name ' || p_top_config_name , 3);
6550: oe_debug_pub.add('handle_expected_error: p_top_config_line_num ' || p_top_config_line_num , 3);
6551: oe_debug_pub.add('handle_expected_error: p_msg_count ' || p_msg_count , 3);
6552: oe_debug_pub.add('handle_expected_error: p_planner_code ' || p_planner_code , 3);
6553: oe_debug_pub.add('handle_expected_error: p_request_id ' || p_request_id , 3);
6554: oe_debug_pub.add('handle_expected_error: ******** P_PROCESS ******** ' || p_process , 3);
6555:
6548: oe_debug_pub.add('handle_expected_error: p_top_model_line_num ' || p_top_model_line_num , 3);
6549: oe_debug_pub.add('handle_expected_error: p_top_config_name ' || p_top_config_name , 3);
6550: oe_debug_pub.add('handle_expected_error: p_top_config_line_num ' || p_top_config_line_num , 3);
6551: oe_debug_pub.add('handle_expected_error: p_msg_count ' || p_msg_count , 3);
6552: oe_debug_pub.add('handle_expected_error: p_planner_code ' || p_planner_code , 3);
6553: oe_debug_pub.add('handle_expected_error: p_request_id ' || p_request_id , 3);
6554: oe_debug_pub.add('handle_expected_error: ******** P_PROCESS ******** ' || p_process , 3);
6555:
6556:
6549: oe_debug_pub.add('handle_expected_error: p_top_config_name ' || p_top_config_name , 3);
6550: oe_debug_pub.add('handle_expected_error: p_top_config_line_num ' || p_top_config_line_num , 3);
6551: oe_debug_pub.add('handle_expected_error: p_msg_count ' || p_msg_count , 3);
6552: oe_debug_pub.add('handle_expected_error: p_planner_code ' || p_planner_code , 3);
6553: oe_debug_pub.add('handle_expected_error: p_request_id ' || p_request_id , 3);
6554: oe_debug_pub.add('handle_expected_error: ******** P_PROCESS ******** ' || p_process , 3);
6555:
6556:
6557: oe_debug_pub.add('handle_expected_error: ' || 'Getting Custom Recipient..',3);
6550: oe_debug_pub.add('handle_expected_error: p_top_config_line_num ' || p_top_config_line_num , 3);
6551: oe_debug_pub.add('handle_expected_error: p_msg_count ' || p_msg_count , 3);
6552: oe_debug_pub.add('handle_expected_error: p_planner_code ' || p_planner_code , 3);
6553: oe_debug_pub.add('handle_expected_error: p_request_id ' || p_request_id , 3);
6554: oe_debug_pub.add('handle_expected_error: ******** P_PROCESS ******** ' || p_process , 3);
6555:
6556:
6557: oe_debug_pub.add('handle_expected_error: ' || 'Getting Custom Recipient..',3);
6558: END IF;
6553: oe_debug_pub.add('handle_expected_error: p_request_id ' || p_request_id , 3);
6554: oe_debug_pub.add('handle_expected_error: ******** P_PROCESS ******** ' || p_process , 3);
6555:
6556:
6557: oe_debug_pub.add('handle_expected_error: ' || 'Getting Custom Recipient..',3);
6558: END IF;
6559:
6560: v_recipient := CTO_CUSTOM_NOTIFY_PK.get_recipient( p_error_type => p_error_type
6561: ,p_inventory_item_id => p_inventory_item_id
6567:
6568: if( v_recipient is not null ) then
6569:
6570: IF PG_DEBUG <> 0 THEN
6571: oe_debug_pub.add('handle_expected_error: ' || 'Recipient returned from CTO_CUSTOM_NOTIFY_PK..' || v_recipient ,3);
6572: END IF;
6573:
6574: else
6575: v_recipient := p_planner_code ;
6573:
6574: else
6575: v_recipient := p_planner_code ;
6576: IF PG_DEBUG <> 0 THEN
6577: oe_debug_pub.add('handle_expected_error: ' || 'planner code is ..' || v_recipient ,3);
6578: END IF;
6579: end if;
6580:
6581:
6593: ,P_NOTIFY_USER => v_recipient
6594: ,P_REQUEST_ID => p_request_id ) ;
6595:
6596: IF PG_DEBUG <> 0 THEN
6597: oe_debug_pub.add('handle_expected_error: ' || 'done handle_expected_error..' ,3);
6598: END IF;
6599:
6600:
6601: end handle_expected_error;
6663: -- they are already existing for this item. It they are existing
6664: -- We should not create it once again.
6665:
6666: IF PG_DEBUG <> 0 THEN
6667: oe_debug_pub.add('Cto_Utility_pk: ' || 'Creating attachment for line id = '
6668: ||to_char(config_items_rec.line_id),1);
6669: oe_debug_pub.add('Cto_Utility_pk: '|| 'Config item id = '||to_char(config_items_rec.config_item_id),1);
6670: oe_debug_pub.add('Cto_Utility_pk: '|| 'Po Validation Org = '||to_char(config_orgs_rec.po_valid_org),1);
6671: END IF;
6665:
6666: IF PG_DEBUG <> 0 THEN
6667: oe_debug_pub.add('Cto_Utility_pk: ' || 'Creating attachment for line id = '
6668: ||to_char(config_items_rec.line_id),1);
6669: oe_debug_pub.add('Cto_Utility_pk: '|| 'Config item id = '||to_char(config_items_rec.config_item_id),1);
6670: oe_debug_pub.add('Cto_Utility_pk: '|| 'Po Validation Org = '||to_char(config_orgs_rec.po_valid_org),1);
6671: END IF;
6672:
6673: BEGIN
6666: IF PG_DEBUG <> 0 THEN
6667: oe_debug_pub.add('Cto_Utility_pk: ' || 'Creating attachment for line id = '
6668: ||to_char(config_items_rec.line_id),1);
6669: oe_debug_pub.add('Cto_Utility_pk: '|| 'Config item id = '||to_char(config_items_rec.config_item_id),1);
6670: oe_debug_pub.add('Cto_Utility_pk: '|| 'Po Validation Org = '||to_char(config_orgs_rec.po_valid_org),1);
6671: END IF;
6672:
6673: BEGIN
6674: SELECT document_id
6679: AND entity_name = 'MTL_SYSTEM_ITEMS'
6680: AND Pk3_value = 'CTO:BOM:ATTACHMENT';
6681:
6682: IF PG_DEBUG <> 0 THEN
6683: oe_debug_pub.add('Cto_Utility_pk: '
6684: || 'Bom attachment already exists for this item.. document_id ='||to_char(l_document_id),1);
6685: END IF;
6686: EXCEPTION
6687: WHEN NO_DATA_FOUND THEN
6685: END IF;
6686: EXCEPTION
6687: WHEN NO_DATA_FOUND THEN
6688: IF PG_DEBUG <> 0 THEN
6689: oe_debug_pub.add('Cto_Utility_pk: '
6690: || 'There is no bom document attached to this item.. We need to attach the document',1);
6691: END IF;
6692:
6693: IF l_attach_text is not null THEN
6700: p_doc_type => 'CTO:BOM:ATTACHMENT',
6701: x_Return_Status => x_Return_Status);
6702:
6703: IF PG_DEBUG <> 0 THEN
6704: oe_debug_pub.add('Cto_Utility_pk: ' || 'Return status from create_attachment after bom attachment='
6705: ||x_Return_Status,1);
6706: END IF;
6707:
6708: END IF;
6710:
6711: End Loop;
6712: End Loop;
6713: Exception When Others Then
6714: oe_debug_pub.add('Some Error occured in generating attachment',1);
6715: oe_debug_pub.add('Ignoring the error and continuing the process',1);
6716: End Create_item_attachments;
6717:
6718:
6711: End Loop;
6712: End Loop;
6713: Exception When Others Then
6714: oe_debug_pub.add('Some Error occured in generating attachment',1);
6715: oe_debug_pub.add('Ignoring the error and continuing the process',1);
6716: End Create_item_attachments;
6717:
6718:
6719:
6761: and ordered_quantity > 0 ; -- Added this condition to take care of cancel line cases.
6762:
6763: if bcol_count <> oe_count then
6764: IF PG_DEBUG <> 0 THEN
6765: oe_debug_pub.add ('validate_oe_data: '||v_step||': OE count '||oe_count||' and BCOL count '||bcol_count||' does not match.');
6766: END IF;
6767: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6768: end if;
6769:
6816: AND bcol.top_model_line_id is not null
6817: AND bcol.ato_line_id = p_bcol_line_id )) ;
6818:
6819: IF PG_DEBUG <> 0 THEN
6820: oe_debug_pub.add ('validate_oe_data: Symmetric Difference between OEL and BCOL did return rows .');
6821: END IF;
6822:
6823:
6824: v_oe_bcol_diff := 'Y' ;
6826: exception
6827: when no_data_found then
6828:
6829: IF PG_DEBUG <> 0 THEN
6830: oe_debug_pub.add ('validate_oe_data: Symmetric Difference between OEL and BCOL did not return any rows .');
6831: END IF;
6832:
6833: when others then
6834:
6832:
6833: when others then
6834:
6835: IF PG_DEBUG <> 0 THEN
6836: oe_debug_pub.add ('validate_oe_data: Symmetric Difference between OEL and BCOL did result in error .' || SQLCODE );
6837: oe_debug_pub.add ('validate_oe_data: Symmetric Difference between OEL and BCOL did result in error .' || SQLERRM );
6838: END IF;
6839:
6840: v_oe_bcol_diff := 'Y' ;
6833: when others then
6834:
6835: IF PG_DEBUG <> 0 THEN
6836: oe_debug_pub.add ('validate_oe_data: Symmetric Difference between OEL and BCOL did result in error .' || SQLCODE );
6837: oe_debug_pub.add ('validate_oe_data: Symmetric Difference between OEL and BCOL did result in error .' || SQLERRM );
6838: END IF;
6839:
6840: v_oe_bcol_diff := 'Y' ;
6841:
6844:
6845:
6846: if( v_oe_bcol_diff = 'Y' ) then
6847: IF PG_DEBUG <> 0 THEN
6848: oe_debug_pub.add ('validate_oe_data: data in BCOL and OE_ORDER_LINES_ALL does not match' , 1);
6849: END IF;
6850: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6851: end if;
6852:
6856:
6857: exception
6858: when OTHERS then
6859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6860: oe_debug_pub.add('validate_oe_data: ' || 'validate_oe_data::others:: '||sqlerrm,1);
6861:
6862:
6863: end validate_oe_data ;
6864:
6962: FETCH c1 BULK COLLECT INTO l_comp_item_id;
6963:
6964: if l_comp_item_id.count = 0 then
6965: -- This situation should never arise. If it does, raise error.
6966: oe_debug_pub.add ('l_comp_item_id.count = 0. Raising error..');
6967: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6968: end if;
6969:
6970: IF PG_DEBUG <> 0 THEN
6967: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6968: end if;
6969:
6970: IF PG_DEBUG <> 0 THEN
6971: oe_debug_pub.add ('Number of records selected = '|| l_comp_item_id.count);
6972: oe_debug_pub.add ('COMPARESIZE = '|| COMPARESIZE);
6973: END IF;
6974:
6975: if (l_comp_item_id.count > COMPARESIZE) then
6968: end if;
6969:
6970: IF PG_DEBUG <> 0 THEN
6971: oe_debug_pub.add ('Number of records selected = '|| l_comp_item_id.count);
6972: oe_debug_pub.add ('COMPARESIZE = '|| COMPARESIZE);
6973: END IF;
6974:
6975: if (l_comp_item_id.count > COMPARESIZE) then
6976: -- Get the first N components
6977: for i in 1 .. COMPARESIZE
6978: loop
6979: str := str || l_comp_item_id(i);
6980: IF PG_DEBUG <> 0 THEN
6981: oe_debug_pub.add (' str = '||str);
6982: END IF;
6983: if (i < COMPARESIZE) then
6984: str := str || '-'; -- Append "-" for each value.
6985: end if;
6994: while (j <> loop_limit)
6995: loop
6996: str := str || l_comp_item_id(j);
6997: IF PG_DEBUG <> 0 THEN
6998: oe_debug_pub.add (' str = '||str);
6999: END IF;
7000: j := j - 1;
7001: if (j <> loop_limit) then
7002: str := str || '-';
7008: for i in 1 .. l_comp_item_id.count
7009: loop
7010: str := str || l_comp_item_id(i);
7011: IF PG_DEBUG <> 0 THEN
7012: oe_debug_pub.add (' str = '||str);
7013: END IF;
7014: if (i < l_comp_item_id.count) then
7015: str := str || '-'; -- Append "-" for each value.
7016: end if;
7019:
7020: str := l_comp_item_id.count||'*'||str;
7021:
7022: IF PG_DEBUG <> 0 THEN
7023: oe_debug_pub.add ('str = '|| str);
7024: END IF;
7025:
7026: --
7027: -- bug 7203643
7038: input_string => str);
7039:
7040: IF PG_DEBUG <> 0 THEN
7041: -- bug 7203643
7042: --oe_debug_pub.add ('x_hash_value = '||x_hash_value);
7043: oe_debug_pub.add ('x_hash_value = '||utl_raw.cast_to_raw(x_hash_value));
7044: END IF;
7045:
7046: l_lock_handle := get_lock_handle (p_hash_string => x_hash_value );
7039:
7040: IF PG_DEBUG <> 0 THEN
7041: -- bug 7203643
7042: --oe_debug_pub.add ('x_hash_value = '||x_hash_value);
7043: oe_debug_pub.add ('x_hash_value = '||utl_raw.cast_to_raw(x_hash_value));
7044: END IF;
7045:
7046: l_lock_handle := get_lock_handle (p_hash_string => x_hash_value );
7047:
7046: l_lock_handle := get_lock_handle (p_hash_string => x_hash_value );
7047:
7048: IF PG_DEBUG <> 0 THEN
7049: -- bug 7203643
7050: --oe_debug_pub.add ('x_hash_value = '||x_hash_value);
7051: oe_debug_pub.add ('l_lock_handle = '||l_lock_handle);
7052: END IF;
7053:
7054: --
7047:
7048: IF PG_DEBUG <> 0 THEN
7049: -- bug 7203643
7050: --oe_debug_pub.add ('x_hash_value = '||x_hash_value);
7051: oe_debug_pub.add ('l_lock_handle = '||l_lock_handle);
7052: END IF;
7053:
7054: --
7055: -- request lock with release_on_commit TRUE so that we dont have to manually
7061: ,timeout => dbms_lock.maxwait
7062: ,release_on_commit => TRUE);
7063:
7064: IF PG_DEBUG <> 0 THEN
7065: oe_debug_pub.add ('lock_for_match: Returning from lock_for_match.');
7066: END IF;
7067: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Lock_For_Match End Time: '||to_char(sysdate , 'MM/DD/YYYY HH24:MI:SS'));
7068:
7069: EXCEPTION
7068:
7069: EXCEPTION
7070:
7071: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
7072: oe_debug_pub.add('lock_for_match: ' || 'Unexpected Error.');
7073: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
7074: -- Get message count and data
7075: cto_msg_pub.count_and_get
7076: ( p_msg_count => xMsgCount
7076: ( p_msg_count => xMsgCount
7077: , p_msg_data => xMsgData
7078: );
7079: WHEN OTHERS then
7080: oe_debug_pub.add('lock_for_match: ' || 'Others Exception : ' || sqlerrm);
7081: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
7082: -- Get message count and data
7083: cto_msg_pub.count_and_get
7084: ( p_msg_count => xMsgCount
7115:
7116: --validate hash_value
7117: IF (p_hash_value IS NULL) THEN
7118: --raise error condition
7119: oe_debug_pub.add('RELEASE_LOCK: Hash Value is null but required for releasing lock.');
7120: RAISE fnd_api.g_exc_error;
7121: END IF;
7122:
7123:
7139:
7140: EXCEPTION
7141:
7142: WHEN fnd_api.g_exc_error THEN
7143: oe_debug_pub.add('release_lock: ' || 'expected error');
7144: x_return_status := fnd_api.g_ret_sts_error;
7145:
7146: WHEN fnd_api.g_exc_unexpected_error THEN
7147: oe_debug_pub.add('release_lock: ' || 'Unexpected error');
7143: oe_debug_pub.add('release_lock: ' || 'expected error');
7144: x_return_status := fnd_api.g_ret_sts_error;
7145:
7146: WHEN fnd_api.g_exc_unexpected_error THEN
7147: oe_debug_pub.add('release_lock: ' || 'Unexpected error');
7148: x_return_status := fnd_api.g_ret_sts_unexp_error ;
7149:
7150: WHEN OTHERS THEN
7151: oe_debug_pub.add('release_lock: ' || 'Others Exception : ' || sqlerrm);
7147: oe_debug_pub.add('release_lock: ' || 'Unexpected error');
7148: x_return_status := fnd_api.g_ret_sts_unexp_error ;
7149:
7150: WHEN OTHERS THEN
7151: oe_debug_pub.add('release_lock: ' || 'Others Exception : ' || sqlerrm);
7152: x_return_status := fnd_api.g_ret_sts_unexp_error ;
7153:
7154: END release_lock;
7155:
7285: and oel.ship_from_org_id = bor.organization_id(+)
7286: and bor.alternate_routing_designator(+) IS null;
7287:
7288: IF PG_DEBUG <> 0 THEN
7289: oe_debug_pub.add('get_resv_qty: ' || 'Entered get_resv_qty', 1);
7290: l_message := 'Entered get_rsv_qty_code';
7291: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7292: oe_debug_pub.add('get_resv_qty: ' || 'Before cursor c_resv', 5);
7293: l_message := 'Before cursor c_resv';
7288: IF PG_DEBUG <> 0 THEN
7289: oe_debug_pub.add('get_resv_qty: ' || 'Entered get_resv_qty', 1);
7290: l_message := 'Entered get_rsv_qty_code';
7291: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7292: oe_debug_pub.add('get_resv_qty: ' || 'Before cursor c_resv', 5);
7293: l_message := 'Before cursor c_resv';
7294: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7295:
7296: --Bugfix 13554996: New messages
7293: l_message := 'Before cursor c_resv';
7294: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7295:
7296: --Bugfix 13554996: New messages
7297: oe_debug_pub.add('get_resv_qty: x_primary_uom_code::' || x_primary_uom_code, 1);
7298: oe_debug_pub.add('get_resv_qty: l_order_uom_code::' || l_order_uom_code, 1);
7299: oe_debug_pub.add('get_resv_qty: l_item_id::' || l_item_id, 1);
7300: oe_debug_pub.add('get_resv_qty: l_routing_type::' || l_routing_type, 1);
7301: END IF;
7294: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7295:
7296: --Bugfix 13554996: New messages
7297: oe_debug_pub.add('get_resv_qty: x_primary_uom_code::' || x_primary_uom_code, 1);
7298: oe_debug_pub.add('get_resv_qty: l_order_uom_code::' || l_order_uom_code, 1);
7299: oe_debug_pub.add('get_resv_qty: l_item_id::' || l_item_id, 1);
7300: oe_debug_pub.add('get_resv_qty: l_routing_type::' || l_routing_type, 1);
7301: END IF;
7302:
7295:
7296: --Bugfix 13554996: New messages
7297: oe_debug_pub.add('get_resv_qty: x_primary_uom_code::' || x_primary_uom_code, 1);
7298: oe_debug_pub.add('get_resv_qty: l_order_uom_code::' || l_order_uom_code, 1);
7299: oe_debug_pub.add('get_resv_qty: l_item_id::' || l_item_id, 1);
7300: oe_debug_pub.add('get_resv_qty: l_routing_type::' || l_routing_type, 1);
7301: END IF;
7302:
7303: l_source_document_type_id := CTO_UTILITY_PK.get_source_document_id ( pLineId => p_order_line_id );
7296: --Bugfix 13554996: New messages
7297: oe_debug_pub.add('get_resv_qty: x_primary_uom_code::' || x_primary_uom_code, 1);
7298: oe_debug_pub.add('get_resv_qty: l_order_uom_code::' || l_order_uom_code, 1);
7299: oe_debug_pub.add('get_resv_qty: l_item_id::' || l_item_id, 1);
7300: oe_debug_pub.add('get_resv_qty: l_routing_type::' || l_routing_type, 1);
7301: END IF;
7302:
7303: l_source_document_type_id := CTO_UTILITY_PK.get_source_document_id ( pLineId => p_order_line_id );
7304:
7305: lStmtNum := 10;
7306: FOR cur_var in c_resv
7307: LOOP
7308: IF PG_DEBUG <> 0 THEN
7309: oe_debug_pub.add('get_resv_qty:'||'source_id=>' || cur_var.supply_source_type_id, 5);
7310: l_message := 'source_id=>'|| cur_var.supply_source_type_id;
7311: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7312:
7313: oe_debug_pub.add('get_resv_qty:'||'prim_rsv_qty=>' || cur_var.primary_reservation_quantity, 5);
7309: oe_debug_pub.add('get_resv_qty:'||'source_id=>' || cur_var.supply_source_type_id, 5);
7310: l_message := 'source_id=>'|| cur_var.supply_source_type_id;
7311: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7312:
7313: oe_debug_pub.add('get_resv_qty:'||'prim_rsv_qty=>' || cur_var.primary_reservation_quantity, 5);
7314: l_message := 'rsv_qty=>' || cur_var.primary_reservation_quantity;
7315: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7316:
7317: oe_debug_pub.add('get_resv_qty:'||'sec_rsv_qty=>' || cur_var.secondary_reservation_quantity, 5);
7313: oe_debug_pub.add('get_resv_qty:'||'prim_rsv_qty=>' || cur_var.primary_reservation_quantity, 5);
7314: l_message := 'rsv_qty=>' || cur_var.primary_reservation_quantity;
7315: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7316:
7317: oe_debug_pub.add('get_resv_qty:'||'sec_rsv_qty=>' || cur_var.secondary_reservation_quantity, 5);
7318: l_message := 'sec_rsv_qty=>' || cur_var.secondary_reservation_quantity;
7319: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7320:
7321: --Bugfix 13554996: New debug messages.
7318: l_message := 'sec_rsv_qty=>' || cur_var.secondary_reservation_quantity;
7319: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7320:
7321: --Bugfix 13554996: New debug messages.
7322: oe_debug_pub.add('get_resv_qty:'||'lot_num=>' || cur_var.lot_number, 5);
7323: l_message := 'lot_num=>' || cur_var.lot_number;
7324: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7325:
7326: oe_debug_pub.add('get_resv_qty:'||'organization_id=>' || cur_var.organization_id, 5);
7322: oe_debug_pub.add('get_resv_qty:'||'lot_num=>' || cur_var.lot_number, 5);
7323: l_message := 'lot_num=>' || cur_var.lot_number;
7324: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7325:
7326: oe_debug_pub.add('get_resv_qty:'||'organization_id=>' || cur_var.organization_id, 5);
7327: l_message := 'organization_id=>' || cur_var.organization_id;
7328: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7329:
7330: END IF;
7350: lot_number => cur_var.lot_number,
7351: organization_id => cur_var.organization_id);
7352:
7353: IF PG_DEBUG <> 0 THEN
7354: oe_debug_pub.add('get_resv_qty:'||'Level1 conversion:: l_conv_qty_lot_level=>' || l_conv_qty_lot_level, 5);
7355: l_message := 'Level1 conversion:: l_conv_qty_lot_level=>'|| l_conv_qty_lot_level;
7356: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7357: END IF;
7358:
7366: lot_number => NULL,
7367: organization_id => NULL);
7368:
7369: IF PG_DEBUG <> 0 THEN
7370: oe_debug_pub.add('get_resv_qty:'||'Level2 conversion:: l_conv_qty_item_level=>' || l_conv_qty_item_level, 5);
7371: l_message := 'Level2 conversion:: l_conv_qty_item_level=>'|| l_conv_qty_item_level;
7372: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7373: END IF;
7374: end if; --cur_var.lot_number is null
7388: --End Bugfix 13554996
7389: END LOOP;
7390:
7391: IF PG_DEBUG = 5 THEN
7392: oe_debug_pub.add('get_resv_qty:'||'printing rsv source type and qty in loop', 5);
7393: l_message := 'printing rsv source type and qty in loop';
7394: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7395:
7396: oe_debug_pub.add('get_resv_qty:'||'RSV_SRC_TYP '||' Prim Quantity '
7392: oe_debug_pub.add('get_resv_qty:'||'printing rsv source type and qty in loop', 5);
7393: l_message := 'printing rsv source type and qty in loop';
7394: cto_wip_workflow_api_pk.cto_debug('get_resv_qty:', l_message);
7395:
7396: oe_debug_pub.add('get_resv_qty:'||'RSV_SRC_TYP '||' Prim Quantity '
7397: ||' Sec qunatity ', 5);
7398:
7399: IF x_rsv_rec.count <> 0 THEN
7400: k := x_rsv_rec.first;
7399: IF x_rsv_rec.count <> 0 THEN
7400: k := x_rsv_rec.first;
7401: WHILE(k is not null)
7402: LOOP
7403: oe_debug_pub.add('get_resv_qty:'||x_rsv_rec(k).supply_source_type_id
7404: ||' => ' ||x_rsv_rec(k).primary_reservation_quantity
7405: ||' => ' ||x_rsv_rec(k).secondary_reservation_quantity,5);
7406:
7407: l_message := x_rsv_rec(k).supply_source_type_id
7430:
7431: -- Bugfix 16236435: Calling this API only if the item has flow routings defined.
7432: if l_routing_type = 1 then
7433: IF PG_DEBUG <> 0 THEN
7434: oe_debug_pub.add('get_resv_qty: Calling GET_FLOW_QUANTITY for line_id::' || p_order_line_id);
7435: END IF;
7436:
7437: v_open_flow_qty :=
7438: MRP_FLOW_SCHEDULE_UTIL.GET_FLOW_QUANTITY( p_demand_source_line => to_char(p_order_line_id),
7439: p_demand_source_type => inv_reservation_global.g_source_type_oe,
7440: p_demand_source_delivery => NULL,
7441: p_use_open_quantity => 'Y');
7442: IF PG_DEBUG <> 0 THEN
7443: oe_debug_pub.add('get_resv_qty:'||'flow open quantity =>' || v_open_flow_qty, 5);
7444: END IF;
7445: -- Added by Renga Kannan on 06/27/05
7446: -- Getting the primary uom code from mtl system items.
7447:
7450:
7451: lStmtNum := 25;
7452:
7453: IF PG_DEBUG <> 0 THEN
7454: oe_debug_pub.add('get_resv_qty:'||'adding flow to x_rsv_rec', 5);
7455: END IF;
7456:
7457: --add this to record structure
7458: l_index := CTO_UTILITY_PK.g_source_type_flow;
7525:
7526: EXCEPTION
7527: WHEN fnd_api.g_exc_error THEN
7528: IF PG_DEBUG <> 0 THEN
7529: oe_debug_pub.add('get_resv_qty: ' || 'Exception in stmt num: '
7530: || to_char(lStmtNum), 1);
7531: END IF;
7532: x_return_status := FND_API.G_RET_STS_ERROR;
7533: -- Get message count and data
7536: , p_msg_data => x_msg_data
7537: );
7538: WHEN fnd_api.g_exc_unexpected_error THEN
7539: IF PG_DEBUG <> 0 THEN
7540: oe_debug_pub.add('get_resv_qty: '|| ' Unexpected Exception in stmt num: '
7541: || to_char(lStmtNum), 1);
7542: END IF;
7543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7544: -- Get message count and data
7546: ( p_msg_count => x_msg_count
7547: , p_msg_data => x_msg_data
7548: );
7549: WHEN OTHERS then
7550: oe_debug_pub.add('errmsg'||sqlerrm);
7551: IF PG_DEBUG <> 0 THEN
7552:
7553: oe_debug_pub.add('get_resv_qty: ' || 'Others Exception in stmt num: '
7554: || to_char(lStmtNum), 1);
7549: WHEN OTHERS then
7550: oe_debug_pub.add('errmsg'||sqlerrm);
7551: IF PG_DEBUG <> 0 THEN
7552:
7553: oe_debug_pub.add('get_resv_qty: ' || 'Others Exception in stmt num: '
7554: || to_char(lStmtNum), 1);
7555: END IF;
7556: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7557: -- Get message count and data