186:
187: --
188: -- Forward Declarations
189: --
190: PG_DEBUG Number := NVL(FND_PROFILE.value('ONT_DEBUG_LEVEL'), 0);
191:
192: G_ERROR_SEQ Number := 1 ; /* This number will increment for each session and will help to provide unique item key for notification for model lines resulting in multiple error messages */
193:
194: PROCEDURE populate_plan_level ( p_t_bcol in out NOCOPY TAB_BCOL ) ;
616:
617:
618: lStmtNumber := 30;
619: /* get MRP's default assignment set */
620: lMrpAssignmentSet := to_number(FND_PROFILE.VALUE('MRP_DEFAULT_ASSIGNMENT_SET'));
621:
622: --- The following if condition is added by Renga Kannan
623: --- If the line is part of buy model then we need not look at the sourcing info
624: --- we can keep the parents rcv org as the org for this item also. This can be identified
1705: lAssignmentExists := 0;
1706:
1707: lStmtNum := 10;
1708: /* get MRP's default assignment set */
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);
2264: ** we need to set wip_supply_type = 6 for lower level models
2265: ** This is done in the cursor c1
2266: */
2267:
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);
2272: ** oe_debug_pub.add('ML profile is '||v_multilevel, 2);
2273: */
2274:
2275:
2276: lMatchProfile := FND_PROFILE.Value('BOM:MATCH_CONFIG');
2277:
2278: l_custom_match_profile := FND_PROFILE.Value('BOM:CUSTOM_MATCH');
2279:
2280: /*
2274:
2275:
2276: lMatchProfile := FND_PROFILE.Value('BOM:MATCH_CONFIG');
2277:
2278: l_custom_match_profile := FND_PROFILE.Value('BOM:CUSTOM_MATCH');
2279:
2280: /*
2281: ** retrieve information related to top level ato model being passed.
2282: */
3428:
3429: IF gMrpAssignmentSet is null THEN
3430: begin
3431:
3432: gMrpAssignmentSet := to_number(FND_PROFILE.VALUE('MRP_DEFAULT_ASSIGNMENT_SET'));
3433: exception
3434: when others then
3435: raise invalid_mrp_assignment_set ;
3436: end ;