DBA Data[Home] [Help]

APPS.GMS_MULTI_FUNDING dependencies on GMS_MULTI_FUNDING

Line 1: PACKAGE BODY GMS_MULTI_FUNDING AS

1: PACKAGE BODY GMS_MULTI_FUNDING AS
2: /* $Header: gmsmfapb.pls 120.2.12010000.2 2008/10/30 12:30:33 rrambati ship $ */
3:
4: --Variables will help debugging when exception occurs
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'GMS_MULTI_FUNDING';

Line 5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'GMS_MULTI_FUNDING';

1: PACKAGE BODY GMS_MULTI_FUNDING AS
2: /* $Header: gmsmfapb.pls 120.2.12010000.2 2008/10/30 12:30:33 rrambati ship $ */
3:
4: --Variables will help debugging when exception occurs
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'GMS_MULTI_FUNDING';
6: G_Stage VARCHAR2(500) := NULL;
7:
8: FUNCTION AWARD_PROJECT_NOT_EXISTS(X_Award_Id IN NUMBER,
9: X_Err_Code OUT NOCOPY VARCHAR2,

Line 204: ( p_pkg_name => 'GMS_MULTI_FUNDING'

200: --dbms_output.put_line('After UPDATE Project Info');
201: EXCEPTION
202: WHEN OTHERS THEN
203: FND_MSG_PUB.add_exc_msg
204: ( p_pkg_name => 'GMS_MULTI_FUNDING'
205: ,p_procedure_name => 'UPDATE_PROJECT_ADD_INFO'
206: );
207: x_err_stage := SQLERRM||' at stage='||g_stage||' '||X_Err_Stage;
208: RAISE;

Line 583: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: INSERT_AWARD_PROJECT');

579: WHEN OTHERS THEN
580: X_Err_Code := 'U';
581: X_App_Short_Name := 'GMS';
582: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
583: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: INSERT_AWARD_PROJECT');
584: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
585: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
586: FND_MSG_PUB.add;
587: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

Line 874: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: PROJ_START_AND_END_DATE');

870: X_Err_Stage := SQLERRM;
871:
872: X_Err_Stage := 'GMS_UNEXPECTED_ERROR';
873: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
874: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: PROJ_START_AND_END_DATE');
875: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
876: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
877: FND_MSG_PUB.add;
878: FND_MSG_PUB.Count_And_Get

Line 969: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: INSERT_DETAIL_PROJECT_FUNDING - 1');

965: X_Err_Stage := SQLERRM;
966:
967: X_Err_Stage := 'GMS_UNEXPECTED_ERROR';
968: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
969: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: INSERT_DETAIL_PROJECT_FUNDING - 1');
970: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
971: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
972: FND_MSG_PUB.add;
973: FND_MSG_PUB.Count_And_Get

Line 981: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: INSERT_DETAIL_PROJECT_FUNDING - 2');

977: X_Err_Code := 'U';
978: X_Err_Stage := SQLERRM;
979: X_Err_Stage := 'GMS_UNEXPECTED_ERROR';
980: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
981: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: INSERT_DETAIL_PROJECT_FUNDING - 2');
982: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
983: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
984: FND_MSG_PUB.add;
985: FND_MSG_PUB.Count_And_Get

Line 1030: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: ROW_EXISTS_IN_PA_SUMM_FUNDING');

1026: X_Err_Stage := (SQLCODE||' '||SQLERRM);
1027:
1028: X_Err_Stage := 'GMS_UNEXPECTED_ERROR';
1029: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
1030: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: ROW_EXISTS_IN_PA_SUMM_FUNDING');
1031: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
1032: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
1033: FND_MSG_PUB.add;
1034: FND_MSG_PUB.Count_And_Get

Line 1073: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: GET_TOTAL_FUNDING_BUDGET');

1069: X_Err_Code := 'U';
1070: X_Err_Stage := 'GMS_UNEXPECTED_ERROR';
1071: FND_MSG_PUB.add;
1072: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
1073: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: GET_TOTAL_FUNDING_BUDGET');
1074: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
1075: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
1076: FND_MSG_PUB.add;
1077: FND_MSG_PUB.Count_And_Get

Line 1109: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: GET_TOTAL_FUNDING_AMOUNT');

1105: X_Err_Code := 'E';
1106: X_Err_Stage := 'No row found in PA_SUMMARY_PROJECT_FUNDING for Project '||to_char(X_Award_Project_Id)||' and Agreement '||to_char(X_Agreement_Id);
1107:
1108: FND_MESSAGE.SET_NAME('GMS','GMS_NO_PA_SUMM_FUNDING');
1109: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: GET_TOTAL_FUNDING_AMOUNT');
1110: FND_MESSAGE.SET_TOKEN('AGREEMENT_ID',X_Agreement_Id);
1111: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_ID',X_Award_Project_Id);
1112: FND_MSG_PUB.add;
1113: FND_MSG_PUB.Count_And_Get

Line 1123: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: GET_TOTAL_FUNDING_BUDGET');

1119: X_Err_Code := 'U';
1120: X_Err_Stage := 'GMS_UNEXPECTED_ERROR';
1121: -- FND_MSG_PUB.add;
1122: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
1123: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: GET_TOTAL_FUNDING_BUDGET');
1124: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
1125: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
1126: FND_MSG_PUB.add;
1127: FND_MSG_PUB.Count_And_Get

Line 1162: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_PA_SUMM_PROJECT_FUNDING');

1158: X_Err_Stage := 'Could not find a row to UPDATE for Agreement ' ||to_char(X_Agreement_Id)||' and Project '||to_char(X_Award_Project_Id);
1159: X_Err_Stage := 'GMS_NO_PA_SUMM_FUNDING';
1160: --FND_MSG_PUB.add;
1161: FND_MESSAGE.SET_NAME('GMS','GMS_NO_PA_SUMM_FUNDING');
1162: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_PA_SUMM_PROJECT_FUNDING');
1163: FND_MESSAGE.SET_TOKEN('AGREEMENT_ID',X_Agreement_Id);
1164: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_ID',X_Award_Project_Id);
1165: FND_MSG_PUB.add;
1166: FND_MSG_PUB.Count_And_Get

Line 1229: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: INSERT_SUMMARY_PROJECT_FUNDING ');

1225: WHEN OTHERS THEN
1226: X_Err_Code := 'U';
1227: X_Err_Stage := 'GMS_UNEXPECTED_ERROR';
1228: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
1229: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: INSERT_SUMMARY_PROJECT_FUNDING ');
1230: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE); -- OERRNO should be SQLCODE
1231: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM); -- OERRM should have been SQLERRM
1232: FND_MSG_PUB.add;
1233: FND_MSG_PUB.Count_And_Get

Line 1279: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: DRAFT_BUDGET_EXISTS ');

1275: X_Err_Stage := (SQLCODE||' '||SQLERRM) ;
1276: --dbms_output.put_line('Others :'||X_Err_Stage);
1277: X_Err_Stage := 'GMS_UNEXPECTED_ERROR';
1278: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
1279: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: DRAFT_BUDGET_EXISTS ');
1280: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
1281: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
1282: FND_MSG_PUB.add;
1283: FND_MSG_PUB.Count_And_Get

Line 1318: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_DETAIL_PROJECT_FUNDING - 1');

1314: X_Err_Code := 'E';
1315: X_Err_Stage := ('No row Found for Project_funding_id '||X_Project_Funding_Id);
1316: X_Err_Stage := 'GMS_NO_ROW_FOR_PA_FUNDING_ID';
1317: FND_MESSAGE.SET_NAME('GMS','GMS_NO_ROW_FOR_PA_FUNDING');
1318: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_DETAIL_PROJECT_FUNDING - 1');
1319: FND_MESSAGE.SET_TOKEN('PROJECT_FUNDING_ID',to_char(X_Project_Funding_Id));
1320: FND_MSG_PUB.add;
1321: FND_MSG_PUB.Count_And_Get
1322: ( p_count => p_msg_count ,

Line 1350: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_DETAIL_PROJECT_FUNDING - 2');

1346: X_Err_Code := 'E';
1347: X_Err_Stage := 'Could not find a row to UPDATE for Project Funding '||to_char(X_Project_Funding_Id) ;
1348: X_Err_Stage := 'GMS_NO_ROW_FOR_PA_FUNDING_ID';
1349: FND_MESSAGE.SET_NAME('GMS','GMS_NO_ROW_FOR_PA_FUNDING');
1350: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_DETAIL_PROJECT_FUNDING - 2');
1351: FND_MESSAGE.SET_TOKEN('PROJECT_FUNDING_ID',to_char(X_Project_Funding_Id));
1352: FND_MSG_PUB.add;
1353: FND_MSG_PUB.Count_And_Get
1354: ( p_count => p_msg_count ,

Line 1375: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_DETAIL_PROJECT_FUNDING - 3');

1371: X_Err_Code := 'E';
1372: X_Err_Stage := 'Could not find a row to UPDATE for Project Funding '||to_char(X_Project_Funding_Id) ;
1373: X_Err_Stage := 'GMS_NO_ROW_FOR_PA_FUNDING_ID';
1374: FND_MESSAGE.SET_NAME('GMS','GMS_NO_ROW_FOR_PA_FUNDING');
1375: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_DETAIL_PROJECT_FUNDING - 3');
1376: FND_MESSAGE.SET_TOKEN('PROJECT_FUNDING_ID',to_char(X_Project_Funding_Id));
1377: FND_MSG_PUB.add;
1378: FND_MSG_PUB.Count_And_Get
1379: ( p_count => p_msg_count ,

Line 1395: ( p_pkg_name => 'GMS_MULTI_FUNDING'

1391: X_Err_Code := 'U';
1392: X_Err_Stage := SQLERRM||' at stage='||g_stage||' '||X_Err_Stage;
1393:
1394: FND_MSG_PUB.add_exc_msg
1395: ( p_pkg_name => 'GMS_MULTI_FUNDING'
1396: ,p_procedure_name => 'UPDATE_DETAIL_PROJECT_FUNDING'
1397: );
1398: FND_MSG_PUB.Count_And_Get
1399: ( p_count => p_msg_count

Line 1420: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: DELETE_DETAIL_PROJECT_FUNDING');

1416: IF SQL%ROWCOUNT = 0 THEN
1417: X_Err_Code := 'E';
1418: X_Err_Stage := 'GMS_NO_ROW_FOR_PA_FUNDING_ID';
1419: FND_MESSAGE.SET_NAME('GMS','GMS_NO_ROW_FOR_PA_FUNDING');
1420: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: DELETE_DETAIL_PROJECT_FUNDING');
1421: FND_MESSAGE.SET_TOKEN('PROJECT_FUNDING_ID',to_char(X_Project_Funding_Id));
1422: FND_MSG_PUB.add;
1423: FND_MSG_PUB.Count_And_Get
1424: ( p_count => p_msg_count ,

Line 1430: ( p_pkg_name => 'GMS_MULTI_FUNDING'

1426: END IF;
1427: EXCEPTION
1428: WHEN OTHERS THEN
1429: FND_MSG_PUB.add_exc_msg
1430: ( p_pkg_name => 'GMS_MULTI_FUNDING'
1431: ,p_procedure_name => 'DELETE_DETAIL_PROJECT_FUNDING'
1432: );
1433: FND_MSG_PUB.Count_And_Get
1434: ( p_count => p_msg_count

Line 1547: ( p_pkg_name => 'GMS_MULTI_FUNDING'

1543: END IF;
1544: EXCEPTION
1545: WHEN OTHERS THEN
1546: FND_MSG_PUB.add_exc_msg
1547: ( p_pkg_name => 'GMS_MULTI_FUNDING'
1548: ,p_procedure_name => 'DELETE_BASELINED_VERSIONS'
1549: );
1550: RAISE;
1551: END DELETE_BASELINED_VERSIONS;

Line 1625: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: CREATE_AGREEMENT');

1621: X_Agreement_Id := -1;
1622: RETCODE := 'U';
1623: ERRBUF := SQLERRM;
1624: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
1625: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: CREATE_AGREEMENT');
1626: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
1627: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
1628: FND_MSG_PUB.add;
1629: FND_MSG_PUB.Count_And_Get

Line 1659: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING : DELETE_AGREEMENT');

1655: RETCODE := 'E';
1656: ERRBUF := 'No Agreement Found with Id '||to_char(X_Agreement_Id) ;
1657: FND_MESSAGE.SET_NAME('GMS','GMS_AGREEMENT_NOT_FOUND');
1658: FND_MESSAGE.SET_TOKEN('AGREEMENT_ID',to_char(X_Agreement_Id) );
1659: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING : DELETE_AGREEMENT');
1660: FND_MSG_PUB.add;
1661: FND_MSG_PUB.Count_And_Get
1662: ( p_count => p_msg_count ,
1663: p_data => ERRBUF );

Line 1669: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: DELETE_AGREEMENT');

1665: WHEN OTHERS THEN
1666: RETCODE := 'U';
1667: ERRBUF := SQLCODE||' '||SQLERRM;
1668: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
1669: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: DELETE_AGREEMENT');
1670: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
1671: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
1672: FND_MSG_PUB.add;
1673: FND_MSG_PUB.Count_And_Get

Line 1704: ( p_pkg_name => 'GMS_MULTI_FUNDING'

1700: EXCEPTION
1701: WHEN OTHERS THEN
1702: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1703: FND_MSG_PUB.add_exc_msg
1704: ( p_pkg_name => 'GMS_MULTI_FUNDING'
1705: ,p_procedure_name => 'DELETE_AGREEMENT'
1706: );
1707: END IF;
1708: RAISE;

Line 1866: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: ALLOW_REV_LIMIT_FLAG_UPDATE');

1862: Exception
1863: WHEN OTHERS THEN
1864: X_Err_Code := 'U';
1865: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
1866: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: ALLOW_REV_LIMIT_FLAG_UPDATE');
1867: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
1868: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
1869: FND_MSG_PUB.add;
1870: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

Line 1939: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING : UPDATE_AGREEMENT');

1935: ERRBUF := 'No Agreement Found with Id '||to_char(X_Agreement_Id) ;
1936:
1937: FND_MESSAGE.SET_NAME('GMS','GMS_AGREEMENT_NOT_FOUND');
1938: FND_MESSAGE.SET_TOKEN('AGREEMENT_ID',to_char(X_Agreement_Id) );
1939: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING : UPDATE_AGREEMENT');
1940: FND_MSG_PUB.add;
1941: FND_MSG_PUB.Count_And_Get
1942: ( p_count => p_msg_count ,
1943: p_data => ERRBUF );

Line 1948: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_AGREEMENT');

1944: RAISE FND_API.G_EXC_ERROR;
1945: WHEN OTHERS THEN
1946: RETCODE := 'U';
1947: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
1948: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_AGREEMENT');
1949: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
1950: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
1951: FND_MSG_PUB.add;
1952: FND_MSG_PUB.Count_And_Get

Line 2010: ( p_pkg_name => 'GMS_MULTI_FUNDING'

2006: -- Added when others exception for Bug:2662848
2007: WHEN OTHERS THEN
2008: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2009: FND_MSG_PUB.add_exc_msg
2010: ( p_pkg_name => 'GMS_MULTI_FUNDING'
2011: ,p_procedure_name => 'UPDATE_AGREEMENT'
2012: );
2013: END IF;
2014: RAISE;

Line 2068: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: INSERT_AWARD_BUDGET_TYPE');

2064: WHEN OTHERS THEN
2065: X_Err_Code := 'U';
2066: X_Err_Stage := SQLCODE||' '||SQLERRM;
2067: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
2068: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: INSERT_AWARD_BUDGET_TYPE');
2069: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
2070: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
2071: FND_MSG_PUB.add;
2072: FND_MSG_PUB.Count_And_Get(p_count =>p_msg_count,

Line 2097: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_AWARD_BUDGET_TYPE');

2093: X_Err_Code := 'E';
2094: X_Err_Stage := 'UPDATE FAILED: No Budget_Type found with Budget Type Code '||X_Budget_Type_Code;
2095: FND_MESSAGE.SET_NAME('GMS','GMS_BUD_TYP_NOT_FOUND');
2096: FND_MESSAGE.SET_TOKEN('BUDGET_TYPE_CODE',X_Budget_Type_Code);
2097: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_AWARD_BUDGET_TYPE');
2098: FND_MSG_PUB.add;
2099: FND_MSG_PUB.Count_And_Get(p_count =>p_msg_count,
2100: p_data =>X_Err_Stage );
2101:

Line 2120: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: DELETE_AWARD_BUDGET_TYPE');

2116: X_Err_Code := 'E' ;
2117: X_Err_Stage := 'DELETE of BUDGET_TYPE Failed: No Budget Type found with Budget Type Code '||X_Budget_Type_Code;
2118: FND_MESSAGE.SET_NAME('GMS','GMS_BUD_TYP_NOT_FOUND');
2119: FND_MESSAGE.SET_TOKEN('BUDGET_TYPE_CODE',X_Budget_Type_Code);
2120: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: DELETE_AWARD_BUDGET_TYPE');
2121: FND_MSG_PUB.add;
2122: FND_MSG_PUB.Count_And_Get(p_count =>p_msg_count,
2123: p_data =>X_Err_Stage );
2124: END IF;

Line 2185: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: PROJ_START_AND_END_DATE');

2181: X_Err_Stage := SQLERRM;
2182:
2183: X_Err_Stage := 'GMS_UNEXPECTED_ERROR';
2184: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
2185: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: PROJ_START_AND_END_DATE');
2186: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
2187: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
2188: FND_MSG_PUB.add;
2189: FND_MSG_PUB.Count_And_Get

Line 2238: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: PROJ_START_AND_END_DATE');

2234: X_Err_Stage := SQLERRM;
2235:
2236: X_Err_Stage := 'GMS_UNEXPECTED_ERROR';
2237: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
2238: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: PROJ_START_AND_END_DATE');
2239: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
2240: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
2241: FND_MSG_PUB.add;
2242: FND_MSG_PUB.Count_And_Get

Line 2280: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING : GET_CUSTOMER_INFO');

2276: WHEN OTHERS THEN
2277: X_Err_Code := 'U';
2278: X_Err_Stage := 'GMS_UNEXPECTED_ERROR';
2279: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
2280: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING : GET_CUSTOMER_INFO');
2281: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
2282: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
2283: FND_MSG_PUB.add;
2284: FND_MSG_PUB.Count_And_Get

Line 2320: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING : GET_CUSTOMER_INFO');

2316: X_Err_Stage := SQLERRM;
2317:
2318: X_Err_Stage := 'GMS_UNEXPECTED_ERROR';
2319: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
2320: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING : GET_CUSTOMER_INFO');
2321: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
2322: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
2323: FND_MSG_PUB.add;
2324: FND_MSG_PUB.Count_And_Get

Line 2335: ( p_pkg_name => 'GMS_MULTI_FUNDING'

2331: EXCEPTION
2332: WHEN OTHERS THEN
2333: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2334: FND_MSG_PUB.add_exc_msg
2335: ( p_pkg_name => 'GMS_MULTI_FUNDING'
2336: ,p_procedure_name => 'GET_CUSTOMER_INFO'
2337: );
2338: END IF;
2339: RAISE;

Line 2567: ( p_pkg_name => 'GMS_MULTI_FUNDING'

2563: EXCEPTION
2564: WHEN OTHERS THEN
2565: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2566: FND_MSG_PUB.add_exc_msg
2567: ( p_pkg_name => 'GMS_MULTI_FUNDING'
2568: ,p_procedure_name => 'MODIFY_GMS_CONTACTS'
2569: );
2570: END IF;
2571: RAISE;

Line 2824: G_Stage := '(190:Calling gms_multi_funding.create_agreement)';

2820: RETCODE := X_Err_Code;
2821: END IF;
2822: */
2823:
2824: G_Stage := '(190:Calling gms_multi_funding.create_agreement)';
2825: /* Create an Agreement for the Award */
2826: GMS_MULTI_FUNDING.CREATE_AGREEMENT(X_Row_Id,
2827: Store_Agreement_Id,
2828: X_Customer_Id,

Line 2826: GMS_MULTI_FUNDING.CREATE_AGREEMENT(X_Row_Id,

2822: */
2823:
2824: G_Stage := '(190:Calling gms_multi_funding.create_agreement)';
2825: /* Create an Agreement for the Award */
2826: GMS_MULTI_FUNDING.CREATE_AGREEMENT(X_Row_Id,
2827: Store_Agreement_Id,
2828: X_Customer_Id,
2829: X_Awd_Proj_Number,
2830: X_Agreement_Type,

Line 3150: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_AWARD_PROJECT');

3146: X_Err_Code := FND_API.G_RET_STS_UNEXP_ERROR; --'U';
3147: X_Err_Stage := SQLERRM;
3148: X_App_Short_Name := 'GMS';
3149: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
3150: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_AWARD_PROJECT');
3151: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
3152: FND_MESSAGE.SET_TOKEN('OERRRM',SQLERRM);
3153: FND_MSG_PUB.add;
3154: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

Line 3658: G_Stage := '(430:CALLING GMS_MULTI_FUNDING.UPDATE_AGREEMENT)';

3654: END IF;
3655: */
3656: -- END of modifications for bug 1841288
3657: /*-----------------------------------------------------------------------------------------*/
3658: G_Stage := '(430:CALLING GMS_MULTI_FUNDING.UPDATE_AGREEMENT)';
3659: GMS_MULTI_FUNDING.UPDATE_AGREEMENT(X_Agreement_Id => X_Agreement_Id,
3660: X_Agreement_Num => X_Awd_Proj_Number,
3661: X_Agreement_Type => X_Agreement_Type,
3662: X_Revenue_Limit_Flag => X_Revenue_Limit_Flag,

Line 3659: GMS_MULTI_FUNDING.UPDATE_AGREEMENT(X_Agreement_Id => X_Agreement_Id,

3655: */
3656: -- END of modifications for bug 1841288
3657: /*-----------------------------------------------------------------------------------------*/
3658: G_Stage := '(430:CALLING GMS_MULTI_FUNDING.UPDATE_AGREEMENT)';
3659: GMS_MULTI_FUNDING.UPDATE_AGREEMENT(X_Agreement_Id => X_Agreement_Id,
3660: X_Agreement_Num => X_Awd_Proj_Number,
3661: X_Agreement_Type => X_Agreement_Type,
3662: X_Revenue_Limit_Flag => X_Revenue_Limit_Flag,
3663: X_Invoice_Limit_Flag => X_Invoice_Limit_Flag, /*Bug 6642901*/

Line 3773: G_Stage := '(620:CALLING GMS_MULTI_FUNDING.DELETE_AGREEMENT)';

3769: END IF;
3770: */
3771:
3772:
3773: G_Stage := '(620:CALLING GMS_MULTI_FUNDING.DELETE_AGREEMENT)';
3774: /* Deleting Agreement associated with Award Project */
3775: GMS_MULTI_FUNDING.DELETE_AGREEMENT
3776: (X_Agreement_Id,
3777: X_Err_Code,

Line 3775: GMS_MULTI_FUNDING.DELETE_AGREEMENT

3771:
3772:
3773: G_Stage := '(620:CALLING GMS_MULTI_FUNDING.DELETE_AGREEMENT)';
3774: /* Deleting Agreement associated with Award Project */
3775: GMS_MULTI_FUNDING.DELETE_AGREEMENT
3776: (X_Agreement_Id,
3777: X_Err_Code,
3778: X_Err_Stage);
3779:

Line 3795: ( p_pkg_name => 'GMS_MULTI_FUNDING'

3791: ERRBUF := 'At stage='||g_stage||' '||X_Err_Stage;
3792: WHEN OTHERS THEN
3793: RETCODE := 'U';
3794: FND_MSG_PUB.add_exc_msg
3795: ( p_pkg_name => 'GMS_MULTI_FUNDING'
3796: ,p_procedure_name => 'DELETE_AWARD_PROJECT'
3797: ,p_error_text => substrb(SQLERRM||' (stage='||g_stage||')',1,240)
3798: );
3799: FND_MSG_PUB.Count_And_Get

Line 4090: G_Stage := '(1020:CALLING GMS_MULTI_FUNDING.UPDATE_AGREEMENT)';

4086: BEGIN
4087: /* UPDATE Award Project's Agreement with the new Amount */
4088: --dbms_output.put_line('Amount before UPDATE agreement '||X_Allocated_Amount);
4089:
4090: G_Stage := '(1020:CALLING GMS_MULTI_FUNDING.UPDATE_AGREEMENT)';
4091: GMS_MULTI_FUNDING.UPDATE_AGREEMENT(X_Agreement_Id => X_Agreement_Id,
4092: X_Agreement_Num => NULL,
4093: X_Agreement_Type => NULL,
4094: X_Revenue_Limit_Flag => NULL,

Line 4091: GMS_MULTI_FUNDING.UPDATE_AGREEMENT(X_Agreement_Id => X_Agreement_Id,

4087: /* UPDATE Award Project's Agreement with the new Amount */
4088: --dbms_output.put_line('Amount before UPDATE agreement '||X_Allocated_Amount);
4089:
4090: G_Stage := '(1020:CALLING GMS_MULTI_FUNDING.UPDATE_AGREEMENT)';
4091: GMS_MULTI_FUNDING.UPDATE_AGREEMENT(X_Agreement_Id => X_Agreement_Id,
4092: X_Agreement_Num => NULL,
4093: X_Agreement_Type => NULL,
4094: X_Revenue_Limit_Flag => NULL,
4095: X_Invoice_Limit_Flag => NULL, /*Bug 6642901*/

Line 4309: G_Stage := '(1110:CALLING GMS_MULTI_FUNDING.UPDATE_AGREEMENT)';

4305: RAISE FND_API.G_EXC_ERROR;
4306: END IF;
4307: END;
4308:
4309: G_Stage := '(1110:CALLING GMS_MULTI_FUNDING.UPDATE_AGREEMENT)';
4310: BEGIN
4311: /* UPDATE Award Project's Agreement with the new Amount */
4312: X_Agreement_Amt := (X_New_Allocated_Amount - X_Old_Allocated_Amount);
4313: GMS_MULTI_FUNDING.UPDATE_AGREEMENT(X_Agreement_Id => X_Agreement_Id,

Line 4313: GMS_MULTI_FUNDING.UPDATE_AGREEMENT(X_Agreement_Id => X_Agreement_Id,

4309: G_Stage := '(1110:CALLING GMS_MULTI_FUNDING.UPDATE_AGREEMENT)';
4310: BEGIN
4311: /* UPDATE Award Project's Agreement with the new Amount */
4312: X_Agreement_Amt := (X_New_Allocated_Amount - X_Old_Allocated_Amount);
4313: GMS_MULTI_FUNDING.UPDATE_AGREEMENT(X_Agreement_Id => X_Agreement_Id,
4314: X_Agreement_Num => NULL,
4315: X_Agreement_Type => NULL,
4316: X_Revenue_Limit_Flag => NULL,
4317: X_Invoice_Limit_Flag => NULL, /*Bug 6642901*/

Line 4490: G_Stage := '(810:CALLING GMS_MULTI_FUNDING.UPDATE_AGREEMENT)';

4486: RAISE FND_API.G_EXC_ERROR;
4487: END IF;
4488: END;
4489:
4490: G_Stage := '(810:CALLING GMS_MULTI_FUNDING.UPDATE_AGREEMENT)';
4491: BEGIN
4492: /* UPDATE Award Project's Agreement with the new Amount */
4493:
4494: GMS_MULTI_FUNDING.UPDATE_AGREEMENT(X_Agreement_Id => X_Agreement_Id,

Line 4494: GMS_MULTI_FUNDING.UPDATE_AGREEMENT(X_Agreement_Id => X_Agreement_Id,

4490: G_Stage := '(810:CALLING GMS_MULTI_FUNDING.UPDATE_AGREEMENT)';
4491: BEGIN
4492: /* UPDATE Award Project's Agreement with the new Amount */
4493:
4494: GMS_MULTI_FUNDING.UPDATE_AGREEMENT(X_Agreement_Id => X_Agreement_Id,
4495: X_Agreement_Num => NULL,
4496: X_Agreement_Type => NULL,
4497: X_Revenue_Limit_Flag => NULL,
4498: X_Invoice_Limit_Flag => NULL, /*Bug 6642901*/

Line 4637: ( p_pkg_name => 'GMS_MULTI_FUNDING'

4633: -- Added when OTHERS exception for Bug:2662848
4634: WHEN OTHERS THEN
4635: RETCODE := 'U';
4636: FND_MSG_PUB.add_exc_msg
4637: ( p_pkg_name => 'GMS_MULTI_FUNDING'
4638: , p_procedure_name => 'DELETE_AWARD_FUNDING');
4639: FND_MSG_PUB.Count_And_Get
4640: ( p_count => p_msg_count,
4641: p_data => X_Err_Stage);

Line 4648: END GMS_MULTI_FUNDING;

4644: RAISE; --This raise is not required but keeing as is for now.
4645:
4646: END DELETE_AWARD_FUNDING;
4647:
4648: END GMS_MULTI_FUNDING;