388: ELSE
389: l_threshold_value := 10000;
390: END IF;
391: IF g_fnd_debug = 'Y' AND
392: FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
393: THEN
394: FND_LOG.string( FND_LOG.LEVEL_PROCEDURE
395: , G_MODULE_PREFIX || g_api_name || '.begin'
396: , NULL);
390: END IF;
391: IF g_fnd_debug = 'Y' AND
392: FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
393: THEN
394: FND_LOG.string( FND_LOG.LEVEL_PROCEDURE
395: , G_MODULE_PREFIX || g_api_name || '.begin'
396: , NULL);
397: END IF;
398:
844:
845: END IF; --END l_submit_flag condition
846:
847: IF g_fnd_debug = 'Y' AND
848: FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
849: THEN
850: FND_LOG.string( FND_LOG.LEVEL_STATEMENT
851: , G_MODULE_PREFIX || g_api_name
852: , 'End of method Import_BOM');
846:
847: IF g_fnd_debug = 'Y' AND
848: FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
849: THEN
850: FND_LOG.string( FND_LOG.LEVEL_STATEMENT
851: , G_MODULE_PREFIX || g_api_name
852: , 'End of method Import_BOM');
853: END IF;
854:
852: , 'End of method Import_BOM');
853: END IF;
854:
855: IF g_fnd_debug = 'Y' AND
856: FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
857: THEN
858: FND_LOG.string( FND_LOG.LEVEL_PROCEDURE
859: , G_MODULE_PREFIX || g_api_name || '.end'
860: , NULL);
854:
855: IF g_fnd_debug = 'Y' AND
856: FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
857: THEN
858: FND_LOG.string( FND_LOG.LEVEL_PROCEDURE
859: , G_MODULE_PREFIX || g_api_name || '.end'
860: , NULL);
861: END IF;
862:
861: END IF;
862:
863: EXCEPTION
864: WHEN OTHERS THEN
865: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
866: THEN
867: FND_LOG.string( FND_LOG.LEVEL_UNEXPECTED
868: , G_MODULE_PREFIX || g_api_name
869: , SQLCODE||' : '||SQLERRM);
863: EXCEPTION
864: WHEN OTHERS THEN
865: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
866: THEN
867: FND_LOG.string( FND_LOG.LEVEL_UNEXPECTED
868: , G_MODULE_PREFIX || g_api_name
869: , SQLCODE||' : '||SQLERRM);
870: END IF;
871: X_G_msg_data := SQLCODE||' : '||SQLERRM;
903: l_message_type VARCHAR2(1);
904:
905: BEGIN
906: IF g_fnd_debug = 'Y' AND
907: FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
908: THEN
909: FND_LOG.string( FND_LOG.LEVEL_STATEMENT
910: , G_MODULE_PREFIX || g_api_name
911: , 'Before Calling BOM_BO_PUB.Process_Bom()');
905: BEGIN
906: IF g_fnd_debug = 'Y' AND
907: FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
908: THEN
909: FND_LOG.string( FND_LOG.LEVEL_STATEMENT
910: , G_MODULE_PREFIX || g_api_name
911: , 'Before Calling BOM_BO_PUB.Process_Bom()');
912: END IF;
913:
938:
939: commit;
940:
941: IF g_fnd_debug = 'Y' AND
942: FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
943: THEN
944: FND_LOG.string( FND_LOG.LEVEL_EXCEPTION
945: , G_MODULE_PREFIX || g_api_name
946: , 'Current Call Return Status of BOM_BO_PUB.Process_Bom: g_X_return_status:'|| g_X_return_status);
940:
941: IF g_fnd_debug = 'Y' AND
942: FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
943: THEN
944: FND_LOG.string( FND_LOG.LEVEL_EXCEPTION
945: , G_MODULE_PREFIX || g_api_name
946: , 'Current Call Return Status of BOM_BO_PUB.Process_Bom: g_X_return_status:'|| g_X_return_status);
947: FND_LOG.string( FND_LOG.LEVEL_EXCEPTION
948: , G_MODULE_PREFIX || g_api_name
943: THEN
944: FND_LOG.string( FND_LOG.LEVEL_EXCEPTION
945: , G_MODULE_PREFIX || g_api_name
946: , 'Current Call Return Status of BOM_BO_PUB.Process_Bom: g_X_return_status:'|| g_X_return_status);
947: FND_LOG.string( FND_LOG.LEVEL_EXCEPTION
948: , G_MODULE_PREFIX || g_api_name
949: , 'Previous Call Return Status of BOM_BO_PUB.Process_Bom: X_return_status:'|| X_return_status);
950: END IF;
951:
967: x_message_type => l_message_type);
968: X_G_msg_data := TO_CHAR(l_msg_index) || ': '||l_entity ||': '|| l_message_type ||': '||l_message;
969:
970: IF g_fnd_debug = 'Y' AND
971: FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
972: THEN
973: FND_LOG.string( FND_LOG.LEVEL_EXCEPTION
974: , G_MODULE_PREFIX || g_api_name
975: , 'Error messages from BOM_BO_PUB.Process_Bom:'|| X_G_msg_data);
969:
970: IF g_fnd_debug = 'Y' AND
971: FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
972: THEN
973: FND_LOG.string( FND_LOG.LEVEL_EXCEPTION
974: , G_MODULE_PREFIX || g_api_name
975: , 'Error messages from BOM_BO_PUB.Process_Bom:'|| X_G_msg_data);
976: END IF;
977:
978: END;
979: END LOOP;
980:
981: IF g_fnd_debug = 'Y' AND
982: FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
983: THEN
984: FND_LOG.string( FND_LOG.LEVEL_STATEMENT
985: , G_MODULE_PREFIX || g_api_name
986: , 'After Calling BOM_BO_PUB.Process_Bom()');
980:
981: IF g_fnd_debug = 'Y' AND
982: FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL
983: THEN
984: FND_LOG.string( FND_LOG.LEVEL_STATEMENT
985: , G_MODULE_PREFIX || g_api_name
986: , 'After Calling BOM_BO_PUB.Process_Bom()');
987: END IF;
988: /* Reset all the PL/SQL tables and counters*/