499:
500: EXCEPTION
501: WHEN FND_API.G_EXC_ERROR
502: THEN
503: FND_MSG_PUB.Add_Exc_Msg
504: ( p_pkg_name => 'PA_BUDGET_LINES_V_PKG'
505: , p_procedure_name => 'INSERT_ROW'
506: , p_error_text => l_msg_data || ' ORA-'||LPAD(substr(SQLCODE,2),5,'0')
507: );
510: END IF;
511: RAISE;
512: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
513: THEN
514: FND_MSG_PUB.Add_Exc_Msg
515: ( p_pkg_name => 'PA_BUDGET_LINES_V_PKG'
516: , p_procedure_name => 'INSERT_ROW'
517: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
518: );
1063:
1064: EXCEPTION
1065: WHEN FND_API.G_EXC_ERROR
1066: THEN
1067: FND_MSG_PUB.Add_Exc_Msg
1068: ( p_pkg_name => 'PA_BUDGET_LINES_V_PKG'
1069: , p_procedure_name => 'UPDATE_ROW'
1070: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
1071: );
1071: );
1072: RAISE;
1073: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
1074: THEN
1075: FND_MSG_PUB.Add_Exc_Msg
1076: ( p_pkg_name => 'PA_BUDGET_LINES_V_PKG'
1077: , p_procedure_name => 'UPDATE_ROW'
1078: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
1079: );