8: -- g_debug_mode VARCHAR2(1) := NVL(FND_PROFILE.VALUE('IGC_DEBUG_ENABLED'),'N');
9: g_debug_mode VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
10:
11: -- Variables for ATG central logging
12: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
13: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
14: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
16: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: g_debug_mode VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
10:
11: -- Variables for ATG central logging
12: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
13: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
14: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
16: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
17: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
10:
11: -- Variables for ATG central logging
12: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
13: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
14: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
16: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
17: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
18: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: -- Variables for ATG central logging
12: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
13: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
14: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
16: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
17: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
18: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
19: g_path VARCHAR2(255) := 'IGC.PLSQL.IGCCACLB.IGC_CC_ACCT_LINES_PKG.';
12: g_debug_level NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
13: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
14: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
16: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
17: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
18: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
19: g_path VARCHAR2(255) := 'IGC.PLSQL.IGCCACLB.IGC_CC_ACCT_LINES_PKG.';
20:
13: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
14: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
16: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
17: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
18: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
19: g_path VARCHAR2(255) := 'IGC.PLSQL.IGCCACLB.IGC_CC_ACCT_LINES_PKG.';
20:
21: /* ================================================================================
14: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
16: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
17: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
18: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
19: g_path VARCHAR2(255) := 'IGC.PLSQL.IGCCACLB.IGC_CC_ACCT_LINES_PKG.';
20:
21: /* ================================================================================
22: PROCEDURE Output_Debug
50: raise FND_API.G_EXC_ERROR;
51: END IF;*/
52:
53: IF(g_state_level >= g_debug_level) THEN
54: FND_LOG.STRING(g_state_level, p_path, p_debug_msg);
55: END IF;
56:
57: RETURN;
58:
607: END IF;
608: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
609: p_data => X_msg_data );
610: IF (g_excep_level >= g_debug_level ) THEN
611: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
612: END IF;
613:
614: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
615:
635: END IF;
636: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
637: p_data => X_msg_data );
638: IF (g_excep_level >= g_debug_level ) THEN
639: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
640: END IF;
641:
642: WHEN OTHERS THEN
643:
673: IF ( g_unexp_level >= g_debug_level ) THEN
674: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
675: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
676: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
677: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
678: END IF;
679:
680: END Insert_Row;
681:
803: CLOSE C;
804: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
805: FND_MSG_PUB.Add;
806: IF (g_excep_level >= g_debug_level ) THEN
807: FND_LOG.MESSAGE (g_excep_level ,l_full_path ,FALSE);
808: END IF;
809: RAISE FND_API.G_EXC_ERROR ;
810: END IF;
811:
945: Output_Debug (l_full_path, p_debug_msg => g_debug_msg);
946: END IF;
947: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
948: IF (g_excep_level >= g_debug_level ) THEN
949: FND_LOG.MESSAGE (g_excep_level,l_full_path,FALSE);
950: END IF;
951: FND_MSG_PUB.Add;
952: RAISE FND_API.G_EXC_ERROR ;
953: END IF;
986: END IF;
987: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
988: p_data => X_msg_data );
989: IF (g_excep_level >= g_debug_level ) THEN
990: FND_LOG.STRING (g_excep_level,l_full_path,'APP_EXCEPTION.RECORD_LOCK_EXCEPTION Exception Raised');
991: END IF;
992:
993: WHEN FND_API.G_EXC_ERROR THEN
994:
1002: END IF;
1003: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1004: p_data => X_msg_data );
1005: IF (g_excep_level >= g_debug_level ) THEN
1006: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1007: END IF;
1008:
1009: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1010:
1018: END IF;
1019: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1020: p_data => X_msg_data );
1021: IF (g_excep_level >= g_debug_level ) THEN
1022: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1023: END IF;
1024:
1025: WHEN OTHERS THEN
1026:
1042: IF ( g_unexp_level >= g_debug_level ) THEN
1043: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
1044: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1045: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1046: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1047: END IF;
1048:
1049: END Lock_Row;
1050:
1387: END IF;
1388: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1389: p_data => X_msg_data );
1390: IF (g_excep_level >= g_debug_level ) THEN
1391: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1392: END IF;
1393:
1394: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1395:
1409: END IF;
1410: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1411: p_data => X_msg_data );
1412: IF (g_excep_level >= g_debug_level ) THEN
1413: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1414: END IF;
1415:
1416: WHEN OTHERS THEN
1417:
1440: IF ( g_unexp_level >= g_debug_level ) THEN
1441: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
1442: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1443: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1444: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
1445: END IF;
1446:
1447: END Update_Row;
1448:
1928: END IF;
1929: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1930: p_data => X_msg_data );
1931: IF (g_excep_level >= g_debug_level ) THEN
1932: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_ERROR Exception Raised');
1933: END IF;
1934:
1935: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1936:
1958: END IF;
1959: FND_MSG_PUB.Count_And_Get ( p_count => X_msg_count,
1960: p_data => X_msg_data );
1961: IF (g_excep_level >= g_debug_level ) THEN
1962: FND_LOG.STRING (g_excep_level,l_full_path,'FND_API.G_EXC_UNEXPECTED_ERROR Exception Raised');
1963: END IF;
1964:
1965: WHEN OTHERS THEN
1966:
1997: IF ( g_unexp_level >= g_debug_level ) THEN
1998: FND_MESSAGE.SET_NAME('IGC','IGC_LOGGING_UNEXP_ERROR');
1999: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
2000: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
2001: FND_LOG.MESSAGE ( g_unexp_level,l_full_path, TRUE);
2002: END IF;
2003:
2004: END Delete_Row;
2005: