DBA Data[Home] [Help]

APPS.ASO_PROJ_COMM_PVT dependencies on FND_API

Line 15: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

11: G_PKG_NAME CONSTANT VARCHAR2(30) := 'ASO_PROJ_COMM_PVT';
12:
13:
14: PROCEDURE Calculate_Proj_Commission (
15: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
16: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
17: P_Qte_Header_Rec IN ASO_QUOTE_PUB.Qte_Header_Rec_Type,
18: P_Resource_Id IN NUMBER := FND_API.G_MISS_NUM,
19: X_Last_Update_Date OUT NOCOPY /* file.sql.39 change */ DATE,

Line 16: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

12:
13:
14: PROCEDURE Calculate_Proj_Commission (
15: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
16: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
17: P_Qte_Header_Rec IN ASO_QUOTE_PUB.Qte_Header_Rec_Type,
18: P_Resource_Id IN NUMBER := FND_API.G_MISS_NUM,
19: X_Last_Update_Date OUT NOCOPY /* file.sql.39 change */ DATE,
20: X_Object_Version_Number OUT NOCOPY /* file.sql.39 change */ VARCHAR2,

Line 18: P_Resource_Id IN NUMBER := FND_API.G_MISS_NUM,

14: PROCEDURE Calculate_Proj_Commission (
15: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
16: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
17: P_Qte_Header_Rec IN ASO_QUOTE_PUB.Qte_Header_Rec_Type,
18: P_Resource_Id IN NUMBER := FND_API.G_MISS_NUM,
19: X_Last_Update_Date OUT NOCOPY /* file.sql.39 change */ DATE,
20: X_Object_Version_Number OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
21: X_Return_Status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
22: X_Msg_Count OUT NOCOPY /* file.sql.39 change */ NUMBER,

Line 75: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

71: -- Standard Start of API savepoint
72: SAVEPOINT CALCULATE_PROJ_COMMISSION_PVT;
73:
74: -- Standard call to check for call compatibility.
75: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
76: 1.0,
77: l_api_name,
78: G_PKG_NAME)
79: THEN

Line 80: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

76: 1.0,
77: l_api_name,
78: G_PKG_NAME)
79: THEN
80: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
81: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
82: END IF;
83:
84: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 81: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

77: l_api_name,
78: G_PKG_NAME)
79: THEN
80: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
81: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
82: END IF;
83:
84: -- Initialize message list if p_init_msg_list is set to TRUE.
85: IF FND_API.to_Boolean( p_init_msg_list )

Line 85: IF FND_API.to_Boolean( p_init_msg_list )

81: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
82: END IF;
83:
84: -- Initialize message list if p_init_msg_list is set to TRUE.
85: IF FND_API.to_Boolean( p_init_msg_list )
86: THEN
87: FND_MSG_PUB.initialize;
88: END IF;
89:

Line 91: x_return_status := FND_API.G_RET_STS_SUCCESS;

87: FND_MSG_PUB.initialize;
88: END IF;
89:
90: -- Initialize API return status to SUCCESS
91: x_return_status := FND_API.G_RET_STS_SUCCESS;
92:
93: --
94: -- API body
95: --

Line 109: x_return_status := FND_API.G_RET_STS_ERROR;

105: END IF;
106: -- Basic Validations
107: -- Check If ASO:Calculate Projected Commmission is set
108: IF l_proj_comm_prof <> 'Y' THEN
109: x_return_status := FND_API.G_RET_STS_ERROR;
110: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
111: FND_MESSAGE.Set_Name('ASO', 'ASO_PROJ_COMM_NOT_SET');
112: FND_MSG_PUB.ADD;
113: END IF;

Line 114: RAISE FND_API.G_EXC_ERROR;

110: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
111: FND_MESSAGE.Set_Name('ASO', 'ASO_PROJ_COMM_NOT_SET');
112: FND_MSG_PUB.ADD;
113: END IF;
114: RAISE FND_API.G_EXC_ERROR;
115: END IF;
116:
117: OPEN C_Get_Header_Info(P_Qte_Header_Rec.Quote_Header_Id);
118: FETCH C_Get_Header_Info INTO C_Header_Info;

Line 123: C_Header_Info.last_update_date = FND_API.G_MISS_DATE) THEN

119:
120: -- Check Whether record has been changed
121: IF (C_Get_Header_Info%NOTFOUND) OR
122: (C_Header_Info.last_update_date IS NULL OR
123: C_Header_Info.last_update_date = FND_API.G_MISS_DATE) THEN
124: x_return_status := FND_API.G_RET_STS_ERROR;
125: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
126: FND_MESSAGE.Set_Name('ASO', 'ASO_API_MISSING_COLUMN');
127: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);

Line 124: x_return_status := FND_API.G_RET_STS_ERROR;

120: -- Check Whether record has been changed
121: IF (C_Get_Header_Info%NOTFOUND) OR
122: (C_Header_Info.last_update_date IS NULL OR
123: C_Header_Info.last_update_date = FND_API.G_MISS_DATE) THEN
124: x_return_status := FND_API.G_RET_STS_ERROR;
125: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
126: FND_MESSAGE.Set_Name('ASO', 'ASO_API_MISSING_COLUMN');
127: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
128: FND_MSG_PUB.ADD;

Line 131: RAISE FND_API.G_EXC_ERROR;

127: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
128: FND_MSG_PUB.ADD;
129: END IF;
130: CLOSE C_Get_Header_Info;
131: RAISE FND_API.G_EXC_ERROR;
132: END IF;
133:
134: CLOSE C_Get_Header_Info;
135:

Line 137: p_qte_header_rec.last_update_date <> FND_API.G_MISS_DATE) AND

133:
134: CLOSE C_Get_Header_Info;
135:
136: IF (p_qte_header_rec.last_update_date IS NOT NULL AND
137: p_qte_header_rec.last_update_date <> FND_API.G_MISS_DATE) AND
138: (C_Header_Info.last_update_date <> p_qte_header_rec.last_update_date) THEN
139: x_return_status := FND_API.G_RET_STS_ERROR;
140: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
141: FND_MESSAGE.Set_Name('ASO', 'ASO_API_RECORD_CHANGED');

Line 139: x_return_status := FND_API.G_RET_STS_ERROR;

135:
136: IF (p_qte_header_rec.last_update_date IS NOT NULL AND
137: p_qte_header_rec.last_update_date <> FND_API.G_MISS_DATE) AND
138: (C_Header_Info.last_update_date <> p_qte_header_rec.last_update_date) THEN
139: x_return_status := FND_API.G_RET_STS_ERROR;
140: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
141: FND_MESSAGE.Set_Name('ASO', 'ASO_API_RECORD_CHANGED');
142: FND_MESSAGE.Set_Token('INFO', 'quote', FALSE);
143: FND_MSG_PUB.ADD;

Line 145: RAISE FND_API.G_EXC_ERROR;

141: FND_MESSAGE.Set_Name('ASO', 'ASO_API_RECORD_CHANGED');
142: FND_MESSAGE.Set_Token('INFO', 'quote', FALSE);
143: FND_MSG_PUB.ADD;
144: END IF;
145: RAISE FND_API.G_EXC_ERROR;
146: END IF;
147:
148: -- Check if a concurrent lock exists
149: ASO_CONC_REQ_INT.Lock_Exists(

Line 153: IF (lx_return_status = FND_API.G_TRUE) THEN

149: ASO_CONC_REQ_INT.Lock_Exists(
150: p_quote_header_id => p_qte_header_rec.quote_header_id,
151: x_status => lx_return_status);
152:
153: IF (lx_return_status = FND_API.G_TRUE) THEN
154: x_return_status := FND_API.G_RET_STS_ERROR;
155: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
156: FND_MESSAGE.Set_Name('ASO', 'ASO_CONC_REQUEST_RUNNING');
157: FND_MSG_PUB.ADD;

Line 154: x_return_status := FND_API.G_RET_STS_ERROR;

150: p_quote_header_id => p_qte_header_rec.quote_header_id,
151: x_status => lx_return_status);
152:
153: IF (lx_return_status = FND_API.G_TRUE) THEN
154: x_return_status := FND_API.G_RET_STS_ERROR;
155: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
156: FND_MESSAGE.Set_Name('ASO', 'ASO_CONC_REQUEST_RUNNING');
157: FND_MSG_PUB.ADD;
158: END IF;

Line 159: RAISE FND_API.G_EXC_ERROR;

155: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
156: FND_MESSAGE.Set_Name('ASO', 'ASO_CONC_REQUEST_RUNNING');
157: FND_MSG_PUB.ADD;
158: END IF;
159: RAISE FND_API.G_EXC_ERROR;
160: END IF;
161:
162: -- Check if ASO:Automatic Sales Assign and ASO:Auto Sales Credit Alloc are set
163: IF (l_auto_sales_team_prof <> 'FULL' AND l_auto_sales_team_prof <> 'PARTIAL') OR

Line 165: x_return_status := FND_API.G_RET_STS_ERROR;

161:
162: -- Check if ASO:Automatic Sales Assign and ASO:Auto Sales Credit Alloc are set
163: IF (l_auto_sales_team_prof <> 'FULL' AND l_auto_sales_team_prof <> 'PARTIAL') OR
164: (l_auto_sales_cred_prof <> 'FULL' AND l_auto_sales_cred_prof <> 'PARTIAL') THEN
165: x_return_status := FND_API.G_RET_STS_ERROR;
166: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
167: FND_MESSAGE.Set_Name('ASO', 'ASO_TEAM_CRED_PROF_NOT_SET');
168: FND_MSG_PUB.ADD;
169: END IF;

Line 170: RAISE FND_API.G_EXC_ERROR;

166: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
167: FND_MESSAGE.Set_Name('ASO', 'ASO_TEAM_CRED_PROF_NOT_SET');
168: FND_MSG_PUB.ADD;
169: END IF;
170: RAISE FND_API.G_EXC_ERROR;
171: END IF;
172:
173: -- Check if Resource_Id is passed
174: IF P_Resource_Id IS NULL OR P_Resource_Id = FND_API.G_MISS_NUM THEN

Line 174: IF P_Resource_Id IS NULL OR P_Resource_Id = FND_API.G_MISS_NUM THEN

170: RAISE FND_API.G_EXC_ERROR;
171: END IF;
172:
173: -- Check if Resource_Id is passed
174: IF P_Resource_Id IS NULL OR P_Resource_Id = FND_API.G_MISS_NUM THEN
175: x_return_status := FND_API.G_RET_STS_ERROR;
176: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
177: FND_MESSAGE.Set_Name('ASO', 'ASO_NULL_RESOURCE');
178: FND_MSG_PUB.ADD;

Line 175: x_return_status := FND_API.G_RET_STS_ERROR;

171: END IF;
172:
173: -- Check if Resource_Id is passed
174: IF P_Resource_Id IS NULL OR P_Resource_Id = FND_API.G_MISS_NUM THEN
175: x_return_status := FND_API.G_RET_STS_ERROR;
176: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
177: FND_MESSAGE.Set_Name('ASO', 'ASO_NULL_RESOURCE');
178: FND_MSG_PUB.ADD;
179: END IF;

Line 180: RAISE FND_API.G_EXC_ERROR;

176: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
177: FND_MESSAGE.Set_Name('ASO', 'ASO_NULL_RESOURCE');
178: FND_MSG_PUB.ADD;
179: END IF;
180: RAISE FND_API.G_EXC_ERROR;
181: END IF;
182:
183: -- Check if Resource_Id is in the Sales Team
184: OPEN C_Check_Res_Team (P_Resource_Id, C_Header_Info.Quote_Number);

Line 195: x_return_status := FND_API.G_RET_STS_ERROR;

191: aso_debug_pub.add('Calc_Proj_Comm: l_found: '||l_found,1,'N');
192: END IF;
193:
194: IF l_found IS NULL OR l_found <> 'Y' THEN
195: x_return_status := FND_API.G_RET_STS_ERROR;
196: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
197: FND_MESSAGE.Set_Name('ASO', 'ASO_INV_RESOURCE');
198: FND_MSG_PUB.ADD;
199: END IF;

Line 200: RAISE FND_API.G_EXC_ERROR;

196: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
197: FND_MESSAGE.Set_Name('ASO', 'ASO_INV_RESOURCE');
198: FND_MSG_PUB.ADD;
199: END IF;
200: RAISE FND_API.G_EXC_ERROR;
201: END IF;
202:
203: -- Check if Quote has expired
204: /* Removing the validation for fixing bug 5734955 - PKOKA

Line 207: x_return_status := FND_API.G_RET_STS_ERROR;

203: -- Check if Quote has expired
204: /* Removing the validation for fixing bug 5734955 - PKOKA
205: IF C_Header_Info.Quote_Expiration_Date IS NOT NULL AND
206: (trunc(SYSDATE) > trunc(C_Header_Info.Quote_Expiration_Date)) THEN
207: x_return_status := FND_API.G_RET_STS_ERROR;
208: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
209: FND_MESSAGE.Set_Name('ASO', 'ASO_QUOTE_EXPIRED');
210: FND_MSG_PUB.ADD;
211: END IF;

Line 212: RAISE FND_API.G_EXC_ERROR;

208: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
209: FND_MESSAGE.Set_Name('ASO', 'ASO_QUOTE_EXPIRED');
210: FND_MSG_PUB.ADD;
211: END IF;
212: RAISE FND_API.G_EXC_ERROR;
213: END IF;
214: */
215:
216: -- Check if Quote is ordered

Line 229: x_return_status := FND_API.G_RET_STS_ERROR;

225: aso_debug_pub.add('Calc_Proj_Comm: C_Header_Info.Quote_Status_Id: '||C_Header_Info.Quote_Status_Id,1,'N');
226: aso_debug_pub.add('Calc_Proj_Comm: l_ordered: '||l_ordered,1,'N');
227: END IF;
228: IF l_ordered IS NOT NULL AND l_ordered = 'Y' THEN
229: x_return_status := FND_API.G_RET_STS_ERROR;
230: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
231: FND_MESSAGE.Set_Name('ASO', 'ASO_API_ORDERED_STATUS_TRANS');
232: FND_MSG_PUB.ADD;
233: END IF;

Line 234: RAISE FND_API.G_EXC_ERROR;

230: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
231: FND_MESSAGE.Set_Name('ASO', 'ASO_API_ORDERED_STATUS_TRANS');
232: FND_MSG_PUB.ADD;
233: END IF;
234: RAISE FND_API.G_EXC_ERROR;
235: END IF;
236:
237: -- Check if pricing status is Complete
238: IF C_Header_Info.Pricing_Status_Indicator IS NULL OR

Line 240: x_return_status := FND_API.G_RET_STS_ERROR;

236:
237: -- Check if pricing status is Complete
238: IF C_Header_Info.Pricing_Status_Indicator IS NULL OR
239: C_Header_Info.Pricing_Status_Indicator <> 'C' THEN
240: x_return_status := FND_API.G_RET_STS_ERROR;
241: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
242: FND_MESSAGE.Set_Name('ASO', 'ASO_PRICING_INCOMPLETE');
243: FND_MSG_PUB.ADD;
244: END IF;

Line 245: RAISE FND_API.G_EXC_ERROR;

241: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
242: FND_MESSAGE.Set_Name('ASO', 'ASO_PRICING_INCOMPLETE');
243: FND_MSG_PUB.ADD;
244: END IF;
245: RAISE FND_API.G_EXC_ERROR;
246: END IF;
247:
248: -- Check if credit_update_date is earlier than pricing date
249: IF C_Header_Info.Credit_Update_Date IS NULL OR

Line 260: P_Init_Msg_List => FND_API.G_FALSE,

256:
257: ASO_QUOTE_PUB.Allocate_Sales_Credits
258: (
259: P_Api_Version_Number => 1.0,
260: P_Init_Msg_List => FND_API.G_FALSE,
261: P_Commit => FND_API.G_TRUE,
262: p_Qte_Header_Rec => p_qte_header_rec,
263: x_Qte_Header_Rec => lx_qte_header_rec,
264: x_return_status => x_return_status,

Line 261: P_Commit => FND_API.G_TRUE,

257: ASO_QUOTE_PUB.Allocate_Sales_Credits
258: (
259: P_Api_Version_Number => 1.0,
260: P_Init_Msg_List => FND_API.G_FALSE,
261: P_Commit => FND_API.G_TRUE,
262: p_Qte_Header_Rec => p_qte_header_rec,
263: x_Qte_Header_Rec => lx_qte_header_rec,
264: x_return_status => x_return_status,
265: x_msg_count => x_msg_count,

Line 273: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

269: IF aso_debug_pub.g_debug_flag = 'Y' THEN
270: aso_debug_pub.add('Calc_Proj_Comm: After Allocate_Sales_Credits:x_return_status '||x_return_status,1,'N');
271: END IF;
272:
273: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
274: RAISE FND_API.G_EXC_ERROR;
275: END IF;
276: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
277: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 274: RAISE FND_API.G_EXC_ERROR;

270: aso_debug_pub.add('Calc_Proj_Comm: After Allocate_Sales_Credits:x_return_status '||x_return_status,1,'N');
271: END IF;
272:
273: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
274: RAISE FND_API.G_EXC_ERROR;
275: END IF;
276: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
277: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
278: END IF;

Line 276: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

272:
273: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
274: RAISE FND_API.G_EXC_ERROR;
275: END IF;
276: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
277: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
278: END IF;
279:
280: X_Object_Version_Number := lx_qte_header_rec.Object_Version_Number;

Line 277: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

273: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
274: RAISE FND_API.G_EXC_ERROR;
275: END IF;
276: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
277: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
278: END IF;
279:
280: X_Object_Version_Number := lx_qte_header_rec.Object_Version_Number;
281: X_Last_Update_Date := lx_qte_header_rec.Last_Update_Date;

Line 350: P_Init_Msg_List => FND_API.G_FALSE,

346: END IF;
347: -- Call CN Calculate Commission
348: CN_COMMISSION_CALC_PUB.Calculate_Commission (
349: P_Api_Version => 1.0,
350: P_Init_Msg_List => FND_API.G_FALSE,
351: P_Org_Id => C_Header_Info.Org_Id,
352: X_inc_plnr_disclaimer => lx_inc_plnr_disclaimer,
353: X_Return_Status => X_Return_Status,
354: X_Msg_Count => X_Msg_Count,

Line 361: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

357: IF aso_debug_pub.g_debug_flag = 'Y' THEN
358: aso_debug_pub.add('Calc_Proj_Comm: After Calculate_Commission: '||x_return_status,1,'N');
359: aso_utility_pvt.print_login_info();
360: END IF;
361: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
363: ELSE
364: x_return_status := FND_API.G_RET_STS_SUCCESS;
365: END IF;

Line 362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

358: aso_debug_pub.add('Calc_Proj_Comm: After Calculate_Commission: '||x_return_status,1,'N');
359: aso_utility_pvt.print_login_info();
360: END IF;
361: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
363: ELSE
364: x_return_status := FND_API.G_RET_STS_SUCCESS;
365: END IF;
366:

Line 364: x_return_status := FND_API.G_RET_STS_SUCCESS;

360: END IF;
361: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
363: ELSE
364: x_return_status := FND_API.G_RET_STS_SUCCESS;
365: END IF;
366:
367: IF aso_debug_pub.g_debug_flag = 'Y' THEN
368: aso_debug_pub.add('Calc_Proj_Comm: Before Resetting Line No ',1,'N');

Line 397: WHEN FND_API.G_EXC_ERROR THEN

393: aso_debug_pub.add('Calc_Proj_Comm: End ',1,'Y');
394: END IF;
395: EXCEPTION
396:
397: WHEN FND_API.G_EXC_ERROR THEN
398: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
399: P_API_NAME => L_API_NAME,
400: P_PKG_NAME => G_PKG_NAME,
401: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR,

Line 410: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

406: X_MSG_DATA => X_MSG_DATA,
407: X_RETURN_STATUS => X_RETURN_STATUS
408: );
409:
410: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
411: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
412: P_API_NAME => L_API_NAME,
413: P_PKG_NAME => G_PKG_NAME,
414: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR,