22: X_Err_Code := 'E';
23: X_Err_Stage := 'There is already an Award Project existing for the Award '||to_char(X_Award_Id);
24:
25: X_Err_Stage := 'GMS_AWD_PRJ_EXISTS_FOR_AWARD';
26: FND_MESSAGE.SET_NAME('GMS','GMS_AWD_PRJ_EXISTS_FOR_AWARD');
27: FND_MESSAGE.SET_TOKEN('AWARD_ID',to_char(X_Award_Id));
28: FND_MSG_PUB.add;
29: FND_MSG_PUB.Count_And_Get
30: (p_count => p_msg_count,
23: X_Err_Stage := 'There is already an Award Project existing for the Award '||to_char(X_Award_Id);
24:
25: X_Err_Stage := 'GMS_AWD_PRJ_EXISTS_FOR_AWARD';
26: FND_MESSAGE.SET_NAME('GMS','GMS_AWD_PRJ_EXISTS_FOR_AWARD');
27: FND_MESSAGE.SET_TOKEN('AWARD_ID',to_char(X_Award_Id));
28: FND_MSG_PUB.add;
29: FND_MSG_PUB.Count_And_Get
30: (p_count => p_msg_count,
31: p_data => X_Err_Stage );
39: X_Err_Code := 'U';
40: X_Err_Stage := 'There is more than one Award Project for the Award Id '||to_char(X_Award_Id);
41:
42: X_Err_Stage := 'GMS_MANY_AWD_PRJ_FOR_AWARD';
43: FND_MESSAGE.SET_NAME('GMS','GMS_MANY_AWD_PRJ_FOR_AWARD');
44: FND_MESSAGE.SET_TOKEN('AWARD_ID',to_char(X_Award_Id));
45: FND_MSG_PUB.add;
46: FND_MSG_PUB.Count_And_Get
47: (p_count => p_msg_count,
40: X_Err_Stage := 'There is more than one Award Project for the Award Id '||to_char(X_Award_Id);
41:
42: X_Err_Stage := 'GMS_MANY_AWD_PRJ_FOR_AWARD';
43: FND_MESSAGE.SET_NAME('GMS','GMS_MANY_AWD_PRJ_FOR_AWARD');
44: FND_MESSAGE.SET_TOKEN('AWARD_ID',to_char(X_Award_Id));
45: FND_MSG_PUB.add;
46: FND_MSG_PUB.Count_And_Get
47: (p_count => p_msg_count,
48: p_data => X_Err_Stage );
68: X_Err_Code := 'E';
69: X_Err_Stage := 'There is already an Award Project existing by the name '||X_Award_Project_Name;
70:
71: X_Err_Stage := 'GMS_AWD_PRJNAME_EXISTS';
72: FND_MESSAGE.SET_NAME('GMS','GMS_AWD_PRJNAME_EXISTS');
73: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_NAME',X_Award_Project_Name);
74: FND_MSG_PUB.add;
75: FND_MSG_PUB.Count_And_Get
76: (p_count => p_msg_count,
69: X_Err_Stage := 'There is already an Award Project existing by the name '||X_Award_Project_Name;
70:
71: X_Err_Stage := 'GMS_AWD_PRJNAME_EXISTS';
72: FND_MESSAGE.SET_NAME('GMS','GMS_AWD_PRJNAME_EXISTS');
73: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_NAME',X_Award_Project_Name);
74: FND_MSG_PUB.add;
75: FND_MSG_PUB.Count_And_Get
76: (p_count => p_msg_count,
77: p_data => X_Err_Stage );
83: X_Err_Code := 'U';
84: X_Err_Stage := 'There is more than one Project already existing by the Name '||X_Award_Project_Name;
85:
86: X_Err_Stage := 'GMS_AWD_PRJNAME_NOT_UNIQUE';
87: FND_MESSAGE.SET_NAME('GMS','GMS_AWD_PRJNAME_NOT_UNIQUE');
88: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_NAME',X_Award_Project_Name);
89: FND_MSG_PUB.add;
90: FND_MSG_PUB.Count_And_Get
91: (p_count => p_msg_count,
84: X_Err_Stage := 'There is more than one Project already existing by the Name '||X_Award_Project_Name;
85:
86: X_Err_Stage := 'GMS_AWD_PRJNAME_NOT_UNIQUE';
87: FND_MESSAGE.SET_NAME('GMS','GMS_AWD_PRJNAME_NOT_UNIQUE');
88: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_NAME',X_Award_Project_Name);
89: FND_MSG_PUB.add;
90: FND_MSG_PUB.Count_And_Get
91: (p_count => p_msg_count,
92: p_data => X_Err_Stage );
103: X_Err_Code := 'E';
104: X_Err_Stage := 'There is already an Award Project existing by the number'||X_Award_Project_Number;
105:
106: X_Err_Stage := 'GMS_AWD_PRJNUM_EXISTS';
107: FND_MESSAGE.SET_NAME('GMS','GMS_AWD_PRJNUM_EXISTS');
108: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_NUMBER',X_Award_Project_Number);
109: FND_MSG_PUB.add;
110: FND_MSG_PUB.Count_And_Get
111: (p_count => p_msg_count,
104: X_Err_Stage := 'There is already an Award Project existing by the number'||X_Award_Project_Number;
105:
106: X_Err_Stage := 'GMS_AWD_PRJNUM_EXISTS';
107: FND_MESSAGE.SET_NAME('GMS','GMS_AWD_PRJNUM_EXISTS');
108: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_NUMBER',X_Award_Project_Number);
109: FND_MSG_PUB.add;
110: FND_MSG_PUB.Count_And_Get
111: (p_count => p_msg_count,
112: p_data => X_Err_Stage );
121: X_Err_Code := 'U';
122: X_Err_Stage := 'There is more than one Project already existing by the Number'||X_Award_Project_Number;
123:
124: X_Err_Stage := 'GMS_AWD_PRJNUM_NOT_UNIQUE';
125: FND_MESSAGE.SET_NAME('GMS','GMS_AWD_PRJNUM_NOT_UNIQUE');
126: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_NUMBER',X_Award_Project_Number);
127: FND_MSG_PUB.add;
128: FND_MSG_PUB.Count_And_Get
129: (p_count => p_msg_count,
122: X_Err_Stage := 'There is more than one Project already existing by the Number'||X_Award_Project_Number;
123:
124: X_Err_Stage := 'GMS_AWD_PRJNUM_NOT_UNIQUE';
125: FND_MESSAGE.SET_NAME('GMS','GMS_AWD_PRJNUM_NOT_UNIQUE');
126: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_NUMBER',X_Award_Project_Number);
127: FND_MSG_PUB.add;
128: FND_MSG_PUB.Count_And_Get
129: (p_count => p_msg_count,
130: p_data => X_Err_Stage );
180: X_Err_Code := 'S';
181:
182: IF SQL%NOTFOUND THEN
183: X_Err_Code := 'E';
184: FND_MESSAGE.SET_NAME('GMS','GMS_NO_PROJECT_UPDATED');
185: FND_MSG_PUB.add;
186: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
187: p_data => X_Err_Stage);
188: END IF;
578: EXCEPTION
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;
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,
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,
588: p_data => X_Err_Stage);
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,
588: p_data => X_Err_Stage);
589: RAISE FND_API.G_EXC_ERROR;
857: X_Err_Code := 'E';
858: X_Err_Stage := 'No Award Project Id found for the Installment '||to_char(X_Installment_Id);
859:
860: X_Err_Stage := 'GMS_NO_AWDPRJ_ID_FOR_INST_ID';
861: FND_MESSAGE.SET_NAME('GMS','GMS_NO_AWDPRJ_ID_FOR_INST_ID');
862: FND_MESSAGE.SET_TOKEN('INSTALLMENT_ID',to_char(X_Installment_Id));
863: FND_MSG_PUB.add;
864: FND_MSG_PUB.Count_And_Get
865: ( p_count => p_msg_count,
858: X_Err_Stage := 'No Award Project Id found for the Installment '||to_char(X_Installment_Id);
859:
860: X_Err_Stage := 'GMS_NO_AWDPRJ_ID_FOR_INST_ID';
861: FND_MESSAGE.SET_NAME('GMS','GMS_NO_AWDPRJ_ID_FOR_INST_ID');
862: FND_MESSAGE.SET_TOKEN('INSTALLMENT_ID',to_char(X_Installment_Id));
863: FND_MSG_PUB.add;
864: FND_MSG_PUB.Count_And_Get
865: ( p_count => p_msg_count,
866: p_data => X_Err_Stage);
869: X_Err_Code := 'U';
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;
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
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
879: ( p_count => p_msg_count,
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
879: ( p_count => p_msg_count,
880: p_data => X_Err_Stage );
964: X_Err_Code := 'U';
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;
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
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
974: ( p_count => p_msg_count ,
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
974: ( p_count => p_msg_count ,
975: p_data => X_Err_Stage );
976: WHEN OTHERS THEN
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;
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
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
986: ( p_count => p_msg_count ,
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
986: ( p_count => p_msg_count ,
987: p_data => X_Err_Stage );
1012: WHEN TOO_MANY_ROWS THEN
1013: X_Err_Code := 'E';
1014: X_Err_Stage := 'There is more than one row for the Agreement '||to_char(X_Agreement_Id)||' and the Award Project '||to_char(X_Award_Project_Id);
1015: X_Err_Stage := 'GMS_SUMM_FUNDING_NOT_UNIQUE';
1016: FND_MESSAGE.SET_NAME('GMS','GMS_SUMM_FUNDING_NOT_UNIQUE');
1017: FND_MESSAGE.SET_TOKEN('AGREEMENT_ID',X_Agreement_Id);
1018: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_ID',X_Award_Project_Id);
1019: FND_MSG_PUB.add;
1020: FND_MSG_PUB.Count_And_Get
1013: X_Err_Code := 'E';
1014: X_Err_Stage := 'There is more than one row for the Agreement '||to_char(X_Agreement_Id)||' and the Award Project '||to_char(X_Award_Project_Id);
1015: X_Err_Stage := 'GMS_SUMM_FUNDING_NOT_UNIQUE';
1016: FND_MESSAGE.SET_NAME('GMS','GMS_SUMM_FUNDING_NOT_UNIQUE');
1017: FND_MESSAGE.SET_TOKEN('AGREEMENT_ID',X_Agreement_Id);
1018: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_ID',X_Award_Project_Id);
1019: FND_MSG_PUB.add;
1020: FND_MSG_PUB.Count_And_Get
1021: ( p_count => p_msg_count ,
1014: X_Err_Stage := 'There is more than one row for the Agreement '||to_char(X_Agreement_Id)||' and the Award Project '||to_char(X_Award_Project_Id);
1015: X_Err_Stage := 'GMS_SUMM_FUNDING_NOT_UNIQUE';
1016: FND_MESSAGE.SET_NAME('GMS','GMS_SUMM_FUNDING_NOT_UNIQUE');
1017: FND_MESSAGE.SET_TOKEN('AGREEMENT_ID',X_Agreement_Id);
1018: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_ID',X_Award_Project_Id);
1019: FND_MSG_PUB.add;
1020: FND_MSG_PUB.Count_And_Get
1021: ( p_count => p_msg_count ,
1022: p_data => X_Err_Stage );
1025: X_Err_Code := 'U';
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;
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
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
1035: ( p_count => p_msg_count ,
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
1035: ( p_count => p_msg_count ,
1036: p_data => X_Err_Stage );
1068: WHEN OTHERS THEN
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;
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
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
1078: ( p_count => p_msg_count ,
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
1078: ( p_count => p_msg_count ,
1079: p_data => X_Err_Stage );
1104: WHEN NO_DATA_FOUND THEN
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;
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
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
1114: ( p_count => p_msg_count,
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
1114: ( p_count => p_msg_count,
1115: p_data => X_Err_Stage );
1118:
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;
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
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
1128: ( p_count => p_msg_count ,
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
1128: ( p_count => p_msg_count ,
1129: p_data => X_Err_Stage );
1157: X_Err_Code := 'E';
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;
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
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
1167: ( p_count => p_msg_count ,
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
1167: ( p_count => p_msg_count ,
1168: p_data => X_Err_Stage );
1224: EXCEPTION
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;
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
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
1234: ( p_count => p_msg_count ,
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
1234: ( p_count => p_msg_count ,
1235: p_data => X_Err_Stage );
1261: WHEN TOO_MANY_ROWS THEN
1262: X_Err_Code := 'E';
1263: X_Err_Stage := 'There is more than one draft Budget for the Project '||to_char(X_Award_Project_Id);
1264: --dbms_output.put_line(X_Err_Stage);
1265: FND_MESSAGE.SET_NAME('GMS','GMS_DRAFT_REV_BDGT_EXISTS');
1266: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_ID',X_Award_Project_Id);
1267: FND_MSG_PUB.add;
1268: FND_MSG_PUB.Count_And_Get
1269: ( p_count => p_msg_count ,
1262: X_Err_Code := 'E';
1263: X_Err_Stage := 'There is more than one draft Budget for the Project '||to_char(X_Award_Project_Id);
1264: --dbms_output.put_line(X_Err_Stage);
1265: FND_MESSAGE.SET_NAME('GMS','GMS_DRAFT_REV_BDGT_EXISTS');
1266: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_ID',X_Award_Project_Id);
1267: FND_MSG_PUB.add;
1268: FND_MSG_PUB.Count_And_Get
1269: ( p_count => p_msg_count ,
1270: p_data => X_Err_Stage );
1274: X_Err_Code := 'U';
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;
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
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
1284: ( p_count => p_msg_count ,
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
1284: ( p_count => p_msg_count ,
1285: p_data => X_Err_Stage );
1313: WHEN NO_DATA_FOUND THEN
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
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 ,
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 ,
1323: p_data => X_Err_Stage );
1345: IF SQL%NOTFOUND THEN
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
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 ,
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 ,
1355: p_data => X_Err_Stage );
1370: IF SQL%NOTFOUND THEN
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
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 ,
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 ,
1380: p_data => X_Err_Stage );
1415: -- and BUDGET_TYPE_CODE = 'DRAFT';
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
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 ,
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 ,
1425: p_data => X_Err_Stage );
1453: IF SQL%ROWCOUNT = 0 THEN
1454: X_Err_Code := 'E';
1455: X_Err_Stage := 'There were no rows deleted FROM PA_SUMMARY_PROJECT_FUNDINGS';
1456: X_Err_Stage := 'GMS_NO_SUMM_FUNDING_DELETED';
1457: FND_MESSAGE.SET_NAME('GMS','GMS_NO_SUMM_FUNDING_DELETED');
1458: FND_MSG_PUB.add;
1459: FND_MSG_PUB.Count_And_Get
1460: ( p_count => p_msg_count ,
1461: p_data => X_Err_Stage );
1533: IF SQL%ROWCOUNT = 0 THEN
1534: X_Err_Code := 'E';
1535: X_Err_Stage := ('No rows delete FROM PA_BUDGET_VERSIONS for Project Id '||X_Award_Project_Id);
1536: X_Err_Stage := 'GMS_NO_BUD_VERS_DELETED';
1537: FND_MESSAGE.SET_NAME('GMS','GMS_NO_BUD_VERS_DELETED');
1538: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_ID',to_char(X_Award_Project_Id) );
1539: FND_MSG_PUB.add;
1540: FND_MSG_PUB.Count_And_Get
1541: ( p_count => p_msg_count ,
1534: X_Err_Code := 'E';
1535: X_Err_Stage := ('No rows delete FROM PA_BUDGET_VERSIONS for Project Id '||X_Award_Project_Id);
1536: X_Err_Stage := 'GMS_NO_BUD_VERS_DELETED';
1537: FND_MESSAGE.SET_NAME('GMS','GMS_NO_BUD_VERS_DELETED');
1538: FND_MESSAGE.SET_TOKEN('AWARD_PROJECT_ID',to_char(X_Award_Project_Id) );
1539: FND_MSG_PUB.add;
1540: FND_MSG_PUB.Count_And_Get
1541: ( p_count => p_msg_count ,
1542: p_data => X_Err_Stage );
1620:
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;
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
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
1630: ( p_count => p_msg_count ,
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
1630: ( p_count => p_msg_count ,
1631: p_data => ERRBUF );
1653: EXCEPTION
1654: WHEN NO_DATA_FOUND THEN
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
1654: WHEN NO_DATA_FOUND THEN
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 ,
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 );
1664:
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;
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
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
1674: ( p_count => p_msg_count ,
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
1674: ( p_count => p_msg_count ,
1675: p_data => ERRBUF );
1684: IF Check_Funding_Exists >= 1 THEN
1685: RETCODE := 'E';
1686: ERRBUF := 'Cannot delete Agreement while Funding Exists ';
1687:
1688: FND_MESSAGE.SET_NAME('GMS','GMS_FUND_EXISTS_FOR_AGMT');
1689: FND_MSG_PUB.add;
1690: FND_MSG_PUB.Count_And_Get
1691: ( p_count => p_msg_count ,
1692: p_data => ERRBUF );
1746: EXCEPTION
1747: WHEN NO_DATA_FOUND THEN
1748: X_Err_Code := 'E';
1749: X_Err_Stage := 'GMS_AWARD_FOR_AGR_NOT_FOUND';
1750: FND_MESSAGE.SET_NAME('GMS','GMS_AWARD_FOR_AGR_NOT_FOUND');
1751: FND_MSG_PUB.add;
1752: FND_MSG_PUB.Count_And_Get
1753: ( p_count => p_msg_count ,
1754: p_data => X_Err_Stage );
1780:
1781: IF (St_Invoice_Num_Count > 0 OR St_Revenue_Num_Count > 0) THEN
1782: X_Err_Code := 'E';
1783: X_Err_Stage := 'GMS_REVENUE_OR_INVOICES_EXIST';
1784: FND_MESSAGE.SET_NAME('GMS','GMS_REVENUE_OR_INVOICES_EXIST');
1785: FND_MSG_PUB.add;
1786: FND_MSG_PUB.Count_And_Get
1787: ( p_count => p_msg_count ,
1788: p_data => X_Err_Stage );
1808: IF St_revenue_distribution_rule = 'COST' and St_billing_distribution_rule = 'COST' THEN
1809: if ((x_total_revenue_amount > x_total_funding_amount) or (x_total_billed_amount > x_total_funding_amount)) THEN
1810: X_Err_Code := 'E';
1811: X_Err_Stage := 'GMS_REVENUE_OR_INVOICES_EXIST';
1812: FND_MESSAGE.SET_NAME('GMS','GMS_REVENUE_OR_INVOICES_EXIST');
1813: FND_MSG_PUB.add;
1814: FND_MSG_PUB.Count_And_Get
1815: ( p_count => p_msg_count ,
1816: p_data => X_Err_Stage );
1833: /* Changed the Message Name FROM 'GMS_REVENUE_OR_INVOICES_EXIST' to 'GMS_CANNOT_UPDATE_FLAG'
1834: as message Text of previous message got changed in 11i */
1835:
1836: /* X_Err_Stage := 'GMS_CANNOT_UPDATE_FLAG';
1837: FND_MESSAGE.SET_NAME('GMS','GMS_CANNOT_UPDATE_FLAG'); Commented for bug 6642901 and replaced with 2 new messages specific to revenue and invoice.*/
1838: X_Err_Stage := 'GMS_CANNOT_UPD_REV_FLAG';
1839: FND_MESSAGE.SET_NAME('GMS','GMS_CANNOT_UPD_REV_FLAG');
1840: FND_MSG_PUB.add;
1841: FND_MSG_PUB.Count_And_Get
1835:
1836: /* X_Err_Stage := 'GMS_CANNOT_UPDATE_FLAG';
1837: FND_MESSAGE.SET_NAME('GMS','GMS_CANNOT_UPDATE_FLAG'); Commented for bug 6642901 and replaced with 2 new messages specific to revenue and invoice.*/
1838: X_Err_Stage := 'GMS_CANNOT_UPD_REV_FLAG';
1839: FND_MESSAGE.SET_NAME('GMS','GMS_CANNOT_UPD_REV_FLAG');
1840: FND_MSG_PUB.add;
1841: FND_MSG_PUB.Count_And_Get
1842: ( p_count => p_msg_count ,
1843: p_data => X_Err_Stage );
1845: return false;
1846: elsif (x_bill_amount > x_total_funding_amount) THEN
1847: X_Err_Code := 'E';
1848: X_Err_Stage := 'GMS_CANNOT_UPD_INV_FLAG';
1849: FND_MESSAGE.SET_NAME('GMS','GMS_CANNOT_UPD_INV_FLAG');
1850: FND_MSG_PUB.add;
1851: FND_MSG_PUB.Count_And_Get
1852: ( p_count => p_msg_count ,
1853: p_data => X_Err_Stage);
1861: END;
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;
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,
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,
1871: p_data => X_Err_Stage);
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,
1871: p_data => X_Err_Stage);
1872: RAISE FND_API.G_EXC_ERROR;
1933: WHEN NO_DATA_FOUND THEN
1934: RETCODE := 'E';
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
1934: RETCODE := 'E';
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 ,
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 );
1943: p_data => ERRBUF );
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;
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
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
1953: ( p_count => p_msg_count ,
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
1953: ( p_count => p_msg_count ,
1954: p_data => ERRBUF );
2056: EXCEPTION
2057: WHEN DUP_VAL_ON_INDEX THEN
2058: X_Err_Code := 'E';
2059: X_Err_Stage := 'Budget Type already exists ';
2060: FND_MESSAGE.SET_NAME('GMS','GMS_BUD_TYP_EXISTS');
2061: FND_MSG_PUB.add;
2062: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,
2063: p_data => X_Err_Stage );
2064: WHEN OTHERS THEN
2063: p_data => X_Err_Stage );
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;
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,
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,
2073: p_data =>X_Err_Stage );
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,
2073: p_data =>X_Err_Stage );
2074:
2091: X_Err_Code := 'S';
2092: IF SQL%NOTFOUND THEN
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,
2092: IF SQL%NOTFOUND THEN
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 );
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:
2114: X_Err_Code := 'S';
2115: IF SQL%ROWCOUNT = 0 THEN
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,
2115: IF SQL%ROWCOUNT = 0 THEN
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 );
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;
2170: EXCEPTION
2171: WHEN NO_DATA_FOUND THEN
2172: X_Err_Code := 'E';
2173: X_Err_Stage := 'PA_NO_BILL_TO_ADDRESS' ;
2174: FND_MESSAGE.SET_NAME('PA','PA_NO_BILL_TO_ADDRESS');
2175: FND_MSG_PUB.add;
2176: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
2177: p_data => X_Err_Stage);
2178: return;
2180: X_Err_Code := 'U';
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;
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
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
2190: ( p_count => p_msg_count ,
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
2190: ( p_count => p_msg_count ,
2191: p_data => X_Err_Stage );
2223: EXCEPTION
2224: WHEN NO_DATA_FOUND THEN
2225: X_Err_Code := 'E';
2226: X_Err_Stage := 'PA_NO_SHIP_TO_ADDRESS' ;
2227: FND_MESSAGE.SET_NAME('PA','PA_NO_SHIP_TO_ADDRESS');
2228: FND_MSG_PUB.add;
2229: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
2230: p_data => X_Err_Stage);
2231: return ;
2233: X_Err_Code := 'U';
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;
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
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
2243: ( p_count => p_msg_count ,
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
2243: ( p_count => p_msg_count ,
2244: p_data => X_Err_Stage );
2267: EXCEPTION
2268: WHEN NO_DATA_FOUND THEN
2269: X_Err_Code := 'E';
2270: X_Err_Stage := 'PA_NO_SHIP_TO_CONTACT' ;
2271: FND_MESSAGE.SET_NAME('PA','PA_NO_SHIP_TO_CONTACT');
2272: FND_MSG_PUB.add;
2273: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
2274: p_data => X_Err_Stage);
2275: return;
2275: return;
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;
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
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
2285: ( p_count => p_msg_count ,
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
2285: ( p_count => p_msg_count ,
2286: p_data => X_Err_Stage );
2305: EXCEPTION
2306: When NO_DATA_FOUND THEN
2307: X_Err_Code := 'E';
2308: X_Err_Stage := 'PA_NO_BILL_TO_CONTACT' ;
2309: FND_MESSAGE.SET_NAME('PA','PA_NO_BILL_TO_CONTACT');
2310: FND_MSG_PUB.add;
2311: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
2312: p_data => X_Err_Stage);
2313: return;
2315: X_Err_Code := 'U';
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;
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
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
2325: ( p_count => p_msg_count ,
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
2325: ( p_count => p_msg_count ,
2326: p_data => X_Err_Stage );
2371: EXCEPTION
2372: WHEN NO_DATA_FOUND THEN
2373: X_Err_Code := 'E';
2374: X_Err_Stage := 'GMS_NO_AWARD_CONTACTS';
2375: FND_MESSAGE.SET_NAME('GMS','GMS_NO_AWARD_CONTACTS');
2376: FND_MSG_PUB.add;
2377: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
2378: p_data => X_Err_Stage);
2379: return;
2552:
2553: EXCEPTION
2554: WHEN TOO_MANY_ROWS THEN
2555: X_Err_Code := 'E';
2556: FND_MESSAGE.SET_NAME('GMS','GMS_MULTI_AWD_CONTACTS_FOUND');
2557: FND_MSG_PUB.add;
2558: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
2559: p_data => X_Err_Stage);
2560: RETURN;
2916:
2917: EXCEPTION
2918: WHEN NO_DATA_FOUND THEN
2919: X_Err_Code := 'E';
2920: FND_MESSAGE.SET_NAME('GMS','GMS_PROJ_MANAGER_NOT_FOUND');
2921: FND_MSG_PUB.add;
2922: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
2923: p_data => X_Err_Stage);
2924: RETURN;
2923: p_data => X_Err_Stage);
2924: RETURN;
2925: WHEN TOO_MANY_ROWS THEN
2926: X_Err_Code := 'E';
2927: FND_MESSAGE.SET_NAME('GMS','GMS_MULTI_PROJ_MANAGER_FOUND');
2928: FND_MSG_PUB.add;
2929: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
2930: p_data => X_Err_Stage);
2931: RETURN;
2961: X_Err_Code := 'S';
2962:
2963: IF SQL%NOTFOUND THEN
2964: X_Err_Code := 'E';
2965: FND_MESSAGE.SET_NAME('GMS','GMS_PROJ_MANAGER_NOT_FOUND');
2966: FND_MSG_PUB.add;
2967: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
2968: p_data => X_Err_Stage);
2969: RETURN;
3145:
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;
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,
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,
3155: p_data => X_Err_Stage);
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,
3155: p_data => X_Err_Stage);
3156: RAISE FND_API.G_EXC_ERROR;
3332: p_out_pa_task_id => X_Task_ID_OUT,
3333: p_out_pm_task_reference => X_Task_PM_Reference_OUT);
3334:
3335: IF X_Err_Code <> 'S' THEN
3336: FND_MESSAGE.PARSE_ENCODED
3337: ( encoded_message => X_Err_Stage,
3338: APP_SHORT_NAME => X_App_Short_Name,
3339: MESSAGE_NAME => X_Text
3340: );
3741: P_PM_PROJECT_REFERENCE => X_Awd_Proj_Number,
3742: P_PA_PROJECT_ID => X_Award_Project_Id );
3743:
3744: IF X_Err_Code <> 'S' THEN
3745: /* FND_MESSAGE.PARSE_ENCODED (encoded_message => X_Err_Stage,
3746: APP_SHORT_NAME => X_App_Short_Name,
3747: MESSAGE_NAME => X_Text );
3748:
3749: X_Err_Stage := X_Text;
3860: EXCEPTION
3861: WHEN NO_DATA_FOUND THEN
3862: X_Err_Code := 'E';
3863: X_Err_Stage := 'Award, Resource_List_Member_Id or Resource_List_Id Not Found ';
3864: FND_MESSAGE.SET_NAME('GMS','GMS_AWD_RESL_RESLM_NOT_FOUND');
3865: FND_MSG_PUB.add;
3866: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
3867: p_data => X_Err_Stage);
3868: RAISE FND_API.G_EXC_ERROR;
3892: p_return_status => X_Err_Code);
3893:
3894: G_Stage := '(690:AFTER PA_BUDGET_PUB.DELETE_DRAFT_BUDGET CALL)';
3895: IF X_Err_Code <> 'S' THEN
3896: /* FND_MESSAGE.PARSE_ENCODED (encoded_message => X_Err_Stage,
3897: APP_SHORT_NAME => X_App_Short_Name,
3898: MESSAGE_NAME => X_Text );
3899: X_Err_Stage := X_Text;
3900: */
3952: p_budget_lines_in => X_Budget_Lines_IN_TBL,
3953: p_budget_lines_out => X_Budget_Lines_OUT_TBL
3954: );
3955: IF X_Err_Code <> 'S' THEN
3956: /* FND_MESSAGE.PARSE_ENCODED (encoded_message => X_Err_Stage,
3957: APP_SHORT_NAME => X_App_Short_Name,
3958: MESSAGE_NAME => X_Text );
3959:
3960: X_Err_Stage := X_Text;
3983: p_workflow_started => X_Workflow_Started
3984: );
3985:
3986: IF X_Err_Code <> 'S' THEN
3987: /* FND_MESSAGE.PARSE_ENCODED (encoded_message => X_Err_Stage,
3988: APP_SHORT_NAME => X_App_Short_Name,
3989: MESSAGE_NAME => X_Text );
3990:
3991: X_Err_Stage := X_Text;
4572: p_msg_count => X_Msg_Count,
4573: p_msg_data => X_Err_Stage,
4574: p_return_status => X_Err_Code);
4575: IF X_Err_Code <> 'S' THEN
4576: /* FND_MESSAGE.PARSE_ENCODED (encoded_message => X_Err_Stage,
4577: APP_SHORT_NAME => X_App_Short_Name,
4578: MESSAGE_NAME => X_Text );
4579: X_Err_Stage := X_Text;
4580: */