52: -- Standard Start of API savepoint
53: SAVEPOINT CREATE_ASSOCIATIONS_PT;
54:
55: -- Standard call to check for call compatibility.
56: IF NOT Fnd_Api.Compatible_API_Call (
57: l_api_version,
58: p_api_version,
59: l_api_name,
60: G_PKG_NAME)
58: p_api_version,
59: l_api_name,
60: G_PKG_NAME)
61: THEN
62: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
63: END IF;
64: -- Initialize message list if p_init_msg_list is set to TRUE.
65: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
66: Fnd_Msg_Pub.initialize;
61: THEN
62: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
63: END IF;
64: -- Initialize message list if p_init_msg_list is set to TRUE.
65: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
66: Fnd_Msg_Pub.initialize;
67: END IF;
68:
69: -- Initialize API return status to success
66: Fnd_Msg_Pub.initialize;
67: END IF;
68:
69: -- Initialize API return status to success
70: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
71:
72: --******************* Real Logic Start *********************
73:
74: -- Check for Duplicates
79: Fnd_Message.Set_Name('IBC', 'DUPLICATE_ASSOCIATION');
80: Fnd_Msg_Pub.ADD;
81: END IF;
82: CLOSE Check_Duplicate_CItem;
83: RAISE Fnd_Api.G_EXC_ERROR;
84: END IF;
85: CLOSE Check_Duplicate_CItem;
86:
87: -- Validate Association Type
84: END IF;
85: CLOSE Check_Duplicate_CItem;
86:
87: -- Validate Association Type
88: IF (Ibc_Validate_Pvt.isValidAssocType(p_assoc_type_code) = Fnd_Api.g_false) THEN
89: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
90: Fnd_Message.Set_Name('IBC', 'INVALID_ASSOC_TYPE_CODE');
91: Fnd_Message.Set_token('ASSOC_TYPE_CODE', p_assoc_type_code);
92: Fnd_Msg_Pub.ADD;
90: Fnd_Message.Set_Name('IBC', 'INVALID_ASSOC_TYPE_CODE');
91: Fnd_Message.Set_token('ASSOC_TYPE_CODE', p_assoc_type_code);
92: Fnd_Msg_Pub.ADD;
93: END IF;
94: RAISE Fnd_Api.G_EXC_ERROR;
95: END IF;
96:
97: -- Validate Citem Id
98: IF (Ibc_Validate_Pvt.isValidCitem(p_content_item_id) = Fnd_Api.g_false) THEN
94: RAISE Fnd_Api.G_EXC_ERROR;
95: END IF;
96:
97: -- Validate Citem Id
98: IF (Ibc_Validate_Pvt.isValidCitem(p_content_item_id) = Fnd_Api.g_false) THEN
99: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
100: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_ID');
101: Fnd_Message.Set_token('CITEM_ID', p_content_item_id);
102: Fnd_Msg_Pub.ADD;
100: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_ID');
101: Fnd_Message.Set_token('CITEM_ID', p_content_item_id);
102: Fnd_Msg_Pub.ADD;
103: END IF;
104: RAISE Fnd_Api.G_EXC_ERROR;
105: END IF;
106:
107: -- Validate Citem version id
108: IF (p_citem_version_id IS NOT NULL AND
105: END IF;
106:
107: -- Validate Citem version id
108: IF (p_citem_version_id IS NOT NULL AND
109: IBC_VALIDATE_PVT.isValidCitemVerForCitem(p_content_item_id, p_citem_version_id) = FND_API.g_false)
110: THEN
111: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
112: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_VERSION_ID');
113: Fnd_Message.Set_token('CITEM_VERSION_ID', p_citem_version_id);
112: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_VERSION_ID');
113: Fnd_Message.Set_token('CITEM_VERSION_ID', p_citem_version_id);
114: Fnd_Msg_Pub.ADD;
115: END IF;
116: RAISE Fnd_Api.G_EXC_ERROR;
117: END IF;
118:
119:
120: -- Insert into table
150: );
151:
152: --******************* Real Logic End *********************
153: -- Standard check of p_commit.
154: IF (Fnd_Api.To_Boolean(p_commit)) THEN
155: COMMIT WORK;
156: END IF;
157: -- Standard call to get message count and if count=1, get the message
158: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
157: -- Standard call to get message count and if count=1, get the message
158: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
159: p_data => x_msg_data);
160: EXCEPTION
161: WHEN Fnd_Api.G_EXC_ERROR THEN
162: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
163: x_return_status := Fnd_Api.G_RET_STS_ERROR;
164: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
165: p_data => x_msg_data);
159: p_data => x_msg_data);
160: EXCEPTION
161: WHEN Fnd_Api.G_EXC_ERROR THEN
162: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
163: x_return_status := Fnd_Api.G_RET_STS_ERROR;
164: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
165: p_data => x_msg_data);
166: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
167: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
162: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
163: x_return_status := Fnd_Api.G_RET_STS_ERROR;
164: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
165: p_data => x_msg_data);
166: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
167: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
168: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
169: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
170: p_data => x_msg_data);
164: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
165: p_data => x_msg_data);
166: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
167: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
168: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
169: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
170: p_data => x_msg_data);
171: WHEN OTHERS THEN
172: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
169: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
170: p_data => x_msg_data);
171: WHEN OTHERS THEN
172: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
173: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
174: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
175: THEN
176: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
177: END IF;
227: -- Standard Start of API savepoint
228: SAVEPOINT CREATE_ASSOCIATIONS_PT;
229:
230: -- Standard call to check for call compatibility.
231: IF NOT Fnd_Api.Compatible_API_Call (
232: l_api_version,
233: p_api_version,
234: l_api_name,
235: G_PKG_NAME)
233: p_api_version,
234: l_api_name,
235: G_PKG_NAME)
236: THEN
237: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
238: END IF;
239: -- Initialize message list if p_init_msg_list is set to TRUE.
240: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
241: Fnd_Msg_Pub.initialize;
236: THEN
237: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
238: END IF;
239: -- Initialize message list if p_init_msg_list is set to TRUE.
240: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
241: Fnd_Msg_Pub.initialize;
242: END IF;
243:
244: -- Initialize API return status to success
241: Fnd_Msg_Pub.initialize;
242: END IF;
243:
244: -- Initialize API return status to success
245: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
246:
247: --******************* Real Logic Start *********************
248:
249: -- Check if association exists
254: Fnd_Message.Set_Name('IBC', 'NO_ASSOCIATION_FOUND');
255: Fnd_Msg_Pub.ADD;
256: END IF;
257: CLOSE Check_Assoc;
258: RAISE Fnd_Api.G_EXC_ERROR;
259: END IF;
260: CLOSE Check_Assoc;
261:
262: -- Delete Entry
278: );
279:
280: --******************* Real Logic End *********************
281: -- Standard check of p_commit.
282: IF (Fnd_Api.To_Boolean(p_commit)) THEN
283: COMMIT WORK;
284: END IF;
285: -- Standard call to get message count and if count=1, get the message
286: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
285: -- Standard call to get message count and if count=1, get the message
286: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
287: p_data => x_msg_data);
288: EXCEPTION
289: WHEN Fnd_Api.G_EXC_ERROR THEN
290: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
291: x_return_status := Fnd_Api.G_RET_STS_ERROR;
292: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
293: p_data => x_msg_data);
287: p_data => x_msg_data);
288: EXCEPTION
289: WHEN Fnd_Api.G_EXC_ERROR THEN
290: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
291: x_return_status := Fnd_Api.G_RET_STS_ERROR;
292: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
293: p_data => x_msg_data);
294: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
295: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
290: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
291: x_return_status := Fnd_Api.G_RET_STS_ERROR;
292: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
293: p_data => x_msg_data);
294: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
295: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
296: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
297: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
298: p_data => x_msg_data);
292: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
293: p_data => x_msg_data);
294: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
295: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
296: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
297: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
298: p_data => x_msg_data);
299: WHEN OTHERS THEN
300: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
297: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
298: p_data => x_msg_data);
299: WHEN OTHERS THEN
300: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
301: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
302: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
303: THEN
304: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
305: END IF;
358: -- Standard Start of API savepoint
359: SAVEPOINT CREATE_ASSOCIATIONS_PT;
360:
361: -- Standard call to check for call compatibility.
362: IF NOT Fnd_Api.Compatible_API_Call (
363: l_api_version,
364: p_api_version,
365: l_api_name,
366: G_PKG_NAME)
364: p_api_version,
365: l_api_name,
366: G_PKG_NAME)
367: THEN
368: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
369: END IF;
370: -- Initialize message list if p_init_msg_list is set to TRUE.
371: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
372: Fnd_Msg_Pub.initialize;
367: THEN
368: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
369: END IF;
370: -- Initialize message list if p_init_msg_list is set to TRUE.
371: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
372: Fnd_Msg_Pub.initialize;
373: END IF;
374:
375: -- Initialize API return status to success
372: Fnd_Msg_Pub.initialize;
373: END IF;
374:
375: -- Initialize API return status to success
376: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
377:
378: --******************* Real Logic Start *********************
379:
380: -- Check if OLD association mapping exists
386: Fnd_Message.Set_Name('IBC', 'NO_ASSOCIATION_FOUND');
387: Fnd_Msg_Pub.ADD;
388: END IF;
389: CLOSE Check_Assoc;
390: RAISE Fnd_Api.G_EXC_ERROR;
391: END IF;
392: CLOSE Check_Assoc;
393:
394: IF (p_old_citem_id <> p_new_citem_id) THEN
401: Fnd_Message.Set_Name('IBC', 'DUPLICATE_ASSOCIATION');
402: Fnd_Msg_Pub.ADD;
403: END IF;
404: CLOSE Check_Assoc;
405: RAISE Fnd_Api.G_EXC_ERROR;
406: END IF;
407: CLOSE Check_Assoc;
408:
409: -- Validate Citem Id
406: END IF;
407: CLOSE Check_Assoc;
408:
409: -- Validate Citem Id
410: IF (Ibc_Validate_Pvt.isValidCitem(p_new_citem_id) = Fnd_Api.g_false) THEN
411: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
412: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_ID');
413: Fnd_Message.Set_token('CITEM_ID', p_new_citem_id);
414: Fnd_Msg_Pub.ADD;
412: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_ID');
413: Fnd_Message.Set_token('CITEM_ID', p_new_citem_id);
414: Fnd_Msg_Pub.ADD;
415: END IF;
416: RAISE Fnd_Api.G_EXC_ERROR;
417: END IF;
418: END IF;
419:
420: -- Validate Citem version id
418: END IF;
419:
420: -- Validate Citem version id
421: IF (p_new_citem_ver_id IS NOT NULL AND
422: IBC_VALIDATE_PVT.isValidCitemVerForCitem(p_new_citem_id, p_new_citem_ver_id) = FND_API.g_false)
423: THEN
424: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
425: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_VERSION_ID');
426: Fnd_Message.Set_token('CITEM_VERSION_ID', p_new_citem_ver_id);
425: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_VERSION_ID');
426: Fnd_Message.Set_token('CITEM_VERSION_ID', p_new_citem_ver_id);
427: Fnd_Msg_Pub.ADD;
428: END IF;
429: RAISE Fnd_Api.G_EXC_ERROR;
430: END IF;
431:
432: -- UPDATE row
433: Ibc_Associations_Pkg.update_row (
453: );
454:
455: --******************* Real Logic End *********************
456: -- Standard check of p_commit.
457: IF (Fnd_Api.To_Boolean(p_commit)) THEN
458: COMMIT WORK;
459: END IF;
460: -- Standard call to get message count and if count=1, get the message
461: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
460: -- Standard call to get message count and if count=1, get the message
461: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
462: p_data => x_msg_data);
463: EXCEPTION
464: WHEN Fnd_Api.G_EXC_ERROR THEN
465: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
466: x_return_status := Fnd_Api.G_RET_STS_ERROR;
467: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
468: p_data => x_msg_data);
462: p_data => x_msg_data);
463: EXCEPTION
464: WHEN Fnd_Api.G_EXC_ERROR THEN
465: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
466: x_return_status := Fnd_Api.G_RET_STS_ERROR;
467: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
468: p_data => x_msg_data);
469: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
470: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
465: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
466: x_return_status := Fnd_Api.G_RET_STS_ERROR;
467: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
468: p_data => x_msg_data);
469: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
470: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
471: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
472: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
473: p_data => x_msg_data);
467: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
468: p_data => x_msg_data);
469: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
470: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
471: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
472: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
473: p_data => x_msg_data);
474: WHEN OTHERS THEN
475: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
472: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
473: p_data => x_msg_data);
474: WHEN OTHERS THEN
475: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
476: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
477: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
478: THEN
479: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
480: END IF;
610: -- Standard Start of API savepoint
611: SAVEPOINT MOVE_ASSOCIATIONS_PT;
612:
613: -- Standard call to check for call compatibility.
614: IF NOT Fnd_Api.Compatible_API_Call (
615: l_api_version,
616: p_api_version,
617: l_api_name,
618: G_PKG_NAME)
616: p_api_version,
617: l_api_name,
618: G_PKG_NAME)
619: THEN
620: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
621: END IF;
622: -- Initialize message list if p_init_msg_list is set to TRUE.
623: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
624: Fnd_Msg_Pub.initialize;
619: THEN
620: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
621: END IF;
622: -- Initialize message list if p_init_msg_list is set to TRUE.
623: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
624: Fnd_Msg_Pub.initialize;
625: END IF;
626:
627: -- Initialize API return status to success
624: Fnd_Msg_Pub.initialize;
625: END IF;
626:
627: -- Initialize API return status to success
628: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
629:
630: --******************* Real Logic Start *********************
631:
632: l_temp_array_length := p_old_content_item_ids.COUNT;
640: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
641: Fnd_Message.Set_Name('IBC', 'IMPROPER_ARRAY');
642: Fnd_Msg_Pub.ADD;
643: END IF;
644: RAISE Fnd_Api.G_EXC_ERROR;
645: END IF;
646:
647: -- Validate Old Citem Id
648: --
658: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_ID');
659: Fnd_Message.Set_token('CITEM_ID',l_content_item_id);
660: Fnd_Msg_Pub.ADD;
661: END IF;
662: RAISE Fnd_Api.G_EXC_ERROR;
663: END IF;
664:
665: END;
666:
678: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_ID');
679: Fnd_Message.Set_token('CITEM_ID',l_content_item_id);
680: Fnd_Msg_Pub.ADD;
681: END IF;
682: RAISE Fnd_Api.G_EXC_ERROR;
683: END IF;
684:
685: END;
686:
699: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_VERSION_ID');
700: Fnd_Message.Set_token('CITEM_VERSION_ID',l_citem_version_id);
701: Fnd_Msg_Pub.ADD;
702: END IF;
703: RAISE Fnd_Api.G_EXC_ERROR;
704: END IF;
705:
706: END;
707:
719: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_VERSION_ID');
720: Fnd_Message.Set_token('CITEM_VERSION_ID',l_citem_version_id);
721: Fnd_Msg_Pub.ADD;
722: END IF;
723: RAISE Fnd_Api.G_EXC_ERROR;
724: END IF;
725:
726: END;
727:
741: Fnd_Message.Set_Name('IBC', 'INVALID_ASSOC_TYPE_CODE');
742: Fnd_Message.Set_token('ASSOC_TYPE_CODE', l_association_type_code);
743: Fnd_Msg_Pub.ADD;
744: END IF;
745: RAISE Fnd_Api.G_EXC_ERROR;
746: END IF;
747:
748: END;
749:
864:
865:
866: --******************* Real Logic End *********************
867: -- Standard check of p_commit.
868: IF (Fnd_Api.To_Boolean(p_commit)) THEN
869: COMMIT WORK;
870: END IF;
871: -- Standard call to get message count and if count=1, get the message
872: Fnd_Msg_Pub.Count_And_Get (p_count => x_msg_count,
871: -- Standard call to get message count and if count=1, get the message
872: Fnd_Msg_Pub.Count_And_Get (p_count => x_msg_count,
873: p_data => x_msg_data);
874: EXCEPTION
875: WHEN Fnd_Api.G_EXC_ERROR THEN
876: ROLLBACK TO MOVE_ASSOCIATIONS_PT;
877: x_return_status := Fnd_Api.G_RET_STS_ERROR;
878: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
879: p_data => x_msg_data);
873: p_data => x_msg_data);
874: EXCEPTION
875: WHEN Fnd_Api.G_EXC_ERROR THEN
876: ROLLBACK TO MOVE_ASSOCIATIONS_PT;
877: x_return_status := Fnd_Api.G_RET_STS_ERROR;
878: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
879: p_data => x_msg_data);
880: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
881: ROLLBACK TO MOVE_ASSOCIATIONS_PT;
876: ROLLBACK TO MOVE_ASSOCIATIONS_PT;
877: x_return_status := Fnd_Api.G_RET_STS_ERROR;
878: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
879: p_data => x_msg_data);
880: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
881: ROLLBACK TO MOVE_ASSOCIATIONS_PT;
882: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
883: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
884: p_data => x_msg_data);
878: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
879: p_data => x_msg_data);
880: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
881: ROLLBACK TO MOVE_ASSOCIATIONS_PT;
882: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
883: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
884: p_data => x_msg_data);
885: WHEN OTHERS THEN
886: ROLLBACK TO MOVE_ASSOCIATIONS_PT;
883: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
884: p_data => x_msg_data);
885: WHEN OTHERS THEN
886: ROLLBACK TO MOVE_ASSOCIATIONS_PT;
887: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
888: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
889: THEN
890: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
891: END IF;
980: -- Standard Start of API savepoint
981: SAVEPOINT CREATE_ASSOCIATIONS_PT;
982:
983: -- Standard call to check for call compatibility.
984: IF NOT Fnd_Api.Compatible_API_Call (
985: l_api_version,
986: p_api_version,
987: l_api_name,
988: G_PKG_NAME)
986: p_api_version,
987: l_api_name,
988: G_PKG_NAME)
989: THEN
990: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
991: END IF;
992: -- Initialize message list if p_init_msg_list is set to TRUE.
993: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
994: Fnd_Msg_Pub.initialize;
989: THEN
990: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
991: END IF;
992: -- Initialize message list if p_init_msg_list is set to TRUE.
993: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
994: Fnd_Msg_Pub.initialize;
995: END IF;
996:
997: -- Initialize API return status to success
994: Fnd_Msg_Pub.initialize;
995: END IF;
996:
997: -- Initialize API return status to success
998: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
999:
1000: --******************* Real Logic Start *********************
1001:
1002: l_temp_array_length := p_content_item_ids.COUNT;
1009: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
1010: Fnd_Message.Set_Name('IBC', 'IMPROPER_ARRAY');
1011: Fnd_Msg_Pub.ADD;
1012: END IF;
1013: RAISE Fnd_Api.G_EXC_ERROR;
1014: END IF;
1015:
1016: --Start:Added for Bug#10409046 Fix
1017: IF( p_citem_version_ids IS NULL AND l_temp_array_length <> 0) THEN
1059: l_assoc_object5 := p_assoc_objects5(l_count);
1060: END IF;
1061:
1062: -- Validate Citem Id
1063: IF (Ibc_Validate_Pvt.isValidCitem(l_content_item_id) = Fnd_Api.g_false) THEN
1064: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
1065: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_ID');
1066: Fnd_Message.Set_token('CITEM_ID', l_content_item_id);
1067: Fnd_Msg_Pub.ADD;
1065: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_ID');
1066: Fnd_Message.Set_token('CITEM_ID', l_content_item_id);
1067: Fnd_Msg_Pub.ADD;
1068: END IF;
1069: RAISE Fnd_Api.G_EXC_ERROR;
1070: END IF;
1071:
1072: -- Validate citem version id
1073: IF l_citem_version_id IS NOT NULL AND
1070: END IF;
1071:
1072: -- Validate citem version id
1073: IF l_citem_version_id IS NOT NULL AND
1074: IBC_VALIDATE_PVT.isValidCitemVerForCitem(l_content_item_id, l_citem_version_id) = FND_API.g_false
1075: THEN
1076: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
1077: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_VERSION_ID');
1078: Fnd_Message.Set_token('CITEM_VERSION_ID', l_citem_version_id);
1077: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_VERSION_ID');
1078: Fnd_Message.Set_token('CITEM_VERSION_ID', l_citem_version_id);
1079: Fnd_Msg_Pub.ADD;
1080: END IF;
1081: RAISE Fnd_Api.G_EXC_ERROR;
1082: END IF;
1083:
1084:
1085:
1083:
1084:
1085:
1086: -- Validate Association Type
1087: IF (Ibc_Validate_Pvt.isValidAssocType(l_assoc_type_code) = Fnd_Api.g_false) THEN
1088: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
1089: Fnd_Message.Set_Name('IBC', 'INVALID_ASSOC_TYPE_CODE');
1090: Fnd_Message.Set_token('ASSOC_TYPE_CODE', l_assoc_type_code);
1091: Fnd_Msg_Pub.ADD;
1089: Fnd_Message.Set_Name('IBC', 'INVALID_ASSOC_TYPE_CODE');
1090: Fnd_Message.Set_token('ASSOC_TYPE_CODE', l_assoc_type_code);
1091: Fnd_Msg_Pub.ADD;
1092: END IF;
1093: RAISE Fnd_Api.G_EXC_ERROR;
1094: END IF;
1095:
1096: -- Insert into table
1097: l_assoc_id := NULL;
1126: END LOOP;
1127:
1128: --******************* Real Logic End *********************
1129: -- Standard check of p_commit.
1130: IF (Fnd_Api.To_Boolean(p_commit)) THEN
1131: COMMIT WORK;
1132: END IF;
1133: -- Standard call to get message count and if count=1, get the message
1134: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1133: -- Standard call to get message count and if count=1, get the message
1134: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1135: p_data => x_msg_data);
1136: EXCEPTION
1137: WHEN Fnd_Api.G_EXC_ERROR THEN
1138: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
1139: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1140: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1141: p_data => x_msg_data);
1135: p_data => x_msg_data);
1136: EXCEPTION
1137: WHEN Fnd_Api.G_EXC_ERROR THEN
1138: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
1139: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1140: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1141: p_data => x_msg_data);
1142: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1143: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
1138: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
1139: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1140: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1141: p_data => x_msg_data);
1142: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1143: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
1144: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1145: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1146: p_data => x_msg_data);
1140: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1141: p_data => x_msg_data);
1142: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1143: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
1144: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1145: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1146: p_data => x_msg_data);
1147: WHEN OTHERS THEN
1148: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
1145: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1146: p_data => x_msg_data);
1147: WHEN OTHERS THEN
1148: ROLLBACK TO CREATE_ASSOCIATIONS_PT;
1149: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1150: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
1151: THEN
1152: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1153: END IF;
1246: -- Standard Start of API savepoint
1247: SAVEPOINT DELETE_ASSOCIATIONS_PT;
1248:
1249: -- Standard call to check for call compatibility.
1250: IF NOT Fnd_Api.Compatible_API_Call (
1251: l_api_version,
1252: p_api_version,
1253: l_api_name,
1254: G_PKG_NAME)
1252: p_api_version,
1253: l_api_name,
1254: G_PKG_NAME)
1255: THEN
1256: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1257: END IF;
1258: -- Initialize message list if p_init_msg_list is set to TRUE.
1259: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
1260: Fnd_Msg_Pub.initialize;
1255: THEN
1256: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1257: END IF;
1258: -- Initialize message list if p_init_msg_list is set to TRUE.
1259: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
1260: Fnd_Msg_Pub.initialize;
1261: END IF;
1262:
1263: -- Initialize API return status to success
1260: Fnd_Msg_Pub.initialize;
1261: END IF;
1262:
1263: -- Initialize API return status to success
1264: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1265:
1266: --******************* Real Logic Start *********************
1267:
1268: l_temp_array_length := p_content_item_ids.COUNT;
1275: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
1276: Fnd_Message.Set_Name('IBC', 'IMPROPER_ARRAY');
1277: Fnd_Msg_Pub.ADD;
1278: END IF;
1279: RAISE Fnd_Api.G_EXC_ERROR;
1280: END IF;
1281:
1282: WHILE l_count <= l_temp_array_length LOOP
1283:
1312: Fnd_Message.Set_Name('IBC', 'NO_ASSOCIATION_FOUND');
1313: Fnd_Msg_Pub.ADD;
1314: END IF;
1315: CLOSE Get_Assoc_Id;
1316: RAISE Fnd_Api.G_EXC_ERROR;
1317: END IF;
1318: CLOSE Get_Assoc_Id;
1319:
1320: -- Delete Entry
1339: END LOOP;
1340:
1341: --******************* Real Logic End *********************
1342: -- Standard check of p_commit.
1343: IF (Fnd_Api.To_Boolean(p_commit)) THEN
1344: COMMIT WORK;
1345: END IF;
1346: -- Standard call to get message count and if count=1, get the message
1347: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1346: -- Standard call to get message count and if count=1, get the message
1347: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1348: p_data => x_msg_data);
1349: EXCEPTION
1350: WHEN Fnd_Api.G_EXC_ERROR THEN
1351: ROLLBACK TO DELETE_ASSOCIATIONS_PT;
1352: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1353: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1354: p_data => x_msg_data);
1348: p_data => x_msg_data);
1349: EXCEPTION
1350: WHEN Fnd_Api.G_EXC_ERROR THEN
1351: ROLLBACK TO DELETE_ASSOCIATIONS_PT;
1352: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1353: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1354: p_data => x_msg_data);
1355: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1356: ROLLBACK TO DELETE_ASSOCIATIONS_PT;
1351: ROLLBACK TO DELETE_ASSOCIATIONS_PT;
1352: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1353: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1354: p_data => x_msg_data);
1355: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1356: ROLLBACK TO DELETE_ASSOCIATIONS_PT;
1357: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1358: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1359: p_data => x_msg_data);
1353: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1354: p_data => x_msg_data);
1355: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1356: ROLLBACK TO DELETE_ASSOCIATIONS_PT;
1357: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1358: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1359: p_data => x_msg_data);
1360: WHEN OTHERS THEN
1361: ROLLBACK TO DELETE_ASSOCIATIONS_PT;
1358: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1359: p_data => x_msg_data);
1360: WHEN OTHERS THEN
1361: ROLLBACK TO DELETE_ASSOCIATIONS_PT;
1362: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1363: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
1364: THEN
1365: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1366: END IF;
1476:
1477: BEGIN
1478: -- ******************* Standard Begins *******************
1479: -- Standard call to check for call compatibility.
1480: IF NOT Fnd_Api.Compatible_API_Call (
1481: l_api_version,
1482: p_api_version,
1483: l_api_name,
1484: G_PKG_NAME)
1482: p_api_version,
1483: l_api_name,
1484: G_PKG_NAME)
1485: THEN
1486: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1487: END IF;
1488: -- Initialize message list if p_init_msg_list is set to TRUE.
1489: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
1490: Fnd_Msg_Pub.initialize;
1485: THEN
1486: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1487: END IF;
1488: -- Initialize message list if p_init_msg_list is set to TRUE.
1489: IF Fnd_Api.to_Boolean( p_init_msg_list ) THEN
1490: Fnd_Msg_Pub.initialize;
1491: END IF;
1492:
1493: -- Initialize API return status to success
1490: Fnd_Msg_Pub.initialize;
1491: END IF;
1492:
1493: -- Initialize API return status to success
1494: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1495: -- ******************* Real Logic Start *********************
1496:
1497: -- Validate Citem Id
1498: IF (p_content_item_id IS NOT NULL) THEN
1495: -- ******************* Real Logic Start *********************
1496:
1497: -- Validate Citem Id
1498: IF (p_content_item_id IS NOT NULL) THEN
1499: IF (Ibc_Validate_Pvt.isValidCitem(p_content_item_id) = Fnd_Api.g_false) THEN
1500: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
1501: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_ID');
1502: Fnd_Message.Set_token('CITEM_ID', p_content_item_id);
1503: Fnd_Msg_Pub.ADD;
1501: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_ID');
1502: Fnd_Message.Set_token('CITEM_ID', p_content_item_id);
1503: Fnd_Msg_Pub.ADD;
1504: END IF;
1505: RAISE Fnd_Api.G_EXC_ERROR;
1506: END IF;
1507: END IF;
1508: IF p_citem_version_id IS NOT NULL AND
1509: IBC_VALIDATE_PVT.isValidCitemVerForCitem(p_content_item_id, p_citem_version_id) = FND_API.g_false
1505: RAISE Fnd_Api.G_EXC_ERROR;
1506: END IF;
1507: END IF;
1508: IF p_citem_version_id IS NOT NULL AND
1509: IBC_VALIDATE_PVT.isValidCitemVerForCitem(p_content_item_id, p_citem_version_id) = FND_API.g_false
1510: THEN
1511: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
1512: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_VERSION_ID');
1513: Fnd_Message.Set_token('CITEM_VERSION_ID', p_citem_version_id);
1512: Fnd_Message.Set_Name('IBC', 'INVALID_CITEM_VERSION_ID');
1513: Fnd_Message.Set_token('CITEM_VERSION_ID', p_citem_version_id);
1514: Fnd_Msg_Pub.ADD;
1515: END IF;
1516: RAISE Fnd_Api.G_EXC_ERROR;
1517: END IF;
1518:
1519:
1520: -- Initialize OUT NOCOPYput parameters
1534: Fnd_Message.Set_Name('IBC', 'IBC_CALL_BACK_PKG_IS_NULL');
1535: Fnd_Message.Set_token('ASSOC_TYPE_CODE', assoc_rec.ASSOCIATION_TYPE_CODE);
1536: Fnd_Msg_Pub.ADD;
1537: END IF;
1538: RAISE Fnd_Api.G_EXC_ERROR;
1539: END IF;
1540:
1541: BEGIN
1542: -- Execute CallBack
1553: Fnd_Message.Set_Name('IBC', 'IBC_CALL_BACK_PKG_INVALID');
1554: Fnd_Message.Set_token('CALL_BACK_PKG', assoc_rec.CALL_BACK_PKG);
1555: Fnd_Msg_Pub.ADD;
1556: END IF;
1557: RAISE Fnd_Api.G_EXC_ERROR;
1558: ELSE
1559: RAISE;
1560: END IF;
1561: END;
1593: Fnd_Message.Set_Name('IBC', 'INVALID_ASSOC_TYPE_CODE');
1594: Fnd_Message.Set_token('ASSOC_TYPE_CODE', l_assoc_type_code);
1595: Fnd_Msg_Pub.ADD;
1596: END IF;
1597: RAISE Fnd_Api.G_EXC_ERROR;
1598: END IF;
1599: IF (l_callback_pkg IS NULL) THEN
1600: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
1601: Fnd_Message.Set_Name('IBC', 'IBC_CALL_BACK_PKG_IS_NULL');
1601: Fnd_Message.Set_Name('IBC', 'IBC_CALL_BACK_PKG_IS_NULL');
1602: Fnd_Message.Set_token('ASSOC_TYPE_CODE', l_assoc_type_code);
1603: Fnd_Msg_Pub.ADD;
1604: END IF;
1605: RAISE Fnd_Api.G_EXC_ERROR;
1606: END IF;
1607: CLOSE Get_CallBack;
1608: END IF;
1609:
1635: Fnd_Message.Set_Name('IBC', 'IBC_CALL_BACK_PKG_INVALID');
1636: Fnd_Message.Set_token('CALL_BACK_PKG', l_callback_pkg);
1637: Fnd_Msg_Pub.ADD;
1638: END IF;
1639: RAISE Fnd_Api.G_EXC_ERROR;
1640: ELSE
1641: RAISE;
1642: END IF;
1643: END;
1669: -- Standard call to get message count and if count=1, get the message
1670: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1671: p_data => x_msg_data);
1672: EXCEPTION
1673: WHEN Fnd_Api.G_EXC_ERROR THEN
1674: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1675: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1676: p_data => x_msg_data);
1677: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1670: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1671: p_data => x_msg_data);
1672: EXCEPTION
1673: WHEN Fnd_Api.G_EXC_ERROR THEN
1674: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1675: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1676: p_data => x_msg_data);
1677: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1678: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1673: WHEN Fnd_Api.G_EXC_ERROR THEN
1674: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1675: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1676: p_data => x_msg_data);
1677: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1678: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1679: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1680: p_data => x_msg_data);
1681: WHEN OTHERS THEN
1674: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1675: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1676: p_data => x_msg_data);
1677: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1678: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1679: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1680: p_data => x_msg_data);
1681: WHEN OTHERS THEN
1682: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1678: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1679: Fnd_Msg_Pub.Count_And_Get ( p_count => x_msg_count,
1680: p_data => x_msg_data);
1681: WHEN OTHERS THEN
1682: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1683: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
1684: THEN
1685: Fnd_Msg_Pub.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1686: END IF;
1735: Fnd_Message.Set_Name('IBC', 'IBC_CALL_BACK_PKG_INVALID');
1736: Fnd_Message.Set_token('CALL_BACK_PKG', r_callback.CALL_BACK_PKG);
1737: Fnd_Msg_Pub.ADD;
1738: END IF;
1739: RAISE Fnd_Api.G_EXC_ERROR;
1740: ELSE
1741: RAISE;
1742: END IF;
1743: END;
1743: END;
1744:
1745: END LOOP;
1746:
1747: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1748: /*
1749: DBMS_OUTPUT.put_line('Errors FOUND '|| l_msg_data);
1750: for i in 0..l_msg_count loop
1751: DBMS_OUTPUT.put_line(FND_MSG_PUB.get(i,FND_API.G_FALSE));
1747: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1748: /*
1749: DBMS_OUTPUT.put_line('Errors FOUND '|| l_msg_data);
1750: for i in 0..l_msg_count loop
1751: DBMS_OUTPUT.put_line(FND_MSG_PUB.get(i,FND_API.G_FALSE));
1752: end loop;
1753: */
1754: l_result := NULL;
1755: ELSE