[Home] [Help]
7: -- Added the flag below as a workaround for IBC Code to work.
8: -- Currently creating the content items for each section as reusable items.
9: -- Mar 26,2002 : IBC has shifted away from reusable_flag and now we are
10: -- using parent_item_id
11: g_reusable_flag CONSTANT VARCHAR2(1) := FND_API.g_true;
12:
13: --
14:
15: g_commit_on_lock_unlock CONSTANT VARCHAR2(1) := FND_API.g_false;
11: g_reusable_flag CONSTANT VARCHAR2(1) := FND_API.g_true;
12:
13: --
14:
15: g_commit_on_lock_unlock CONSTANT VARCHAR2(1) := FND_API.g_false;
16:
17: -- Currently we do not send commit as TRUE to lock and unlock calls.
18: --
19:
16:
17: -- Currently we do not send commit as TRUE to lock and unlock calls.
18: --
19:
20: g_lock_flag_value CONSTANT VARCHAR2(1) := FND_API.g_false;
21: g_using_locking CONSTANT VARCHAR2(1) := FND_API.g_false;
22:
23: -- Currently we are not using the locking mechanism from IBC as the LOCK and UNLOCK
24: -- takes effect only if we commit the transaction, which is not what we want.
17: -- Currently we do not send commit as TRUE to lock and unlock calls.
18: --
19:
20: g_lock_flag_value CONSTANT VARCHAR2(1) := FND_API.g_false;
21: g_using_locking CONSTANT VARCHAR2(1) := FND_API.g_false;
22:
23: -- Currently we are not using the locking mechanism from IBC as the LOCK and UNLOCK
24: -- takes effect only if we commit the transaction, which is not what we want.
25:
22:
23: -- Currently we are not using the locking mechanism from IBC as the LOCK and UNLOCK
24: -- takes effect only if we commit the transaction, which is not what we want.
25:
26: g_wd_restricted_flag_value CONSTANT VARCHAR2(1) := FND_API.g_false;
27:
28: -- The wd_restricted_flag='T' means the items is not for runtime,
29: -- only administrators who have access to the directory can manipulate them.
30: -- All items for public view (runtime read) shld set this flag to 'F'.
56: p_content_type_code IN VARCHAR2,
57: p_def_disp_template_id IN NUMBER,
58: p_delv_id IN NUMBER,
59: p_assoc_type_code IN VARCHAR2,
60: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
61: p_api_version IN NUMBER DEFAULT 1.0,
62: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
63: x_citem_id OUT NUMBER,
64: x_citem_ver_id OUT NUMBER,
58: p_delv_id IN NUMBER,
59: p_assoc_type_code IN VARCHAR2,
60: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
61: p_api_version IN NUMBER DEFAULT 1.0,
62: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
63: x_citem_id OUT NUMBER,
64: x_citem_ver_id OUT NUMBER,
65: x_return_status OUT VARCHAR2,
66: x_msg_count OUT NUMBER,
105: l_assoc_objects3 JTF_VARCHAR2_TABLE_300 := JTF_VARCHAR2_TABLE_300() ;
106: l_assoc_objects4 JTF_VARCHAR2_TABLE_300 := JTF_VARCHAR2_TABLE_300() ;
107: l_assoc_objects5 JTF_VARCHAR2_TABLE_300 := JTF_VARCHAR2_TABLE_300() ;
108: --
109: l_init_msg_list VARCHAR2(1) := FND_API.g_true;
110: --
111: l_api_version_number CONSTANT NUMBER := 1.0;
112: l_api_name CONSTANT VARCHAR2(30) := 'create_citem_for_delv';
113: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
117: -- Standard Start of API savepoint
118: SAVEPOINT create_citem_for_delv_PVT;
119:
120: -- Standard call to check for call compatibility.
121: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
122: p_api_version,
123: l_api_name,
124: G_PKG_NAME)
125: THEN
122: p_api_version,
123: l_api_name,
124: G_PKG_NAME)
125: THEN
126: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
127: END IF;
128:
129: -- Initialize message list if p_init_msg_list is set to TRUE.
130:
129: -- Initialize message list if p_init_msg_list is set to TRUE.
130:
131: --l_init_msg_list := p_init_msg_list;
132:
133: IF FND_API.to_Boolean( l_init_msg_list )
134: THEN
135: FND_MSG_PUB.initialize;
136: END IF;
137:
134: THEN
135: FND_MSG_PUB.initialize;
136: END IF;
137:
138: l_init_msg_list := FND_API.g_false;
139:
140: -- Debug Message
141: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
142:
141: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
142:
143: -- Initialize API return status to SUCCESS
144:
145: x_return_status := FND_API.G_RET_STS_SUCCESS;
146: l_return_status := FND_API.G_RET_STS_SUCCESS;
147:
148: --
149: -- This procedure will create a new Content Item in IBC Schema.
142:
143: -- Initialize API return status to SUCCESS
144:
145: x_return_status := FND_API.G_RET_STS_SUCCESS;
146: l_return_status := FND_API.G_RET_STS_SUCCESS;
147:
148: --
149: -- This procedure will create a new Content Item in IBC Schema.
150: -- It will record the Default Display Template ID as the value of one special Attribute
188: ,p_dir_node_id => G_AMS_DIR_NODE_ID
189: ,p_owner_resource_id => l_owner_res_id
190: ,p_owner_resource_type => G_OWNER_RESOURCE_TYPE
191: ,p_reference_code => NULL -- Why is this needed?
192: ,p_trans_required => FND_API.g_false -- This is the default value. For now we do not expose this flag on the UI.
193: ,p_parent_item_id => NULL -- There is no parent for the content item that is associated with the Deliverable.
194: ,p_lock_flag => g_lock_flag_value
195: ,p_wd_restricted => g_wd_restricted_flag_value
196: ,p_start_date => l_start_date
201: ,p_component_citems => NULL
202: ,p_component_atypes => NULL
203: ,p_sort_order => NULL
204: ,p_status => G_CITEM_WIP_STATUS_CODE -- When the Deliverable becomes active, we will go in and approve all the underlying content items.
205: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
206: ,p_commit => FND_API.g_false -- We still have to do some more operations.
207: ,p_api_version_number => p_api_version
208: ,p_init_msg_list => l_init_msg_list
209: ,px_content_item_id => l_citem_id
202: ,p_component_atypes => NULL
203: ,p_sort_order => NULL
204: ,p_status => G_CITEM_WIP_STATUS_CODE -- When the Deliverable becomes active, we will go in and approve all the underlying content items.
205: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
206: ,p_commit => FND_API.g_false -- We still have to do some more operations.
207: ,p_api_version_number => p_api_version
208: ,p_init_msg_list => l_init_msg_list
209: ,px_content_item_id => l_citem_id
210: ,px_citem_ver_id => l_citem_ver_id
219: AMS_UTILITY_PVT.debug_message('l_citem_ver_id = ' || l_citem_ver_id);
220: AMS_UTILITY_PVT.debug_message('l_obj_ver_num = ' || l_obj_ver_num);
221: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
222:
223: IF FND_API.g_ret_sts_success <> l_return_status
224: THEN
225: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_CITEM');
226: RAISE FND_API.g_exc_error;
227: END IF;
222:
223: IF FND_API.g_ret_sts_success <> l_return_status
224: THEN
225: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_CITEM');
226: RAISE FND_API.g_exc_error;
227: END IF;
228:
229: l_init_msg_list := FND_API.g_false ; -- This point onwards, we should not initialize the message list.
230:
225: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_CITEM');
226: RAISE FND_API.g_exc_error;
227: END IF;
228:
229: l_init_msg_list := FND_API.g_false ; -- This point onwards, we should not initialize the message list.
230:
231: -- If the above statement is successful, add the association record in IBC_ASSOCIATIONS.
232: --
233: -- Prepare the data for insert.
259: ,p_assoc_objects2 => l_assoc_objects2 -- Denormalized Value stored here. This can be debated. Remove if decided against storing it here.
260: ,p_assoc_objects3 => l_assoc_objects3 -- Denormalized Value stored here. This can be debated. Remove if decided against storing it here.
261: ,p_assoc_objects4 => l_assoc_objects4 -- Null values.
262: ,p_assoc_objects5 => l_assoc_objects5 -- Null values.
263: ,p_commit => FND_API.g_false -- This is the Default.
264: ,p_api_version_number => p_api_version
265: ,p_init_msg_list => l_init_msg_list
266: -- The following are OUT parameters in this procedure.
267: --,x_assoc_id => l_assoc_id
279: AMS_UTILITY_PVT.debug_message('l_citem_ver_id = ' || l_citem_ver_id);
280: AMS_UTILITY_PVT.debug_message('l_obj_ver_num = ' || l_obj_ver_num);
281: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
282:
283: IF FND_API.g_ret_sts_success <> l_return_status
284: THEN
285: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_CITEM_ASSOC');
286: RAISE FND_API.g_exc_error;
287: END IF;
282:
283: IF FND_API.g_ret_sts_success <> l_return_status
284: THEN
285: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_CITEM_ASSOC');
286: RAISE FND_API.g_exc_error;
287: END IF;
288: --
289:
290: -- We should not approve this item at this time.
291: -- When the associated Deliverable gets the approval and becomes actives, we should
292: -- approve the main content item associated with the deliverable and we should also
293: -- approve the components of that main content item.
294:
295: IF g_using_locking = FND_API.g_true
296: THEN
297: --
298: -- At this stage we must UNLOCK this content item as we will soon commit this transaction.
299: -- Call the procedure IBC_CITEM_ADMIN_GRP.unlock_item
311: AMS_UTILITY_PVT.debug_message('After Unlock.');
312: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
313: --
314: --
315: IF FND_API.g_ret_sts_success <> l_return_status
316: THEN
317: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
318: RAISE FND_API.g_exc_error;
319: END IF;
314: --
315: IF FND_API.g_ret_sts_success <> l_return_status
316: THEN
317: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
318: RAISE FND_API.g_exc_error;
319: END IF;
320:
321: END IF;
322: --
323: -- If we come till here, everything has been done successfully.
324: -- Commit the work and set the output values.
325: --
326: -- Standard check for p_commit
327: IF FND_API.to_Boolean( p_commit )
328: THEN
329: COMMIT WORK;
330: END IF;
331: --
340: p_data => x_msg_data
341: );
342: --
343: EXCEPTION
344: WHEN FND_API.g_exc_error THEN
345: ROLLBACK TO create_citem_for_delv_PVT;
346: x_return_status := FND_API.G_RET_STS_ERROR;
347: FND_MSG_PUB.count_and_get (
348: p_count => x_msg_count,
342: --
343: EXCEPTION
344: WHEN FND_API.g_exc_error THEN
345: ROLLBACK TO create_citem_for_delv_PVT;
346: x_return_status := FND_API.G_RET_STS_ERROR;
347: FND_MSG_PUB.count_and_get (
348: p_count => x_msg_count,
349: p_data => x_msg_data,
350: p_encoded => FND_API.G_FALSE
346: x_return_status := FND_API.G_RET_STS_ERROR;
347: FND_MSG_PUB.count_and_get (
348: p_count => x_msg_count,
349: p_data => x_msg_data,
350: p_encoded => FND_API.G_FALSE
351: );
352: WHEN FND_API.g_exc_unexpected_error THEN
353: ROLLBACK TO create_citem_for_delv_PVT;
354: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
348: p_count => x_msg_count,
349: p_data => x_msg_data,
350: p_encoded => FND_API.G_FALSE
351: );
352: WHEN FND_API.g_exc_unexpected_error THEN
353: ROLLBACK TO create_citem_for_delv_PVT;
354: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
355: FND_MSG_PUB.count_and_get (
356: p_count => x_msg_count,
350: p_encoded => FND_API.G_FALSE
351: );
352: WHEN FND_API.g_exc_unexpected_error THEN
353: ROLLBACK TO create_citem_for_delv_PVT;
354: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
355: FND_MSG_PUB.count_and_get (
356: p_count => x_msg_count,
357: p_data => x_msg_data,
358: p_encoded => FND_API.G_FALSE
354: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
355: FND_MSG_PUB.count_and_get (
356: p_count => x_msg_count,
357: p_data => x_msg_data,
358: p_encoded => FND_API.G_FALSE
359: );
360: WHEN OTHERS THEN
361: ROLLBACK TO create_citem_for_delv_PVT;
362: x_return_status := FND_API.g_ret_sts_unexp_error;
358: p_encoded => FND_API.G_FALSE
359: );
360: WHEN OTHERS THEN
361: ROLLBACK TO create_citem_for_delv_PVT;
362: x_return_status := FND_API.g_ret_sts_unexp_error;
363: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
364: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
365: END IF;
366: FND_MSG_PUB.count_and_get (
365: END IF;
366: FND_MSG_PUB.count_and_get (
367: p_count => x_msg_count,
368: p_data => x_msg_data,
369: p_encoded => FND_API.G_FALSE
370: );
371: --
372: --
373: END create_citem_for_delv;
439: p_content_type_code IN VARCHAR2,
440: p_delv_id IN NUMBER,
441: p_citem_id IN NUMBER,
442: p_assoc_type_code IN VARCHAR2,
443: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
444: p_api_version IN NUMBER DEFAULT 1.0,
445: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
446: x_return_status OUT VARCHAR2,
447: x_msg_count OUT NUMBER,
441: p_citem_id IN NUMBER,
442: p_assoc_type_code IN VARCHAR2,
443: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
444: p_api_version IN NUMBER DEFAULT 1.0,
445: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
446: x_return_status OUT VARCHAR2,
447: x_msg_count OUT NUMBER,
448: x_msg_data OUT VARCHAR2
449: )
497: l_api_name CONSTANT VARCHAR2(30) := 'Approve_Citem_For_Delv';
498: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
499: --
500: --
501: l_init_msg_list VARCHAR2(1) := FND_API.g_true;
502: --
503: l_api_version_number CONSTANT NUMBER := 1.0;
504: --
505: BEGIN
505: BEGIN
506: --
507:
508: -- Standard call to check for call compatibility.
509: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
510: p_api_version,
511: l_api_name,
512: G_PKG_NAME)
513: THEN
510: p_api_version,
511: l_api_name,
512: G_PKG_NAME)
513: THEN
514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
515: END IF;
516:
517: -- Initialize message list if p_init_msg_list is set to TRUE.
518:
517: -- Initialize message list if p_init_msg_list is set to TRUE.
518:
519: --l_init_msg_list := p_init_msg_list;
520:
521: IF FND_API.to_Boolean( l_init_msg_list )
522: THEN
523: FND_MSG_PUB.initialize;
524: END IF;
525:
522: THEN
523: FND_MSG_PUB.initialize;
524: END IF;
525:
526: l_init_msg_list := FND_API.g_false;
527:
528: -- Debug Message
529: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
530:
528: -- Debug Message
529: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
530:
531: -- Initialize API return status to SUCCESS
532: x_return_status := FND_API.G_RET_STS_SUCCESS;
533: l_return_status := FND_API.G_RET_STS_SUCCESS;
534:
535: -- Check if the deliverable is in ACTIVE status first.
536: -- Fetch the Deliverable Details.
529: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
530:
531: -- Initialize API return status to SUCCESS
532: x_return_status := FND_API.G_RET_STS_SUCCESS;
533: l_return_status := FND_API.G_RET_STS_SUCCESS;
534:
535: -- Check if the deliverable is in ACTIVE status first.
536: -- Fetch the Deliverable Details.
537: OPEN c_delv_details ;
541: /*
542: IF l_delv_status_code NOT IN ('ACTIVE','AVAILABLE')
543: THEN
544: AMS_Utility_PVT.Error_Message('AMS_ERR_DELV_NOT_ACTIVE');
545: RAISE FND_API.g_exc_error;
546: END IF;
547: */
548: -- Removing the above check for now. Will revist.
549:
546: END IF;
547: */
548: -- Removing the above check for now. Will revist.
549:
550: IF g_using_locking = FND_API.g_true
551: THEN
552:
553: -- We have to lock the item first.
554: IBC_CITEM_ADMIN_GRP.lock_item(
562: ,x_msg_count => l_msg_count
563: ,x_msg_data => l_msg_data
564: );
565:
566: IF FND_API.g_ret_sts_success <> l_return_status
567: THEN
568: AMS_Utility_PVT.Error_Message('AMS_ERR_LOCKING_CITEM');
569: RAISE FND_API.g_exc_error;
570: END IF;
565:
566: IF FND_API.g_ret_sts_success <> l_return_status
567: THEN
568: AMS_Utility_PVT.Error_Message('AMS_ERR_LOCKING_CITEM');
569: RAISE FND_API.g_exc_error;
570: END IF;
571: ELSE
572:
573: -- If we do not use locking mechanism, we will have to get the latest citem version
615: ,x_msg_count => l_msg_count
616: ,x_msg_data => l_msg_data
617: );
618:
619: IF FND_API.g_ret_sts_success <> l_return_status
620: THEN
621: AMS_Utility_PVT.Error_Message('AMS_ERR_GET_CITEM');
622: RAISE FND_API.g_exc_error;
623: END IF;
618:
619: IF FND_API.g_ret_sts_success <> l_return_status
620: THEN
621: AMS_Utility_PVT.Error_Message('AMS_ERR_GET_CITEM');
622: RAISE FND_API.g_exc_error;
623: END IF;
624:
625: -- First approve each of the components.
626: IF l_cpnt_citems IS NOT NULL
656:
657: -- Approve this component.
658: IBC_CITEM_ADMIN_GRP.approve_item(
659: p_citem_ver_id => l_cpnt_citem_ver_id
660: ,p_commit => FND_API.g_false
661: ,p_api_version_number => p_api_version
662: ,p_init_msg_list => l_init_msg_list
663: ,px_object_version_number => l_cpnt_obj_ver_num
664: ,x_return_status => l_return_status
665: ,x_msg_count => l_msg_count
666: ,x_msg_data => l_msg_data
667: );
668:
669: IF FND_API.g_ret_sts_success <> l_return_status
670: THEN
671: AMS_Utility_PVT.Error_Message('AMS_ERR_APPROVE_CITEM');
672: RAISE FND_API.g_exc_error;
673: END IF;
668:
669: IF FND_API.g_ret_sts_success <> l_return_status
670: THEN
671: AMS_Utility_PVT.Error_Message('AMS_ERR_APPROVE_CITEM');
672: RAISE FND_API.g_exc_error;
673: END IF;
674:
675: END IF;
676:
680:
681: -- Now approve the main parent component item.
682: IBC_CITEM_ADMIN_GRP.approve_item(
683: p_citem_ver_id => l_citem_ver_id
684: ,p_commit => FND_API.g_false
685: ,p_api_version_number => p_api_version
686: ,p_init_msg_list => l_init_msg_list
687: ,px_object_version_number => l_obj_ver_num
688: ,x_return_status => l_return_status
689: ,x_msg_count => l_msg_count
690: ,x_msg_data => l_msg_data
691: );
692:
693: IF FND_API.g_ret_sts_success <> l_return_status
694: THEN
695: AMS_Utility_PVT.Error_Message('AMS_ERR_APPROVE_CITEM');
696: RAISE FND_API.g_exc_error;
697: END IF;
692:
693: IF FND_API.g_ret_sts_success <> l_return_status
694: THEN
695: AMS_Utility_PVT.Error_Message('AMS_ERR_APPROVE_CITEM');
696: RAISE FND_API.g_exc_error;
697: END IF;
698:
699: IF g_using_locking = FND_API.g_true
700: THEN
695: AMS_Utility_PVT.Error_Message('AMS_ERR_APPROVE_CITEM');
696: RAISE FND_API.g_exc_error;
697: END IF;
698:
699: IF g_using_locking = FND_API.g_true
700: THEN
701:
702: -- unlock the content item.
703: IBC_CITEM_ADMIN_GRP.unlock_item(
713: AMS_UTILITY_PVT.debug_message('After Unlock.');
714: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
715:
716: --
717: IF FND_API.g_ret_sts_success <> l_return_status
718: THEN
719: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
720: RAISE FND_API.g_exc_error;
721: END IF;
716: --
717: IF FND_API.g_ret_sts_success <> l_return_status
718: THEN
719: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
720: RAISE FND_API.g_exc_error;
721: END IF;
722:
723: END IF;
724:
725:
726: -- Commit the work and set the output values.
727:
728: -- Standard check for p_commit
729: IF FND_API.to_Boolean( p_commit )
730: THEN
731: COMMIT WORK;
732: END IF;
733:
739: p_data => x_msg_data
740: );
741:
742: EXCEPTION
743: WHEN FND_API.g_exc_error THEN
744: ROLLBACK ;
745: x_return_status := FND_API.G_RET_STS_ERROR;
746: FND_MSG_PUB.count_and_get (
747: p_count => x_msg_count,
741:
742: EXCEPTION
743: WHEN FND_API.g_exc_error THEN
744: ROLLBACK ;
745: x_return_status := FND_API.G_RET_STS_ERROR;
746: FND_MSG_PUB.count_and_get (
747: p_count => x_msg_count,
748: p_data => x_msg_data,
749: p_encoded => FND_API.G_FALSE
745: x_return_status := FND_API.G_RET_STS_ERROR;
746: FND_MSG_PUB.count_and_get (
747: p_count => x_msg_count,
748: p_data => x_msg_data,
749: p_encoded => FND_API.G_FALSE
750: );
751: WHEN FND_API.g_exc_unexpected_error THEN
752: ROLLBACK ;
753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
747: p_count => x_msg_count,
748: p_data => x_msg_data,
749: p_encoded => FND_API.G_FALSE
750: );
751: WHEN FND_API.g_exc_unexpected_error THEN
752: ROLLBACK ;
753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
754: FND_MSG_PUB.count_and_get (
755: p_count => x_msg_count,
749: p_encoded => FND_API.G_FALSE
750: );
751: WHEN FND_API.g_exc_unexpected_error THEN
752: ROLLBACK ;
753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
754: FND_MSG_PUB.count_and_get (
755: p_count => x_msg_count,
756: p_data => x_msg_data,
757: p_encoded => FND_API.G_FALSE
753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
754: FND_MSG_PUB.count_and_get (
755: p_count => x_msg_count,
756: p_data => x_msg_data,
757: p_encoded => FND_API.G_FALSE
758: );
759: WHEN OTHERS THEN
760: ROLLBACK ;
761: x_return_status := FND_API.g_ret_sts_unexp_error;
757: p_encoded => FND_API.G_FALSE
758: );
759: WHEN OTHERS THEN
760: ROLLBACK ;
761: x_return_status := FND_API.g_ret_sts_unexp_error;
762: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
763: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
764: END IF;
765: FND_MSG_PUB.count_and_get (
764: END IF;
765: FND_MSG_PUB.count_and_get (
766: p_count => x_msg_count,
767: p_data => x_msg_data,
768: p_encoded => FND_API.G_FALSE
769: );
770:
771: END approve_citem_for_delv;
772:
794: p_delv_id IN NUMBER,
795: p_citem_id IN NUMBER,
796: p_citem_version_id IN NUMBER,
797: p_assoc_type_code IN VARCHAR2,
798: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
799: p_api_version IN NUMBER DEFAULT 1.0,
800: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
801: x_return_status OUT VARCHAR2,
802: x_msg_count OUT NUMBER,
796: p_citem_version_id IN NUMBER,
797: p_assoc_type_code IN VARCHAR2,
798: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
799: p_api_version IN NUMBER DEFAULT 1.0,
800: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
801: x_return_status OUT VARCHAR2,
802: x_msg_count OUT NUMBER,
803: x_msg_data OUT VARCHAR2
804: )
890: p_owner_resource_id IN NUMBER,
891: p_owner_resource_type IN VARCHAR2,
892: p_has_merge_fields IN VARCHAR2,
893: p_has_page_merge_fields IN VARCHAR2,
894: p_reusable_flag IN VARCHAR2 DEFAULT FND_API.g_false, -- CHANGE to Y or N when IBC folks change the conventions for varchar2 fields.
895: p_data_source_list IN JTF_VARCHAR2_TABLE_300,
896: p_merge_fields_list IN JTF_VARCHAR2_TABLE_300,
897: p_attribute_type_code IN VARCHAR2,
898: p_parent_citem_id IN NUMBER,
897: p_attribute_type_code IN VARCHAR2,
898: p_parent_citem_id IN NUMBER,
899: p_parent_citem_ver_id IN NUMBER,
900: p_parent_ctype_code IN VARCHAR2,
901: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
902: p_api_version IN NUMBER DEFAULT 1.0,
903: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
904: px_citem_id IN OUT NUMBER,
905: px_citem_ver_id IN OUT NUMBER,
899: p_parent_citem_ver_id IN NUMBER,
900: p_parent_ctype_code IN VARCHAR2,
901: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
902: p_api_version IN NUMBER DEFAULT 1.0,
903: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
904: px_citem_id IN OUT NUMBER,
905: px_citem_ver_id IN OUT NUMBER,
906: x_return_status OUT VARCHAR2,
907: x_msg_count OUT NUMBER,
906: x_return_status OUT VARCHAR2,
907: x_msg_count OUT NUMBER,
908: x_msg_data OUT VARCHAR2,
909: p_dml_flag IN VARCHAR2,
910: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.g_true
911: )
912: IS
913: --
914: -- Declare the local variables and cursors here.
936: l_citem_ids JTF_NUMBER_TABLE := JTF_NUMBER_TABLE() ;
937: l_citem_attrs JTF_VARCHAR2_TABLE_100 := JTF_VARCHAR2_TABLE_100() ;
938: l_dummy_sort_order JTF_NUMBER_TABLE := JTF_NUMBER_TABLE() ;
939: --
940: l_init_msg_list VARCHAR2(1) := FND_API.g_true;
941: --
942: l_api_version_number CONSTANT NUMBER := 1.0;
943: l_api_name CONSTANT VARCHAR2(30) := 'manage_rich_content';
944: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
952: -- Standard Start of API savepoint
953: SAVEPOINT manage_rich_content_PVT ;
954:
955: -- Standard call to check for call compatibility.
956: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
957: p_api_version,
958: l_api_name,
959: G_PKG_NAME)
960: THEN
957: p_api_version,
958: l_api_name,
959: G_PKG_NAME)
960: THEN
961: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
962: END IF;
963:
964: -- Initialize message list if p_init_msg_list is set to TRUE.
965:
964: -- Initialize message list if p_init_msg_list is set to TRUE.
965:
966: l_init_msg_list := p_init_msg_list;
967:
968: IF FND_API.to_Boolean( l_init_msg_list )
969: THEN
970: FND_MSG_PUB.initialize;
971: END IF;
972:
969: THEN
970: FND_MSG_PUB.initialize;
971: END IF;
972:
973: l_init_msg_list := FND_API.g_false;
974:
975: -- Debug Message
976: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
977:
975: -- Debug Message
976: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
977:
978: -- Initialize API return status to SUCCESS
979: x_return_status := FND_API.G_RET_STS_SUCCESS;
980: l_return_status := FND_API.G_RET_STS_SUCCESS;
981: --
982: IF p_content_type_code <> G_RICH_CONTENT -- Should be a CONSTANT in the package.
983: THEN
976: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
977:
978: -- Initialize API return status to SUCCESS
979: x_return_status := FND_API.G_RET_STS_SUCCESS;
980: l_return_status := FND_API.G_RET_STS_SUCCESS;
981: --
982: IF p_content_type_code <> G_RICH_CONTENT -- Should be a CONSTANT in the package.
983: THEN
984: AMS_Utility_PVT.Error_Message('AMS_ERR_WRONG_CTYPE_CODE');
981: --
982: IF p_content_type_code <> G_RICH_CONTENT -- Should be a CONSTANT in the package.
983: THEN
984: AMS_Utility_PVT.Error_Message('AMS_ERR_WRONG_CTYPE_CODE');
985: RAISE FND_API.g_exc_error;
986: END IF;
987: --
988: -- Check if the call is for Create or Update.
989:
1001: OR
1002: l_citem_ver_id IS NULL
1003: THEN
1004: AMS_Utility_PVT.Error_Message('AMS_ERR_NO_CITEM_OR_VER_ID');
1005: RAISE FND_API.g_exc_error;
1006: END IF;
1007: END IF;
1008:
1009: -- For update, ideally we must check if the dates for the parent deliverable
1096: ,x_msg_count => l_msg_count
1097: ,x_msg_data => l_msg_data
1098: );
1099:
1100: IF FND_API.g_ret_sts_success <> l_return_status
1101: THEN
1102: AMS_Utility_PVT.Error_Message('AMS_ERR_CPAGE_GEN_SQL');
1103: RAISE FND_API.g_exc_error;
1104: END IF;
1099:
1100: IF FND_API.g_ret_sts_success <> l_return_status
1101: THEN
1102: AMS_Utility_PVT.Error_Message('AMS_ERR_CPAGE_GEN_SQL');
1103: RAISE FND_API.g_exc_error;
1104: END IF;
1105:
1106: AMS_UTILITY_PVT.debug_message( ' l_select_sql_statement = ' || l_select_sql_statement );
1107:
1173: ,p_dir_node_id => G_AMS_DIR_NODE_ID
1174: ,p_owner_resource_id => p_owner_resource_id
1175: ,p_owner_resource_type => p_owner_resource_type
1176: ,p_reference_code => NULL -- Why is this needed?
1177: ,p_trans_required => FND_API.g_false -- This is the default value. For now we do not expose this flag on the UI.
1178: ,p_parent_item_id => p_parent_citem_id -- Specify the parent content item id. This item is visible only in the context of this parent.
1179: ,p_lock_flag => g_lock_flag_value
1180: ,p_wd_restricted => g_wd_restricted_flag_value
1181: ,p_start_date => l_start_date
1186: ,p_component_citems => NULL
1187: ,p_component_atypes => NULL
1188: ,p_sort_order => NULL
1189: ,p_status => G_CITEM_WIP_STATUS_CODE -- When the Deliverable becomes active, we will go in and approve all the underlying content items.
1190: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
1191: ,p_commit => FND_API.g_false -- We still have to do some more operations.
1192: ,p_api_version_number => p_api_version
1193: ,p_init_msg_list => l_init_msg_list
1194: ,px_content_item_id => l_citem_id
1187: ,p_component_atypes => NULL
1188: ,p_sort_order => NULL
1189: ,p_status => G_CITEM_WIP_STATUS_CODE -- When the Deliverable becomes active, we will go in and approve all the underlying content items.
1190: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
1191: ,p_commit => FND_API.g_false -- We still have to do some more operations.
1192: ,p_api_version_number => p_api_version
1193: ,p_init_msg_list => l_init_msg_list
1194: ,px_content_item_id => l_citem_id
1195: ,px_citem_ver_id => l_citem_ver_id
1204: AMS_UTILITY_PVT.debug_message('l_citem_ver_id = ' || l_citem_ver_id);
1205: AMS_UTILITY_PVT.debug_message('l_obj_ver_num = ' || l_obj_ver_num);
1206: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
1207:
1208: IF FND_API.g_ret_sts_success <> l_return_status
1209: THEN
1210: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_CITEM');
1211: RAISE FND_API.g_exc_error;
1212: END IF;
1207:
1208: IF FND_API.g_ret_sts_success <> l_return_status
1209: THEN
1210: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_CITEM');
1211: RAISE FND_API.g_exc_error;
1212: END IF;
1213:
1214: -- There is a bug in IBC Code. The field attachment_attribute_code in the
1215: -- table ibc_citem_versions_tl is getting updated some times. Filed a bug on IBC
1255: p_citem_ver_id => p_parent_citem_ver_id
1256: ,p_content_item_ids => l_citem_ids
1257: ,p_attribute_type_codes => l_citem_attrs
1258: ,p_sort_order => l_dummy_sort_order -- The NULL does not work. -- The new API is supposed to be able to take NULL for this parameter.
1259: ,p_commit => FND_API.g_false
1260: ,p_api_version_number => p_api_version
1261: ,p_init_msg_list => l_init_msg_list
1262: ,x_return_status => l_return_status
1263: ,x_msg_count => l_msg_count
1265: );
1266: END IF;
1267: --
1268: --
1269: IF FND_API.g_ret_sts_success <> l_return_status
1270: THEN
1271: AMS_Utility_PVT.Error_Message('AMS_ERR_ADD_COMPOUND_REL');
1272: RAISE FND_API.g_exc_error;
1273: END IF;
1268: --
1269: IF FND_API.g_ret_sts_success <> l_return_status
1270: THEN
1271: AMS_Utility_PVT.Error_Message('AMS_ERR_ADD_COMPOUND_REL');
1272: RAISE FND_API.g_exc_error;
1273: END IF;
1274:
1275: IF g_using_locking = FND_API.g_true
1276: THEN
1271: AMS_Utility_PVT.Error_Message('AMS_ERR_ADD_COMPOUND_REL');
1272: RAISE FND_API.g_exc_error;
1273: END IF;
1274:
1275: IF g_using_locking = FND_API.g_true
1276: THEN
1277:
1278: -- At this stage we must UNLOCK this content item as we will soon commit this transaction.
1279: -- Call the procedure IBC_CITEM_ADMIN_GRP.unlock_content_item
1291:
1292: AMS_UTILITY_PVT.debug_message('After Unlock.');
1293: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
1294:
1295: IF FND_API.g_ret_sts_success <> l_return_status
1296: THEN
1297: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
1298: RAISE FND_API.g_exc_error;
1299: END IF;
1294:
1295: IF FND_API.g_ret_sts_success <> l_return_status
1296: THEN
1297: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
1298: RAISE FND_API.g_exc_error;
1299: END IF;
1300:
1301: END IF;
1302:
1318: ,p_attr_types_for_update => l_attribute_type_codes
1319: ,p_attr_values_for_update => l_attributes
1320: ,p_attach_file_id => p_attach_file_id
1321: ,p_attach_file_name => p_attach_file_name
1322: ,p_commit => FND_API.g_false
1323: ,p_api_version => p_api_version
1324: ,p_api_validation_level => p_api_validation_level
1325: ,x_return_status => l_return_status
1326: ,x_msg_count => l_msg_count
1324: ,p_api_validation_level => p_api_validation_level
1325: ,x_return_status => l_return_status
1326: ,x_msg_count => l_msg_count
1327: ,x_msg_data => l_msg_data
1328: ,p_replace_attr_bundle => FND_API.g_true
1329: );
1330:
1331: IF FND_API.g_ret_sts_success <> l_return_status
1332: THEN
1327: ,x_msg_data => l_msg_data
1328: ,p_replace_attr_bundle => FND_API.g_true
1329: );
1330:
1331: IF FND_API.g_ret_sts_success <> l_return_status
1332: THEN
1333: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CITEM');
1334: RAISE FND_API.g_exc_error;
1335: END IF;
1330:
1331: IF FND_API.g_ret_sts_success <> l_return_status
1332: THEN
1333: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CITEM');
1334: RAISE FND_API.g_exc_error;
1335: END IF;
1336:
1337: END IF;
1338:
1340: -- If we come till here, everything has been created successfully.
1341: -- Commit the work and set the output values.
1342: --
1343: -- Standard check for p_commit
1344: IF FND_API.to_Boolean( p_commit )
1345: THEN
1346: COMMIT WORK;
1347: END IF;
1348: --
1356: p_data => x_msg_data
1357: );
1358: --
1359: EXCEPTION
1360: WHEN FND_API.g_exc_error THEN
1361: ROLLBACK TO manage_rich_content_PVT ;
1362: x_return_status := FND_API.G_RET_STS_ERROR;
1363: FND_MSG_PUB.count_and_get (
1364: p_count => x_msg_count,
1358: --
1359: EXCEPTION
1360: WHEN FND_API.g_exc_error THEN
1361: ROLLBACK TO manage_rich_content_PVT ;
1362: x_return_status := FND_API.G_RET_STS_ERROR;
1363: FND_MSG_PUB.count_and_get (
1364: p_count => x_msg_count,
1365: p_data => x_msg_data,
1366: p_encoded => FND_API.G_FALSE
1362: x_return_status := FND_API.G_RET_STS_ERROR;
1363: FND_MSG_PUB.count_and_get (
1364: p_count => x_msg_count,
1365: p_data => x_msg_data,
1366: p_encoded => FND_API.G_FALSE
1367: );
1368: WHEN FND_API.g_exc_unexpected_error THEN
1369: ROLLBACK TO manage_rich_content_PVT ;
1370: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1364: p_count => x_msg_count,
1365: p_data => x_msg_data,
1366: p_encoded => FND_API.G_FALSE
1367: );
1368: WHEN FND_API.g_exc_unexpected_error THEN
1369: ROLLBACK TO manage_rich_content_PVT ;
1370: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1371: FND_MSG_PUB.count_and_get (
1372: p_count => x_msg_count,
1366: p_encoded => FND_API.G_FALSE
1367: );
1368: WHEN FND_API.g_exc_unexpected_error THEN
1369: ROLLBACK TO manage_rich_content_PVT ;
1370: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1371: FND_MSG_PUB.count_and_get (
1372: p_count => x_msg_count,
1373: p_data => x_msg_data,
1374: p_encoded => FND_API.G_FALSE
1370: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1371: FND_MSG_PUB.count_and_get (
1372: p_count => x_msg_count,
1373: p_data => x_msg_data,
1374: p_encoded => FND_API.G_FALSE
1375: );
1376: WHEN OTHERS THEN
1377: ROLLBACK TO manage_rich_content_PVT ;
1378: x_return_status := FND_API.g_ret_sts_unexp_error;
1374: p_encoded => FND_API.G_FALSE
1375: );
1376: WHEN OTHERS THEN
1377: ROLLBACK TO manage_rich_content_PVT ;
1378: x_return_status := FND_API.g_ret_sts_unexp_error;
1379: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1380: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1381: END IF;
1382: FND_MSG_PUB.count_and_get (
1381: END IF;
1382: FND_MSG_PUB.count_and_get (
1383: p_count => x_msg_count,
1384: p_data => x_msg_data,
1385: p_encoded => FND_API.G_FALSE
1386: );
1387: --
1388: --
1389: END manage_rich_content;
1438: p_description IN VARCHAR2,
1439: p_delv_id IN NUMBER,
1440: p_owner_resource_id IN NUMBER,
1441: p_owner_resource_type IN VARCHAR2,
1442: p_reusable_flag IN VARCHAR2 DEFAULT FND_API.g_false, -- CHANGE to Y or N when IBC folks change the conventions for varchar2 fields.
1443: p_attr_types IN JTF_VARCHAR2_TABLE_100 DEFAULT NULL,
1444: p_attr_values IN JTF_VARCHAR2_TABLE_4000 DEFAULT NULL,
1445: p_parent_citem_id IN NUMBER,
1446: p_parent_citem_ver_id IN NUMBER,
1445: p_parent_citem_id IN NUMBER,
1446: p_parent_citem_ver_id IN NUMBER,
1447: p_parent_ctype_code IN VARCHAR2,
1448: p_attribute_type_code IN VARCHAR2,
1449: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
1450: p_api_version IN NUMBER DEFAULT 1.0,
1451: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
1452: px_citem_id IN OUT NUMBER,
1453: px_citem_ver_id IN OUT NUMBER,
1447: p_parent_ctype_code IN VARCHAR2,
1448: p_attribute_type_code IN VARCHAR2,
1449: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
1450: p_api_version IN NUMBER DEFAULT 1.0,
1451: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
1452: px_citem_id IN OUT NUMBER,
1453: px_citem_ver_id IN OUT NUMBER,
1454: x_return_status OUT VARCHAR2,
1455: x_msg_count OUT NUMBER,
1454: x_return_status OUT VARCHAR2,
1455: x_msg_count OUT NUMBER,
1456: x_msg_data OUT VARCHAR2,
1457: p_dml_flag IN VARCHAR2,
1458: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.g_true
1459: )
1460: IS
1461: --
1462: -- Declare the local variables and cursors here.
1482: l_citem_ids JTF_NUMBER_TABLE := JTF_NUMBER_TABLE() ;
1483: l_citem_attrs JTF_VARCHAR2_TABLE_100 := JTF_VARCHAR2_TABLE_100() ;
1484: l_dummy_sort_order JTF_NUMBER_TABLE := JTF_NUMBER_TABLE() ;
1485: --
1486: l_init_msg_list VARCHAR2(1) := FND_API.g_true;
1487: --
1488: l_api_version_number CONSTANT NUMBER := 1.0;
1489: l_api_name CONSTANT VARCHAR2(30) := 'manage_toc_section';
1490: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
1495: -- Standard Start of API savepoint
1496: SAVEPOINT manage_toc_section_PVT ;
1497:
1498: -- Standard call to check for call compatibility.
1499: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1500: p_api_version,
1501: l_api_name,
1502: G_PKG_NAME)
1503: THEN
1500: p_api_version,
1501: l_api_name,
1502: G_PKG_NAME)
1503: THEN
1504: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1505: END IF;
1506:
1507: -- Initialize message list if p_init_msg_list is set to TRUE.
1508:
1507: -- Initialize message list if p_init_msg_list is set to TRUE.
1508:
1509: l_init_msg_list := p_init_msg_list;
1510:
1511: IF FND_API.to_Boolean( l_init_msg_list )
1512: THEN
1513: FND_MSG_PUB.initialize;
1514: END IF;
1515:
1512: THEN
1513: FND_MSG_PUB.initialize;
1514: END IF;
1515:
1516: l_init_msg_list := FND_API.g_false;
1517:
1518: -- Debug Message
1519: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
1520:
1518: -- Debug Message
1519: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
1520:
1521: -- Initialize API return status to SUCCESS
1522: x_return_status := FND_API.G_RET_STS_SUCCESS;
1523: l_return_status := FND_API.G_RET_STS_SUCCESS;
1524: --
1525: IF p_content_type_code <> G_TOC -- Should be a CONSTANT in the package.
1526: THEN
1519: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
1520:
1521: -- Initialize API return status to SUCCESS
1522: x_return_status := FND_API.G_RET_STS_SUCCESS;
1523: l_return_status := FND_API.G_RET_STS_SUCCESS;
1524: --
1525: IF p_content_type_code <> G_TOC -- Should be a CONSTANT in the package.
1526: THEN
1527: AMS_Utility_PVT.Error_Message('AMS_ERR_WRONG_CTYPE_CODE');
1524: --
1525: IF p_content_type_code <> G_TOC -- Should be a CONSTANT in the package.
1526: THEN
1527: AMS_Utility_PVT.Error_Message('AMS_ERR_WRONG_CTYPE_CODE');
1528: RAISE FND_API.g_exc_error;
1529: END IF;
1530: --
1531: -- Check if the call is for Create or Update.
1532:
1544: OR
1545: l_citem_ver_id IS NULL
1546: THEN
1547: AMS_Utility_PVT.Error_Message('AMS_ERR_NO_CITEM_OR_VER_ID');
1548: RAISE FND_API.g_exc_error;
1549: END IF;
1550: END IF;
1551:
1552: -- For update, ideally we must check if the dates for the parent deliverable
1576: ,p_dir_node_id => G_AMS_DIR_NODE_ID
1577: ,p_owner_resource_id => p_owner_resource_id
1578: ,p_owner_resource_type => p_owner_resource_type
1579: ,p_reference_code => NULL -- Why is this needed?
1580: ,p_trans_required => FND_API.g_false -- This is the default value. For now we do not expose this flag on the UI.
1581: ,p_parent_item_id => p_parent_citem_id -- Specify the parent content item id. This item is visible only in the context of this parent.
1582: ,p_lock_flag => g_lock_flag_value
1583: ,p_wd_restricted => g_wd_restricted_flag_value
1584: ,p_start_date => l_start_date
1589: ,p_component_citems => NULL
1590: ,p_component_atypes => NULL
1591: ,p_sort_order => NULL
1592: ,p_status => G_CITEM_WIP_STATUS_CODE -- When the Deliverable becomes active, we will go in and approve all the underlying content items.
1593: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
1594: ,p_commit => FND_API.g_false -- We still have to do some more operations.
1595: ,p_api_version_number => p_api_version
1596: ,p_init_msg_list => l_init_msg_list
1597: ,px_content_item_id => l_citem_id
1590: ,p_component_atypes => NULL
1591: ,p_sort_order => NULL
1592: ,p_status => G_CITEM_WIP_STATUS_CODE -- When the Deliverable becomes active, we will go in and approve all the underlying content items.
1593: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
1594: ,p_commit => FND_API.g_false -- We still have to do some more operations.
1595: ,p_api_version_number => p_api_version
1596: ,p_init_msg_list => l_init_msg_list
1597: ,px_content_item_id => l_citem_id
1598: ,px_citem_ver_id => l_citem_ver_id
1607: AMS_UTILITY_PVT.debug_message('l_citem_ver_id = ' || l_citem_ver_id);
1608: AMS_UTILITY_PVT.debug_message('l_obj_ver_num = ' || l_obj_ver_num);
1609: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
1610:
1611: IF FND_API.g_ret_sts_success <> l_return_status
1612: THEN
1613: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_CITEM');
1614: RAISE FND_API.g_exc_error;
1615: END IF;
1610:
1611: IF FND_API.g_ret_sts_success <> l_return_status
1612: THEN
1613: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_CITEM');
1614: RAISE FND_API.g_exc_error;
1615: END IF;
1616:
1617: -- We do not approve this item at this point.
1618: -- When the Deliverable becomes active, we will approve all underlying content items.
1649: p_citem_ver_id => p_parent_citem_ver_id
1650: ,p_content_item_ids => l_citem_ids
1651: ,p_attribute_type_codes => l_citem_attrs
1652: ,p_sort_order => l_dummy_sort_order -- The NULL does not work. -- The new API is supposed to be able to take NULL for this parameter.
1653: ,p_commit => FND_API.g_false
1654: ,p_api_version_number => p_api_version
1655: ,p_init_msg_list => l_init_msg_list
1656: ,x_return_status => l_return_status
1657: ,x_msg_count => l_msg_count
1659: );
1660: END IF;
1661: --
1662: --
1663: IF FND_API.g_ret_sts_success <> l_return_status
1664: THEN
1665: AMS_Utility_PVT.Error_Message('AMS_ERR_ADD_COMPOUND_REL');
1666: RAISE FND_API.g_exc_error;
1667: END IF;
1662: --
1663: IF FND_API.g_ret_sts_success <> l_return_status
1664: THEN
1665: AMS_Utility_PVT.Error_Message('AMS_ERR_ADD_COMPOUND_REL');
1666: RAISE FND_API.g_exc_error;
1667: END IF;
1668:
1669: IF g_using_locking = FND_API.g_true
1670: THEN
1665: AMS_Utility_PVT.Error_Message('AMS_ERR_ADD_COMPOUND_REL');
1666: RAISE FND_API.g_exc_error;
1667: END IF;
1668:
1669: IF g_using_locking = FND_API.g_true
1670: THEN
1671:
1672: -- At this stage we must UNLOCK this content item as we will soon commit this transaction.
1673: -- Call the procedure IBC_CITEM_ADMIN_GRP.unlock_content_item
1685:
1686: AMS_UTILITY_PVT.debug_message('After Unlock.');
1687: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
1688:
1689: IF FND_API.g_ret_sts_success <> l_return_status
1690: THEN
1691: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
1692: RAISE FND_API.g_exc_error;
1693: END IF;
1688:
1689: IF FND_API.g_ret_sts_success <> l_return_status
1690: THEN
1691: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
1692: RAISE FND_API.g_exc_error;
1693: END IF;
1694:
1695: END IF;
1696:
1712: ,p_attr_types_for_update => p_attr_types
1713: ,p_attr_values_for_update => p_attr_values
1714: ,p_attach_file_id => NULL
1715: ,p_attach_file_name => NULL
1716: ,p_commit => FND_API.g_false
1717: ,p_api_version => p_api_version
1718: ,p_api_validation_level => p_api_validation_level
1719: ,x_return_status => l_return_status
1720: ,x_msg_count => l_msg_count
1718: ,p_api_validation_level => p_api_validation_level
1719: ,x_return_status => l_return_status
1720: ,x_msg_count => l_msg_count
1721: ,x_msg_data => l_msg_data
1722: ,p_replace_attr_bundle => FND_API.g_true
1723: );
1724:
1725: IF FND_API.g_ret_sts_success <> l_return_status
1726: THEN
1721: ,x_msg_data => l_msg_data
1722: ,p_replace_attr_bundle => FND_API.g_true
1723: );
1724:
1725: IF FND_API.g_ret_sts_success <> l_return_status
1726: THEN
1727: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CITEM');
1728: RAISE FND_API.g_exc_error;
1729: END IF;
1724:
1725: IF FND_API.g_ret_sts_success <> l_return_status
1726: THEN
1727: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CITEM');
1728: RAISE FND_API.g_exc_error;
1729: END IF;
1730:
1731: END IF;
1732:
1734: -- If we come till here, everything has been created successfully.
1735: -- Commit the work and set the output values.
1736: --
1737: -- Standard check for p_commit
1738: IF FND_API.to_Boolean( p_commit )
1739: THEN
1740: COMMIT WORK;
1741: END IF;
1742: --
1750: p_data => x_msg_data
1751: );
1752: --
1753: EXCEPTION
1754: WHEN FND_API.g_exc_error THEN
1755: ROLLBACK TO manage_toc_section_PVT ;
1756: x_return_status := FND_API.G_RET_STS_ERROR;
1757: FND_MSG_PUB.count_and_get (
1758: p_count => x_msg_count,
1752: --
1753: EXCEPTION
1754: WHEN FND_API.g_exc_error THEN
1755: ROLLBACK TO manage_toc_section_PVT ;
1756: x_return_status := FND_API.G_RET_STS_ERROR;
1757: FND_MSG_PUB.count_and_get (
1758: p_count => x_msg_count,
1759: p_data => x_msg_data,
1760: p_encoded => FND_API.G_FALSE
1756: x_return_status := FND_API.G_RET_STS_ERROR;
1757: FND_MSG_PUB.count_and_get (
1758: p_count => x_msg_count,
1759: p_data => x_msg_data,
1760: p_encoded => FND_API.G_FALSE
1761: );
1762: WHEN FND_API.g_exc_unexpected_error THEN
1763: ROLLBACK TO manage_toc_section_PVT ;
1764: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1758: p_count => x_msg_count,
1759: p_data => x_msg_data,
1760: p_encoded => FND_API.G_FALSE
1761: );
1762: WHEN FND_API.g_exc_unexpected_error THEN
1763: ROLLBACK TO manage_toc_section_PVT ;
1764: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1765: FND_MSG_PUB.count_and_get (
1766: p_count => x_msg_count,
1760: p_encoded => FND_API.G_FALSE
1761: );
1762: WHEN FND_API.g_exc_unexpected_error THEN
1763: ROLLBACK TO manage_toc_section_PVT ;
1764: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1765: FND_MSG_PUB.count_and_get (
1766: p_count => x_msg_count,
1767: p_data => x_msg_data,
1768: p_encoded => FND_API.G_FALSE
1764: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1765: FND_MSG_PUB.count_and_get (
1766: p_count => x_msg_count,
1767: p_data => x_msg_data,
1768: p_encoded => FND_API.G_FALSE
1769: );
1770: WHEN OTHERS THEN
1771: ROLLBACK TO manage_toc_section_PVT ;
1772: x_return_status := FND_API.g_ret_sts_unexp_error;
1768: p_encoded => FND_API.G_FALSE
1769: );
1770: WHEN OTHERS THEN
1771: ROLLBACK TO manage_toc_section_PVT ;
1772: x_return_status := FND_API.g_ret_sts_unexp_error;
1773: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1774: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1775: END IF;
1776: FND_MSG_PUB.count_and_get (
1775: END IF;
1776: FND_MSG_PUB.count_and_get (
1777: p_count => x_msg_count,
1778: p_data => x_msg_data,
1779: p_encoded => FND_API.G_FALSE
1780: );
1781: --
1782: --
1783: END manage_toc_section;
1855: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
1856: --
1857: BEGIN
1858: --
1859: x_return_status := FND_API.g_ret_sts_success;
1860: --
1861: -- Fetch the latest citem version id.
1862: OPEN c_max_version;
1863: FETCH c_max_version INTO l_citem_ver_id;
1886: ,x_msg_count => l_msg_count
1887: ,x_msg_data => l_msg_data
1888: );
1889:
1890: IF FND_API.g_ret_sts_success <> l_return_status
1891: THEN
1892: AMS_Utility_PVT.Error_Message('AMS_ERR_GET_RICH_CTNT');
1893: RAISE FND_API.g_exc_error;
1894: END IF;
1889:
1890: IF FND_API.g_ret_sts_success <> l_return_status
1891: THEN
1892: AMS_Utility_PVT.Error_Message('AMS_ERR_GET_RICH_CTNT');
1893: RAISE FND_API.g_exc_error;
1894: END IF;
1895:
1896: x_citem_ver_id := l_citem_ver_id;
1897: x_return_status := l_return_status;
1908: p_data => x_msg_data
1909: );
1910:
1911: EXCEPTION
1912: WHEN FND_API.g_exc_error THEN
1913: ROLLBACK;
1914: x_return_status := FND_API.G_RET_STS_ERROR;
1915: FND_MSG_PUB.count_and_get (
1916: p_count => x_msg_count,
1910:
1911: EXCEPTION
1912: WHEN FND_API.g_exc_error THEN
1913: ROLLBACK;
1914: x_return_status := FND_API.G_RET_STS_ERROR;
1915: FND_MSG_PUB.count_and_get (
1916: p_count => x_msg_count,
1917: p_data => x_msg_data,
1918: p_encoded => FND_API.G_FALSE
1914: x_return_status := FND_API.G_RET_STS_ERROR;
1915: FND_MSG_PUB.count_and_get (
1916: p_count => x_msg_count,
1917: p_data => x_msg_data,
1918: p_encoded => FND_API.G_FALSE
1919: );
1920: WHEN FND_API.g_exc_unexpected_error THEN
1921: ROLLBACK;
1922: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1916: p_count => x_msg_count,
1917: p_data => x_msg_data,
1918: p_encoded => FND_API.G_FALSE
1919: );
1920: WHEN FND_API.g_exc_unexpected_error THEN
1921: ROLLBACK;
1922: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1923: FND_MSG_PUB.count_and_get (
1924: p_count => x_msg_count,
1918: p_encoded => FND_API.G_FALSE
1919: );
1920: WHEN FND_API.g_exc_unexpected_error THEN
1921: ROLLBACK;
1922: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1923: FND_MSG_PUB.count_and_get (
1924: p_count => x_msg_count,
1925: p_data => x_msg_data,
1926: p_encoded => FND_API.G_FALSE
1922: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1923: FND_MSG_PUB.count_and_get (
1924: p_count => x_msg_count,
1925: p_data => x_msg_data,
1926: p_encoded => FND_API.G_FALSE
1927: );
1928: WHEN OTHERS THEN
1929: ROLLBACK;
1930: x_return_status := FND_API.g_ret_sts_unexp_error;
1926: p_encoded => FND_API.G_FALSE
1927: );
1928: WHEN OTHERS THEN
1929: ROLLBACK;
1930: x_return_status := FND_API.g_ret_sts_unexp_error;
1931: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1932: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1933: END IF;
1934: FND_MSG_PUB.count_and_get (
1933: END IF;
1934: FND_MSG_PUB.count_and_get (
1935: p_count => x_msg_count,
1936: p_data => x_msg_data,
1937: p_encoded => FND_API.G_FALSE
1938: );
1939:
1940:
1941: END get_rich_content_data;
2027: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
2028: --
2029: BEGIN
2030: --
2031: x_return_status := FND_API.g_ret_sts_success;
2032: AMS_UTILITY_PVT.debug_message(g_pkg_name || '.' || l_api_name || ' Entered the proc.');
2033: l_msg_data := 'Citem id = ' || p_citem_id;
2034: AMS_UTILITY_PVT.debug_message(g_pkg_name || '.' || l_api_name || ' ' || l_msg_data);
2035: l_msg_data := 'Citem Version id = ' || p_citem_ver_id;
2041: -- Call Get_item procedure.
2042:
2043: IBC_CITEM_ADMIN_GRP.get_item(
2044: p_citem_ver_id => p_citem_ver_id
2045: ,p_init_msg_list => FND_API.g_true
2046: ,p_api_version_number => p_api_version
2047: ,x_content_item_id => l_citem_id
2048: ,x_citem_name => l_citem_name
2049: ,x_citem_version => l_citem_version
2087: ,x_msg_count => l_msg_count
2088: ,x_msg_data => l_msg_data
2089: );
2090:
2091: IF FND_API.g_ret_sts_success <> l_return_status
2092: THEN
2093: AMS_Utility_PVT.Error_Message('AMS_ERR_GET_CITEM');
2094: RAISE FND_API.g_exc_error;
2095: END IF;
2090:
2091: IF FND_API.g_ret_sts_success <> l_return_status
2092: THEN
2093: AMS_Utility_PVT.Error_Message('AMS_ERR_GET_CITEM');
2094: RAISE FND_API.g_exc_error;
2095: END IF;
2096:
2097:
2098: -- Print the data for debug purposes.
2219: p_data => x_msg_data
2220: );
2221:
2222: EXCEPTION
2223: WHEN FND_API.g_exc_error THEN
2224: ROLLBACK;
2225: x_return_status := FND_API.G_RET_STS_ERROR;
2226: FND_MSG_PUB.count_and_get (
2227: p_count => x_msg_count,
2221:
2222: EXCEPTION
2223: WHEN FND_API.g_exc_error THEN
2224: ROLLBACK;
2225: x_return_status := FND_API.G_RET_STS_ERROR;
2226: FND_MSG_PUB.count_and_get (
2227: p_count => x_msg_count,
2228: p_data => x_msg_data,
2229: p_encoded => FND_API.G_FALSE
2225: x_return_status := FND_API.G_RET_STS_ERROR;
2226: FND_MSG_PUB.count_and_get (
2227: p_count => x_msg_count,
2228: p_data => x_msg_data,
2229: p_encoded => FND_API.G_FALSE
2230: );
2231: WHEN FND_API.g_exc_unexpected_error THEN
2232: ROLLBACK;
2233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2227: p_count => x_msg_count,
2228: p_data => x_msg_data,
2229: p_encoded => FND_API.G_FALSE
2230: );
2231: WHEN FND_API.g_exc_unexpected_error THEN
2232: ROLLBACK;
2233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2234: FND_MSG_PUB.count_and_get (
2235: p_count => x_msg_count,
2229: p_encoded => FND_API.G_FALSE
2230: );
2231: WHEN FND_API.g_exc_unexpected_error THEN
2232: ROLLBACK;
2233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2234: FND_MSG_PUB.count_and_get (
2235: p_count => x_msg_count,
2236: p_data => x_msg_data,
2237: p_encoded => FND_API.G_FALSE
2233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2234: FND_MSG_PUB.count_and_get (
2235: p_count => x_msg_count,
2236: p_data => x_msg_data,
2237: p_encoded => FND_API.G_FALSE
2238: );
2239: WHEN OTHERS THEN
2240: ROLLBACK;
2241: x_return_status := FND_API.g_ret_sts_unexp_error;
2237: p_encoded => FND_API.G_FALSE
2238: );
2239: WHEN OTHERS THEN
2240: ROLLBACK;
2241: x_return_status := FND_API.g_ret_sts_unexp_error;
2242: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2243: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
2244: END IF;
2245: FND_MSG_PUB.count_and_get (
2244: END IF;
2245: FND_MSG_PUB.count_and_get (
2246: p_count => x_msg_count,
2247: p_data => x_msg_data,
2248: p_encoded => FND_API.G_FALSE
2249: );
2250:
2251:
2252: END get_content_item_data;
2305: p_description IN VARCHAR2,
2306: p_delv_id IN NUMBER,
2307: p_resource_id IN NUMBER,
2308: p_resource_type IN VARCHAR2,
2309: p_reusable_flag IN VARCHAR2 DEFAULT FND_API.g_true, -- CHANGE to Y or N when IBC folks change the conventions for varchar2 fields.
2310: p_attr_types_cp_image IN JTF_VARCHAR2_TABLE_100 DEFAULT NULL,
2311: p_attr_values_cp_image IN JTF_VARCHAR2_TABLE_4000 DEFAULT NULL,
2312: p_attach_file_id IN NUMBER,
2313: p_attach_file_name IN VARCHAR2,
2316: p_parent_attr_type_code IN VARCHAR2,
2317: p_parent_citem_id IN NUMBER,
2318: p_parent_citem_ver_id IN NUMBER,
2319: p_parent_ctype_code IN VARCHAR2,
2320: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
2321: p_api_version IN NUMBER DEFAULT 1.0,
2322: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
2323: x_cp_image_citem_id OUT NUMBER,
2324: x_cp_image_citem_ver_id OUT NUMBER,
2318: p_parent_citem_ver_id IN NUMBER,
2319: p_parent_ctype_code IN VARCHAR2,
2320: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
2321: p_api_version IN NUMBER DEFAULT 1.0,
2322: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
2323: x_cp_image_citem_id OUT NUMBER,
2324: x_cp_image_citem_ver_id OUT NUMBER,
2325: x_return_status OUT VARCHAR2,
2326: x_msg_count OUT NUMBER,
2350: --
2351: l_image_citem_id NUMBER ;
2352: l_image_citem_ver_id NUMBER ;
2353: l_image_obj_ver_num NUMBER ;
2354: l_created_image VARCHAR2(1) := FND_API.g_false;
2355: --
2356: l_attribute_type_codes JTF_VARCHAR2_TABLE_100 := JTF_VARCHAR2_TABLE_100() ;
2357: l_attributes JTF_VARCHAR2_TABLE_4000 := JTF_VARCHAR2_TABLE_4000() ;
2358: l_citem_ids JTF_NUMBER_TABLE := JTF_NUMBER_TABLE() ;
2362: l_api_name CONSTANT VARCHAR2(30) := 'Create_CP_Image';
2363: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
2364: --
2365: l_err_msg VARCHAR2(4000);
2366: l_init_msg_list VARCHAR2(1) := FND_API.g_true;
2367: --
2368: l_api_version_number CONSTANT NUMBER := 1.0;
2369: --
2370: BEGIN
2372: -- Standard Start of API savepoint
2373: SAVEPOINT create_cp_image_PVT ;
2374:
2375: -- Standard call to check for call compatibility.
2376: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2377: p_api_version,
2378: l_api_name,
2379: G_PKG_NAME)
2380: THEN
2377: p_api_version,
2378: l_api_name,
2379: G_PKG_NAME)
2380: THEN
2381: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2382: END IF;
2383:
2384: -- Initialize message list if p_init_msg_list is set to TRUE.
2385:
2384: -- Initialize message list if p_init_msg_list is set to TRUE.
2385:
2386: --l_init_msg_list := p_init_msg_list;
2387:
2388: IF FND_API.to_Boolean( l_init_msg_list )
2389: THEN
2390: FND_MSG_PUB.initialize;
2391: END IF;
2392:
2389: THEN
2390: FND_MSG_PUB.initialize;
2391: END IF;
2392:
2393: l_init_msg_list := FND_API.g_false;
2394:
2395: -- Debug Message
2396: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
2397:
2395: -- Debug Message
2396: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
2397:
2398: -- Initialize API return status to SUCCESS
2399: x_return_status := FND_API.G_RET_STS_SUCCESS;
2400: l_return_status := FND_API.G_RET_STS_SUCCESS;
2401: --
2402: -- This procedure will create a new Content Item in IBC Schema.
2403:
2396: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
2397:
2398: -- Initialize API return status to SUCCESS
2399: x_return_status := FND_API.G_RET_STS_SUCCESS;
2400: l_return_status := FND_API.G_RET_STS_SUCCESS;
2401: --
2402: -- This procedure will create a new Content Item in IBC Schema.
2403:
2404:
2424: LOOP
2425: l_err_msg := i || ' : >' || p_attr_types_cp_image(i) || '< : >' || p_attr_values_cp_image(i) || '<';
2426: AMS_UTILITY_PVT.debug_message(l_err_msg);
2427: END LOOP;
2428: l_init_msg_list := FND_API.g_false;
2429:
2430:
2431: -- Check if we need to create the IMAGE content type.
2432: IF p_attach_file_id IS NOT NULL
2491: ,p_dir_node_id => G_AMS_DIR_NODE_ID
2492: ,p_owner_resource_id => p_resource_id
2493: ,p_owner_resource_type => p_resource_type
2494: ,p_reference_code => NULL -- Why is this needed?
2495: ,p_trans_required => FND_API.g_false -- This is the default value. For now we do not expose this flag on the UI.
2496: ,p_parent_item_id => NULL -- There is no parent for the item of type IBC_IMAGE.
2497: ,p_lock_flag => g_lock_flag_value
2498: ,p_wd_restricted => g_wd_restricted_flag_value
2499: ,p_start_date => sysdate -- use the sysdate as the start date for the IMAGE content item.
2504: ,p_component_citems => NULL
2505: ,p_component_atypes => NULL
2506: ,p_sort_order => NULL
2507: ,p_status => G_CITEM_WIP_STATUS_CODE -- Soon after the content item of type IBC_IMAGE is created successfully, we will go ahead and approve this item.
2508: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
2509: ,p_commit => FND_API.g_false -- We still have to do some more operations.
2510: ,p_api_version_number => p_api_version
2511: ,p_init_msg_list => l_init_msg_list
2512: ,px_content_item_id => l_image_citem_id
2505: ,p_component_atypes => NULL
2506: ,p_sort_order => NULL
2507: ,p_status => G_CITEM_WIP_STATUS_CODE -- Soon after the content item of type IBC_IMAGE is created successfully, we will go ahead and approve this item.
2508: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
2509: ,p_commit => FND_API.g_false -- We still have to do some more operations.
2510: ,p_api_version_number => p_api_version
2511: ,p_init_msg_list => l_init_msg_list
2512: ,px_content_item_id => l_image_citem_id
2513: ,px_citem_ver_id => l_image_citem_ver_id
2524: AMS_UTILITY_PVT.debug_message('l_citem_ver_id = ' || l_image_citem_ver_id );
2525: AMS_UTILITY_PVT.debug_message('l_obj_ver_num = ' || l_image_obj_ver_num );
2526: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
2527:
2528: IF FND_API.g_ret_sts_success <> l_return_status
2529: THEN
2530: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_IMAGE_ITEM');
2531: RAISE FND_API.g_exc_error;
2532: ELSE
2527:
2528: IF FND_API.g_ret_sts_success <> l_return_status
2529: THEN
2530: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_IMAGE_ITEM');
2531: RAISE FND_API.g_exc_error;
2532: ELSE
2533: l_created_image := FND_API.g_true;
2534: END IF;
2535:
2529: THEN
2530: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_IMAGE_ITEM');
2531: RAISE FND_API.g_exc_error;
2532: ELSE
2533: l_created_image := FND_API.g_true;
2534: END IF;
2535:
2536: l_init_msg_list := FND_API.g_false;
2537:
2532: ELSE
2533: l_created_image := FND_API.g_true;
2534: END IF;
2535:
2536: l_init_msg_list := FND_API.g_false;
2537:
2538: -- Approve this content item of type IBC_IMAGE.
2539:
2540: IBC_CITEM_ADMIN_GRP.approve_item(
2538: -- Approve this content item of type IBC_IMAGE.
2539:
2540: IBC_CITEM_ADMIN_GRP.approve_item(
2541: p_citem_ver_id => l_image_citem_ver_id
2542: ,p_commit => FND_API.g_false
2543: ,p_api_version_number => p_api_version
2544: ,p_init_msg_list => l_init_msg_list
2545: ,px_object_version_number => l_image_obj_ver_num
2546: ,x_return_status => l_return_status
2547: ,x_msg_count => l_msg_count
2548: ,x_msg_data => l_msg_data
2549: );
2550:
2551: IF FND_API.g_ret_sts_success <> l_return_status
2552: THEN
2553: AMS_Utility_PVT.Error_Message('AMS_ERR_APPROVE_CITEM');
2554: RAISE FND_API.g_exc_error;
2555: END IF;
2550:
2551: IF FND_API.g_ret_sts_success <> l_return_status
2552: THEN
2553: AMS_Utility_PVT.Error_Message('AMS_ERR_APPROVE_CITEM');
2554: RAISE FND_API.g_exc_error;
2555: END IF;
2556:
2557: END IF;
2558:
2563:
2564: -- Check if there was a newly created image.
2565: -- If so, we have to set the two attributes to the array of CP_IMAGE attributes.
2566: -- One for attachment_file_id and one for ocm_image_id.
2567: IF l_created_image = FND_API.g_true
2568: THEN
2569: -- Substitute the values for the above two attributes.
2570: FOR i IN l_attribute_type_codes.first .. l_attribute_type_codes.last
2571: LOOP
2593: ,p_dir_node_id => G_AMS_DIR_NODE_ID
2594: ,p_owner_resource_id => p_resource_id
2595: ,p_owner_resource_type => p_resource_type
2596: ,p_reference_code => NULL -- Why is this needed?
2597: ,p_trans_required => FND_API.g_false -- This is the default value. For now we do not expose this flag on the UI.
2598: ,p_parent_item_id => p_parent_citem_id -- Specify the parent content item id. This item is visible only in the context of this parent.
2599: ,p_lock_flag => g_lock_flag_value
2600: ,p_wd_restricted => g_wd_restricted_flag_value
2601: ,p_start_date => l_start_date
2606: ,p_component_citems => NULL
2607: ,p_component_atypes => NULL
2608: ,p_sort_order => NULL
2609: ,p_status => G_CITEM_WIP_STATUS_CODE -- We will approve the underlying content items when the deliverable gets approved.
2610: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
2611: ,p_commit => FND_API.g_false -- We still have to do some more operations.
2612: ,p_api_version_number => p_api_version
2613: ,p_init_msg_list => l_init_msg_list
2614: ,px_content_item_id => l_citem_id
2607: ,p_component_atypes => NULL
2608: ,p_sort_order => NULL
2609: ,p_status => G_CITEM_WIP_STATUS_CODE -- We will approve the underlying content items when the deliverable gets approved.
2610: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
2611: ,p_commit => FND_API.g_false -- We still have to do some more operations.
2612: ,p_api_version_number => p_api_version
2613: ,p_init_msg_list => l_init_msg_list
2614: ,px_content_item_id => l_citem_id
2615: ,px_citem_ver_id => l_citem_ver_id
2625: AMS_UTILITY_PVT.debug_message('l_citem_ver_id = ' || l_citem_ver_id );
2626: AMS_UTILITY_PVT.debug_message('l_obj_ver_num = ' || l_obj_ver_num );
2627: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
2628:
2629: IF FND_API.g_ret_sts_success <> l_return_status
2630: THEN
2631: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_CP_IMAGE');
2632: RAISE FND_API.g_exc_error;
2633: END IF;
2628:
2629: IF FND_API.g_ret_sts_success <> l_return_status
2630: THEN
2631: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_CP_IMAGE');
2632: RAISE FND_API.g_exc_error;
2633: END IF;
2634:
2635: l_init_msg_list := FND_API.g_false;
2636:
2631: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_CP_IMAGE');
2632: RAISE FND_API.g_exc_error;
2633: END IF;
2634:
2635: l_init_msg_list := FND_API.g_false;
2636:
2637: -- We do not Approve the CP_IMAGE Item at this stage.
2638: -- When the deliverable gets approved and the status becomes active, we will approve all the underlying content items.
2639: --
2666: p_citem_ver_id => p_parent_citem_ver_id
2667: ,p_content_item_ids => l_citem_ids
2668: ,p_attribute_type_codes => l_citem_attrs
2669: ,p_sort_order => l_dummy_sort_order -- The NULL does not work. -- The new API is supposed to be able to take NULL for this parameter.
2670: ,p_commit => FND_API.g_false
2671: ,p_api_version_number => p_api_version
2672: ,p_init_msg_list => l_init_msg_list
2673: ,x_return_status => l_return_status
2674: ,x_msg_count => l_msg_count
2676: );
2677:
2678: END IF;
2679:
2680: IF FND_API.g_ret_sts_success <> l_return_status
2681: THEN
2682: AMS_Utility_PVT.Error_Message('AMS_ERR_ADD_COMPOUND_REL');
2683: RAISE FND_API.g_exc_error;
2684: END IF;
2679:
2680: IF FND_API.g_ret_sts_success <> l_return_status
2681: THEN
2682: AMS_Utility_PVT.Error_Message('AMS_ERR_ADD_COMPOUND_REL');
2683: RAISE FND_API.g_exc_error;
2684: END IF;
2685:
2686: -- If we reach till here, we can unlock the IMAGE item and then
2687: -- unlock the CP_IMAGE item.
2685:
2686: -- If we reach till here, we can unlock the IMAGE item and then
2687: -- unlock the CP_IMAGE item.
2688:
2689: IF l_created_image = FND_API.g_true
2690: THEN
2691:
2692: IF g_using_locking = FND_API.g_true
2693: THEN
2688:
2689: IF l_created_image = FND_API.g_true
2690: THEN
2691:
2692: IF g_using_locking = FND_API.g_true
2693: THEN
2694:
2695: IBC_CITEM_ADMIN_GRP.unlock_item(
2696: p_content_item_id => l_image_citem_id
2705: AMS_UTILITY_PVT.debug_message('After Unlock.');
2706: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
2707:
2708: --
2709: IF FND_API.g_ret_sts_success <> l_return_status
2710: THEN
2711: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_IMAGE');
2712: RAISE FND_API.g_exc_error;
2713: END IF;
2708: --
2709: IF FND_API.g_ret_sts_success <> l_return_status
2710: THEN
2711: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_IMAGE');
2712: RAISE FND_API.g_exc_error;
2713: END IF;
2714:
2715: END IF;
2716: --
2715: END IF;
2716: --
2717: END IF;
2718:
2719: IF g_using_locking = FND_API.g_true
2720: THEN
2721:
2722: IBC_CITEM_ADMIN_GRP.unlock_item(
2723: p_content_item_id => l_citem_id
2732: AMS_UTILITY_PVT.debug_message('After Unlock.');
2733: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
2734:
2735: --
2736: IF FND_API.g_ret_sts_success <> l_return_status
2737: THEN
2738: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CP_IMAGE');
2739: RAISE FND_API.g_exc_error;
2740: END IF;
2735: --
2736: IF FND_API.g_ret_sts_success <> l_return_status
2737: THEN
2738: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CP_IMAGE');
2739: RAISE FND_API.g_exc_error;
2740: END IF;
2741:
2742: END IF;
2743:
2744: -- If we come till here, everything has been created successfully.
2745: -- Commit the work and set the output values.
2746:
2747: -- Standard check for p_commit
2748: IF FND_API.to_Boolean( p_commit )
2749: THEN
2750: COMMIT WORK;
2751: END IF;
2752:
2760: p_data => x_msg_data
2761: );
2762:
2763: EXCEPTION
2764: WHEN FND_API.g_exc_error THEN
2765: ROLLBACK TO create_cp_image_PVT ;
2766: x_return_status := FND_API.G_RET_STS_ERROR;
2767: FND_MSG_PUB.count_and_get (
2768: p_count => x_msg_count,
2762:
2763: EXCEPTION
2764: WHEN FND_API.g_exc_error THEN
2765: ROLLBACK TO create_cp_image_PVT ;
2766: x_return_status := FND_API.G_RET_STS_ERROR;
2767: FND_MSG_PUB.count_and_get (
2768: p_count => x_msg_count,
2769: p_data => x_msg_data,
2770: p_encoded => FND_API.G_FALSE
2766: x_return_status := FND_API.G_RET_STS_ERROR;
2767: FND_MSG_PUB.count_and_get (
2768: p_count => x_msg_count,
2769: p_data => x_msg_data,
2770: p_encoded => FND_API.G_FALSE
2771: );
2772: WHEN FND_API.g_exc_unexpected_error THEN
2773: ROLLBACK TO create_cp_image_PVT ;
2774: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2768: p_count => x_msg_count,
2769: p_data => x_msg_data,
2770: p_encoded => FND_API.G_FALSE
2771: );
2772: WHEN FND_API.g_exc_unexpected_error THEN
2773: ROLLBACK TO create_cp_image_PVT ;
2774: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2775: FND_MSG_PUB.count_and_get (
2776: p_count => x_msg_count,
2770: p_encoded => FND_API.G_FALSE
2771: );
2772: WHEN FND_API.g_exc_unexpected_error THEN
2773: ROLLBACK TO create_cp_image_PVT ;
2774: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2775: FND_MSG_PUB.count_and_get (
2776: p_count => x_msg_count,
2777: p_data => x_msg_data,
2778: p_encoded => FND_API.G_FALSE
2774: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2775: FND_MSG_PUB.count_and_get (
2776: p_count => x_msg_count,
2777: p_data => x_msg_data,
2778: p_encoded => FND_API.G_FALSE
2779: );
2780: WHEN OTHERS THEN
2781: ROLLBACK TO create_cp_image_PVT ;
2782: x_return_status := FND_API.g_ret_sts_unexp_error;
2778: p_encoded => FND_API.G_FALSE
2779: );
2780: WHEN OTHERS THEN
2781: ROLLBACK TO create_cp_image_PVT ;
2782: x_return_status := FND_API.g_ret_sts_unexp_error;
2783: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2784: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
2785: END IF;
2786: FND_MSG_PUB.count_and_get (
2785: END IF;
2786: FND_MSG_PUB.count_and_get (
2787: p_count => x_msg_count,
2788: p_data => x_msg_data,
2789: p_encoded => FND_API.G_FALSE
2790: );
2791: --
2792: END create_cp_image;
2793: --
2852: p_attach_file_id IN NUMBER,
2853: p_attach_file_name IN VARCHAR2,
2854: p_attr_types_image IN JTF_VARCHAR2_TABLE_100 DEFAULT NULL,
2855: p_attr_values_image IN JTF_VARCHAR2_TABLE_4000 DEFAULT NULL,
2856: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
2857: p_api_version IN NUMBER DEFAULT 1.0,
2858: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
2859: x_return_status OUT VARCHAR2,
2860: x_msg_count OUT NUMBER,
2854: p_attr_types_image IN JTF_VARCHAR2_TABLE_100 DEFAULT NULL,
2855: p_attr_values_image IN JTF_VARCHAR2_TABLE_4000 DEFAULT NULL,
2856: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
2857: p_api_version IN NUMBER DEFAULT 1.0,
2858: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
2859: x_return_status OUT VARCHAR2,
2860: x_msg_count OUT NUMBER,
2861: x_msg_data OUT VARCHAR2
2862: )
2873: l_image_citem_id NUMBER ;
2874: l_image_citem_ver_id NUMBER ;
2875: l_cp_image_citem_ver_id NUMBER ;
2876: l_image_obj_ver_num NUMBER ;
2877: l_created_image VARCHAR2(1) := FND_API.g_false;
2878: --
2879: l_attribute_type_codes JTF_VARCHAR2_TABLE_100 := JTF_VARCHAR2_TABLE_100() ;
2880: l_attributes JTF_VARCHAR2_TABLE_4000 := JTF_VARCHAR2_TABLE_4000() ;
2881: l_citem_ids JTF_NUMBER_TABLE := JTF_NUMBER_TABLE() ;
2884: --
2885: l_api_name CONSTANT VARCHAR2(30) := 'Update_CP_Image';
2886: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
2887: --
2888: l_init_msg_list VARCHAR2(1) := FND_API.g_true;
2889: --
2890: l_api_version_number CONSTANT NUMBER := 1.0;
2891: --
2892: BEGIN
2894: -- Standard Start of API savepoint
2895: SAVEPOINT update_cp_image_PVT ;
2896:
2897: -- Standard call to check for call compatibility.
2898: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
2899: p_api_version,
2900: l_api_name,
2901: G_PKG_NAME)
2902: THEN
2899: p_api_version,
2900: l_api_name,
2901: G_PKG_NAME)
2902: THEN
2903: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2904: END IF;
2905:
2906: -- Initialize message list if p_init_msg_list is set to TRUE.
2907:
2906: -- Initialize message list if p_init_msg_list is set to TRUE.
2907:
2908: --l_init_msg_list := p_init_msg_list;
2909:
2910: IF FND_API.to_Boolean( l_init_msg_list )
2911: THEN
2912: FND_MSG_PUB.initialize;
2913: END IF;
2914:
2912: FND_MSG_PUB.initialize;
2913: END IF;
2914:
2915:
2916: l_init_msg_list := FND_API.g_false;
2917:
2918:
2919: -- Debug Message
2920: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
2919: -- Debug Message
2920: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
2921:
2922: -- Initialize API return status to SUCCESS
2923: x_return_status := FND_API.G_RET_STS_SUCCESS;
2924: l_return_status := FND_API.G_RET_STS_SUCCESS;
2925: --
2926: --
2927: -- print the contents of the two arrays for Debug.
2920: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
2921:
2922: -- Initialize API return status to SUCCESS
2923: x_return_status := FND_API.G_RET_STS_SUCCESS;
2924: l_return_status := FND_API.G_RET_STS_SUCCESS;
2925: --
2926: --
2927: -- print the contents of the two arrays for Debug.
2928: IF p_attr_types_image IS NOT NULL
2984: ,p_dir_node_id => G_AMS_DIR_NODE_ID
2985: ,p_owner_resource_id => p_resource_id
2986: ,p_owner_resource_type => p_resource_type
2987: ,p_reference_code => NULL -- Why is this needed?
2988: ,p_trans_required => FND_API.g_false -- This is the default value. For now we do not expose this flag on the UI.
2989: ,p_parent_item_id => NULL -- There is no parent for the item of type IBC_IMAGE.
2990: ,p_lock_flag => g_lock_flag_value
2991: ,p_wd_restricted => g_wd_restricted_flag_value
2992: ,p_start_date => sysdate -- use the sysdate as the start date for the IMAGE content item.
2997: ,p_component_citems => NULL
2998: ,p_component_atypes => NULL
2999: ,p_sort_order => NULL
3000: ,p_status => G_CITEM_WIP_STATUS_CODE -- Soon after the content item of type IBC_IMAGE is created successfully, we will go ahead and approve this item.
3001: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
3002: ,p_commit => FND_API.g_false -- We still have to do some more operations.
3003: ,p_api_version_number => p_api_version
3004: ,p_init_msg_list => l_init_msg_list
3005: ,px_content_item_id => l_image_citem_id
2998: ,p_component_atypes => NULL
2999: ,p_sort_order => NULL
3000: ,p_status => G_CITEM_WIP_STATUS_CODE -- Soon after the content item of type IBC_IMAGE is created successfully, we will go ahead and approve this item.
3001: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
3002: ,p_commit => FND_API.g_false -- We still have to do some more operations.
3003: ,p_api_version_number => p_api_version
3004: ,p_init_msg_list => l_init_msg_list
3005: ,px_content_item_id => l_image_citem_id
3006: ,px_citem_ver_id => l_image_citem_ver_id
3016: AMS_UTILITY_PVT.debug_message('l_citem_ver_id = ' || l_image_citem_ver_id );
3017: AMS_UTILITY_PVT.debug_message('l_obj_ver_num = ' || l_image_obj_ver_num );
3018: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
3019:
3020: IF FND_API.g_ret_sts_success <> l_return_status
3021: THEN
3022: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_IMAGE_ITEM');
3023: RAISE FND_API.g_exc_error;
3024: ELSE
3019:
3020: IF FND_API.g_ret_sts_success <> l_return_status
3021: THEN
3022: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_IMAGE_ITEM');
3023: RAISE FND_API.g_exc_error;
3024: ELSE
3025: l_created_image := FND_API.g_true;
3026: END IF;
3027:
3021: THEN
3022: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_IMAGE_ITEM');
3023: RAISE FND_API.g_exc_error;
3024: ELSE
3025: l_created_image := FND_API.g_true;
3026: END IF;
3027:
3028: l_init_msg_list := FND_API.g_false;
3029:
3024: ELSE
3025: l_created_image := FND_API.g_true;
3026: END IF;
3027:
3028: l_init_msg_list := FND_API.g_false;
3029:
3030: -- Approve this content item of type IBC_IMAGE.
3031:
3032: IBC_CITEM_ADMIN_GRP.approve_item(
3030: -- Approve this content item of type IBC_IMAGE.
3031:
3032: IBC_CITEM_ADMIN_GRP.approve_item(
3033: p_citem_ver_id => l_image_citem_ver_id
3034: ,p_commit => FND_API.g_false
3035: ,p_api_version_number => p_api_version
3036: ,p_init_msg_list => l_init_msg_list
3037: ,px_object_version_number => l_image_obj_ver_num
3038: ,x_return_status => l_return_status
3039: ,x_msg_count => l_msg_count
3040: ,x_msg_data => l_msg_data
3041: );
3042:
3043: IF FND_API.g_ret_sts_success <> l_return_status
3044: THEN
3045: AMS_Utility_PVT.Error_Message('AMS_ERR_APPROVE_CITEM');
3046: RAISE FND_API.g_exc_error;
3047: END IF;
3042:
3043: IF FND_API.g_ret_sts_success <> l_return_status
3044: THEN
3045: AMS_Utility_PVT.Error_Message('AMS_ERR_APPROVE_CITEM');
3046: RAISE FND_API.g_exc_error;
3047: END IF;
3048:
3049: END IF;
3050:
3055:
3056: -- Check if there was a newly created image.
3057: -- If so, we have to set the two attributes to the array of CP_IMAGE attributes.
3058: -- One for attachment_file_id and one for ocm_image_id.
3059: IF l_created_image = FND_API.g_true
3060: THEN
3061: -- Substitute the values for the above two attributes.
3062: FOR i IN l_attribute_type_codes.first .. l_attribute_type_codes.last
3063: LOOP
3075: -- Update the CP_IMAGE item.
3076:
3077: -- Call the procedure IBC_CITEM_ADMIN_GRP.set_attribute_bundle.
3078:
3079: IF g_using_locking = FND_API.g_true
3080: THEN
3081:
3082: -- Note that we have to lock the item first.
3083: IBC_CITEM_ADMIN_GRP.lock_item(
3091: ,x_msg_count => l_msg_count
3092: ,x_msg_data => l_msg_data
3093: );
3094:
3095: IF FND_API.g_ret_sts_success <> l_return_status
3096: THEN
3097: AMS_Utility_PVT.Error_Message('AMS_ERR_LOCKING_CP_IMAGE');
3098: RAISE FND_API.g_exc_error;
3099: END IF;
3094:
3095: IF FND_API.g_ret_sts_success <> l_return_status
3096: THEN
3097: AMS_Utility_PVT.Error_Message('AMS_ERR_LOCKING_CP_IMAGE');
3098: RAISE FND_API.g_exc_error;
3099: END IF;
3100:
3101: IF l_cp_image_citem_ver_id <> p_cp_image_citem_ver_id
3102: THEN
3100:
3101: IF l_cp_image_citem_ver_id <> p_cp_image_citem_ver_id
3102: THEN
3103: AMS_Utility_PVT.Error_Message('AMS_ERR_CITEM_VER_MISMATCH');
3104: RAISE FND_API.g_exc_error;
3105: END IF;
3106:
3107: ELSE
3108:
3117: IBC_CITEM_ADMIN_GRP.set_attribute_bundle(
3118: p_citem_ver_id => p_cp_image_citem_ver_id
3119: ,p_attribute_type_codes => l_attribute_type_codes
3120: ,p_attributes => l_attributes -- This has the changed data if IMAGE was created.
3121: ,p_remove_old => FND_API.g_true -- The procedure sets the p_remove_old value to FND_API.g_true by default as well. Sending it in anyway.
3122: ,p_commit => FND_API.g_false -- This is the Default.
3123: ,p_api_version_number => p_api_version
3124: ,p_init_msg_list => l_init_msg_list
3125: ,px_object_version_number => l_obj_ver_num -- This is an IN/OUT parameter in this procedure.
3118: p_citem_ver_id => p_cp_image_citem_ver_id
3119: ,p_attribute_type_codes => l_attribute_type_codes
3120: ,p_attributes => l_attributes -- This has the changed data if IMAGE was created.
3121: ,p_remove_old => FND_API.g_true -- The procedure sets the p_remove_old value to FND_API.g_true by default as well. Sending it in anyway.
3122: ,p_commit => FND_API.g_false -- This is the Default.
3123: ,p_api_version_number => p_api_version
3124: ,p_init_msg_list => l_init_msg_list
3125: ,px_object_version_number => l_obj_ver_num -- This is an IN/OUT parameter in this procedure.
3126: ,x_return_status => l_return_status
3127: ,x_msg_count => l_msg_count
3128: ,x_msg_data => l_msg_data
3129: );
3130:
3131: IF FND_API.g_ret_sts_success <> l_return_status
3132: THEN
3133: AMS_Utility_PVT.Error_Message('AMS_ERR_SET_CITEM_ATTRIB');
3134: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CP_IMAGE');
3135: RAISE FND_API.g_exc_error;
3131: IF FND_API.g_ret_sts_success <> l_return_status
3132: THEN
3133: AMS_Utility_PVT.Error_Message('AMS_ERR_SET_CITEM_ATTRIB');
3134: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CP_IMAGE');
3135: RAISE FND_API.g_exc_error;
3136: END IF;
3137:
3138: -- If we reach till here, we can unlock the IMAGE item and then
3139: -- unlock the CP_IMAGE item.
3137:
3138: -- If we reach till here, we can unlock the IMAGE item and then
3139: -- unlock the CP_IMAGE item.
3140:
3141: IF l_created_image = FND_API.g_true
3142: THEN
3143:
3144: IF g_using_locking = FND_API.g_true
3145: THEN
3140:
3141: IF l_created_image = FND_API.g_true
3142: THEN
3143:
3144: IF g_using_locking = FND_API.g_true
3145: THEN
3146:
3147: IBC_CITEM_ADMIN_GRP.unlock_item(
3148: p_content_item_id => l_image_citem_id
3157: AMS_UTILITY_PVT.debug_message('After Unlock.');
3158: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
3159:
3160: --
3161: IF FND_API.g_ret_sts_success <> l_return_status
3162: THEN
3163: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_IMAGE');
3164: RAISE FND_API.g_exc_error;
3165: END IF;
3160: --
3161: IF FND_API.g_ret_sts_success <> l_return_status
3162: THEN
3163: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_IMAGE');
3164: RAISE FND_API.g_exc_error;
3165: END IF;
3166:
3167: END IF;
3168: --
3167: END IF;
3168: --
3169: END IF;
3170:
3171: IF g_using_locking = FND_API.g_true
3172: THEN
3173:
3174: IBC_CITEM_ADMIN_GRP.unlock_item(
3175: p_content_item_id => p_cp_image_citem_id
3184: AMS_UTILITY_PVT.debug_message('After Unlock.');
3185: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
3186:
3187: --
3188: IF FND_API.g_ret_sts_success <> l_return_status
3189: THEN
3190: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CP_IMAGE');
3191: RAISE FND_API.g_exc_error;
3192: END IF;
3187: --
3188: IF FND_API.g_ret_sts_success <> l_return_status
3189: THEN
3190: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CP_IMAGE');
3191: RAISE FND_API.g_exc_error;
3192: END IF;
3193:
3194: END IF;
3195:
3195:
3196: -- Commit the work and set the output values.
3197:
3198: -- Standard check for p_commit
3199: IF FND_API.to_Boolean( p_commit )
3200: THEN
3201: COMMIT WORK;
3202: END IF;
3203:
3209: p_data => x_msg_data
3210: );
3211:
3212: EXCEPTION
3213: WHEN FND_API.g_exc_error THEN
3214: ROLLBACK TO update_cp_image_PVT ;
3215: x_return_status := FND_API.G_RET_STS_ERROR;
3216: FND_MSG_PUB.count_and_get (
3217: p_count => x_msg_count,
3211:
3212: EXCEPTION
3213: WHEN FND_API.g_exc_error THEN
3214: ROLLBACK TO update_cp_image_PVT ;
3215: x_return_status := FND_API.G_RET_STS_ERROR;
3216: FND_MSG_PUB.count_and_get (
3217: p_count => x_msg_count,
3218: p_data => x_msg_data,
3219: p_encoded => FND_API.G_FALSE
3215: x_return_status := FND_API.G_RET_STS_ERROR;
3216: FND_MSG_PUB.count_and_get (
3217: p_count => x_msg_count,
3218: p_data => x_msg_data,
3219: p_encoded => FND_API.G_FALSE
3220: );
3221: WHEN FND_API.g_exc_unexpected_error THEN
3222: ROLLBACK TO update_cp_image_PVT;
3223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3217: p_count => x_msg_count,
3218: p_data => x_msg_data,
3219: p_encoded => FND_API.G_FALSE
3220: );
3221: WHEN FND_API.g_exc_unexpected_error THEN
3222: ROLLBACK TO update_cp_image_PVT;
3223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3224: FND_MSG_PUB.count_and_get (
3225: p_count => x_msg_count,
3219: p_encoded => FND_API.G_FALSE
3220: );
3221: WHEN FND_API.g_exc_unexpected_error THEN
3222: ROLLBACK TO update_cp_image_PVT;
3223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3224: FND_MSG_PUB.count_and_get (
3225: p_count => x_msg_count,
3226: p_data => x_msg_data,
3227: p_encoded => FND_API.G_FALSE
3223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3224: FND_MSG_PUB.count_and_get (
3225: p_count => x_msg_count,
3226: p_data => x_msg_data,
3227: p_encoded => FND_API.G_FALSE
3228: );
3229: WHEN OTHERS THEN
3230: ROLLBACK TO update_cp_image_PVT ;
3231: x_return_status := FND_API.g_ret_sts_unexp_error;
3227: p_encoded => FND_API.G_FALSE
3228: );
3229: WHEN OTHERS THEN
3230: ROLLBACK TO update_cp_image_PVT ;
3231: x_return_status := FND_API.g_ret_sts_unexp_error;
3232: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3233: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
3234: END IF;
3235: FND_MSG_PUB.count_and_get (
3234: END IF;
3235: FND_MSG_PUB.count_and_get (
3236: p_count => x_msg_count,
3237: p_data => x_msg_data,
3238: p_encoded => FND_API.G_FALSE
3239: );
3240:
3241:
3242: END update_cp_image;
3285: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
3286: --
3287: BEGIN
3288: --
3289: x_return_status := FND_API.g_ret_sts_success;
3290: --
3291:
3292: IBC_CITEM_ADMIN_GRP.get_attribute_bundle(
3293: p_citem_ver_id => p_citem_ver_id
3301: ,x_msg_count => l_msg_count
3302: ,x_msg_data => l_msg_data
3303: );
3304:
3305: IF FND_API.g_ret_sts_success <> l_return_status
3306: THEN
3307: AMS_Utility_PVT.Error_Message('AMS_ERR_GET_CITEM_ATTRS');
3308: RAISE FND_API.g_exc_error;
3309: END IF;
3304:
3305: IF FND_API.g_ret_sts_success <> l_return_status
3306: THEN
3307: AMS_Utility_PVT.Error_Message('AMS_ERR_GET_CITEM_ATTRS');
3308: RAISE FND_API.g_exc_error;
3309: END IF;
3310:
3311: x_return_status := l_return_status;
3312: x_attribute_type_codes := l_attribute_type_codes;
3319: p_data => x_msg_data
3320: );
3321:
3322: EXCEPTION
3323: WHEN FND_API.g_exc_error THEN
3324: ROLLBACK;
3325: x_return_status := FND_API.G_RET_STS_ERROR;
3326: FND_MSG_PUB.count_and_get (
3327: p_count => x_msg_count,
3321:
3322: EXCEPTION
3323: WHEN FND_API.g_exc_error THEN
3324: ROLLBACK;
3325: x_return_status := FND_API.G_RET_STS_ERROR;
3326: FND_MSG_PUB.count_and_get (
3327: p_count => x_msg_count,
3328: p_data => x_msg_data,
3329: p_encoded => FND_API.G_FALSE
3325: x_return_status := FND_API.G_RET_STS_ERROR;
3326: FND_MSG_PUB.count_and_get (
3327: p_count => x_msg_count,
3328: p_data => x_msg_data,
3329: p_encoded => FND_API.G_FALSE
3330: );
3331: WHEN FND_API.g_exc_unexpected_error THEN
3332: ROLLBACK;
3333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3327: p_count => x_msg_count,
3328: p_data => x_msg_data,
3329: p_encoded => FND_API.G_FALSE
3330: );
3331: WHEN FND_API.g_exc_unexpected_error THEN
3332: ROLLBACK;
3333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3334: FND_MSG_PUB.count_and_get (
3335: p_count => x_msg_count,
3329: p_encoded => FND_API.G_FALSE
3330: );
3331: WHEN FND_API.g_exc_unexpected_error THEN
3332: ROLLBACK;
3333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3334: FND_MSG_PUB.count_and_get (
3335: p_count => x_msg_count,
3336: p_data => x_msg_data,
3337: p_encoded => FND_API.G_FALSE
3333: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3334: FND_MSG_PUB.count_and_get (
3335: p_count => x_msg_count,
3336: p_data => x_msg_data,
3337: p_encoded => FND_API.G_FALSE
3338: );
3339: WHEN OTHERS THEN
3340: ROLLBACK;
3341: x_return_status := FND_API.g_ret_sts_unexp_error;
3337: p_encoded => FND_API.G_FALSE
3338: );
3339: WHEN OTHERS THEN
3340: ROLLBACK;
3341: x_return_status := FND_API.g_ret_sts_unexp_error;
3342: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3343: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
3344: END IF;
3345: FND_MSG_PUB.count_and_get (
3344: END IF;
3345: FND_MSG_PUB.count_and_get (
3346: p_count => x_msg_count,
3347: p_data => x_msg_data,
3348: p_encoded => FND_API.G_FALSE
3349: );
3350:
3351: END get_content_item_attrs;
3352:
3399: p_attr_types_for_update IN JTF_VARCHAR2_TABLE_100 DEFAULT NULL,
3400: p_attr_values_for_update IN JTF_VARCHAR2_TABLE_4000 DEFAULT NULL,
3401: p_attach_file_id IN NUMBER DEFAULT NULL,
3402: p_attach_file_name IN VARCHAR2 DEFAULT NULL,
3403: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
3404: p_api_version IN NUMBER DEFAULT 1.0,
3405: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
3406: x_return_status OUT VARCHAR2,
3407: x_msg_count OUT NUMBER,
3401: p_attach_file_id IN NUMBER DEFAULT NULL,
3402: p_attach_file_name IN VARCHAR2 DEFAULT NULL,
3403: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
3404: p_api_version IN NUMBER DEFAULT 1.0,
3405: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
3406: x_return_status OUT VARCHAR2,
3407: x_msg_count OUT NUMBER,
3408: x_msg_data OUT VARCHAR2,
3409: p_replace_attr_bundle IN VARCHAR2 DEFAULT FND_API.g_false
3405: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
3406: x_return_status OUT VARCHAR2,
3407: x_msg_count OUT NUMBER,
3408: x_msg_data OUT VARCHAR2,
3409: p_replace_attr_bundle IN VARCHAR2 DEFAULT FND_API.g_false
3410: )
3411: IS
3412: --
3413: l_attribute_type_codes JTF_VARCHAR2_TABLE_100 ;
3437: l_cpnt_owner_types JTF_VARCHAR2_TABLE_100 ;
3438: l_cpnt_owner_names JTF_VARCHAR2_TABLE_400 ;
3439: l_cpnt_sort_orders JTF_NUMBER_TABLE ;
3440: --
3441: l_init_msg_list VARCHAR2(1) := FND_API.g_true;
3442: --
3443: l_api_version_number CONSTANT NUMBER := 1.0;
3444: --
3445: BEGIN
3445: BEGIN
3446: --
3447:
3448: -- Standard call to check for call compatibility.
3449: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3450: p_api_version,
3451: l_api_name,
3452: G_PKG_NAME)
3453: THEN
3450: p_api_version,
3451: l_api_name,
3452: G_PKG_NAME)
3453: THEN
3454: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3455: END IF;
3456:
3457: -- Initialize message list if p_init_msg_list is set to TRUE.
3458:
3457: -- Initialize message list if p_init_msg_list is set to TRUE.
3458:
3459: --l_init_msg_list := p_init_msg_list;
3460:
3461: IF FND_API.to_Boolean( l_init_msg_list )
3462: THEN
3463: FND_MSG_PUB.initialize;
3464: END IF;
3465:
3462: THEN
3463: FND_MSG_PUB.initialize;
3464: END IF;
3465:
3466: l_init_msg_list := FND_API.g_false;
3467:
3468: -- Debug Message
3469: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' start');
3470: AMS_UTILITY_PVT.debug_message('content item id = ' || p_citem_id);
3469: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' start');
3470: AMS_UTILITY_PVT.debug_message('content item id = ' || p_citem_id);
3471:
3472: -- Initialize API return status to SUCCESS
3473: x_return_status := FND_API.G_RET_STS_SUCCESS;
3474: l_return_status := FND_API.G_RET_STS_SUCCESS;
3475:
3476: IF g_using_locking = FND_API.g_true
3477: THEN
3470: AMS_UTILITY_PVT.debug_message('content item id = ' || p_citem_id);
3471:
3472: -- Initialize API return status to SUCCESS
3473: x_return_status := FND_API.G_RET_STS_SUCCESS;
3474: l_return_status := FND_API.G_RET_STS_SUCCESS;
3475:
3476: IF g_using_locking = FND_API.g_true
3477: THEN
3478:
3472: -- Initialize API return status to SUCCESS
3473: x_return_status := FND_API.G_RET_STS_SUCCESS;
3474: l_return_status := FND_API.G_RET_STS_SUCCESS;
3475:
3476: IF g_using_locking = FND_API.g_true
3477: THEN
3478:
3479: -- We have to lock the item first.
3480: IBC_CITEM_ADMIN_GRP.lock_item(
3488: ,x_msg_count => l_msg_count
3489: ,x_msg_data => l_msg_data
3490: );
3491:
3492: IF FND_API.g_ret_sts_success <> l_return_status
3493: THEN
3494: AMS_Utility_PVT.Error_Message('AMS_ERR_LOCKING_CITEM');
3495: RAISE FND_API.g_exc_error;
3496: END IF;
3491:
3492: IF FND_API.g_ret_sts_success <> l_return_status
3493: THEN
3494: AMS_Utility_PVT.Error_Message('AMS_ERR_LOCKING_CITEM');
3495: RAISE FND_API.g_exc_error;
3496: END IF;
3497:
3498: IF l_citem_ver_id <> p_citem_version_id
3499: THEN
3497:
3498: IF l_citem_ver_id <> p_citem_version_id
3499: THEN
3500: AMS_Utility_PVT.Error_Message('AMS_ERR_CITEM_VER_MISMATCH');
3501: RAISE FND_API.g_exc_error;
3502: END IF;
3503:
3504: ELSE
3505:
3514: -- Get all the existing basic attributes for the content item if necessary.
3515:
3516: -- Check if we just need to replace the attribute bundle.
3517:
3518: IF p_replace_attr_bundle = FND_API.g_true
3519: THEN
3520:
3521: -- If the attribute bundle has to be totally replaced with the one
3522: -- incoming, do so.
3550: ,x_msg_count => l_msg_count
3551: ,x_msg_data => l_msg_data
3552: );
3553:
3554: IF FND_API.g_ret_sts_success <> l_return_status
3555: THEN
3556: AMS_Utility_PVT.Error_Message('AMS_ERR_GET_CITEM_ATTRS');
3557: RAISE FND_API.g_exc_error;
3558: END IF;
3553:
3554: IF FND_API.g_ret_sts_success <> l_return_status
3555: THEN
3556: AMS_Utility_PVT.Error_Message('AMS_ERR_GET_CITEM_ATTRS');
3557: RAISE FND_API.g_exc_error;
3558: END IF;
3559:
3560: */
3561:
3582: ,x_msg_count => l_msg_count
3583: ,x_msg_data => l_msg_data
3584: );
3585:
3586: IF FND_API.g_ret_sts_success <> l_return_status
3587: THEN
3588: AMS_Utility_PVT.Error_Message('AMS_ERR_GET_CITEM');
3589: RAISE FND_API.g_exc_error;
3590: END IF;
3585:
3586: IF FND_API.g_ret_sts_success <> l_return_status
3587: THEN
3588: AMS_Utility_PVT.Error_Message('AMS_ERR_GET_CITEM');
3589: RAISE FND_API.g_exc_error;
3590: END IF;
3591:
3592: IF l_attribute_type_codes IS NOT NULL
3593: AND
3634: IBC_CITEM_ADMIN_GRP.set_attribute_bundle(
3635: p_citem_ver_id => p_citem_version_id
3636: ,p_attribute_type_codes => l_attribute_type_codes
3637: ,p_attributes => l_attributes -- This has the changed data as needed.
3638: ,p_remove_old => FND_API.g_true -- The procedure sets the p_remove_old value to FND_API.g_true by default as well. Sending it in anyway.
3639: ,p_commit => FND_API.g_false -- This is the Default.
3640: ,p_api_version_number => p_api_version
3641: ,p_init_msg_list => l_init_msg_list
3642: ,px_object_version_number => l_obj_ver_num -- This is an IN/OUT parameter in this procedure.
3635: p_citem_ver_id => p_citem_version_id
3636: ,p_attribute_type_codes => l_attribute_type_codes
3637: ,p_attributes => l_attributes -- This has the changed data as needed.
3638: ,p_remove_old => FND_API.g_true -- The procedure sets the p_remove_old value to FND_API.g_true by default as well. Sending it in anyway.
3639: ,p_commit => FND_API.g_false -- This is the Default.
3640: ,p_api_version_number => p_api_version
3641: ,p_init_msg_list => l_init_msg_list
3642: ,px_object_version_number => l_obj_ver_num -- This is an IN/OUT parameter in this procedure.
3643: ,x_return_status => l_return_status
3644: ,x_msg_count => l_msg_count
3645: ,x_msg_data => l_msg_data
3646: );
3647:
3648: IF FND_API.g_ret_sts_success <> l_return_status
3649: THEN
3650: AMS_Utility_PVT.Error_Message('AMS_ERR_SET_CITEM_ATTRIB');
3651: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CITEM');
3652: RAISE FND_API.g_exc_error;
3648: IF FND_API.g_ret_sts_success <> l_return_status
3649: THEN
3650: AMS_Utility_PVT.Error_Message('AMS_ERR_SET_CITEM_ATTRIB');
3651: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CITEM');
3652: RAISE FND_API.g_exc_error;
3653: END IF;
3654:
3655: END IF;
3656:
3663:
3664: IBC_CITEM_ADMIN_GRP.set_attachment(
3665: p_citem_ver_id => p_citem_version_id
3666: ,p_attach_file_id => p_attach_file_id
3667: ,p_commit => FND_API.g_false -- This is the Default.
3668: ,p_api_version_number => p_api_version
3669: ,p_init_msg_list => l_init_msg_list
3670: ,px_object_version_number => l_obj_ver_num -- This is the IN OUT Parameter
3671: ,x_return_status => l_return_status
3672: ,x_msg_count => l_msg_count
3673: ,x_msg_data => l_msg_data
3674: );
3675:
3676: IF FND_API.g_ret_sts_success <> l_return_status
3677: THEN
3678: AMS_Utility_PVT.Error_Message('AMS_ERR_SET_CITEM_ATTCH');
3679: RAISE FND_API.g_exc_error;
3680: END IF;
3675:
3676: IF FND_API.g_ret_sts_success <> l_return_status
3677: THEN
3678: AMS_Utility_PVT.Error_Message('AMS_ERR_SET_CITEM_ATTCH');
3679: RAISE FND_API.g_exc_error;
3680: END IF;
3681: END IF;
3682:
3683: IF FND_API.g_ret_sts_success <> l_return_status
3679: RAISE FND_API.g_exc_error;
3680: END IF;
3681: END IF;
3682:
3683: IF FND_API.g_ret_sts_success <> l_return_status
3684: THEN
3685: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CITEM');
3686: RAISE FND_API.g_exc_error;
3687: END IF;
3682:
3683: IF FND_API.g_ret_sts_success <> l_return_status
3684: THEN
3685: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CITEM');
3686: RAISE FND_API.g_exc_error;
3687: END IF;
3688:
3689: AMS_UTILITY_PVT.debug_message('Before Unlock.');
3690: AMS_UTILITY_PVT.debug_message('p_citem_version_id = ' || p_citem_version_id);
3689: AMS_UTILITY_PVT.debug_message('Before Unlock.');
3690: AMS_UTILITY_PVT.debug_message('p_citem_version_id = ' || p_citem_version_id);
3691: AMS_UTILITY_PVT.debug_message('l_obj_ver_num = ' || l_obj_ver_num);
3692:
3693: IF g_using_locking = FND_API.g_true
3694: THEN
3695:
3696: -- unlock the content item as the update was successful.
3697: IBC_CITEM_ADMIN_GRP.unlock_item(
3706: --
3707: AMS_UTILITY_PVT.debug_message('After Unlock.');
3708: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
3709: --
3710: IF FND_API.g_ret_sts_success <> l_return_status
3711: THEN
3712: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
3713: RAISE FND_API.g_exc_error;
3714: END IF;
3709: --
3710: IF FND_API.g_ret_sts_success <> l_return_status
3711: THEN
3712: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
3713: RAISE FND_API.g_exc_error;
3714: END IF;
3715:
3716: END IF;
3717:
3717:
3718: -- Commit the work and set the output values.
3719:
3720: -- Standard check for p_commit
3721: IF FND_API.to_Boolean( p_commit )
3722: THEN
3723: COMMIT WORK;
3724: END IF;
3725:
3731: p_data => x_msg_data
3732: );
3733:
3734: EXCEPTION
3735: WHEN FND_API.g_exc_error THEN
3736: ROLLBACK ;
3737: x_return_status := FND_API.G_RET_STS_ERROR;
3738: FND_MSG_PUB.count_and_get (
3739: p_count => x_msg_count,
3733:
3734: EXCEPTION
3735: WHEN FND_API.g_exc_error THEN
3736: ROLLBACK ;
3737: x_return_status := FND_API.G_RET_STS_ERROR;
3738: FND_MSG_PUB.count_and_get (
3739: p_count => x_msg_count,
3740: p_data => x_msg_data,
3741: p_encoded => FND_API.G_FALSE
3737: x_return_status := FND_API.G_RET_STS_ERROR;
3738: FND_MSG_PUB.count_and_get (
3739: p_count => x_msg_count,
3740: p_data => x_msg_data,
3741: p_encoded => FND_API.G_FALSE
3742: );
3743: WHEN FND_API.g_exc_unexpected_error THEN
3744: ROLLBACK ;
3745: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3739: p_count => x_msg_count,
3740: p_data => x_msg_data,
3741: p_encoded => FND_API.G_FALSE
3742: );
3743: WHEN FND_API.g_exc_unexpected_error THEN
3744: ROLLBACK ;
3745: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3746: FND_MSG_PUB.count_and_get (
3747: p_count => x_msg_count,
3741: p_encoded => FND_API.G_FALSE
3742: );
3743: WHEN FND_API.g_exc_unexpected_error THEN
3744: ROLLBACK ;
3745: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3746: FND_MSG_PUB.count_and_get (
3747: p_count => x_msg_count,
3748: p_data => x_msg_data,
3749: p_encoded => FND_API.G_FALSE
3745: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3746: FND_MSG_PUB.count_and_get (
3747: p_count => x_msg_count,
3748: p_data => x_msg_data,
3749: p_encoded => FND_API.G_FALSE
3750: );
3751: WHEN OTHERS THEN
3752: ROLLBACK ;
3753: x_return_status := FND_API.g_ret_sts_unexp_error;
3749: p_encoded => FND_API.G_FALSE
3750: );
3751: WHEN OTHERS THEN
3752: ROLLBACK ;
3753: x_return_status := FND_API.g_ret_sts_unexp_error;
3754: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3755: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
3756: END IF;
3757: FND_MSG_PUB.count_and_get (
3756: END IF;
3757: FND_MSG_PUB.count_and_get (
3758: p_count => x_msg_count,
3759: p_data => x_msg_data,
3760: p_encoded => FND_API.G_FALSE
3761: );
3762:
3763: END update_content_item;
3764:
3784: p_def_disp_template_id IN NUMBER,
3785: p_delv_id IN NUMBER,
3786: p_citem_id IN NUMBER,
3787: p_assoc_type_code IN VARCHAR2,
3788: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
3789: p_api_version IN NUMBER DEFAULT 1.0,
3790: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
3791: x_return_status OUT VARCHAR2,
3792: x_msg_count OUT NUMBER,
3786: p_citem_id IN NUMBER,
3787: p_assoc_type_code IN VARCHAR2,
3788: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
3789: p_api_version IN NUMBER DEFAULT 1.0,
3790: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
3791: x_return_status OUT VARCHAR2,
3792: x_msg_count OUT NUMBER,
3793: x_msg_data OUT VARCHAR2
3794: )
3816: l_api_name CONSTANT VARCHAR2(30) := 'Update_Citem_For_Delv';
3817: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
3818: --
3819: --
3820: l_init_msg_list VARCHAR2(1) := FND_API.g_true;
3821: --
3822: l_api_version_number CONSTANT NUMBER := 1.0;
3823: --
3824: BEGIN
3824: BEGIN
3825: --
3826:
3827: -- Standard call to check for call compatibility.
3828: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
3829: p_api_version,
3830: l_api_name,
3831: G_PKG_NAME)
3832: THEN
3829: p_api_version,
3830: l_api_name,
3831: G_PKG_NAME)
3832: THEN
3833: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3834: END IF;
3835:
3836: -- Initialize message list if p_init_msg_list is set to TRUE.
3837:
3836: -- Initialize message list if p_init_msg_list is set to TRUE.
3837:
3838: --l_init_msg_list := p_init_msg_list;
3839:
3840: IF FND_API.to_Boolean( l_init_msg_list )
3841: THEN
3842: FND_MSG_PUB.initialize;
3843: END IF;
3844:
3841: THEN
3842: FND_MSG_PUB.initialize;
3843: END IF;
3844:
3845: l_init_msg_list := FND_API.g_false;
3846:
3847: -- Debug Message
3848: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
3849:
3847: -- Debug Message
3848: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
3849:
3850: -- Initialize API return status to SUCCESS
3851: x_return_status := FND_API.G_RET_STS_SUCCESS;
3852: l_return_status := FND_API.G_RET_STS_SUCCESS;
3853:
3854: IF g_using_locking = FND_API.g_true
3855: THEN
3848: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
3849:
3850: -- Initialize API return status to SUCCESS
3851: x_return_status := FND_API.G_RET_STS_SUCCESS;
3852: l_return_status := FND_API.G_RET_STS_SUCCESS;
3853:
3854: IF g_using_locking = FND_API.g_true
3855: THEN
3856:
3850: -- Initialize API return status to SUCCESS
3851: x_return_status := FND_API.G_RET_STS_SUCCESS;
3852: l_return_status := FND_API.G_RET_STS_SUCCESS;
3853:
3854: IF g_using_locking = FND_API.g_true
3855: THEN
3856:
3857: -- We have to lock the item first.
3858: IBC_CITEM_ADMIN_GRP.lock_item(
3866: ,x_msg_count => l_msg_count
3867: ,x_msg_data => l_msg_data
3868: );
3869:
3870: IF FND_API.g_ret_sts_success <> l_return_status
3871: THEN
3872: AMS_Utility_PVT.Error_Message('AMS_ERR_LOCKING_CITEM');
3873: RAISE FND_API.g_exc_error;
3874: END IF;
3869:
3870: IF FND_API.g_ret_sts_success <> l_return_status
3871: THEN
3872: AMS_Utility_PVT.Error_Message('AMS_ERR_LOCKING_CITEM');
3873: RAISE FND_API.g_exc_error;
3874: END IF;
3875:
3876: ELSE
3877:
3910: ,p_attr_types_for_update => l_attribute_type_codes
3911: ,p_attr_values_for_update => l_attributes
3912: ,p_attach_file_id => NULL
3913: ,p_attach_file_name => NULL
3914: ,p_commit => FND_API.g_false
3915: ,p_api_version => p_api_version
3916: ,p_api_validation_level => p_api_validation_level
3917: ,x_return_status => l_return_status
3918: ,x_msg_count => l_msg_count
3918: ,x_msg_count => l_msg_count
3919: ,x_msg_data => l_msg_data
3920: );
3921:
3922: IF FND_API.g_ret_sts_success <> l_return_status
3923: THEN
3924: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CITEM');
3925: RAISE FND_API.g_exc_error;
3926: END IF;
3921:
3922: IF FND_API.g_ret_sts_success <> l_return_status
3923: THEN
3924: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CITEM');
3925: RAISE FND_API.g_exc_error;
3926: END IF;
3927:
3928: --Change the value of default_display_template in IBC_ASSOCIATIONS table.
3929:
3938: THEN
3939: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
3940: FND_MSG_PUB.add;
3941: END IF;
3942: RAISE FND_API.g_exc_error;
3943: END IF;
3944:
3945: END IF;
3946:
3943: END IF;
3944:
3945: END IF;
3946:
3947: IF g_using_locking = FND_API.g_true
3948: THEN
3949:
3950: -- unlock the content item.
3951: IBC_CITEM_ADMIN_GRP.unlock_item(
3961: AMS_UTILITY_PVT.debug_message('After Unlock.');
3962: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
3963:
3964: --
3965: IF FND_API.g_ret_sts_success <> l_return_status
3966: THEN
3967: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
3968: RAISE FND_API.g_exc_error;
3969: END IF;
3964: --
3965: IF FND_API.g_ret_sts_success <> l_return_status
3966: THEN
3967: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
3968: RAISE FND_API.g_exc_error;
3969: END IF;
3970:
3971: END IF;
3972:
3972:
3973: -- Commit the work and set the output values.
3974:
3975: -- Standard check for p_commit
3976: IF FND_API.to_Boolean( p_commit )
3977: THEN
3978: COMMIT WORK;
3979: END IF;
3980:
3986: p_data => x_msg_data
3987: );
3988:
3989: EXCEPTION
3990: WHEN FND_API.g_exc_error THEN
3991: ROLLBACK ;
3992: x_return_status := FND_API.G_RET_STS_ERROR;
3993: FND_MSG_PUB.count_and_get (
3994: p_count => x_msg_count,
3988:
3989: EXCEPTION
3990: WHEN FND_API.g_exc_error THEN
3991: ROLLBACK ;
3992: x_return_status := FND_API.G_RET_STS_ERROR;
3993: FND_MSG_PUB.count_and_get (
3994: p_count => x_msg_count,
3995: p_data => x_msg_data,
3996: p_encoded => FND_API.G_FALSE
3992: x_return_status := FND_API.G_RET_STS_ERROR;
3993: FND_MSG_PUB.count_and_get (
3994: p_count => x_msg_count,
3995: p_data => x_msg_data,
3996: p_encoded => FND_API.G_FALSE
3997: );
3998: WHEN FND_API.g_exc_unexpected_error THEN
3999: ROLLBACK ;
4000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3994: p_count => x_msg_count,
3995: p_data => x_msg_data,
3996: p_encoded => FND_API.G_FALSE
3997: );
3998: WHEN FND_API.g_exc_unexpected_error THEN
3999: ROLLBACK ;
4000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4001: FND_MSG_PUB.count_and_get (
4002: p_count => x_msg_count,
3996: p_encoded => FND_API.G_FALSE
3997: );
3998: WHEN FND_API.g_exc_unexpected_error THEN
3999: ROLLBACK ;
4000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4001: FND_MSG_PUB.count_and_get (
4002: p_count => x_msg_count,
4003: p_data => x_msg_data,
4004: p_encoded => FND_API.G_FALSE
4000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4001: FND_MSG_PUB.count_and_get (
4002: p_count => x_msg_count,
4003: p_data => x_msg_data,
4004: p_encoded => FND_API.G_FALSE
4005: );
4006: WHEN OTHERS THEN
4007: ROLLBACK ;
4008: x_return_status := FND_API.g_ret_sts_unexp_error;
4004: p_encoded => FND_API.G_FALSE
4005: );
4006: WHEN OTHERS THEN
4007: ROLLBACK ;
4008: x_return_status := FND_API.g_ret_sts_unexp_error;
4009: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
4010: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
4011: END IF;
4012: FND_MSG_PUB.count_and_get (
4011: END IF;
4012: FND_MSG_PUB.count_and_get (
4013: p_count => x_msg_count,
4014: p_data => x_msg_data,
4015: p_encoded => FND_API.G_FALSE
4016: );
4017:
4018: END update_citem_for_delv;
4019:
4055: p_attach_file_id IN NUMBER,
4056: p_attach_file_name IN VARCHAR2,
4057: p_resource_id IN NUMBER,
4058: p_resource_type IN VARCHAR2,
4059: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
4060: p_api_version IN NUMBER DEFAULT 1.0,
4061: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
4062: x_citem_id OUT NUMBER,
4063: x_citem_ver_id OUT NUMBER,
4057: p_resource_id IN NUMBER,
4058: p_resource_type IN VARCHAR2,
4059: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
4060: p_api_version IN NUMBER DEFAULT 1.0,
4061: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
4062: x_citem_id OUT NUMBER,
4063: x_citem_ver_id OUT NUMBER,
4064: x_return_status OUT VARCHAR2,
4065: x_msg_count OUT NUMBER,
4082: --
4083: l_api_name CONSTANT VARCHAR2(30) := 'Create_Display_Template';
4084: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
4085: --
4086: l_init_msg_list VARCHAR2(1) := FND_API.g_true;
4087: --
4088: l_api_version_number CONSTANT NUMBER := 1.0;
4089: --
4090: BEGIN
4092: -- Standard Start of API savepoint
4093: SAVEPOINT create_display_template_PVT ;
4094:
4095: -- Standard call to check for call compatibility.
4096: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4097: p_api_version,
4098: l_api_name,
4099: G_PKG_NAME)
4100: THEN
4097: p_api_version,
4098: l_api_name,
4099: G_PKG_NAME)
4100: THEN
4101: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4102: END IF;
4103:
4104: -- Initialize message list if p_init_msg_list is set to TRUE.
4105:
4104: -- Initialize message list if p_init_msg_list is set to TRUE.
4105:
4106: --l_init_msg_list := p_init_msg_list;
4107:
4108: IF FND_API.to_Boolean( l_init_msg_list )
4109: THEN
4110: FND_MSG_PUB.initialize;
4111: END IF;
4112:
4109: THEN
4110: FND_MSG_PUB.initialize;
4111: END IF;
4112:
4113: l_init_msg_list := FND_API.g_false;
4114:
4115: -- Debug Message
4116: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
4117:
4115: -- Debug Message
4116: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
4117:
4118: -- Initialize API return status to SUCCESS
4119: x_return_status := FND_API.G_RET_STS_SUCCESS;
4120: l_return_status := FND_API.G_RET_STS_SUCCESS;
4121:
4122: -- prepare the data for insert.
4123: --
4116: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
4117:
4118: -- Initialize API return status to SUCCESS
4119: x_return_status := FND_API.G_RET_STS_SUCCESS;
4120: l_return_status := FND_API.G_RET_STS_SUCCESS;
4121:
4122: -- prepare the data for insert.
4123: --
4124: l_attribute_type_codes.extend();
4144: ,p_dir_node_id => G_AMS_DIR_NODE_ID
4145: ,p_owner_resource_id => p_resource_id
4146: ,p_owner_resource_type => p_resource_type
4147: ,p_reference_code => NULL -- Why is this needed?
4148: ,p_trans_required => FND_API.g_false -- This is the default value. For now we do not expose this flag on the UI.
4149: ,p_parent_item_id => NULL -- There is no parent for the item of type IBC_STYLESHEET.
4150: ,p_lock_flag => g_lock_flag_value
4151: ,p_wd_restricted => g_wd_restricted_flag_value
4152: ,p_start_date => sysdate
4157: ,p_component_citems => NULL
4158: ,p_component_atypes => NULL
4159: ,p_sort_order => NULL
4160: ,p_status => G_CITEM_WIP_STATUS_CODE -- We will approve this item as soon as we are done with the creation.
4161: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
4162: ,p_commit => FND_API.g_false -- We still have to do some more operations.
4163: ,p_api_version_number => p_api_version
4164: ,p_init_msg_list => l_init_msg_list
4165: ,px_content_item_id => l_citem_id
4158: ,p_component_atypes => NULL
4159: ,p_sort_order => NULL
4160: ,p_status => G_CITEM_WIP_STATUS_CODE -- We will approve this item as soon as we are done with the creation.
4161: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
4162: ,p_commit => FND_API.g_false -- We still have to do some more operations.
4163: ,p_api_version_number => p_api_version
4164: ,p_init_msg_list => l_init_msg_list
4165: ,px_content_item_id => l_citem_id
4166: ,px_citem_ver_id => l_citem_ver_id
4175: AMS_UTILITY_PVT.debug_message('l_citem_ver_id = ' || l_citem_ver_id);
4176: AMS_UTILITY_PVT.debug_message('l_obj_ver_num = ' || l_obj_ver_num);
4177: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
4178:
4179: IF FND_API.g_ret_sts_success <> l_return_status
4180: THEN
4181: AMS_Utility_PVT.Error_Message('AMS_ERR_CRE_STYLE_CITEM');
4182: RAISE FND_API.g_exc_error;
4183: END IF;
4178:
4179: IF FND_API.g_ret_sts_success <> l_return_status
4180: THEN
4181: AMS_Utility_PVT.Error_Message('AMS_ERR_CRE_STYLE_CITEM');
4182: RAISE FND_API.g_exc_error;
4183: END IF;
4184:
4185: -- Approve the above item.
4186:
4185: -- Approve the above item.
4186:
4187: IBC_CITEM_ADMIN_GRP.approve_item(
4188: p_citem_ver_id => l_citem_ver_id
4189: ,p_commit => FND_API.g_false
4190: ,p_api_version_number => p_api_version
4191: ,p_init_msg_list => l_init_msg_list
4192: ,px_object_version_number => l_obj_ver_num
4193: ,x_return_status => l_return_status
4194: ,x_msg_count => l_msg_count
4195: ,x_msg_data => l_msg_data
4196: );
4197:
4198: IF FND_API.g_ret_sts_success <> l_return_status
4199: THEN
4200: AMS_Utility_PVT.Error_Message('AMS_ERR_APPROVE_CITEM');
4201: RAISE FND_API.g_exc_error;
4202: END IF;
4197:
4198: IF FND_API.g_ret_sts_success <> l_return_status
4199: THEN
4200: AMS_Utility_PVT.Error_Message('AMS_ERR_APPROVE_CITEM');
4201: RAISE FND_API.g_exc_error;
4202: END IF;
4203:
4204: IF g_using_locking = FND_API.g_true
4205: THEN
4200: AMS_Utility_PVT.Error_Message('AMS_ERR_APPROVE_CITEM');
4201: RAISE FND_API.g_exc_error;
4202: END IF;
4203:
4204: IF g_using_locking = FND_API.g_true
4205: THEN
4206:
4207: -- Unlock the Item if success.
4208: IBC_CITEM_ADMIN_GRP.unlock_item(
4220:
4221: --
4222: --
4223: --
4224: IF FND_API.g_ret_sts_success <> l_return_status
4225: THEN
4226: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
4227: RAISE FND_API.g_exc_error;
4228: END IF;
4223: --
4224: IF FND_API.g_ret_sts_success <> l_return_status
4225: THEN
4226: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
4227: RAISE FND_API.g_exc_error;
4228: END IF;
4229:
4230: END IF;
4231:
4256: ,1
4257: ,NULL
4258: );
4259:
4260: IF FND_API.g_ret_sts_success <> l_return_status
4261: THEN
4262: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_DISP_TMPL');
4263: RAISE FND_API.g_exc_error;
4264: END IF;
4259:
4260: IF FND_API.g_ret_sts_success <> l_return_status
4261: THEN
4262: AMS_Utility_PVT.Error_Message('AMS_ERR_CREATE_DISP_TMPL');
4263: RAISE FND_API.g_exc_error;
4264: END IF;
4265: --
4266: -- If we come till here, everything has been created successfully.
4267: -- Commit the work and set the output values.
4266: -- If we come till here, everything has been created successfully.
4267: -- Commit the work and set the output values.
4268: --
4269: -- Standard check for p_commit
4270: IF FND_API.to_Boolean( p_commit )
4271: THEN
4272: COMMIT WORK;
4273: END IF;
4274: --
4282: p_data => x_msg_data
4283: );
4284: --
4285: EXCEPTION
4286: WHEN FND_API.g_exc_error THEN
4287: ROLLBACK TO create_display_template_PVT ;
4288: x_return_status := FND_API.G_RET_STS_ERROR;
4289: FND_MSG_PUB.count_and_get (
4290: p_count => x_msg_count,
4284: --
4285: EXCEPTION
4286: WHEN FND_API.g_exc_error THEN
4287: ROLLBACK TO create_display_template_PVT ;
4288: x_return_status := FND_API.G_RET_STS_ERROR;
4289: FND_MSG_PUB.count_and_get (
4290: p_count => x_msg_count,
4291: p_data => x_msg_data,
4292: p_encoded => FND_API.G_FALSE
4288: x_return_status := FND_API.G_RET_STS_ERROR;
4289: FND_MSG_PUB.count_and_get (
4290: p_count => x_msg_count,
4291: p_data => x_msg_data,
4292: p_encoded => FND_API.G_FALSE
4293: );
4294: WHEN FND_API.g_exc_unexpected_error THEN
4295: ROLLBACK TO create_display_template_PVT ;
4296: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4290: p_count => x_msg_count,
4291: p_data => x_msg_data,
4292: p_encoded => FND_API.G_FALSE
4293: );
4294: WHEN FND_API.g_exc_unexpected_error THEN
4295: ROLLBACK TO create_display_template_PVT ;
4296: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4297: FND_MSG_PUB.count_and_get (
4298: p_count => x_msg_count,
4292: p_encoded => FND_API.G_FALSE
4293: );
4294: WHEN FND_API.g_exc_unexpected_error THEN
4295: ROLLBACK TO create_display_template_PVT ;
4296: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4297: FND_MSG_PUB.count_and_get (
4298: p_count => x_msg_count,
4299: p_data => x_msg_data,
4300: p_encoded => FND_API.G_FALSE
4296: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4297: FND_MSG_PUB.count_and_get (
4298: p_count => x_msg_count,
4299: p_data => x_msg_data,
4300: p_encoded => FND_API.G_FALSE
4301: );
4302: WHEN OTHERS THEN
4303: ROLLBACK TO create_display_template_PVT ;
4304: x_return_status := FND_API.g_ret_sts_unexp_error;
4300: p_encoded => FND_API.G_FALSE
4301: );
4302: WHEN OTHERS THEN
4303: ROLLBACK TO create_display_template_PVT ;
4304: x_return_status := FND_API.g_ret_sts_unexp_error;
4305: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
4306: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
4307: END IF;
4308: FND_MSG_PUB.count_and_get (
4307: END IF;
4308: FND_MSG_PUB.count_and_get (
4309: p_count => x_msg_count,
4310: p_data => x_msg_data,
4311: p_encoded => FND_API.G_FALSE
4312: );
4313: --
4314: END create_display_template;
4315:
4355: p_start_date IN DATE DEFAULT SYSDATE,
4356: p_end_date IN DATE DEFAULT NULL,
4357: p_owner_resource_id IN NUMBER,
4358: p_owner_resource_type IN VARCHAR2,
4359: p_reusable_flag IN VARCHAR2 DEFAULT FND_API.g_false, -- CHANGE to Y or N when IBC folks change the conventions for varchar2 fields.
4360: p_attribute_type_code IN VARCHAR2,
4361: p_parent_citem_id IN NUMBER,
4362: p_parent_citem_ver_id IN NUMBER,
4363: p_parent_ctype_code IN VARCHAR2,
4360: p_attribute_type_code IN VARCHAR2,
4361: p_parent_citem_id IN NUMBER,
4362: p_parent_citem_ver_id IN NUMBER,
4363: p_parent_ctype_code IN VARCHAR2,
4364: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
4365: p_api_version IN NUMBER DEFAULT 1.0,
4366: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
4367: x_citem_id OUT NUMBER,
4368: x_citem_ver_id OUT NUMBER,
4362: p_parent_citem_ver_id IN NUMBER,
4363: p_parent_ctype_code IN VARCHAR2,
4364: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
4365: p_api_version IN NUMBER DEFAULT 1.0,
4366: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
4367: x_citem_id OUT NUMBER,
4368: x_citem_ver_id OUT NUMBER,
4369: x_return_status OUT VARCHAR2,
4370: x_msg_count OUT NUMBER,
4388: --
4389: l_api_name CONSTANT VARCHAR2(30) := 'Create_Basic-Questions_Item';
4390: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
4391: --
4392: l_init_msg_list VARCHAR2(1) := FND_API.g_true;
4393: --
4394: l_api_version_number CONSTANT NUMBER := 1.0;
4395: --
4396: BEGIN
4398: -- Standard Start of API savepoint
4399: SAVEPOINT create_basic_ques_item_PVT ;
4400:
4401: -- Standard call to check for call compatibility.
4402: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
4403: p_api_version,
4404: l_api_name,
4405: G_PKG_NAME)
4406: THEN
4403: p_api_version,
4404: l_api_name,
4405: G_PKG_NAME)
4406: THEN
4407: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4408: END IF;
4409:
4410: -- Initialize message list if p_init_msg_list is set to TRUE.
4411:
4410: -- Initialize message list if p_init_msg_list is set to TRUE.
4411:
4412: --l_init_msg_list := p_init_msg_list;
4413:
4414: IF FND_API.to_Boolean( l_init_msg_list )
4415: THEN
4416: FND_MSG_PUB.initialize;
4417: END IF;
4418:
4415: THEN
4416: FND_MSG_PUB.initialize;
4417: END IF;
4418:
4419: l_init_msg_list := FND_API.g_false;
4420:
4421: -- Debug Message
4422: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
4423:
4421: -- Debug Message
4422: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
4423:
4424: -- Initialize API return status to SUCCESS
4425: x_return_status := FND_API.G_RET_STS_SUCCESS;
4426: l_return_status := FND_API.G_RET_STS_SUCCESS;
4427: --
4428: IF p_content_type_code <> G_QUESTIONS -- Should be a CONSTANT in the package.
4429: THEN
4422: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
4423:
4424: -- Initialize API return status to SUCCESS
4425: x_return_status := FND_API.G_RET_STS_SUCCESS;
4426: l_return_status := FND_API.G_RET_STS_SUCCESS;
4427: --
4428: IF p_content_type_code <> G_QUESTIONS -- Should be a CONSTANT in the package.
4429: THEN
4430: AMS_Utility_PVT.Error_Message('AMS_ERR_WRONG_CTYPE_CODE');
4427: --
4428: IF p_content_type_code <> G_QUESTIONS -- Should be a CONSTANT in the package.
4429: THEN
4430: AMS_Utility_PVT.Error_Message('AMS_ERR_WRONG_CTYPE_CODE');
4431: RAISE FND_API.g_exc_error;
4432: END IF;
4433: --
4434: x_return_status := FND_API.g_ret_sts_success;
4435: --
4430: AMS_Utility_PVT.Error_Message('AMS_ERR_WRONG_CTYPE_CODE');
4431: RAISE FND_API.g_exc_error;
4432: END IF;
4433: --
4434: x_return_status := FND_API.g_ret_sts_success;
4435: --
4436: -- Create a new Content Item in IBC Schema for incoming Content Type.
4437: -- Call upsert_item.
4438:
4443: ,p_dir_node_id => G_AMS_DIR_NODE_ID
4444: ,p_owner_resource_id => p_owner_resource_id
4445: ,p_owner_resource_type => p_owner_resource_type
4446: ,p_reference_code => NULL -- Why is this needed?
4447: ,p_trans_required => FND_API.g_false -- This is the default value. For now we do not expose this flag on the UI.
4448: ,p_parent_item_id => p_parent_citem_id -- Specify the parent content item id. This item is visible only in the context of this parent.
4449: ,p_lock_flag => g_lock_flag_value
4450: ,p_wd_restricted => g_wd_restricted_flag_value
4451: ,p_start_date => p_start_date
4456: ,p_component_citems => NULL
4457: ,p_component_atypes => NULL
4458: ,p_sort_order => NULL
4459: ,p_status => G_CITEM_WIP_STATUS_CODE -- When the Deliverable becomes active, we will go in and approve all the underlying content items.
4460: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
4461: ,p_commit => FND_API.g_false -- We still have to do some more operations.
4462: ,p_api_version_number => p_api_version
4463: ,p_init_msg_list => l_init_msg_list
4464: ,px_content_item_id => l_citem_id
4457: ,p_component_atypes => NULL
4458: ,p_sort_order => NULL
4459: ,p_status => G_CITEM_WIP_STATUS_CODE -- When the Deliverable becomes active, we will go in and approve all the underlying content items.
4460: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
4461: ,p_commit => FND_API.g_false -- We still have to do some more operations.
4462: ,p_api_version_number => p_api_version
4463: ,p_init_msg_list => l_init_msg_list
4464: ,px_content_item_id => l_citem_id
4465: ,px_citem_ver_id => l_citem_ver_id
4474: AMS_UTILITY_PVT.debug_message('l_citem_ver_id = ' || l_citem_ver_id);
4475: AMS_UTILITY_PVT.debug_message('l_obj_ver_num = ' || l_obj_ver_num);
4476: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
4477:
4478: IF FND_API.g_ret_sts_success <> l_return_status
4479: THEN
4480: AMS_Utility_PVT.Error_Message('AMS_ERR_CRE_QUES_CITEM');
4481: RAISE FND_API.g_exc_error;
4482: END IF;
4477:
4478: IF FND_API.g_ret_sts_success <> l_return_status
4479: THEN
4480: AMS_Utility_PVT.Error_Message('AMS_ERR_CRE_QUES_CITEM');
4481: RAISE FND_API.g_exc_error;
4482: END IF;
4483:
4484: -- Create the Compound Relation with the parent.
4485: IF p_parent_citem_ver_id IS NOT NULL
4503: p_citem_ver_id => p_parent_citem_ver_id
4504: ,p_content_item_ids => l_citem_ids
4505: ,p_attribute_type_codes => l_citem_attrs
4506: ,p_sort_order => l_dummy_sort_order -- The NULL does not work. -- The new API is supposed to be able to take NULL for this parameter.
4507: ,p_commit => FND_API.g_false
4508: ,p_api_version_number => p_api_version
4509: ,p_init_msg_list => l_init_msg_list
4510: ,x_return_status => l_return_status
4511: ,x_msg_count => l_msg_count
4514:
4515: END IF;
4516: --
4517: --
4518: IF FND_API.g_ret_sts_success <> l_return_status
4519: THEN
4520: AMS_Utility_PVT.Error_Message('AMS_ERR_ADD_COMPOUND_REL');
4521: RAISE FND_API.g_exc_error;
4522: END IF;
4517: --
4518: IF FND_API.g_ret_sts_success <> l_return_status
4519: THEN
4520: AMS_Utility_PVT.Error_Message('AMS_ERR_ADD_COMPOUND_REL');
4521: RAISE FND_API.g_exc_error;
4522: END IF;
4523: --
4524: IF g_using_locking = FND_API.g_true
4525: THEN
4520: AMS_Utility_PVT.Error_Message('AMS_ERR_ADD_COMPOUND_REL');
4521: RAISE FND_API.g_exc_error;
4522: END IF;
4523: --
4524: IF g_using_locking = FND_API.g_true
4525: THEN
4526:
4527: -- Unlock the content item.
4528:
4544: -- If we come till here, everything has been created successfully.
4545: -- Commit the work and set the output values.
4546: --
4547: -- Standard check for p_commit
4548: IF FND_API.to_Boolean( p_commit )
4549: THEN
4550: COMMIT WORK;
4551: END IF;
4552: --
4560: p_data => x_msg_data
4561: );
4562: --
4563: EXCEPTION
4564: WHEN FND_API.g_exc_error THEN
4565: ROLLBACK TO create_basic_ques_item_PVT ;
4566: x_return_status := FND_API.G_RET_STS_ERROR;
4567: FND_MSG_PUB.count_and_get (
4568: p_count => x_msg_count,
4562: --
4563: EXCEPTION
4564: WHEN FND_API.g_exc_error THEN
4565: ROLLBACK TO create_basic_ques_item_PVT ;
4566: x_return_status := FND_API.G_RET_STS_ERROR;
4567: FND_MSG_PUB.count_and_get (
4568: p_count => x_msg_count,
4569: p_data => x_msg_data,
4570: p_encoded => FND_API.G_FALSE
4566: x_return_status := FND_API.G_RET_STS_ERROR;
4567: FND_MSG_PUB.count_and_get (
4568: p_count => x_msg_count,
4569: p_data => x_msg_data,
4570: p_encoded => FND_API.G_FALSE
4571: );
4572: WHEN FND_API.g_exc_unexpected_error THEN
4573: ROLLBACK TO create_basic_ques_item_PVT ;
4574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4568: p_count => x_msg_count,
4569: p_data => x_msg_data,
4570: p_encoded => FND_API.G_FALSE
4571: );
4572: WHEN FND_API.g_exc_unexpected_error THEN
4573: ROLLBACK TO create_basic_ques_item_PVT ;
4574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4575: FND_MSG_PUB.count_and_get (
4576: p_count => x_msg_count,
4570: p_encoded => FND_API.G_FALSE
4571: );
4572: WHEN FND_API.g_exc_unexpected_error THEN
4573: ROLLBACK TO create_basic_ques_item_PVT ;
4574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4575: FND_MSG_PUB.count_and_get (
4576: p_count => x_msg_count,
4577: p_data => x_msg_data,
4578: p_encoded => FND_API.G_FALSE
4574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4575: FND_MSG_PUB.count_and_get (
4576: p_count => x_msg_count,
4577: p_data => x_msg_data,
4578: p_encoded => FND_API.G_FALSE
4579: );
4580: WHEN OTHERS THEN
4581: ROLLBACK TO create_basic_ques_item_PVT ;
4582: x_return_status := FND_API.g_ret_sts_unexp_error;
4578: p_encoded => FND_API.G_FALSE
4579: );
4580: WHEN OTHERS THEN
4581: ROLLBACK TO create_basic_ques_item_PVT ;
4582: x_return_status := FND_API.g_ret_sts_unexp_error;
4583: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
4584: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
4585: END IF;
4586: FND_MSG_PUB.count_and_get (
4585: END IF;
4586: FND_MSG_PUB.count_and_get (
4587: p_count => x_msg_count,
4588: p_data => x_msg_data,
4589: p_encoded => FND_API.G_FALSE
4590: );
4591: --
4592: END create_basic_questions_item;
4593:
4660: l_select_sql_statement VARCHAR2(4000) := '' ;
4661: l_select_clause VARCHAR2(4000) := '' ;
4662: l_from_clause VARCHAR2(1000) := '' ;
4663: l_where_clause VARCHAR2(1000) := '' ;
4664: l_return_status VARCHAR2(1) := FND_API.g_ret_sts_success ;
4665: l_msg_count NUMBER ;
4666: l_msg_data VARCHAR2(2000) ;
4667:
4668: l_data_src_fld_ids JTF_NUMBER_TABLE := JTF_NUMBER_TABLE() ;
4708: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
4709: --
4710: BEGIN
4711: --
4712: l_return_status := FND_API.g_ret_sts_success;
4713: --
4714: -- Get all the Data Source details.
4715: OPEN c_get_list_src_data (p_data_source_code);
4716: FETCH c_get_list_src_data
4721: AND
4722: l_source_object_pk_field IS NULL
4723: THEN
4724: AMS_Utility_PVT.Error_Message('AMS_ERR_NO_DATA_SRC');
4725: RAISE FND_API.g_exc_error;
4726: END IF;
4727:
4728: --
4729: -- Form the FROM clause and WHERE clause.
4783: THEN
4784: l_bind_vars(1) := G_BIND_VAR_AMSP;
4785: ELSE
4786: AMS_Utility_PVT.Error_Message('AMS_ERR_UNDEF_BIND_VAR');
4787: RAISE FND_API.g_exc_error;
4788: -- For user entered data sources, there has to be a way to define the bind variable
4789: -- name that we can use here.
4790: END IF;
4791: */
4797:
4798: IF l_data_src_type_id IS NULL
4799: THEN
4800: AMS_Utility_PVT.Error_Message('AMS_ERR_NO_DATA_SRC_TYPE');
4801: RAISE FND_API.g_exc_error;
4802: END IF ;
4803:
4804: -- For each field id in the incoming array, get the source_column_name
4805: -- if needed and form the select list.
4820:
4821: IF l_source_column_name IS NULL
4822: THEN
4823: AMS_Utility_PVT.Error_Message('AMS_ERR_NO_DATA_SRC_FLD');
4824: RAISE FND_API.g_exc_error;
4825: ELSE
4826:
4827: -- Form the alias for the Column Name in the select list.
4828: l_fld_count := l_fld_count + 1;
4861:
4862: IF l_source_column_name = ''
4863: THEN
4864: AMS_Utility_PVT.Error_Message('AMS_ERR_MALFORMED_FLD_NAME');
4865: RAISE FND_API.g_exc_error;
4866: ELSE
4867: l_fld_count := l_fld_count + 1;
4868:
4869: l_alias := substr(l_list_source_field, 1, 30) ;
4887: END LOOP;
4888: ELSE
4889: -- Cannot form the select statement, as no fields list available.
4890: AMS_Utility_PVT.Error_Message('AMS_ERR_NO_FLDS_FOR_GEN_SQL');
4891: RAISE FND_API.g_exc_error;
4892: END IF;
4893:
4894: END IF;
4895:
4902: x_bind_vars := l_bind_vars ;
4903: --
4904: -- Standard call to get message count and if count is 1, get message info.
4905: FND_MSG_PUB.count_and_get(
4906: p_encoded => FND_API.G_FALSE,
4907: p_count => x_msg_count,
4908: p_data => x_msg_data
4909: );
4910: --
4908: p_data => x_msg_data
4909: );
4910: --
4911: EXCEPTION
4912: WHEN FND_API.g_exc_error THEN
4913: ROLLBACK;
4914: x_return_status := FND_API.G_RET_STS_ERROR;
4915: FND_MSG_PUB.count_and_get (
4916: p_count => x_msg_count,
4910: --
4911: EXCEPTION
4912: WHEN FND_API.g_exc_error THEN
4913: ROLLBACK;
4914: x_return_status := FND_API.G_RET_STS_ERROR;
4915: FND_MSG_PUB.count_and_get (
4916: p_count => x_msg_count,
4917: p_data => x_msg_data,
4918: p_encoded => FND_API.G_FALSE
4914: x_return_status := FND_API.G_RET_STS_ERROR;
4915: FND_MSG_PUB.count_and_get (
4916: p_count => x_msg_count,
4917: p_data => x_msg_data,
4918: p_encoded => FND_API.G_FALSE
4919: );
4920: WHEN FND_API.g_exc_unexpected_error THEN
4921: ROLLBACK;
4922: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4916: p_count => x_msg_count,
4917: p_data => x_msg_data,
4918: p_encoded => FND_API.G_FALSE
4919: );
4920: WHEN FND_API.g_exc_unexpected_error THEN
4921: ROLLBACK;
4922: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4923: FND_MSG_PUB.count_and_get (
4924: p_count => x_msg_count,
4918: p_encoded => FND_API.G_FALSE
4919: );
4920: WHEN FND_API.g_exc_unexpected_error THEN
4921: ROLLBACK;
4922: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4923: FND_MSG_PUB.count_and_get (
4924: p_count => x_msg_count,
4925: p_data => x_msg_data,
4926: p_encoded => FND_API.G_FALSE
4922: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4923: FND_MSG_PUB.count_and_get (
4924: p_count => x_msg_count,
4925: p_data => x_msg_data,
4926: p_encoded => FND_API.G_FALSE
4927: );
4928: WHEN OTHERS THEN
4929: ROLLBACK;
4930: x_return_status := FND_API.g_ret_sts_unexp_error;
4926: p_encoded => FND_API.G_FALSE
4927: );
4928: WHEN OTHERS THEN
4929: ROLLBACK;
4930: x_return_status := FND_API.g_ret_sts_unexp_error;
4931: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
4932: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
4933: END IF;
4934: FND_MSG_PUB.count_and_get (
4933: END IF;
4934: FND_MSG_PUB.count_and_get (
4935: p_count => x_msg_count,
4936: p_data => x_msg_data,
4937: p_encoded => FND_API.G_FALSE
4938: );
4939: --
4940: END generate_select_sql;
4941:
4978: p_content_item_name IN VARCHAR2,
4979: p_description IN VARCHAR2,
4980: p_owner_resource_id IN NUMBER,
4981: p_owner_resource_type IN VARCHAR2,
4982: p_reusable_flag IN VARCHAR2 DEFAULT FND_API.g_false, -- CHANGE to Y or N when IBC folks change the conventions for varchar2 fields.
4983: p_attribute_type_code IN VARCHAR2,
4984: p_parent_citem_id IN NUMBER,
4985: p_parent_citem_ver_id IN NUMBER,
4986: p_parent_ctype_code IN VARCHAR2,
4987: p_ui_control_type IN VARCHAR2 DEFAULT G_DEF_UI_FOR_SUBMIT,
4988: p_button_label IN VARCHAR2,
4989: p_ocm_image_id IN NUMBER DEFAULT NULL,
4990: p_alignment IN VARCHAR2 DEFAULT G_DEF_ALIGN_FOR_SUBMIT,
4991: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
4992: p_api_version IN NUMBER DEFAULT 1.0,
4993: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
4994: x_citem_id OUT NUMBER,
4995: x_citem_ver_id OUT NUMBER,
4989: p_ocm_image_id IN NUMBER DEFAULT NULL,
4990: p_alignment IN VARCHAR2 DEFAULT G_DEF_ALIGN_FOR_SUBMIT,
4991: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
4992: p_api_version IN NUMBER DEFAULT 1.0,
4993: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
4994: x_citem_id OUT NUMBER,
4995: x_citem_ver_id OUT NUMBER,
4996: x_return_status OUT VARCHAR2,
4997: x_msg_count OUT NUMBER,
5030: --
5031: l_api_name CONSTANT VARCHAR2(30) := 'Create_Submit_Section';
5032: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
5033: --
5034: l_init_msg_list VARCHAR2(1) := FND_API.g_true;
5035: --
5036: l_api_version_number CONSTANT NUMBER := 1.0;
5037: --
5038: BEGIN
5040: -- Standard Start of API savepoint
5041: SAVEPOINT create_submit_section_PVT ;
5042:
5043: -- Standard call to check for call compatibility.
5044: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5045: p_api_version,
5046: l_api_name,
5047: G_PKG_NAME)
5048: THEN
5045: p_api_version,
5046: l_api_name,
5047: G_PKG_NAME)
5048: THEN
5049: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5050: END IF;
5051:
5052: -- Initialize message list if p_init_msg_list is set to TRUE.
5053:
5052: -- Initialize message list if p_init_msg_list is set to TRUE.
5053:
5054: --l_init_msg_list := p_init_msg_list;
5055:
5056: IF FND_API.to_Boolean( l_init_msg_list )
5057: THEN
5058: FND_MSG_PUB.initialize;
5059: END IF;
5060:
5057: THEN
5058: FND_MSG_PUB.initialize;
5059: END IF;
5060:
5061: l_init_msg_list := FND_API.g_false;
5062:
5063: -- Debug Message
5064: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
5065:
5063: -- Debug Message
5064: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
5065:
5066: -- Initialize API return status to SUCCESS
5067: x_return_status := FND_API.G_RET_STS_SUCCESS;
5068: l_return_status := FND_API.G_RET_STS_SUCCESS;
5069: --
5070: --
5071: IF p_content_type_code <> G_SUBMIT_SECTION -- Should be a CONSTANT in the package.
5064: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
5065:
5066: -- Initialize API return status to SUCCESS
5067: x_return_status := FND_API.G_RET_STS_SUCCESS;
5068: l_return_status := FND_API.G_RET_STS_SUCCESS;
5069: --
5070: --
5071: IF p_content_type_code <> G_SUBMIT_SECTION -- Should be a CONSTANT in the package.
5072: THEN
5070: --
5071: IF p_content_type_code <> G_SUBMIT_SECTION -- Should be a CONSTANT in the package.
5072: THEN
5073: AMS_Utility_PVT.Error_Message('AMS_ERR_WRONG_CTYPE_CODE');
5074: RAISE FND_API.g_exc_error;
5075: END IF;
5076: --
5077: x_return_status := FND_API.g_ret_sts_success;
5078:
5073: AMS_Utility_PVT.Error_Message('AMS_ERR_WRONG_CTYPE_CODE');
5074: RAISE FND_API.g_exc_error;
5075: END IF;
5076: --
5077: x_return_status := FND_API.g_ret_sts_success;
5078:
5079: -- Fetch the Deliverable Details.
5080: OPEN c_delv_details;
5081: FETCH c_delv_details INTO l_start_date, l_end_date;
5117: ,p_dir_node_id => G_AMS_DIR_NODE_ID
5118: ,p_owner_resource_id => p_owner_resource_id
5119: ,p_owner_resource_type => p_owner_resource_type
5120: ,p_reference_code => NULL -- Why is this needed?
5121: ,p_trans_required => FND_API.g_false -- This is the default value. For now we do not expose this flag on the UI.
5122: ,p_parent_item_id => p_parent_citem_id -- Specify the parent content item id. This item is visible only in the context of this parent.
5123: ,p_lock_flag => g_lock_flag_value
5124: ,p_wd_restricted => g_wd_restricted_flag_value
5125: ,p_start_date => l_start_date
5130: ,p_component_citems => NULL
5131: ,p_component_atypes => NULL
5132: ,p_sort_order => NULL
5133: ,p_status => G_CITEM_WIP_STATUS_CODE -- When the Deliverable becomes active, we will go in and approve all the underlying content items.
5134: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
5135: ,p_commit => FND_API.g_false -- We still have to do some more operations.
5136: ,p_api_version_number => p_api_version
5137: ,p_init_msg_list => l_init_msg_list
5138: ,px_content_item_id => l_citem_id
5131: ,p_component_atypes => NULL
5132: ,p_sort_order => NULL
5133: ,p_status => G_CITEM_WIP_STATUS_CODE -- When the Deliverable becomes active, we will go in and approve all the underlying content items.
5134: ,p_log_action => FND_API.g_true -- This to be sent as TRUE. It updates the Audit Logs.
5135: ,p_commit => FND_API.g_false -- We still have to do some more operations.
5136: ,p_api_version_number => p_api_version
5137: ,p_init_msg_list => l_init_msg_list
5138: ,px_content_item_id => l_citem_id
5139: ,px_citem_ver_id => l_citem_ver_id
5148: AMS_UTILITY_PVT.debug_message('l_citem_ver_id = ' || l_citem_ver_id);
5149: AMS_UTILITY_PVT.debug_message('l_obj_ver_num = ' || l_obj_ver_num);
5150: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
5151:
5152: IF FND_API.g_ret_sts_success <> l_return_status
5153: THEN
5154: AMS_Utility_PVT.Error_Message('AMS_ERR_CRE_SUBMIT_CITEM');
5155: RAISE FND_API.g_exc_error;
5156: END IF;
5151:
5152: IF FND_API.g_ret_sts_success <> l_return_status
5153: THEN
5154: AMS_Utility_PVT.Error_Message('AMS_ERR_CRE_SUBMIT_CITEM');
5155: RAISE FND_API.g_exc_error;
5156: END IF;
5157:
5158: -- Create the Compound Relation with the parent.
5159: IF p_parent_citem_ver_id IS NOT NULL
5172: l_dummy_sort_order.extend();
5173: l_dummy_sort_order(1) := 1;
5174: --
5175:
5176: IF g_using_locking = FND_API.g_true
5177: THEN
5178:
5179: -- We need to lock the content item before we can add components to it.
5180:
5189: ,x_msg_count => l_msg_count
5190: ,x_msg_data => l_msg_data
5191: );
5192:
5193: IF FND_API.g_ret_sts_success <> l_return_status
5194: THEN
5195: AMS_Utility_PVT.Error_Message('AMS_ERR_LOCKING_CITEM');
5196: RAISE FND_API.g_exc_error;
5197: END IF;
5192:
5193: IF FND_API.g_ret_sts_success <> l_return_status
5194: THEN
5195: AMS_Utility_PVT.Error_Message('AMS_ERR_LOCKING_CITEM');
5196: RAISE FND_API.g_exc_error;
5197: END IF;
5198:
5199: IF l_parent_citem_ver_id <> p_parent_citem_ver_id
5200: THEN
5198:
5199: IF l_parent_citem_ver_id <> p_parent_citem_ver_id
5200: THEN
5201: AMS_Utility_PVT.Error_Message('AMS_ERR_CITEM_VER_MISMATCH');
5202: RAISE FND_API.g_exc_error;
5203: END IF;
5204:
5205: ELSE
5206:
5222: p_citem_ver_id => p_parent_citem_ver_id
5223: ,p_content_item_ids => l_citem_ids
5224: ,p_attribute_type_codes => l_citem_attrs
5225: ,p_sort_order => l_dummy_sort_order -- The NULL does not work. -- The new API is supposed to be able to take NULL for this parameter.
5226: ,p_commit => FND_API.g_false
5227: ,p_api_version_number => p_api_version
5228: ,p_init_msg_list => l_init_msg_list
5229: ,x_return_status => l_return_status
5230: ,x_msg_count => l_msg_count
5230: ,x_msg_count => l_msg_count
5231: ,x_msg_data => l_msg_data
5232: );
5233:
5234: IF FND_API.g_ret_sts_success <> l_return_status
5235: THEN
5236: AMS_Utility_PVT.Error_Message('AMS_ERR_ADD_COMPOUND_REL');
5237: RAISE FND_API.g_exc_error;
5238: END IF;
5233:
5234: IF FND_API.g_ret_sts_success <> l_return_status
5235: THEN
5236: AMS_Utility_PVT.Error_Message('AMS_ERR_ADD_COMPOUND_REL');
5237: RAISE FND_API.g_exc_error;
5238: END IF;
5239:
5240: IF g_using_locking = FND_API.g_true
5241: THEN
5236: AMS_Utility_PVT.Error_Message('AMS_ERR_ADD_COMPOUND_REL');
5237: RAISE FND_API.g_exc_error;
5238: END IF;
5239:
5240: IF g_using_locking = FND_API.g_true
5241: THEN
5242:
5243: -- Unlock the parent content item.
5244:
5254:
5255: AMS_UTILITY_PVT.debug_message('After Unlock.');
5256: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
5257:
5258: IF FND_API.g_ret_sts_success <> l_return_status
5259: THEN
5260: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
5261: RAISE FND_API.g_exc_error;
5262: END IF;
5257:
5258: IF FND_API.g_ret_sts_success <> l_return_status
5259: THEN
5260: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
5261: RAISE FND_API.g_exc_error;
5262: END IF;
5263:
5264: END IF;
5265:
5265:
5266: END IF;
5267: --
5268: --
5269: IF g_using_locking = FND_API.g_true
5270: THEN
5271:
5272: -- Unlock the Submit Section content item.
5273: IBC_CITEM_ADMIN_GRP.unlock_item(
5282:
5283: AMS_UTILITY_PVT.debug_message('After Unlock.');
5284: AMS_UTILITY_PVT.debug_message('l_return_status = ' || l_return_status);
5285:
5286: IF FND_API.g_ret_sts_success <> l_return_status
5287: THEN
5288: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
5289: RAISE FND_API.g_exc_error;
5290: END IF;
5285:
5286: IF FND_API.g_ret_sts_success <> l_return_status
5287: THEN
5288: AMS_Utility_PVT.Error_Message('AMS_ERR_UNLOCK_CITEM');
5289: RAISE FND_API.g_exc_error;
5290: END IF;
5291:
5292: END IF;
5293:
5294: -- If we come till here, everything has been created successfully.
5295: -- Commit the work and set the output values.
5296: --
5297: -- Standard check for p_commit
5298: IF FND_API.to_Boolean( p_commit )
5299: THEN
5300: COMMIT WORK;
5301: END IF;
5302: --
5310: p_data => x_msg_data
5311: );
5312: --
5313: EXCEPTION
5314: WHEN FND_API.g_exc_error THEN
5315: ROLLBACK TO create_submit_section_PVT ;
5316: x_return_status := FND_API.G_RET_STS_ERROR;
5317: FND_MSG_PUB.count_and_get (
5318: p_count => x_msg_count,
5312: --
5313: EXCEPTION
5314: WHEN FND_API.g_exc_error THEN
5315: ROLLBACK TO create_submit_section_PVT ;
5316: x_return_status := FND_API.G_RET_STS_ERROR;
5317: FND_MSG_PUB.count_and_get (
5318: p_count => x_msg_count,
5319: p_data => x_msg_data,
5320: p_encoded => FND_API.G_FALSE
5316: x_return_status := FND_API.G_RET_STS_ERROR;
5317: FND_MSG_PUB.count_and_get (
5318: p_count => x_msg_count,
5319: p_data => x_msg_data,
5320: p_encoded => FND_API.G_FALSE
5321: );
5322: WHEN FND_API.g_exc_unexpected_error THEN
5323: ROLLBACK TO create_submit_section_PVT ;
5324: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5318: p_count => x_msg_count,
5319: p_data => x_msg_data,
5320: p_encoded => FND_API.G_FALSE
5321: );
5322: WHEN FND_API.g_exc_unexpected_error THEN
5323: ROLLBACK TO create_submit_section_PVT ;
5324: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5325: FND_MSG_PUB.count_and_get (
5326: p_count => x_msg_count,
5320: p_encoded => FND_API.G_FALSE
5321: );
5322: WHEN FND_API.g_exc_unexpected_error THEN
5323: ROLLBACK TO create_submit_section_PVT ;
5324: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5325: FND_MSG_PUB.count_and_get (
5326: p_count => x_msg_count,
5327: p_data => x_msg_data,
5328: p_encoded => FND_API.G_FALSE
5324: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5325: FND_MSG_PUB.count_and_get (
5326: p_count => x_msg_count,
5327: p_data => x_msg_data,
5328: p_encoded => FND_API.G_FALSE
5329: );
5330: WHEN OTHERS THEN
5331: ROLLBACK TO create_submit_section_PVT ;
5332: x_return_status := FND_API.g_ret_sts_unexp_error;
5328: p_encoded => FND_API.G_FALSE
5329: );
5330: WHEN OTHERS THEN
5331: ROLLBACK TO create_submit_section_PVT ;
5332: x_return_status := FND_API.g_ret_sts_unexp_error;
5333: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
5334: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
5335: END IF;
5336: FND_MSG_PUB.count_and_get (
5335: END IF;
5336: FND_MSG_PUB.count_and_get (
5337: p_count => x_msg_count,
5338: p_data => x_msg_data,
5339: p_encoded => FND_API.G_FALSE
5340: );
5341:
5342: END create_submit_section;
5343:
5381: p_ui_control_type IN VARCHAR2,
5382: p_button_label IN VARCHAR2,
5383: p_ocm_image_id IN NUMBER,
5384: p_alignment IN VARCHAR2,
5385: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
5386: p_api_version IN NUMBER DEFAULT 1.0,
5387: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
5388: x_return_status OUT VARCHAR2,
5389: x_msg_count OUT NUMBER,
5383: p_ocm_image_id IN NUMBER,
5384: p_alignment IN VARCHAR2,
5385: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
5386: p_api_version IN NUMBER DEFAULT 1.0,
5387: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
5388: x_return_status OUT VARCHAR2,
5389: x_msg_count OUT NUMBER,
5390: x_msg_data OUT VARCHAR2
5391: )
5408: --
5409: l_api_name CONSTANT VARCHAR2(30) := 'Update_Submit_Section';
5410: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
5411: --
5412: l_init_msg_list VARCHAR2(1) := FND_API.g_true;
5413: --
5414: l_attrib_count NUMBER := 0;
5415: --
5416: l_api_version_number CONSTANT NUMBER := 1.0;
5418: BEGIN
5419: --
5420:
5421: -- Standard call to check for call compatibility.
5422: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5423: p_api_version,
5424: l_api_name,
5425: G_PKG_NAME)
5426: THEN
5423: p_api_version,
5424: l_api_name,
5425: G_PKG_NAME)
5426: THEN
5427: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5428: END IF;
5429:
5430: -- Initialize message list if p_init_msg_list is set to TRUE.
5431:
5430: -- Initialize message list if p_init_msg_list is set to TRUE.
5431:
5432: --l_init_msg_list := p_init_msg_list;
5433:
5434: IF FND_API.to_Boolean( l_init_msg_list )
5435: THEN
5436: FND_MSG_PUB.initialize;
5437: END IF;
5438:
5435: THEN
5436: FND_MSG_PUB.initialize;
5437: END IF;
5438:
5439: l_init_msg_list := FND_API.g_false;
5440:
5441: -- Debug Message
5442: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
5443:
5441: -- Debug Message
5442: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
5443:
5444: -- Initialize API return status to SUCCESS
5445: x_return_status := FND_API.G_RET_STS_SUCCESS;
5446: l_return_status := FND_API.G_RET_STS_SUCCESS;
5447: --
5448: --
5449: -- Form the arrays with incoming values.
5442: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
5443:
5444: -- Initialize API return status to SUCCESS
5445: x_return_status := FND_API.G_RET_STS_SUCCESS;
5446: l_return_status := FND_API.G_RET_STS_SUCCESS;
5447: --
5448: --
5449: -- Form the arrays with incoming values.
5450: -- Note that at the time of Update all the values are required.
5503: ,p_attr_types_for_update => l_attribute_type_codes
5504: ,p_attr_values_for_update => l_attributes
5505: ,p_attach_file_id => NULL
5506: ,p_attach_file_name => NULL
5507: ,p_commit => FND_API.g_false
5508: ,p_api_version => p_api_version
5509: ,p_api_validation_level => p_api_validation_level
5510: ,x_return_status => l_return_status
5511: ,x_msg_count => l_msg_count
5513: );
5514:
5515: END IF;
5516:
5517: IF FND_API.g_ret_sts_success <> l_return_status
5518: THEN
5519: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CITEM');
5520: RAISE FND_API.g_exc_error;
5521: END IF;
5516:
5517: IF FND_API.g_ret_sts_success <> l_return_status
5518: THEN
5519: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CITEM');
5520: RAISE FND_API.g_exc_error;
5521: END IF;
5522:
5523: -- Commit the work and set the output values.
5524:
5522:
5523: -- Commit the work and set the output values.
5524:
5525: -- Standard check for p_commit
5526: IF FND_API.to_Boolean( p_commit )
5527: THEN
5528: COMMIT WORK;
5529: END IF;
5530:
5536: p_data => x_msg_data
5537: );
5538:
5539: EXCEPTION
5540: WHEN FND_API.g_exc_error THEN
5541: ROLLBACK ;
5542: x_return_status := FND_API.G_RET_STS_ERROR;
5543: FND_MSG_PUB.count_and_get (
5544: p_count => x_msg_count,
5538:
5539: EXCEPTION
5540: WHEN FND_API.g_exc_error THEN
5541: ROLLBACK ;
5542: x_return_status := FND_API.G_RET_STS_ERROR;
5543: FND_MSG_PUB.count_and_get (
5544: p_count => x_msg_count,
5545: p_data => x_msg_data,
5546: p_encoded => FND_API.G_FALSE
5542: x_return_status := FND_API.G_RET_STS_ERROR;
5543: FND_MSG_PUB.count_and_get (
5544: p_count => x_msg_count,
5545: p_data => x_msg_data,
5546: p_encoded => FND_API.G_FALSE
5547: );
5548: WHEN FND_API.g_exc_unexpected_error THEN
5549: ROLLBACK ;
5550: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5544: p_count => x_msg_count,
5545: p_data => x_msg_data,
5546: p_encoded => FND_API.G_FALSE
5547: );
5548: WHEN FND_API.g_exc_unexpected_error THEN
5549: ROLLBACK ;
5550: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5551: FND_MSG_PUB.count_and_get (
5552: p_count => x_msg_count,
5546: p_encoded => FND_API.G_FALSE
5547: );
5548: WHEN FND_API.g_exc_unexpected_error THEN
5549: ROLLBACK ;
5550: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5551: FND_MSG_PUB.count_and_get (
5552: p_count => x_msg_count,
5553: p_data => x_msg_data,
5554: p_encoded => FND_API.G_FALSE
5550: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5551: FND_MSG_PUB.count_and_get (
5552: p_count => x_msg_count,
5553: p_data => x_msg_data,
5554: p_encoded => FND_API.G_FALSE
5555: );
5556: WHEN OTHERS THEN
5557: ROLLBACK ;
5558: x_return_status := FND_API.g_ret_sts_unexp_error;
5554: p_encoded => FND_API.G_FALSE
5555: );
5556: WHEN OTHERS THEN
5557: ROLLBACK ;
5558: x_return_status := FND_API.g_ret_sts_unexp_error;
5559: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
5560: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
5561: END IF;
5562: FND_MSG_PUB.count_and_get (
5561: END IF;
5562: FND_MSG_PUB.count_and_get (
5563: p_count => x_msg_count,
5564: p_data => x_msg_data,
5565: p_encoded => FND_API.G_FALSE
5566: );
5567:
5568: END update_submit_section;
5569:
5610: p_content_item_name IN VARCHAR2,
5611: p_description IN VARCHAR2,
5612: p_attach_file_id IN NUMBER,
5613: p_attach_file_name IN VARCHAR2,
5614: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
5615: p_api_version IN NUMBER DEFAULT 1.0,
5616: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.g_true,
5617: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
5618: x_return_status OUT VARCHAR2,
5612: p_attach_file_id IN NUMBER,
5613: p_attach_file_name IN VARCHAR2,
5614: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
5615: p_api_version IN NUMBER DEFAULT 1.0,
5616: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.g_true,
5617: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
5618: x_return_status OUT VARCHAR2,
5619: x_msg_count OUT NUMBER,
5620: x_msg_data OUT VARCHAR2
5613: p_attach_file_name IN VARCHAR2,
5614: p_commit IN VARCHAR2 DEFAULT FND_API.g_false,
5615: p_api_version IN NUMBER DEFAULT 1.0,
5616: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.g_true,
5617: p_api_validation_level IN NUMBER DEFAULT FND_API.g_valid_level_full,
5618: x_return_status OUT VARCHAR2,
5619: x_msg_count OUT NUMBER,
5620: x_msg_data OUT VARCHAR2
5621: )
5704: l_data_src_type_codes JTF_VARCHAR2_TABLE_300 := JTF_VARCHAR2_TABLE_300() ;
5705: --
5706: l_data_src_fld_ids JTF_NUMBER_TABLE ; -- This is initilized below.
5707: --
5708: l_init_msg_list VARCHAR2(1) := FND_API.g_true;
5709: --
5710: l_api_version_number CONSTANT NUMBER := 1.0;
5711: l_api_name CONSTANT VARCHAR2(30) := 'update_questions_section';
5712: l_full_name CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
5726: AMS_UTILITY_PVT.debug_message(' l_test_file_id in update_questions_section = ' || l_test_file_id);
5727: AMS_UTILITY_PVT.debug_message(' l_test_file_name in update_questions_section = ' || l_test_file_name);
5728:
5729: -- Standard call to check for call compatibility.
5730: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
5731: p_api_version,
5732: l_api_name,
5733: G_PKG_NAME)
5734: THEN
5731: p_api_version,
5732: l_api_name,
5733: G_PKG_NAME)
5734: THEN
5735: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5736: END IF;
5737:
5738: -- Initialize message list if p_init_msg_list is set to TRUE.
5739:
5738: -- Initialize message list if p_init_msg_list is set to TRUE.
5739:
5740: l_init_msg_list := p_init_msg_list;
5741:
5742: IF FND_API.to_Boolean( l_init_msg_list )
5743: THEN
5744: FND_MSG_PUB.initialize;
5745: END IF;
5746:
5743: THEN
5744: FND_MSG_PUB.initialize;
5745: END IF;
5746:
5747: l_init_msg_list := FND_API.g_false;
5748:
5749: -- Debug Message
5750: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
5751:
5749: -- Debug Message
5750: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
5751:
5752: -- Initialize API return status to SUCCESS
5753: x_return_status := FND_API.G_RET_STS_SUCCESS;
5754: l_return_status := FND_API.G_RET_STS_SUCCESS;
5755: --
5756: IF p_content_type_code <> G_QUESTIONS -- Should be a CONSTANT in the package.
5757: THEN
5750: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
5751:
5752: -- Initialize API return status to SUCCESS
5753: x_return_status := FND_API.G_RET_STS_SUCCESS;
5754: l_return_status := FND_API.G_RET_STS_SUCCESS;
5755: --
5756: IF p_content_type_code <> G_QUESTIONS -- Should be a CONSTANT in the package.
5757: THEN
5758: AMS_Utility_PVT.Error_Message('AMS_ERR_WRONG_CTYPE_CODE');
5755: --
5756: IF p_content_type_code <> G_QUESTIONS -- Should be a CONSTANT in the package.
5757: THEN
5758: AMS_Utility_PVT.Error_Message('AMS_ERR_WRONG_CTYPE_CODE');
5759: RAISE FND_API.g_exc_error;
5760: END IF;
5761:
5762: -- check the version id.
5763:
5769: THEN
5770: IF p_section_citem_ver_id <> l_section_citem_ver_id
5771: THEN
5772: AMS_Utility_PVT.Error_Message('AMS_ERR_CITEM_VER_MISMATCH');
5773: RAISE FND_API.g_exc_error;
5774: END IF;
5775: END IF;
5776: --
5777: -- This API performs the following tasks.
5874: ,x_msg_count => l_msg_count
5875: ,x_msg_data => l_msg_data
5876: );
5877:
5878: IF FND_API.g_ret_sts_success <> l_return_status
5879: THEN
5880: AMS_Utility_PVT.Error_Message('AMS_ERR_CPAGE_GEN_SQL');
5881: RAISE FND_API.g_exc_error;
5882: END IF;
5877:
5878: IF FND_API.g_ret_sts_success <> l_return_status
5879: THEN
5880: AMS_Utility_PVT.Error_Message('AMS_ERR_CPAGE_GEN_SQL');
5881: RAISE FND_API.g_exc_error;
5882: END IF;
5883:
5884: AMS_UTILITY_PVT.debug_message( ' l_select_sql_statement = ' || l_select_sql_statement );
5885:
6001: ,p_attr_types_for_update => l_attribute_type_codes
6002: ,p_attr_values_for_update => l_attributes
6003: ,p_attach_file_id => p_attach_file_id
6004: ,p_attach_file_name => p_attach_file_name
6005: ,p_commit => FND_API.g_false
6006: ,p_api_version => p_api_version
6007: ,p_api_validation_level => p_api_validation_level
6008: ,x_return_status => l_return_status
6009: ,x_msg_count => l_msg_count
6007: ,p_api_validation_level => p_api_validation_level
6008: ,x_return_status => l_return_status
6009: ,x_msg_count => l_msg_count
6010: ,x_msg_data => l_msg_data
6011: ,p_replace_attr_bundle => FND_API.g_true
6012: );
6013:
6014: AMS_UTILITY_PVT.debug_message( ' After update_content_item call. ' );
6015:
6012: );
6013:
6014: AMS_UTILITY_PVT.debug_message( ' After update_content_item call. ' );
6015:
6016: IF FND_API.g_ret_sts_success <> l_return_status
6017: THEN
6018: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CITEM');
6019: RAISE FND_API.g_exc_error;
6020: END IF;
6015:
6016: IF FND_API.g_ret_sts_success <> l_return_status
6017: THEN
6018: AMS_Utility_PVT.Error_Message('AMS_ERR_UPDATE_CITEM');
6019: RAISE FND_API.g_exc_error;
6020: END IF;
6021:
6022: -- There is a bug in IBC Code. The field attachment_attribute_code in the
6023: -- table ibc_citem_versions_tl is getting updated some times. Filed a bug on IBC
6101: -- If we come till here, everything has been updated successfully.
6102: -- Commit the work and set the output values.
6103: --
6104: -- Standard check for p_commit
6105: IF FND_API.to_Boolean( p_commit )
6106: THEN
6107: COMMIT WORK;
6108: END IF;
6109: --
6115: p_data => x_msg_data
6116: );
6117: --
6118: EXCEPTION
6119: WHEN FND_API.g_exc_error THEN
6120: ROLLBACK ;
6121: x_return_status := FND_API.G_RET_STS_ERROR;
6122: FND_MSG_PUB.count_and_get (
6123: p_count => x_msg_count,
6117: --
6118: EXCEPTION
6119: WHEN FND_API.g_exc_error THEN
6120: ROLLBACK ;
6121: x_return_status := FND_API.G_RET_STS_ERROR;
6122: FND_MSG_PUB.count_and_get (
6123: p_count => x_msg_count,
6124: p_data => x_msg_data,
6125: p_encoded => FND_API.G_FALSE
6121: x_return_status := FND_API.G_RET_STS_ERROR;
6122: FND_MSG_PUB.count_and_get (
6123: p_count => x_msg_count,
6124: p_data => x_msg_data,
6125: p_encoded => FND_API.G_FALSE
6126: );
6127: WHEN FND_API.g_exc_unexpected_error THEN
6128: ROLLBACK ;
6129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6123: p_count => x_msg_count,
6124: p_data => x_msg_data,
6125: p_encoded => FND_API.G_FALSE
6126: );
6127: WHEN FND_API.g_exc_unexpected_error THEN
6128: ROLLBACK ;
6129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6130: FND_MSG_PUB.count_and_get (
6131: p_count => x_msg_count,
6125: p_encoded => FND_API.G_FALSE
6126: );
6127: WHEN FND_API.g_exc_unexpected_error THEN
6128: ROLLBACK ;
6129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6130: FND_MSG_PUB.count_and_get (
6131: p_count => x_msg_count,
6132: p_data => x_msg_data,
6133: p_encoded => FND_API.G_FALSE
6129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6130: FND_MSG_PUB.count_and_get (
6131: p_count => x_msg_count,
6132: p_data => x_msg_data,
6133: p_encoded => FND_API.G_FALSE
6134: );
6135: WHEN OTHERS THEN
6136: ROLLBACK ;
6137: x_return_status := FND_API.g_ret_sts_unexp_error;
6133: p_encoded => FND_API.G_FALSE
6134: );
6135: WHEN OTHERS THEN
6136: ROLLBACK ;
6137: x_return_status := FND_API.g_ret_sts_unexp_error;
6138: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
6139: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
6140: END IF;
6141: FND_MSG_PUB.count_and_get (
6140: END IF;
6141: FND_MSG_PUB.count_and_get (
6142: p_count => x_msg_count,
6143: p_data => x_msg_data,
6144: p_encoded => FND_API.G_FALSE
6145: );
6146: --
6147:
6148: END update_questions_section ;
6150:
6151: PROCEDURE erase_blob(
6152: p_file_id IN NUMBER,
6153: x_blob OUT BLOB,
6154: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.g_true,
6155: x_return_status OUT VARCHAR2,
6156: x_msg_count OUT NUMBER,
6157: x_msg_data OUT VARCHAR2
6158: )
6162: l_api_name CONSTANT VARCHAR2(30) := 'erase_blob';
6163: BEGIN
6164: AMS_UTILITY_PVT.debug_message('enter erase');
6165:
6166: IF FND_API.to_Boolean( p_init_msg_list )
6167: THEN
6168: FND_MSG_PUB.initialize;
6169: END IF;
6170:
6167: THEN
6168: FND_MSG_PUB.initialize;
6169: END IF;
6170:
6171: x_return_status := FND_API.G_RET_STS_SUCCESS;
6172:
6173: select file_data into l_blob
6174: from fnd_lobs
6175: where file_id = p_file_id
6185:
6186: AMS_UTILITY_PVT.debug_message('erase successful');
6187:
6188: EXCEPTION
6189: WHEN FND_API.g_exc_error THEN
6190: ROLLBACK ;
6191: x_return_status := FND_API.G_RET_STS_ERROR;
6192: FND_MSG_PUB.count_and_get (
6193: p_count => x_msg_count,
6187:
6188: EXCEPTION
6189: WHEN FND_API.g_exc_error THEN
6190: ROLLBACK ;
6191: x_return_status := FND_API.G_RET_STS_ERROR;
6192: FND_MSG_PUB.count_and_get (
6193: p_count => x_msg_count,
6194: p_data => x_msg_data,
6195: p_encoded => FND_API.G_FALSE
6191: x_return_status := FND_API.G_RET_STS_ERROR;
6192: FND_MSG_PUB.count_and_get (
6193: p_count => x_msg_count,
6194: p_data => x_msg_data,
6195: p_encoded => FND_API.G_FALSE
6196: );
6197: WHEN FND_API.g_exc_unexpected_error THEN
6198: ROLLBACK ;
6199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6193: p_count => x_msg_count,
6194: p_data => x_msg_data,
6195: p_encoded => FND_API.G_FALSE
6196: );
6197: WHEN FND_API.g_exc_unexpected_error THEN
6198: ROLLBACK ;
6199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6200: FND_MSG_PUB.count_and_get (
6201: p_count => x_msg_count,
6195: p_encoded => FND_API.G_FALSE
6196: );
6197: WHEN FND_API.g_exc_unexpected_error THEN
6198: ROLLBACK ;
6199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6200: FND_MSG_PUB.count_and_get (
6201: p_count => x_msg_count,
6202: p_data => x_msg_data,
6203: p_encoded => FND_API.G_FALSE
6199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6200: FND_MSG_PUB.count_and_get (
6201: p_count => x_msg_count,
6202: p_data => x_msg_data,
6203: p_encoded => FND_API.G_FALSE
6204: );
6205: WHEN OTHERS THEN
6206: ROLLBACK ;
6207: x_return_status := FND_API.g_ret_sts_unexp_error;
6203: p_encoded => FND_API.G_FALSE
6204: );
6205: WHEN OTHERS THEN
6206: ROLLBACK ;
6207: x_return_status := FND_API.g_ret_sts_unexp_error;
6208: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
6209: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
6210: END IF;
6211: FND_MSG_PUB.count_and_get (
6210: END IF;
6211: FND_MSG_PUB.count_and_get (
6212: p_count => x_msg_count,
6213: p_data => x_msg_data,
6214: p_encoded => FND_API.G_FALSE
6215: );
6216: END erase_blob;
6217:
6218: