47: -- Value based parameters should be converted to their equivalent ids.
48: -- Each value should resolve into one and only one id.
49: -- If this condition is not satisfied, API must report an error and assign l_any_errors to TRUE.
50: -- Example: Process Lead Source/Lead Source Code
51: -- If(p_opp_rec.lead_source_code is NOT NULL and p_opp_rec.lead_source_code <> FND_API.G_MISS_CHAR)
52: -- THEN
53: -- p_pvt_opp_rec.lead_source_code := p_opp_rec.lead_source_code;
54: -- IF(p_opp_rec.lead_source is NOT NULL and p_opp_rec.lead_source <> FND_API.G_MISS_CHAR)
55: -- THEN
50: -- Example: Process Lead Source/Lead Source Code
51: -- If(p_opp_rec.lead_source_code is NOT NULL and p_opp_rec.lead_source_code <> FND_API.G_MISS_CHAR)
52: -- THEN
53: -- p_pvt_opp_rec.lead_source_code := p_opp_rec.lead_source_code;
54: -- IF(p_opp_rec.lead_source is NOT NULL and p_opp_rec.lead_source <> FND_API.G_MISS_CHAR)
55: -- THEN
56: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)
57: -- THEN
58: -- FND_MESSAGE.Set_Name('AS','API_ATTRIBUTE_IGNORED');
59: -- FND_MESSAGE.Set_Token('COLUMN','LEAD_SOURCE',FALSE);
60: -- FND_MSG_PUB.Add;
61: -- END IF;
62: -- END IF;
63: -- ELSIF(p_opp_rec.lead_source is NOT NULL and p_opp_rec.lead_source <> FND_API.G_MISS_CHAR)
64: -- THEN
65: -- OPEN C_Get_Lookup_Code('LEAD_SOURCE', p_opp_rec.lead_source);
66: -- FETCH C_Get_Lookup_Code INTO l_val;
67: -- CLOSE C_Get_Lookup_Code;
125:
126: -- If there is an error in conversion precessing, raise an error.
127: IF l_any_errors
128: THEN
129: raise FND_API.G_EXC_ERROR;
130: END IF;
131:
132: END Convert_PLL_Values_To_Ids;
133: PROCEDURE Create_packlist_lines(
131:
132: END Convert_PLL_Values_To_Ids;
133: PROCEDURE Create_packlist_lines(
134: P_Api_Version_Number IN NUMBER,
135: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
136: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
137: P_PLL_Rec IN PLL_Rec_Type := G_MISS_PLL_REC,
138: --Hint: Add detail tables as parameter lists if it's master-detail relationship.
139: X_PACKLIST_LINE_ID OUT NOCOPY NUMBER,
132: END Convert_PLL_Values_To_Ids;
133: PROCEDURE Create_packlist_lines(
134: P_Api_Version_Number IN NUMBER,
135: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
136: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
137: P_PLL_Rec IN PLL_Rec_Type := G_MISS_PLL_REC,
138: --Hint: Add detail tables as parameter lists if it's master-detail relationship.
139: X_PACKLIST_LINE_ID OUT NOCOPY NUMBER,
140: X_Return_Status OUT NOCOPY VARCHAR2,
150: -- Standard Start of API savepoint
151: SAVEPOINT CREATE_PACKLIST_LINES_PUB;
152:
153: -- Standard call to check for call compatibility.
154: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
155: p_api_version_number,
156: l_api_name,
157: G_PKG_NAME)
158: THEN
155: p_api_version_number,
156: l_api_name,
157: G_PKG_NAME)
158: THEN
159: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
160: END IF;
161:
162:
163: -- Initialize message list if p_init_msg_list is set to TRUE.
160: END IF;
161:
162:
163: -- Initialize message list if p_init_msg_list is set to TRUE.
164: IF FND_API.to_Boolean( p_init_msg_list )
165: THEN
166: FND_MSG_PUB.initialize;
167: END IF;
168:
171: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Public API: ' || l_api_name || 'start');
172:
173:
174: -- Initialize API return status to SUCCESS
175: x_return_status := FND_API.G_RET_STS_SUCCESS;
176:
177: --
178: -- API body
179: --
191: -- Calling Private package: Create_PACKLIST_LINES
192: -- Hint: Primary key needs to be returned
193: CSP_packlist_lines_PVT.Create_packlist_lines(
194: P_Api_Version_Number => 2.0,
195: P_Init_Msg_List => FND_API.G_FALSE,
196: P_Commit => FND_API.G_FALSE,
197: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
198: P_PLL_Rec => l_pvt_PLL_Rec ,
199: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
192: -- Hint: Primary key needs to be returned
193: CSP_packlist_lines_PVT.Create_packlist_lines(
194: P_Api_Version_Number => 2.0,
195: P_Init_Msg_List => FND_API.G_FALSE,
196: P_Commit => FND_API.G_FALSE,
197: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
198: P_PLL_Rec => l_pvt_PLL_Rec ,
199: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
200: X_PACKLIST_LINE_ID => x_PACKLIST_LINE_ID,
193: CSP_packlist_lines_PVT.Create_packlist_lines(
194: P_Api_Version_Number => 2.0,
195: P_Init_Msg_List => FND_API.G_FALSE,
196: P_Commit => FND_API.G_FALSE,
197: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
198: P_PLL_Rec => l_pvt_PLL_Rec ,
199: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
200: X_PACKLIST_LINE_ID => x_PACKLIST_LINE_ID,
201: X_Return_Status => x_return_status,
204:
205:
206:
207: -- Check return status from the above procedure call
208: IF x_return_status = FND_API.G_RET_STS_ERROR then
209: raise FND_API.G_EXC_ERROR;
210: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
211: raise FND_API.G_EXC_UNEXPECTED_ERROR;
212: END IF;
205:
206:
207: -- Check return status from the above procedure call
208: IF x_return_status = FND_API.G_RET_STS_ERROR then
209: raise FND_API.G_EXC_ERROR;
210: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
211: raise FND_API.G_EXC_UNEXPECTED_ERROR;
212: END IF;
213:
206:
207: -- Check return status from the above procedure call
208: IF x_return_status = FND_API.G_RET_STS_ERROR then
209: raise FND_API.G_EXC_ERROR;
210: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
211: raise FND_API.G_EXC_UNEXPECTED_ERROR;
212: END IF;
213:
214: --
207: -- Check return status from the above procedure call
208: IF x_return_status = FND_API.G_RET_STS_ERROR then
209: raise FND_API.G_EXC_ERROR;
210: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
211: raise FND_API.G_EXC_UNEXPECTED_ERROR;
212: END IF;
213:
214: --
215: -- End of API body.
215: -- End of API body.
216: --
217:
218: -- Standard check for p_commit
219: IF FND_API.to_Boolean( p_commit )
220: THEN
221: COMMIT WORK;
222: END IF;
223:
232: p_data => x_msg_data
233: );
234:
235: EXCEPTION
236: WHEN FND_API.G_EXC_ERROR THEN
237: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
238: P_API_NAME => L_API_NAME
239: ,P_PKG_NAME => G_PKG_NAME
240: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
242: ,X_MSG_COUNT => X_MSG_COUNT
243: ,X_MSG_DATA => X_MSG_DATA
244: ,X_RETURN_STATUS => X_RETURN_STATUS);
245:
246: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
247: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
248: P_API_NAME => L_API_NAME
249: ,P_PKG_NAME => G_PKG_NAME
250: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
267:
268: -- Hint: Add corresponding update detail table procedures if it's master-detail relationship.
269: PROCEDURE Update_packlist_lines(
270: P_Api_Version_Number IN NUMBER,
271: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
272: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
273: P_Identity_Salesforce_Id IN NUMBER := NULL,
274: P_PLL_Rec IN PLL_Rec_Type,
275: X_Return_Status OUT NOCOPY VARCHAR2,
268: -- Hint: Add corresponding update detail table procedures if it's master-detail relationship.
269: PROCEDURE Update_packlist_lines(
270: P_Api_Version_Number IN NUMBER,
271: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
272: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
273: P_Identity_Salesforce_Id IN NUMBER := NULL,
274: P_PLL_Rec IN PLL_Rec_Type,
275: X_Return_Status OUT NOCOPY VARCHAR2,
276: X_Msg_Count OUT NOCOPY NUMBER,
285: -- Standard Start of API savepoint
286: SAVEPOINT UPDATE_PACKLIST_LINES_PUB;
287:
288: -- Standard call to check for call compatibility.
289: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
290: p_api_version_number,
291: l_api_name,
292: G_PKG_NAME)
293: THEN
290: p_api_version_number,
291: l_api_name,
292: G_PKG_NAME)
293: THEN
294: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
295: END IF;
296:
297:
298: -- Initialize message list if p_init_msg_list is set to TRUE.
295: END IF;
296:
297:
298: -- Initialize message list if p_init_msg_list is set to TRUE.
299: IF FND_API.to_Boolean( p_init_msg_list )
300: THEN
301: FND_MSG_PUB.initialize;
302: END IF;
303:
306: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Public API: ' || l_api_name || 'start');
307:
308:
309: -- Initialize API return status to SUCCESS
310: x_return_status := FND_API.G_RET_STS_SUCCESS;
311:
312: --
313: -- API body
314: --
324: );
325:
326: CSP_packlist_lines_PVT.Update_packlist_lines(
327: P_Api_Version_Number => 2.0,
328: P_Init_Msg_List => FND_API.G_FALSE,
329: P_Commit => p_commit,
330: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
331: P_Identity_Salesforce_Id => p_identity_salesforce_id,
332: P_PLL_Rec => l_pvt_PLL_Rec ,
326: CSP_packlist_lines_PVT.Update_packlist_lines(
327: P_Api_Version_Number => 2.0,
328: P_Init_Msg_List => FND_API.G_FALSE,
329: P_Commit => p_commit,
330: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
331: P_Identity_Salesforce_Id => p_identity_salesforce_id,
332: P_PLL_Rec => l_pvt_PLL_Rec ,
333: X_Return_Status => x_return_status,
334: X_Msg_Count => x_msg_count,
336:
337:
338:
339: -- Check return status from the above procedure call
340: IF x_return_status = FND_API.G_RET_STS_ERROR then
341: raise FND_API.G_EXC_ERROR;
342: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
343: raise FND_API.G_EXC_UNEXPECTED_ERROR;
344: END IF;
337:
338:
339: -- Check return status from the above procedure call
340: IF x_return_status = FND_API.G_RET_STS_ERROR then
341: raise FND_API.G_EXC_ERROR;
342: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
343: raise FND_API.G_EXC_UNEXPECTED_ERROR;
344: END IF;
345:
338:
339: -- Check return status from the above procedure call
340: IF x_return_status = FND_API.G_RET_STS_ERROR then
341: raise FND_API.G_EXC_ERROR;
342: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
343: raise FND_API.G_EXC_UNEXPECTED_ERROR;
344: END IF;
345:
346: --
339: -- Check return status from the above procedure call
340: IF x_return_status = FND_API.G_RET_STS_ERROR then
341: raise FND_API.G_EXC_ERROR;
342: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
343: raise FND_API.G_EXC_UNEXPECTED_ERROR;
344: END IF;
345:
346: --
347: -- End of API body
347: -- End of API body
348: --
349:
350: -- Standard check for p_commit
351: IF FND_API.to_Boolean( p_commit )
352: THEN
353: COMMIT WORK;
354: END IF;
355:
364: p_data => x_msg_data
365: );
366:
367: EXCEPTION
368: WHEN FND_API.G_EXC_ERROR THEN
369: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
370: P_API_NAME => L_API_NAME
371: ,P_PKG_NAME => G_PKG_NAME
372: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
374: ,X_MSG_COUNT => X_MSG_COUNT
375: ,X_MSG_DATA => X_MSG_DATA
376: ,X_RETURN_STATUS => X_RETURN_STATUS);
377:
378: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
379: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
380: P_API_NAME => L_API_NAME
381: ,P_PKG_NAME => G_PKG_NAME
382: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
400: -- Hint: Add corresponding delete detail table procedures if it's master-detail relationship.
401: -- The Master delete procedure may not be needed depends on different business requirements.
402: PROCEDURE Delete_packlist_lines(
403: P_Api_Version_Number IN NUMBER,
404: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
405: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
406: P_identity_salesforce_id IN NUMBER := NULL,
407: P_PLL_Rec IN PLL_Rec_Type,
408: X_Return_Status OUT NOCOPY VARCHAR2,
401: -- The Master delete procedure may not be needed depends on different business requirements.
402: PROCEDURE Delete_packlist_lines(
403: P_Api_Version_Number IN NUMBER,
404: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
405: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
406: P_identity_salesforce_id IN NUMBER := NULL,
407: P_PLL_Rec IN PLL_Rec_Type,
408: X_Return_Status OUT NOCOPY VARCHAR2,
409: X_Msg_Count OUT NOCOPY NUMBER,
418: -- Standard Start of API savepoint
419: SAVEPOINT DELETE_PACKLIST_LINES_PUB;
420:
421: -- Standard call to check for call compatibility.
422: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
423: p_api_version_number,
424: l_api_name,
425: G_PKG_NAME)
426: THEN
423: p_api_version_number,
424: l_api_name,
425: G_PKG_NAME)
426: THEN
427: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
428: END IF;
429:
430:
431: -- Initialize message list if p_init_msg_list is set to TRUE.
428: END IF;
429:
430:
431: -- Initialize message list if p_init_msg_list is set to TRUE.
432: IF FND_API.to_Boolean( p_init_msg_list )
433: THEN
434: FND_MSG_PUB.initialize;
435: END IF;
436:
439: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Public API: ' || l_api_name || 'start');
440:
441:
442: -- Initialize API return status to SUCCESS
443: x_return_status := FND_API.G_RET_STS_SUCCESS;
444:
445: --
446: -- API body
447: --
457: );
458:
459: CSP_packlist_lines_PVT.Delete_packlist_lines(
460: P_Api_Version_Number => 2.0,
461: P_Init_Msg_List => FND_API.G_FALSE,
462: P_Commit => p_commit,
463: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
464: P_Identity_Salesforce_Id => p_identity_salesforce_id,
465: P_PLL_Rec => l_pvt_PLL_Rec,
459: CSP_packlist_lines_PVT.Delete_packlist_lines(
460: P_Api_Version_Number => 2.0,
461: P_Init_Msg_List => FND_API.G_FALSE,
462: P_Commit => p_commit,
463: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
464: P_Identity_Salesforce_Id => p_identity_salesforce_id,
465: P_PLL_Rec => l_pvt_PLL_Rec,
466: X_Return_Status => x_return_status,
467: X_Msg_Count => x_msg_count,
469:
470:
471:
472: -- Check return status from the above procedure call
473: IF x_return_status = FND_API.G_RET_STS_ERROR then
474: raise FND_API.G_EXC_ERROR;
475: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
476: raise FND_API.G_EXC_UNEXPECTED_ERROR;
477: END IF;
470:
471:
472: -- Check return status from the above procedure call
473: IF x_return_status = FND_API.G_RET_STS_ERROR then
474: raise FND_API.G_EXC_ERROR;
475: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
476: raise FND_API.G_EXC_UNEXPECTED_ERROR;
477: END IF;
478:
471:
472: -- Check return status from the above procedure call
473: IF x_return_status = FND_API.G_RET_STS_ERROR then
474: raise FND_API.G_EXC_ERROR;
475: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
476: raise FND_API.G_EXC_UNEXPECTED_ERROR;
477: END IF;
478:
479: --
472: -- Check return status from the above procedure call
473: IF x_return_status = FND_API.G_RET_STS_ERROR then
474: raise FND_API.G_EXC_ERROR;
475: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
476: raise FND_API.G_EXC_UNEXPECTED_ERROR;
477: END IF;
478:
479: --
480: -- End of API body
480: -- End of API body
481: --
482:
483: -- Standard check for p_commit
484: IF FND_API.to_Boolean( p_commit )
485: THEN
486: COMMIT WORK;
487: END IF;
488:
497: p_data => x_msg_data
498: );
499:
500: EXCEPTION
501: WHEN FND_API.G_EXC_ERROR THEN
502: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
503: P_API_NAME => L_API_NAME
504: ,P_PKG_NAME => G_PKG_NAME
505: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
507: ,X_MSG_COUNT => X_MSG_COUNT
508: ,X_MSG_DATA => X_MSG_DATA
509: ,X_RETURN_STATUS => X_RETURN_STATUS);
510:
511: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
512: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
513: P_API_NAME => L_API_NAME
514: ,P_PKG_NAME => G_PKG_NAME
515: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
531:
532:
533: PROCEDURE Get_packlist_lines(
534: P_Api_Version_Number IN NUMBER,
535: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
536: P_identity_salesforce_id IN NUMBER := NULL,
537: P_PLL_Rec IN CSP_packlist_lines_PUB.PLL_Rec_Type,
538: -- Hint: Add list of bind variables here
539: p_rec_requested IN NUMBER := G_DEFAULT_NUM_REC_FETCH,
537: P_PLL_Rec IN CSP_packlist_lines_PUB.PLL_Rec_Type,
538: -- Hint: Add list of bind variables here
539: p_rec_requested IN NUMBER := G_DEFAULT_NUM_REC_FETCH,
540: p_start_rec_prt IN NUMBER := 1,
541: p_return_tot_count IN NUMBER := FND_API.G_FALSE,
542: -- Hint: user defined record type
543: p_order_by_rec IN CSP_packlist_lines_PUB.PLL_sort_rec_type,
544: x_return_status OUT NOCOPY VARCHAR2,
545: x_msg_count OUT NOCOPY NUMBER,
559: -- Standard Start of API savepoint
560: SAVEPOINT GET_PACKLIST_LINES_PUB;
561:
562: -- Standard call to check for call compatibility.
563: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
564: p_api_version_number,
565: l_api_name,
566: G_PKG_NAME)
567: THEN
564: p_api_version_number,
565: l_api_name,
566: G_PKG_NAME)
567: THEN
568: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
569: END IF;
570:
571:
572: -- Initialize message list if p_init_msg_list is set to TRUE.
569: END IF;
570:
571:
572: -- Initialize message list if p_init_msg_list is set to TRUE.
573: IF FND_API.to_Boolean( p_init_msg_list )
574: THEN
575: FND_MSG_PUB.initialize;
576: END IF;
577:
580: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Public API: ' || l_api_name || 'start');
581:
582:
583: -- Initialize API return status to SUCCESS
584: x_return_status := FND_API.G_RET_STS_SUCCESS;
585:
586: --
587: -- API body
588: --
590: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'CSP', 'Public API: - Calling PVT.Get_PACKLIST_LINES');
591: /*
592: CSP_packlist_lines_PVT.Get_packlist_lines(
593: P_Api_Version_Number => 2.0,
594: P_Init_Msg_List => FND_API.G_FALSE,
595: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
596: P_Identity_Salesforce_id => p_identity_salesforce_id,
597: P_PLL_Rec => P_PLL_Rec,
598: p_rec_requested => p_rec_requested,
591: /*
592: CSP_packlist_lines_PVT.Get_packlist_lines(
593: P_Api_Version_Number => 2.0,
594: P_Init_Msg_List => FND_API.G_FALSE,
595: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
596: P_Identity_Salesforce_id => p_identity_salesforce_id,
597: P_PLL_Rec => P_PLL_Rec,
598: p_rec_requested => p_rec_requested,
599: p_start_rec_prt => p_start_rec_prt,
613:
614:
615:
616: -- Check return status from the above procedure call
617: IF x_return_status = FND_API.G_RET_STS_ERROR then
618: raise FND_API.G_EXC_ERROR;
619: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
620: raise FND_API.G_EXC_UNEXPECTED_ERROR;
621: END IF;
614:
615:
616: -- Check return status from the above procedure call
617: IF x_return_status = FND_API.G_RET_STS_ERROR then
618: raise FND_API.G_EXC_ERROR;
619: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
620: raise FND_API.G_EXC_UNEXPECTED_ERROR;
621: END IF;
622: */
615:
616: -- Check return status from the above procedure call
617: IF x_return_status = FND_API.G_RET_STS_ERROR then
618: raise FND_API.G_EXC_ERROR;
619: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
620: raise FND_API.G_EXC_UNEXPECTED_ERROR;
621: END IF;
622: */
623: --
616: -- Check return status from the above procedure call
617: IF x_return_status = FND_API.G_RET_STS_ERROR then
618: raise FND_API.G_EXC_ERROR;
619: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
620: raise FND_API.G_EXC_UNEXPECTED_ERROR;
621: END IF;
622: */
623: --
624: -- End of API body
634: p_data => x_msg_data
635: );
636:
637: EXCEPTION
638: WHEN FND_API.G_EXC_ERROR THEN
639: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
640: P_API_NAME => L_API_NAME
641: ,P_PKG_NAME => G_PKG_NAME
642: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
644: ,X_MSG_COUNT => X_MSG_COUNT
645: ,X_MSG_DATA => X_MSG_DATA
646: ,X_RETURN_STATUS => X_RETURN_STATUS);
647:
648: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
649: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
650: P_API_NAME => L_API_NAME
651: ,P_PKG_NAME => G_PKG_NAME
652: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR