77:
78: -- Initialize the message table if requested.
79:
80: if p_init_msg_tbl then
81: FND_MSG_PUB.initialize;
82: end if;
83:
84: savepoint start_create_attribute;
85:
142: p_return_status := FND_API.G_RET_STS_ERROR;
143: rollback to start_create_attribute;
144: WHEN OTHERS THEN
145: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
146: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
147: SUBSTR (SQLERRM, 1, 240) );
148: FND_MSG_PUB.Add;
149: rollback to start_create_attribute;
150: end CREATE_ATTRIBUTE;
144: WHEN OTHERS THEN
145: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
146: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
147: SUBSTR (SQLERRM, 1, 240) );
148: FND_MSG_PUB.Add;
149: rollback to start_create_attribute;
150: end CREATE_ATTRIBUTE;
151:
152: --=======================================================
205:
206: -- Initialize the message table if requested.
207:
208: if p_init_msg_tbl then
209: FND_MSG_PUB.initialize;
210: end if;
211:
212: savepoint start_create_navigation;
213:
250: rollback to start_create_navigation;
251: WHEN OTHERS THEN
252: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
253: rollback to start_create_navigation;
254: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
255: SUBSTR (SQLERRM, 1, 240) );
256: FND_MSG_PUB.Add;
257: end CREATE_ATTRIBUTE_NAVIGATION;
258:
252: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
253: rollback to start_create_navigation;
254: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
255: SUBSTR (SQLERRM, 1, 240) );
256: FND_MSG_PUB.Add;
257: end CREATE_ATTRIBUTE_NAVIGATION;
258:
259: --=======================================================
260: -- Procedure CREATE_ATTRIBUTE_VALUE
318:
319: -- Initialize the message table if requested.
320:
321: if p_init_msg_tbl then
322: FND_MSG_PUB.initialize;
323: end if;
324:
325: savepoint start_create_value;
326:
369: rollback to start_create_value;
370: WHEN OTHERS THEN
371: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
372: rollback to start_create_value;
373: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
374: SUBSTR (SQLERRM, 1, 240) );
375: FND_MSG_PUB.Add;
376: end CREATE_ATTRIBUTE_VALUE;
377:
371: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
372: rollback to start_create_value;
373: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
374: SUBSTR (SQLERRM, 1, 240) );
375: FND_MSG_PUB.Add;
376: end CREATE_ATTRIBUTE_VALUE;
377:
378: --=======================================================
379: -- Procedure CREATE_OBJECT
430:
431: -- Initialize the message table if requested.
432:
433: if p_init_msg_tbl then
434: FND_MSG_PUB.initialize;
435: end if;
436:
437: savepoint start_create_object;
438:
475: p_return_status := FND_API.G_RET_STS_ERROR;
476: rollback to start_create_object;
477: WHEN OTHERS THEN
478: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
479: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
480: SUBSTR (SQLERRM, 1, 240) );
481: FND_MSG_PUB.Add;
482: rollback to start_create_object;
483: end CREATE_OBJECT;
477: WHEN OTHERS THEN
478: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
479: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
480: SUBSTR (SQLERRM, 1, 240) );
481: FND_MSG_PUB.Add;
482: rollback to start_create_object;
483: end CREATE_OBJECT;
484:
485: --=======================================================
534:
535: -- Initialize the message table if requested.
536:
537: if p_init_msg_tbl then
538: FND_MSG_PUB.initialize;
539: end if;
540:
541: savepoint start_delete_attribute;
542:
566: p_return_status := FND_API.G_RET_STS_ERROR;
567: rollback to start_delete_attribute;
568: WHEN OTHERS THEN
569: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
570: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
571: SUBSTR (SQLERRM, 1, 240) );
572: FND_MSG_PUB.Add;
573: rollback to start_delete_attribute;
574: end DELETE_ATTRIBUTE;
568: WHEN OTHERS THEN
569: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
570: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
571: SUBSTR (SQLERRM, 1, 240) );
572: FND_MSG_PUB.Add;
573: rollback to start_delete_attribute;
574: end DELETE_ATTRIBUTE;
575:
576: --=======================================================
633:
634: -- Initialize the message table if requested.
635:
636: if p_init_msg_tbl then
637: FND_MSG_PUB.initialize;
638: end if;
639:
640: savepoint start_delete_navigation;
641:
668: p_return_status := FND_API.G_RET_STS_ERROR;
669: rollback to start_delete_navigation;
670: WHEN OTHERS THEN
671: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
672: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
673: SUBSTR (SQLERRM, 1, 240) );
674: FND_MSG_PUB.Add;
675: rollback to start_delete_navigation;
676: end DELETE_ATTRIBUTE_NAVIGATION;
670: WHEN OTHERS THEN
671: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
672: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
673: SUBSTR (SQLERRM, 1, 240) );
674: FND_MSG_PUB.Add;
675: rollback to start_delete_navigation;
676: end DELETE_ATTRIBUTE_NAVIGATION;
677:
678: --=======================================================
741:
742: -- Initialize the message table if requested.
743:
744: if p_init_msg_tbl then
745: FND_MSG_PUB.initialize;
746: end if;
747:
748: savepoint start_delete_value;
749:
783: p_return_status := FND_API.G_RET_STS_ERROR;
784: rollback to start_delete_value;
785: WHEN OTHERS THEN
786: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
787: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
788: SUBSTR (SQLERRM, 1, 240) );
789: FND_MSG_PUB.Add;
790: rollback to start_delete_value;
791: end DELETE_ATTRIBUTE_VALUE;
785: WHEN OTHERS THEN
786: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
787: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
788: SUBSTR (SQLERRM, 1, 240) );
789: FND_MSG_PUB.Add;
790: rollback to start_delete_value;
791: end DELETE_ATTRIBUTE_VALUE;
792:
793: --=======================================================
838:
839: -- Initialize the message table if requested.
840:
841: if p_init_msg_tbl then
842: FND_MSG_PUB.initialize;
843: end if;
844:
845: savepoint start_delete_object;
846:
868: p_return_status := FND_API.G_RET_STS_ERROR;
869: rollback to start_delete_object;
870: WHEN OTHERS THEN
871: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
872: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
873: SUBSTR (SQLERRM, 1, 240) );
874: FND_MSG_PUB.Add;
875: rollback to start_delete_object;
876: end DELETE_OBJECT;
870: WHEN OTHERS THEN
871: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
872: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
873: SUBSTR (SQLERRM, 1, 240) );
874: FND_MSG_PUB.Add;
875: rollback to start_delete_object;
876: end DELETE_OBJECT;
877:
878: --===========================================================
953:
954: -- Initialize the message table if requested.
955:
956: if p_init_msg_tbl then
957: FND_MSG_PUB.initialize;
958: end if;
959:
960: savepoint Start_download;
961:
1017: --dbms_output.put_line('got ' || to_char(l_buffer_tbl.count) || ' lines');
1018:
1019: p_return_status := FND_API.G_RET_STS_SUCCESS;
1020:
1021: FND_MSG_PUB.Count_And_Get (
1022: p_count => p_msg_count,
1023: p_data => p_msg_data);
1024:
1025: EXCEPTION
1026: WHEN FND_API.G_EXC_ERROR THEN
1027: -- dbms_output.put_line('Procedure DOWNLOAD_OBJECT EXCEPTION FND_API.G_EXC_ERROR');
1028: -- rollback to Start_download;
1029: p_return_status := FND_API.G_RET_STS_ERROR;
1030: FND_MSG_PUB.Count_And_Get (
1031: p_count => p_msg_count,
1032: p_data => p_msg_data);
1033:
1034: WHEN OTHERS THEN
1034: WHEN OTHERS THEN
1035: -- dbms_output.put_line('Procedure DOWNLOAD_OBJECT EXCEPTION FND_API.G_EXC_ERROR');
1036: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1037: -- rollback to Start_download;
1038: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1039: SUBSTR (SQLERRM, 1, 240) );
1040: FND_MSG_PUB.Add;
1041: FND_MSG_PUB.Count_And_Get (
1042: p_count => p_msg_count,
1036: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1037: -- rollback to Start_download;
1038: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1039: SUBSTR (SQLERRM, 1, 240) );
1040: FND_MSG_PUB.Add;
1041: FND_MSG_PUB.Count_And_Get (
1042: p_count => p_msg_count,
1043: p_data => p_msg_data);
1044:
1037: -- rollback to Start_download;
1038: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1039: SUBSTR (SQLERRM, 1, 240) );
1040: FND_MSG_PUB.Add;
1041: FND_MSG_PUB.Count_And_Get (
1042: p_count => p_msg_count,
1043: p_data => p_msg_data);
1044:
1045: end DOWNLOAD_OBJECT;
1121:
1122: -- Initialize the message table if requested.
1123:
1124: if p_init_msg_tbl then
1125: FND_MSG_PUB.initialize;
1126: end if;
1127:
1128: savepoint start_update_attribute;
1129:
1187: rollback to start_update_attribute;
1188: WHEN OTHERS THEN
1189: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1190: rollback to start_update_attribute;
1191: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1192: SUBSTR (SQLERRM, 1, 240) );
1193: FND_MSG_PUB.Add;
1194: end UPDATE_ATTRIBUTE;
1195:
1189: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1190: rollback to start_update_attribute;
1191: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1192: SUBSTR (SQLERRM, 1, 240) );
1193: FND_MSG_PUB.Add;
1194: end UPDATE_ATTRIBUTE;
1195:
1196: --=======================================================
1197: -- Procedure UPDATE_ATTRIBUTE_NAVIGATION
1249:
1250: -- Initialize the message table if requested.
1251:
1252: if p_init_msg_tbl then
1253: FND_MSG_PUB.initialize;
1254: end if;
1255:
1256: savepoint start_update_navigation;
1257:
1294: rollback to start_update_navigation;
1295: WHEN OTHERS THEN
1296: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1297: rollback to start_update_navigation;
1298: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1299: SUBSTR (SQLERRM, 1, 240) );
1300: FND_MSG_PUB.Add;
1301: end UPDATE_ATTRIBUTE_NAVIGATION;
1302:
1296: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1297: rollback to start_update_navigation;
1298: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1299: SUBSTR (SQLERRM, 1, 240) );
1300: FND_MSG_PUB.Add;
1301: end UPDATE_ATTRIBUTE_NAVIGATION;
1302:
1303: --=======================================================
1304: -- Procedure UPDATE_ATTRIBUTE_VALUE
1362:
1363: -- Initialize the message table if requested.
1364:
1365: if p_init_msg_tbl then
1366: FND_MSG_PUB.initialize;
1367: end if;
1368:
1369: savepoint start_update_value;
1370:
1413: rollback to start_update_value;
1414: WHEN OTHERS THEN
1415: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1416: rollback to start_update_value;
1417: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1418: SUBSTR (SQLERRM, 1, 240) );
1419: FND_MSG_PUB.Add;
1420: end UPDATE_ATTRIBUTE_VALUE;
1421:
1415: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1416: rollback to start_update_value;
1417: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1418: SUBSTR (SQLERRM, 1, 240) );
1419: FND_MSG_PUB.Add;
1420: end UPDATE_ATTRIBUTE_VALUE;
1421:
1422: --=======================================================
1423: -- Procedure UPDATE_OBJECT
1475:
1476: -- Initialize the message table if requested.
1477:
1478: if p_init_msg_tbl then
1479: FND_MSG_PUB.initialize;
1480: end if;
1481:
1482: savepoint start_update_object;
1483:
1520: p_return_status := FND_API.G_RET_STS_ERROR;
1521: rollback to start_update_object;
1522: WHEN OTHERS THEN
1523: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1524: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1525: SUBSTR (SQLERRM, 1, 240) );
1526: FND_MSG_PUB.Add;
1527: rollback to start_update_object;
1528: end UPDATE_OBJECT;
1522: WHEN OTHERS THEN
1523: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1524: FND_MSG_PUB.Build_Exc_Msg( G_PKG_NAME, l_api_name,
1525: SUBSTR (SQLERRM, 1, 240) );
1526: FND_MSG_PUB.Add;
1527: rollback to start_update_object;
1528: end UPDATE_OBJECT;
1529:
1530: end AK_OBJECT_GRP;