461:
462: BEGIN
463:
464: IF g_fnd_debug = 'Y' AND
465: FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
466: THEN
467: FND_LOG.string( FND_LOG.LEVEL_PROCEDURE
468: , G_MODULE_PREFIX || g_api_name || '.begin'
469: , NULL);
463:
464: IF g_fnd_debug = 'Y' AND
465: FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
466: THEN
467: FND_LOG.string( FND_LOG.LEVEL_PROCEDURE
468: , G_MODULE_PREFIX || g_api_name || '.begin'
469: , NULL);
470: END IF;
471:
623: x_message_text => l_message,
624: x_message_type => l_message_type);
625:
626: IF g_fnd_debug = 'Y' AND
627: FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
628: THEN
629: FND_LOG.string( FND_LOG.LEVEL_STATEMENT
630: , G_MODULE_PREFIX || g_api_name
631: , TO_CHAR(l_msg_index) || ': '||l_entity ||': '|| l_message_type ||': '||l_message);
625:
626: IF g_fnd_debug = 'Y' AND
627: FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
628: THEN
629: FND_LOG.string( FND_LOG.LEVEL_STATEMENT
630: , G_MODULE_PREFIX || g_api_name
631: , TO_CHAR(l_msg_index) || ': '||l_entity ||': '|| l_message_type ||': '||l_message);
632: END IF;
633:
633:
634: EXCEPTION
635: WHEN OTHERS THEN
636:
637: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
638: THEN
639: FND_LOG.string( FND_LOG.LEVEL_UNEXPECTED
640: , G_MODULE_PREFIX || g_api_name
641: , SQLCODE||' : '||SQLERRM || ' Item: ' || l_Assembly_Item_Name);
635: WHEN OTHERS THEN
636:
637: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
638: THEN
639: FND_LOG.string( FND_LOG.LEVEL_UNEXPECTED
640: , G_MODULE_PREFIX || g_api_name
641: , SQLCODE||' : '||SQLERRM || ' Item: ' || l_Assembly_Item_Name);
642: END IF;
643:
650:
651: IF(X_msg_count > 0 ) THEN
652:
653: IF g_fnd_debug = 'Y' AND
654: FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
655: THEN
656: FND_LOG.string( FND_LOG.LEVEL_STATEMENT
657: , G_MODULE_PREFIX || g_api_name
658: , 'X_return_status for Item:' || l_Assembly_Item_Name || ' is: ' || l_X_return_status);
652:
653: IF g_fnd_debug = 'Y' AND
654: FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
655: THEN
656: FND_LOG.string( FND_LOG.LEVEL_STATEMENT
657: , G_MODULE_PREFIX || g_api_name
658: , 'X_return_status for Item:' || l_Assembly_Item_Name || ' is: ' || l_X_return_status);
659: END IF;
660:
679: FND_MESSAGE.SET_NAME('BOM', 'BOM_SETUP_NO_ROWS');
680: FND_MESSAGE.RETRIEVE(X_G_msg_data);
681: END IF;
682:
683: X_G_msg_data := X_G_msg_data || FND_GLOBAL.NewLine || 'Log messages are logged in FND LOG with Module name: bom.plsql.BOM_RTG_COPYORG_IMP.';
684:
685: IF g_fnd_debug = 'Y' AND
686: FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
687: THEN
682:
683: X_G_msg_data := X_G_msg_data || FND_GLOBAL.NewLine || 'Log messages are logged in FND LOG with Module name: bom.plsql.BOM_RTG_COPYORG_IMP.';
684:
685: IF g_fnd_debug = 'Y' AND
686: FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
687: THEN
688: FND_LOG.string( FND_LOG.LEVEL_PROCEDURE
689: , G_MODULE_PREFIX || g_api_name || '.end'
690: , NULL);
684:
685: IF g_fnd_debug = 'Y' AND
686: FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
687: THEN
688: FND_LOG.string( FND_LOG.LEVEL_PROCEDURE
689: , G_MODULE_PREFIX || g_api_name || '.end'
690: , NULL);
691: END IF;
692: