DBA Data[Home] [Help]

APPS.MRP_EXPL_STD_MANDATORY dependencies on MSC_UTIL

Line 262: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, '11510 or greater source');

258: EXECUTE IMMEDIATE lv_sql_stmt
259: INTO lv_bom_version;
260:
261: IF lv_bom_version = G_BOM_GREATER_THAN_EQUAL_J THEN
262: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, '11510 or greater source');
263: lv_comp_table:='bom_components_b';
264: lv_bom_table:='bom_structures_b';
265: ELSE
266: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Pre 11510 source');

Line 266: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Pre 11510 source');

262: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, '11510 or greater source');
263: lv_comp_table:='bom_components_b';
264: lv_bom_table:='bom_structures_b';
265: ELSE
266: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Pre 11510 source');
267: lv_comp_table:='bom_inventory_components';
268: lv_bom_table:='bom_bill_of_materials';
269: END IF;
270:

Line 275: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Value of p_lrn is :'||p_lrn);

271: BEGIN
272: lv_sql_stmt:= 'TRUNCATE TABLE '||lv_mrp_schema||'.MRP_DERIVED_SO_DEMANDS';
273: EXECUTE IMMEDIATE lv_sql_stmt;
274:
275: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Value of p_lrn is :'||p_lrn);
276:
277: EXCEPTION
278: WHEN OTHERS THEN
279: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, sqlerrm);

Line 279: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, sqlerrm);

275: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Value of p_lrn is :'||p_lrn);
276:
277: EXCEPTION
278: WHEN OTHERS THEN
279: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, sqlerrm);
280: END;
281:
282: IF (p_lrn <> -1) THEN --- net change collection of Sales orders
283: lv_cursor_stmt :=

Line 322: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Value of p_lrn is :'||p_lrn);

318: FETCH Order_Line_Cur INTO
319: pLineId ,pATOLineId, pItemCode,lv_lrn,lv_item_id,lv_organization_id;
320: EXIT WHEN Order_Line_Cur%NOTFOUND;
321:
322: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Value of p_lrn is :'||p_lrn);
323: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Value of lv_lrn is :'||lv_lrn);
324: IF (p_lrn = -1) THEN
325: lv_lrn := 0;
326: END IF;

Line 323: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Value of lv_lrn is :'||lv_lrn);

319: pLineId ,pATOLineId, pItemCode,lv_lrn,lv_item_id,lv_organization_id;
320: EXIT WHEN Order_Line_Cur%NOTFOUND;
321:
322: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Value of p_lrn is :'||p_lrn);
323: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Value of lv_lrn is :'||lv_lrn);
324: IF (p_lrn = -1) THEN
325: lv_lrn := 0;
326: END IF;
327:

Line 328: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Value of lv_lrn is :'||lv_lrn);

324: IF (p_lrn = -1) THEN
325: lv_lrn := 0;
326: END IF;
327:
328: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Value of lv_lrn is :'||lv_lrn);
329:
330: lv_wip_demand_exists := 0;
331:
332: BEGIN

Line 344: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, ' Job Exists for line id :'||pLineId );

340: EXECUTE IMMEDIATE lv_sql_stmt1
341: INTO lv_wip_demand_exists
342: USING pLineId;
343:
344: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, ' Job Exists for line id :'||pLineId );
345:
346: EXCEPTION
347: WHEN NO_DATA_FOUND THEN
348: NULL;

Line 430: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'sql statement : ' || lv_sql_stmt1);

426: ||' and msi.inventory_item_id = bic.component_item_id '
427: ||' and msi.organization_id = bbom.organization_id '
428: ||' and rownum = 1 ';
429:
430: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'sql statement : ' || lv_sql_stmt1);
431:
432: EXECUTE IMMEDIATE lv_sql_stmt1
433: INTO lv_wip_supply_type
434: USING lv_item_id,

Line 440: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, '========================================');

436:
437: EXCEPTION
438: WHEN NO_DATA_FOUND THEN
439:
440: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, '========================================');
441: FND_MESSAGE.SET_NAME('MSC', 'MSC_CONFIG_BOM_ORG_ERR');
442: FND_MESSAGE.SET_TOKEN('ITEM_ID', to_char(lv_item_id));
443: FND_MESSAGE.SET_TOKEN('ORG_ID', to_char(p_get_oe_record.Source_Organization_Id(i)));
444: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, FND_MESSAGE.GET);

Line 444: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, FND_MESSAGE.GET);

440: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, '========================================');
441: FND_MESSAGE.SET_NAME('MSC', 'MSC_CONFIG_BOM_ORG_ERR');
442: FND_MESSAGE.SET_TOKEN('ITEM_ID', to_char(lv_item_id));
443: FND_MESSAGE.SET_TOKEN('ORG_ID', to_char(p_get_oe_record.Source_Organization_Id(i)));
444: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, FND_MESSAGE.GET);
445: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, '========================================');
446: RAISE CTO_BOM_NOT_FOUND;
447:
448: WHEN OTHERS THEN

Line 445: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, '========================================');

441: FND_MESSAGE.SET_NAME('MSC', 'MSC_CONFIG_BOM_ORG_ERR');
442: FND_MESSAGE.SET_TOKEN('ITEM_ID', to_char(lv_item_id));
443: FND_MESSAGE.SET_TOKEN('ORG_ID', to_char(p_get_oe_record.Source_Organization_Id(i)));
444: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, FND_MESSAGE.GET);
445: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, '========================================');
446: RAISE CTO_BOM_NOT_FOUND;
447:
448: WHEN OTHERS THEN
449: NULL;

Line 529: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Inserting row for :' || p_get_oe_record.Identifier(i) );

525: );
526:
527: lv_wip_supply_type := 0; /* re-setting value */
528:
529: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Inserting row for :' || p_get_oe_record.Identifier(i) );
530:
531: /* explode the model from the Config */
532: IF (p_get_oe_record.ITEM_TYPE_CODE(i) = 'MODEL') THEN
533:

Line 534: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Exploding the model of the config');

530:
531: /* explode the model from the Config */
532: IF (p_get_oe_record.ITEM_TYPE_CODE(i) = 'MODEL') THEN
533:
534: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Exploding the model of the config');
535: /* If the wip job of the Config has been created,
536: explode the model and bring all the SMC's under it as quantity = 0 (including phantom) .
537: Also if the S.O has been shipped get the SMC's with qty = 0 */
538: /* lv_wip_demand_exists controls the quantity in the explode_line function , if 1 then quantities go as 0*/

Line 551: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Exploding the model for the config is completed.');

547: lErrorMessage,
548: lMessageName,
549: lTableName);
550:
551: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Exploding the model for the config is completed.');
552: END IF;
553:
554: END LOOP;
555:

Line 568: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Exploding the ATO Item: Line_id = '||pLineId);

564: END IF;
565:
566: ELSIF (pItemCode = 'STANDARD' ) THEN
567: /* Explode the ATO Item to get the SMC's under it*/
568: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Exploding the ATO Item: Line_id = '||pLineId);
569:
570: /* If the ATO item is shipped, get 1 into lv_ato_item_shipped,
571: else get the value of 0 */
572: SELECT decode(NVL(oel.shipped_quantity,0),0,0,1)

Line 616: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, SQLERRM);

612: end if;
613:
614: exception
615: when others then
616: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, SQLERRM);
617: return(1);
618:
619: END Explode_ATO_SM_COMPS;
620: