APPS.GMS_MULTI_FUNDING dependencies on FND_MSG_PUB

Line 28: FND_MSG_PUB.add;

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 );
32:

Line 29: FND_MSG_PUB.Count_And_Get

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 );
32:
33: RETURN FALSE;

Line 45: FND_MSG_PUB.add;

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 );
49: RETURN FALSE;

Line 46: FND_MSG_PUB.Count_And_Get

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 );
49: RETURN FALSE;
50: END;

Line 74: FND_MSG_PUB.add;

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 );
78:

Line 75: FND_MSG_PUB.Count_And_Get

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 );
78:
79: RETURN FALSE;

Line 89: FND_MSG_PUB.add;

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 );
93:

Line 90: FND_MSG_PUB.Count_And_Get

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 );
93:
94: RETURN FALSE;

Line 109: FND_MSG_PUB.add;

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 );
113:

Line 110: FND_MSG_PUB.Count_And_Get

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 );
113:
114: RETURN FALSE;

Line 127: FND_MSG_PUB.add;

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 );
131: RETURN FALSE;

Line 128: FND_MSG_PUB.Count_And_Get

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 );
131: RETURN FALSE;
132: END;

Line 185: FND_MSG_PUB.add;

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;
189:

Line 186: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

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;
189:
190:

Line 203: FND_MSG_PUB.add_exc_msg

199:
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;

Line 586: FND_MSG_PUB.add;

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;
590: END;

Line 587: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

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;
590: END;
591:

Line 797: FND_MSG_PUB.add_exc_msg

793:
794: -- Added when OTHERS exception for Bug:2662848
795: WHEN OTHERS THEN
796: x_err_code := 'U';
797: FND_MSG_PUB.add_exc_msg
798: ( p_pkg_name => G_PKG_NAME
799: ,p_procedure_name => l_api_name
800: ,p_error_text => substrb(SQLERRM||' at stage='||g_stage||' ',1,240)
801: );

Line 802: FND_MSG_PUB.Count_And_Get

798: ( p_pkg_name => G_PKG_NAME
799: ,p_procedure_name => l_api_name
800: ,p_error_text => substrb(SQLERRM||' at stage='||g_stage||' ',1,240)
801: );
802: FND_MSG_PUB.Count_And_Get
803: ( p_count => p_msg_count
804: ,p_data => X_Err_Stage
805: );
806: x_err_stage := SQLERRM||' at stage='||g_stage;

Line 863: FND_MSG_PUB.add;

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);
867:

Line 864: FND_MSG_PUB.Count_And_Get

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);
867:
868: WHEN OTHERS THEN

Line 877: FND_MSG_PUB.add;

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 );
881:

Line 878: FND_MSG_PUB.Count_And_Get

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 );
881:
882: END GET_PROJ_START_AND_END_DATE;

Line 972: FND_MSG_PUB.add;

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

Line 973: FND_MSG_PUB.Count_And_Get

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';

Line 984: FND_MSG_PUB.add;

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 );
988:

Line 985: FND_MSG_PUB.Count_And_Get

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 );
988:
989: END INSERT_DETAIL_PROJECT_FUNDING;

Line 1019: FND_MSG_PUB.add;

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 );
1023: RETURN FALSE;

Line 1020: FND_MSG_PUB.Count_And_Get

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 );
1023: RETURN FALSE;
1024: WHEN OTHERS THEN

Line 1033: FND_MSG_PUB.add;

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 );
1037: RETURN FALSE;

Line 1034: FND_MSG_PUB.Count_And_Get

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 );
1037: RETURN FALSE;
1038: END;

Line 1071: FND_MSG_PUB.add;

1067: X_Err_Code := 'S';
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);

Line 1076: 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 );
1080: END GET_TOTAL_FUNDING_BUDGET;

Line 1077: FND_MSG_PUB.Count_And_Get

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 );
1080: END GET_TOTAL_FUNDING_BUDGET;
1081:

Line 1112: FND_MSG_PUB.add;

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 );
1116:

Line 1113: FND_MSG_PUB.Count_And_Get

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 );
1116:
1117: WHEN OTHERS THEN

Line 1121: -- FND_MSG_PUB.add;

1117: WHEN OTHERS THEN
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);

Line 1126: 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 );
1130:

Line 1127: FND_MSG_PUB.Count_And_Get

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 );
1130:
1131: END GET_TOTAL_FUNDING_AMOUNT;

Line 1160: --FND_MSG_PUB.add;

1156: IF SQL%NOTFOUND THEN
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);

Line 1165: 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 );
1169: END IF;

Line 1166: FND_MSG_PUB.Count_And_Get

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 );
1169: END IF;
1170:

Line 1232: FND_MSG_PUB.add;

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 );
1236:

Line 1233: FND_MSG_PUB.Count_And_Get

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 );
1236:
1237: END INSERT_SUMMARY_PROJECT_FUNDING;

Line 1267: FND_MSG_PUB.add;

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 );
1271:

Line 1268: FND_MSG_PUB.Count_And_Get

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 );
1271:
1272: RETURN FALSE;

Line 1282: FND_MSG_PUB.add;

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 );
1286: RETURN FALSE;

Line 1283: FND_MSG_PUB.Count_And_Get

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 );
1286: RETURN FALSE;
1287: END;

Line 1320: FND_MSG_PUB.add;

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 );
1324: RETURN;

Line 1321: FND_MSG_PUB.Count_And_Get

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 );
1324: RETURN;
1325: END ;

Line 1352: FND_MSG_PUB.add;

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 );
1356: RETURN;

Line 1353: FND_MSG_PUB.Count_And_Get

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 );
1356: RETURN;
1357: END IF;

Line 1377: FND_MSG_PUB.add;

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 );
1381: END IF;

Line 1378: FND_MSG_PUB.Count_And_Get

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 );
1381: END IF;
1382: END IF;

Line 1394: FND_MSG_PUB.add_exc_msg

1390: WHEN OTHERS THEN
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

Line 1398: FND_MSG_PUB.Count_And_Get

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
1400: ,p_data => X_Err_Stage
1401: );
1402: RAISE;

Line 1422: FND_MSG_PUB.add;

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 );
1426: END IF;

Line 1423: FND_MSG_PUB.Count_And_Get

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 );
1426: END IF;
1427: EXCEPTION

Line 1429: FND_MSG_PUB.add_exc_msg

1425: p_data => X_Err_Stage );
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

Line 1433: FND_MSG_PUB.Count_And_Get

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
1435: ,p_data => X_Err_Stage
1436: );
1437: RAISE;

Line 1458: FND_MSG_PUB.add;

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 );
1462: END IF;

Line 1459: FND_MSG_PUB.Count_And_Get

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 );
1462: END IF;
1463: END DELETE_SUMMARY_PROJECT_FUNDING;

Line 1539: FND_MSG_PUB.add;

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 );
1543: END IF;

Line 1540: FND_MSG_PUB.Count_And_Get

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 );
1543: END IF;
1544: EXCEPTION

Line 1546: FND_MSG_PUB.add_exc_msg

1542: p_data => X_Err_Stage );
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;

Line 1628: FND_MSG_PUB.add;

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 );
1632:

Line 1629: FND_MSG_PUB.Count_And_Get

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 );
1632:
1633: RETURN;

Line 1660: FND_MSG_PUB.add;

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:

Line 1661: FND_MSG_PUB.Count_And_Get

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

Line 1672: FND_MSG_PUB.add;

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 );
1676: END;

Line 1673: FND_MSG_PUB.Count_And_Get

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 );
1676: END;
1677:

Line 1689: FND_MSG_PUB.add;

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 );
1693:

Line 1690: FND_MSG_PUB.Count_And_Get

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 );
1693:
1694: Elsif Check_Funding_Exists = 0 THEN

Line 1702: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

1698: END;
1699: -- Added Exception for Bug:2662848
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: );

Line 1703: FND_MSG_PUB.add_exc_msg

1699: -- Added Exception for Bug:2662848
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;

Line 1751: FND_MSG_PUB.add;

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 );
1755: RETURN FALSE;

Line 1752: FND_MSG_PUB.Count_And_Get

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 );
1755: RETURN FALSE;
1756: END;

Line 1785: FND_MSG_PUB.add;

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 );
1789:

Line 1786: FND_MSG_PUB.Count_And_Get

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 );
1789:
1790: RETURN FALSE;

Line 1813: FND_MSG_PUB.add;

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 );
1817:

Line 1814: FND_MSG_PUB.Count_And_Get

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 );
1817:
1818: return false;

Line 1840: FND_MSG_PUB.add;

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 );
1844:

Line 1841: FND_MSG_PUB.Count_And_Get

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 );
1844:
1845: return false;

Line 1850: FND_MSG_PUB.add;

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);
1854: return false;

Line 1851: FND_MSG_PUB.Count_And_Get

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);
1854: return false;
1855: else

Line 1869: FND_MSG_PUB.add;

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;
1873:

Line 1870: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

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;
1873:
1874: END ALLOW_REV_LIMIT_FLAG_UPDATE;

Line 1940: FND_MSG_PUB.add;

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 );
1944: RAISE FND_API.G_EXC_ERROR;

Line 1941: FND_MSG_PUB.Count_And_Get

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 );
1944: RAISE FND_API.G_EXC_ERROR;
1945: WHEN OTHERS THEN

Line 1951: FND_MSG_PUB.add;

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 );
1955: RAISE FND_API.G_EXC_ERROR;

Line 1952: FND_MSG_PUB.Count_And_Get

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 );
1955: RAISE FND_API.G_EXC_ERROR;
1956: END;

Line 2008: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

2004: RETURN;
2005:
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: );

Line 2009: FND_MSG_PUB.add_exc_msg

2005:
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;

Line 2061: FND_MSG_PUB.add;

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
2065: X_Err_Code := 'U';

Line 2062: FND_MSG_PUB.Count_And_Get (p_count => p_msg_count,

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
2065: X_Err_Code := 'U';
2066: X_Err_Stage := SQLCODE||' '||SQLERRM;

Line 2071: FND_MSG_PUB.add;

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:
2075: END INSERT_AWARD_BUDGET_TYPE;

Line 2072: FND_MSG_PUB.Count_And_Get(p_count =>p_msg_count,

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:
2075: END INSERT_AWARD_BUDGET_TYPE;
2076:

Line 2098: FND_MSG_PUB.add;

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:
2102: END IF;

Line 2099: FND_MSG_PUB.Count_And_Get(p_count =>p_msg_count,

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:
2102: END IF;
2103:

Line 2121: FND_MSG_PUB.add;

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;
2125:

Line 2122: FND_MSG_PUB.Count_And_Get(p_count =>p_msg_count,

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;
2125:
2126: END DELETE_AWARD_BUDGET_TYPE;

Line 2175: FND_MSG_PUB.add;

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;
2179: WHEN OTHERS THEN

Line 2176: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

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;
2179: WHEN OTHERS THEN
2180: X_Err_Code := 'U';

Line 2188: FND_MSG_PUB.add;

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 );
2192:

Line 2189: FND_MSG_PUB.Count_And_Get

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 );
2192:
2193: END ;

Line 2228: FND_MSG_PUB.add;

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 ;
2232: WHEN OTHERS THEN

Line 2229: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

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 ;
2232: WHEN OTHERS THEN
2233: X_Err_Code := 'U';

Line 2241: FND_MSG_PUB.add;

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 );
2245: END ;

Line 2242: FND_MSG_PUB.Count_And_Get

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 );
2245: END ;
2246:

Line 2272: FND_MSG_PUB.add;

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;
2276: WHEN OTHERS THEN

Line 2273: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

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;
2276: WHEN OTHERS THEN
2277: X_Err_Code := 'U';

Line 2283: FND_MSG_PUB.add;

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 );
2287: return;

Line 2284: FND_MSG_PUB.Count_And_Get

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 );
2287: return;
2288:

Line 2310: FND_MSG_PUB.add;

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;
2314: WHEN OTHERS THEN

Line 2311: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

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;
2314: WHEN OTHERS THEN
2315: X_Err_Code := 'U';

Line 2323: FND_MSG_PUB.add;

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 );
2327: return;

Line 2324: FND_MSG_PUB.Count_And_Get

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 );
2327: return;
2328:

Line 2333: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

2329: END ;
2330: -- Added Exception for Bug:2662848
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: );

Line 2334: FND_MSG_PUB.add_exc_msg

2330: -- Added Exception for Bug:2662848
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;

Line 2376: FND_MSG_PUB.add;

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;
2380: END;

Line 2377: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

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;
2380: END;
2381:

Line 2557: FND_MSG_PUB.add;

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;
2561: END;

Line 2558: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

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;
2561: END;
2562:

Line 2565: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

2561: END;
2562:
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: );

Line 2566: FND_MSG_PUB.add_exc_msg

2562:
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;

Line 2633: FND_MSG_PUB.Initialize;

2629:
2630: G_stage := '(100:Initialize)';
2631:
2632: --dbms_output.put_line('AJ01:just after begin');
2633: FND_MSG_PUB.Initialize;
2634:
2635: --dbms_output.put_line('AJ02:just after FND_MSG_PUB');
2636:
2637: X_Awd_Proj_Name := X_Project_Name; --||'-A';

Line 2635: --dbms_output.put_line('AJ02:just after FND_MSG_PUB');

2631:
2632: --dbms_output.put_line('AJ01:just after begin');
2633: FND_MSG_PUB.Initialize;
2634:
2635: --dbms_output.put_line('AJ02:just after FND_MSG_PUB');
2636:
2637: X_Awd_Proj_Name := X_Project_Name; --||'-A';
2638: X_Awd_Proj_Number := X_Project_Number; --||'-A';
2639:

Line 2874: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

2870: X_Agreement_Id := -1;
2871: X_Bill_To_Address_Id_OUT := null;
2872: X_Ship_To_Address_Id_OUT := null;
2873:
2874: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2875: FND_MSG_PUB.add_exc_msg
2876: ( p_pkg_name => G_PKG_NAME
2877: ,p_procedure_name => l_api_name
2878: ,p_error_text => substrb(SQLERRM||G_Stage,1,240)

Line 2875: FND_MSG_PUB.add_exc_msg

2871: X_Bill_To_Address_Id_OUT := null;
2872: X_Ship_To_Address_Id_OUT := null;
2873:
2874: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2875: FND_MSG_PUB.add_exc_msg
2876: ( p_pkg_name => G_PKG_NAME
2877: ,p_procedure_name => l_api_name
2878: ,p_error_text => substrb(SQLERRM||G_Stage,1,240)
2879: );

Line 2881: FND_MSG_PUB.Count_And_Get

2877: ,p_procedure_name => l_api_name
2878: ,p_error_text => substrb(SQLERRM||G_Stage,1,240)
2879: );
2880: END IF;
2881: FND_MSG_PUB.Count_And_Get
2882: ( p_count => x_msg_count
2883: ,p_data => X_Err_Stage
2884: );
2885: ERRBUF := 'At stage='||g_stage||' '||X_Err_Stage;

Line 2921: FND_MSG_PUB.add;

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;
2925: WHEN TOO_MANY_ROWS THEN

Line 2922: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

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;
2925: WHEN TOO_MANY_ROWS THEN
2926: X_Err_Code := 'E';

Line 2928: FND_MSG_PUB.add;

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;
2932:

Line 2929: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

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;
2932:
2933: END;

Line 2966: FND_MSG_PUB.add;

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;
2970: END IF;

Line 2967: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

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;
2970: END IF;
2971:

Line 3104: G_Stage := '(300:Calling fnd_msg_pub.initialize)';

3100: l_org_id NUMBER; --Shared Service Enhancement
3101:
3102: BEGIN
3103:
3104: G_Stage := '(300:Calling fnd_msg_pub.initialize)';
3105: FND_MSG_PUB.Initialize;
3106: ---Shared Service Enhancement
3107: --Get the org_id from award_project_id being passed
3108: --Set the ORg context

Line 3105: FND_MSG_PUB.Initialize;

3101:
3102: BEGIN
3103:
3104: G_Stage := '(300:Calling fnd_msg_pub.initialize)';
3105: FND_MSG_PUB.Initialize;
3106: ---Shared Service Enhancement
3107: --Get the org_id from award_project_id being passed
3108: --Set the ORg context
3109: SELECT org_id

Line 3153: FND_MSG_PUB.add;

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;
3157: END;

Line 3154: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

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;
3157: END;
3158:

Line 3689: FND_MSG_PUB.add_exc_msg

3685: ERRBUF := X_Err_Stage||' at '||g_stage;
3686: -- Added when others exception for Bug:2662848
3687: WHEN OTHERS THEN
3688: RETCODE := 'U';
3689: FND_MSG_PUB.add_exc_msg
3690: ( p_pkg_name => G_PKG_NAME
3691: ,p_procedure_name => l_api_name
3692: ,p_error_text => substrb(SQLERRM||' at stage='||g_stage||' ',1,240)
3693: );

Line 3694: FND_MSG_PUB.Count_And_Get

3690: ( p_pkg_name => G_PKG_NAME
3691: ,p_procedure_name => l_api_name
3692: ,p_error_text => substrb(SQLERRM||' at stage='||g_stage||' ',1,240)
3693: );
3694: FND_MSG_PUB.Count_And_Get
3695: ( p_count => p_msg_count,
3696: p_data => X_Err_Stage);
3697: ERRBUF := 'At stage='||g_stage||' '||X_Err_Stage;
3698:

Line 3794: FND_MSG_PUB.add_exc_msg

3790: RETCODE := X_Err_Code;
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: );

Line 3799: FND_MSG_PUB.Count_And_Get

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
3800: ( p_count => p_msg_count,
3801: p_data => X_Err_Stage);
3802: ERRBUF := 'At stage='||g_stage||' '||X_Err_Stage;
3803: END DELETE_AWARD_PROJECT;

Line 3865: FND_MSG_PUB.add;

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;
3869: END;

Line 3866: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,

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;
3869: END;
3870:

Line 4013: FND_MSG_PUB.add_exc_msg

4009:
4010: -- Added when OTHERS exception for Bug:2662848
4011: WHEN OTHERS THEN
4012: RETCODE := 'U';
4013: FND_MSG_PUB.add_exc_msg
4014: ( p_pkg_name => G_PKG_NAME
4015: ,p_procedure_name => l_api_name
4016: ,p_error_text => substrb(SQLERRM||' at stage='||g_stage||' ',1,240)
4017: );

Line 4018: FND_MSG_PUB.Count_And_Get

4014: ( p_pkg_name => G_PKG_NAME
4015: ,p_procedure_name => l_api_name
4016: ,p_error_text => substrb(SQLERRM||' at stage='||g_stage||' ',1,240)
4017: );
4018: FND_MSG_PUB.Count_And_Get
4019: ( p_count => p_msg_count,
4020: p_data => X_Err_Stage);
4021: ERRBUF := SQLERRM||' at stage='||g_stage||' '||X_Err_Stage;
4022: RAISE; --not required but keeping for now

Line 4053: G_Stage := '(1000:CALLING FND_MSG_PUB.INITIALIZE)';

4049: --Added these variables to track when an API fails
4050: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_AWARD_FUNDING';
4051:
4052: BEGIN
4053: G_Stage := '(1000:CALLING FND_MSG_PUB.INITIALIZE)';
4054: FND_MSG_PUB.Initialize;
4055: --Get next sequence for PA_PROJECT_FUNDING//
4056: BEGIN
4057: Select

Line 4054: FND_MSG_PUB.Initialize;

4050: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_AWARD_FUNDING';
4051:
4052: BEGIN
4053: G_Stage := '(1000:CALLING FND_MSG_PUB.INITIALIZE)';
4054: FND_MSG_PUB.Initialize;
4055: --Get next sequence for PA_PROJECT_FUNDING//
4056: BEGIN
4057: Select
4058: PA_PROJECT_FUNDINGS_S.NEXTVAL

Line 4251: FND_MSG_PUB.add_exc_msg

4247: RETCODE := X_Err_Code;
4248: ERRBUF := X_Err_Stage;
4249: WHEN OTHERS THEN
4250: RETCODE := 'U';
4251: FND_MSG_PUB.add_exc_msg
4252: ( p_pkg_name => G_PKG_NAME
4253: ,p_procedure_name => l_api_name
4254: ,p_error_text => substrb(SQLERRM||' at stage='||g_stage||' ',1,240)
4255: );

Line 4256: FND_MSG_PUB.Count_And_Get

4252: ( p_pkg_name => G_PKG_NAME
4253: ,p_procedure_name => l_api_name
4254: ,p_error_text => substrb(SQLERRM||' at stage='||g_stage||' ',1,240)
4255: );
4256: FND_MSG_PUB.Count_And_Get
4257: ( p_count => p_msg_count,
4258: p_data => X_Err_Stage);
4259: ERRBUF := SQLERRM||' at stage='||g_stage||' '||X_Err_Stage;
4260:

Line 4409: FND_MSG_PUB.add_exc_msg

4405:
4406: -- Added when others exception for Bug:2662848
4407: WHEN OTHERS THEN
4408: RETCODE := 'U';
4409: FND_MSG_PUB.add_exc_msg
4410: ( p_pkg_name => G_PKG_NAME
4411: ,p_procedure_name => l_api_name
4412: ,p_error_text => substrb(SQLERRM||' at stage='||g_stage||' ',1,240)
4413: );

Line 4414: FND_MSG_PUB.Count_And_Get

4410: ( p_pkg_name => G_PKG_NAME
4411: ,p_procedure_name => l_api_name
4412: ,p_error_text => substrb(SQLERRM||' at stage='||g_stage||' ',1,240)
4413: );
4414: FND_MSG_PUB.Count_And_Get
4415: ( p_count => p_msg_count,
4416: p_data => X_Err_Stage);
4417: ERRBUF := SQLERRM||' at stage='||g_stage||' '||X_Err_Stage;
4418: END UPDATE_AWARD_FUNDING;

Line 4636: FND_MSG_PUB.add_exc_msg

4632: RETCODE := X_Err_Code;
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,

Line 4639: FND_MSG_PUB.Count_And_Get

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);
4642: ERRBUF := 'At stage='||g_stage||' '||X_Err_Stage;
4643: