971: x_err_code => p_err_code,
972: x_err_buff => p_err_stage);
973:
974: p_warnings_only_flag := 'N';
975: p_err_msg_count := FND_MSG_PUB.Count_Msg; -- jjj - ????
976:
977: /* p_err_code := SQLCODE;
978: FND_MSG_PUB.Add_Exc_Msg
979: ( p_pkg_name => 'GMS_BUDGET_UTILS'
974: p_warnings_only_flag := 'N';
975: p_err_msg_count := FND_MSG_PUB.Count_Msg; -- jjj - ????
976:
977: /* p_err_code := SQLCODE;
978: FND_MSG_PUB.Add_Exc_Msg
979: ( p_pkg_name => 'GMS_BUDGET_UTILS'
980: , p_procedure_name => 'VERIFY_BUDGET_RULES'
981: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
982: );
979: ( p_pkg_name => 'GMS_BUDGET_UTILS'
980: , p_procedure_name => 'VERIFY_BUDGET_RULES'
981: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
982: );
983: p_err_msg_count := FND_MSG_PUB.Count_Msg;
984:
985: RETURN;
986: */
987: END;
1029: p_warnings_only_flag := 'N';
1030: END IF;
1031: END IF;
1032:
1033: p_err_msg_count := FND_MSG_PUB.Count_Msg;
1034: p_err_stack := l_old_stack;
1035:
1036: IF L_DEBUG = 'Y' THEN
1037: gms_error_pkg.gms_debug('*** End of GMS_BUDGET_UTILS.VERIFY_BUDGET_RULES ***','C');
1050: x_err_code => p_err_code,
1051: x_err_buff => p_err_stage);
1052:
1053: p_warnings_only_flag := 'N';
1054: p_err_msg_count := FND_MSG_PUB.Count_Msg;
1055:
1056: /* p_err_code := SQLCODE;
1057: FND_MSG_PUB.Add_Exc_Msg
1058: ( p_pkg_name => 'GMS_BUDGET_UTILS'
1053: p_warnings_only_flag := 'N';
1054: p_err_msg_count := FND_MSG_PUB.Count_Msg;
1055:
1056: /* p_err_code := SQLCODE;
1057: FND_MSG_PUB.Add_Exc_Msg
1058: ( p_pkg_name => 'GMS_BUDGET_UTILS'
1059: , p_procedure_name => 'VERIFY_BUDGET_RULES'
1060: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
1061: );
1059: , p_procedure_name => 'VERIFY_BUDGET_RULES'
1060: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
1061: );
1062: p_warnings_only_flag := 'N';
1063: p_err_msg_count := FND_MSG_PUB.Count_Msg;
1064: RETURN;
1065: */
1066:
1067: END Verify_Budget_Rules;
1831: EXCEPTION
1832: WHEN OTHERS THEN
1833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1834: x_err_code := SQLCODE;
1835: FND_MSG_PUB.Add_Exc_Msg
1836: ( p_pkg_name => 'GMS_BUDGET_UTILS'
1837: , p_procedure_name => 'SET_AWARD_POLICY_cONTEXT'
1838: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
1839: );
1836: ( p_pkg_name => 'GMS_BUDGET_UTILS'
1837: , p_procedure_name => 'SET_AWARD_POLICY_cONTEXT'
1838: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
1839: );
1840: FND_MSG_PUB.Count_And_Get
1841: (p_count => x_msg_count ,
1842: p_data => x_msg_data );
1843: RETURN;
1844: