411: FND_MSG_PUB.Count_And_Get
412: ( p_count => x_msg_count,
413: p_data => x_msg_data
414: );
415: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
416: logMessage := '[Invalid procedure: ' || l_proc_name|| ']';
417: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_ROUT_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
418: end if;
419: x_return_status := FND_API.G_RET_STS_ERROR ;
413: p_data => x_msg_data
414: );
415: if( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
416: logMessage := '[Invalid procedure: ' || l_proc_name|| ']';
417: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, 'IEM.PLSQL.IEM_ROUT_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
418: end if;
419: x_return_status := FND_API.G_RET_STS_ERROR ;
420:
421: WHEN FND_API.G_EXC_ERROR THEN
424: FND_MSG_PUB.Count_And_Get
425: ( p_count => x_msg_count,
426: p_data => x_msg_data
427: );
428: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
429: logMessage := '[FND_API.G_EXC_ERROR happened in RUN_PROCEDURE - ' || l_proc_name|| ' error:'||sqlerrm||']';
430: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_ROUT_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
431: end if;
432: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
426: p_data => x_msg_data
427: );
428: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
429: logMessage := '[FND_API.G_EXC_ERROR happened in RUN_PROCEDURE - ' || l_proc_name|| ' error:'||sqlerrm||']';
430: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_ROUT_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
431: end if;
432: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
433: ROLLBACK TO run_Procedure_PVT;
434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
435: FND_MSG_PUB.Count_And_Get
436: ( p_count => x_msg_count,
437: p_data => x_msg_data
438: );
439: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
440: logMessage := '[FND_API.G_EXC_UNEXPECTED_ERROR happened in RUN_PROCEDURE - ' || l_proc_name|| ' error:'||sqlerrm||']';
441: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_ROUT_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
442: end if;
443: WHEN OTHERS THEN
437: p_data => x_msg_data
438: );
439: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
440: logMessage := '[FND_API.G_EXC_UNEXPECTED_ERROR happened in RUN_PROCEDURE - ' || l_proc_name|| ' error:'||sqlerrm||']';
441: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_ROUT_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
442: end if;
443: WHEN OTHERS THEN
444: ROLLBACK TO run_Procedure_PVT;
445: x_return_status := FND_API.G_RET_STS_ERROR;
458: p_data => x_msg_data
459: );
460:
461:
462: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
463: logMessage := '[OTHER exception happened in RUN_PROCEDURE - ' || l_proc_name|| ' error:'||sqlerrm||']';
464: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_ROUT_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
465: end if;
466: -- dbms_output.put_line('Exception in Run Procedure happened ' || SUBSTR (SQLERRM , 1 , 100));
460:
461:
462: if( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
463: logMessage := '[OTHER exception happened in RUN_PROCEDURE - ' || l_proc_name|| ' error:'||sqlerrm||']';
464: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, 'IEM.PLSQL.IEM_ROUT_RUNPROC_PVT.RUN_PROCEDURE', logMessage);
465: end if;
466: -- dbms_output.put_line('Exception in Run Procedure happened ' || SUBSTR (SQLERRM , 1 , 100));
467: END run_Procedure;
468: