DBA Data[Home] [Help]

APPS.IBE_M_MIGRATION_PVT dependencies on FND_API

Line 79: x_status := FND_API.G_RET_STS_SUCCESS;

75: OBJECT_VERSION_NUMBER, CREATED_BY, CREATION_DATE,
76: LAST_UPDATED_BY,LAST_UPDATE_DATE,LAST_UPDATE_LOGIN,STATUS)
77: VALUES(p_code,0, FND_GLOBAL.user_id, SYSDATE,
78: FND_GLOBAL.user_id, SYSDATE, FND_GLOBAL.user_id, p_status);
79: x_status := FND_API.G_RET_STS_SUCCESS;
80: EXCEPTION
81: WHEN OTHERS THEN
82: x_status := FND_API.G_RET_STS_ERROR;
83: END create_log;

Line 82: x_status := FND_API.G_RET_STS_ERROR;

78: FND_GLOBAL.user_id, SYSDATE, FND_GLOBAL.user_id, p_status);
79: x_status := FND_API.G_RET_STS_SUCCESS;
80: EXCEPTION
81: WHEN OTHERS THEN
82: x_status := FND_API.G_RET_STS_ERROR;
83: END create_log;
84:
85: PROCEDURE update_log(p_code IN VARCHAR2,
86: p_old_status IN VARCHAR2,

Line 96: x_status := FND_API.G_RET_STS_SUCCESS;

92: SET STATUS = p_new_status,
93: LAST_UPDATE_DATE = SYSDATE
94: WHERE MIGRATION_CODE = p_code
95: AND STATUS = p_old_status;
96: x_status := FND_API.G_RET_STS_SUCCESS;
97: EXCEPTION
98: WHEN OTHERS THEN
99: x_status := FND_API.G_RET_STS_ERROR;
100: END update_log;

Line 99: x_status := FND_API.G_RET_STS_ERROR;

95: AND STATUS = p_old_status;
96: x_status := FND_API.G_RET_STS_SUCCESS;
97: EXCEPTION
98: WHEN OTHERS THEN
99: x_status := FND_API.G_RET_STS_ERROR;
100: END update_log;
101:
102: -- Migration for context
103: -- p_mode: 'EVALUATION', 'EXECUTION', 'ROLLBACK'

Line 242: x_status := FND_API.g_ret_sts_success;

238: x_content_component_tbl := l_content_component_tbl;
239: ELSE
240: x_content_component_tbl := NULL_CONTENT_COMPONENT_TBL;
241: END IF;
242: x_status := FND_API.g_ret_sts_success;
243: COMMIT;
244: EXCEPTION
245: WHEN OTHERS THEN
246: ROLLBACK TO context_mig;

Line 247: x_status := FND_API.g_ret_sts_error;

243: COMMIT;
244: EXCEPTION
245: WHEN OTHERS THEN
246: ROLLBACK TO context_mig;
247: x_status := FND_API.g_ret_sts_error;
248: END context_mig;
249:
250: PROCEDURE media_template_mig(p_mode IN VARCHAR2,
251: x_status OUT NOCOPY VARCHAR2,

Line 256: x_status := FND_API.g_ret_sts_success;

252: x_media_tbl OUT NOCOPY MEDIA_TEMPLATE_TBL_TYPE,
253: x_template_tbl OUT NOCOPY MEDIA_TEMPLATE_TBL_TYPE)
254: IS
255: BEGIN
256: x_status := FND_API.g_ret_sts_success;
257: END media_template_mig;
258:
259: -------------------------------------------------
260: -- Debug Information Pring Procedure

Line 270: IF (IBE_UTIL.G_DEBUGON = FND_API.G_TRUE) THEN

266: -- dbms_output.put_line(p_debug_str);
267: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
268: FND_FILE.PUT_LINE(FND_FILE.LOG,p_debug_str);
269: END IF;
270: IF (IBE_UTIL.G_DEBUGON = FND_API.G_TRUE) THEN
271: IBE_UTIL.debug(p_debug_str);
272: END IF;
273: END printDebugLog;
274:

Line 1173: p_trans_required => FND_API.G_FALSE,

1169: p_citem_name => px_attachment_rec.FILE_NAME,
1170: p_citem_description => px_attachment_rec.FILE_NAME,
1171: p_dir_node_id => 9, -- IBE directory node
1172: p_reference_code => px_attachment_rec.content_item_code,
1173: p_trans_required => FND_API.G_FALSE,
1174: p_wd_restricted => FND_API.G_FALSE,
1175: p_start_date => NULL,
1176: p_end_date => NULL,
1177: p_attribute_type_codes => l_attribute_type_codes,

Line 1174: p_wd_restricted => FND_API.G_FALSE,

1170: p_citem_description => px_attachment_rec.FILE_NAME,
1171: p_dir_node_id => 9, -- IBE directory node
1172: p_reference_code => px_attachment_rec.content_item_code,
1173: p_trans_required => FND_API.G_FALSE,
1174: p_wd_restricted => FND_API.G_FALSE,
1175: p_start_date => NULL,
1176: p_end_date => NULL,
1177: p_attribute_type_codes => l_attribute_type_codes,
1178: p_attributes => l_attributes,

Line 1182: p_commit => FND_API.G_FALSE,

1178: p_attributes => l_attributes,
1179: p_attach_file_id => px_attachment_rec.file_id,
1180: p_status => l_status,
1181: p_language => px_attachment_rec.language,
1182: p_commit => FND_API.G_FALSE,
1183: px_content_item_id => l_content_item_id,
1184: px_citem_ver_id => l_citem_version_id,
1185: px_object_version_number => l_object_version_number,
1186: x_return_status => l_return_status,

Line 1192: IF l_return_status <> FND_API.g_ret_sts_success THEN

1188: x_msg_data => l_msg_data);
1189: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1190: printDebugLog(' OCM base content item creation status:'||l_return_status);
1191: END IF;
1192: IF l_return_status <> FND_API.g_ret_sts_success THEN
1193: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1194: printDebugLog(' Error in base content item creation:');
1195: END IF;
1196: for i in 1..l_msg_count loop

Line 1197: l_msg_data := FND_MSG_PUB.get(i,FND_API.G_FALSE);

1193: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1194: printDebugLog(' Error in base content item creation:');
1195: END IF;
1196: for i in 1..l_msg_count loop
1197: l_msg_data := FND_MSG_PUB.get(i,FND_API.G_FALSE);
1198: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1199: printDebugLog(' '||l_msg_data);
1200: END IF;
1201: end loop;

Line 1203: RAISE FND_API.g_exc_error;

1199: printDebugLog(' '||l_msg_data);
1200: END IF;
1201: end loop;
1202: x_msg_data := l_msg_data;
1203: RAISE FND_API.g_exc_error;
1204: END IF;
1205: px_attachment_rec.content_item_id := l_content_item_id;
1206: px_attachment_rec.citem_version_id := l_citem_version_id;
1207: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN

Line 1226: p_trans_required => FND_API.G_FALSE,

1222: p_citem_name => l_trans_attachment_tbl(l_j).file_names,
1223: p_citem_description => l_trans_attachment_tbl(l_j).FILE_NAMES,
1224: p_dir_node_id => 9, -- IBE directory node
1225: p_reference_code => px_attachment_rec.content_item_code,
1226: p_trans_required => FND_API.G_FALSE,
1227: p_wd_restricted => FND_API.G_FALSE,
1228: p_start_date => NULL,
1229: p_end_date => NULL,
1230: p_attribute_type_codes => l_attribute_type_codes,

Line 1227: p_wd_restricted => FND_API.G_FALSE,

1223: p_citem_description => l_trans_attachment_tbl(l_j).FILE_NAMES,
1224: p_dir_node_id => 9, -- IBE directory node
1225: p_reference_code => px_attachment_rec.content_item_code,
1226: p_trans_required => FND_API.G_FALSE,
1227: p_wd_restricted => FND_API.G_FALSE,
1228: p_start_date => NULL,
1229: p_end_date => NULL,
1230: p_attribute_type_codes => l_attribute_type_codes,
1231: p_attributes => l_attributes,

Line 1235: p_commit => FND_API.G_FALSE,

1231: p_attributes => l_attributes,
1232: p_attach_file_id => l_trans_attachment_tbl(l_j).file_ids,
1233: p_status => l_status,
1234: p_language => l_trans_attachment_tbl(l_j).trans_languages,
1235: p_commit => FND_API.G_FALSE,
1236: px_content_item_id => l_content_item_id,
1237: px_citem_ver_id => l_citem_version_id,
1238: px_object_version_number => l_object_version_number,
1239: x_return_status => l_return_status,

Line 1245: IF l_return_status <> FND_API.g_ret_sts_success THEN

1241: x_msg_data => l_msg_data);
1242: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1243: printDebugLog(' OCM translating content item status:'||l_return_status);
1244: END IF;
1245: IF l_return_status <> FND_API.g_ret_sts_success THEN
1246: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1247: printDebugLog(' Error in translating content item!');
1248: END IF;
1249: for i in 1..l_msg_count loop

Line 1250: l_msg_data := FND_MSG_PUB.get(i,FND_API.G_FALSE);

1246: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1247: printDebugLog(' Error in translating content item!');
1248: END IF;
1249: for i in 1..l_msg_count loop
1250: l_msg_data := FND_MSG_PUB.get(i,FND_API.G_FALSE);
1251: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1252: printDebugLog(' '||l_msg_data);
1253: END IF;
1254: end loop;

Line 1256: RAISE FND_API.g_exc_error;

1252: printDebugLog(' '||l_msg_data);
1253: END IF;
1254: end loop;
1255: x_msg_data := l_msg_data;
1256: RAISE FND_API.g_exc_error;
1257: END IF;
1258: END LOOP;
1259: END IF;
1260: END IF;

Line 1309: p_init_msg_list => FND_API.G_FALSE,

1305: END IF;
1306: IF (l_version_number IS NOT NULL) THEN
1307: IBE_M_IBC_INT_PVT.Update_Label_Association(
1308: p_api_version => 1.0,
1309: p_init_msg_list => FND_API.G_FALSE,
1310: p_commit => FND_API.G_FALSE,
1311: p_old_content_item_id => l_old_item,
1312: p_old_version_number => l_old_ver_num,
1313: p_new_content_item_id => l_content_item_id,

Line 1310: p_commit => FND_API.G_FALSE,

1306: IF (l_version_number IS NOT NULL) THEN
1307: IBE_M_IBC_INT_PVT.Update_Label_Association(
1308: p_api_version => 1.0,
1309: p_init_msg_list => FND_API.G_FALSE,
1310: p_commit => FND_API.G_FALSE,
1311: p_old_content_item_id => l_old_item,
1312: p_old_version_number => l_old_ver_num,
1313: p_new_content_item_id => l_content_item_id,
1314: p_new_version_number => l_version_number,

Line 1323: IF l_return_status <> FND_API.g_ret_sts_success THEN

1319: x_msg_data => l_msg_data);
1320: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1321: printDebugLog(' Labeling ends:'||l_return_status);
1322: END IF;
1323: IF l_return_status <> FND_API.g_ret_sts_success THEN
1324: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1325: printDebugLog(' Error in labeling and associating content item!');
1326: END IF;
1327: for i in 1..l_msg_count loop

Line 1328: l_msg_data := FND_MSG_PUB.get(i,FND_API.G_FALSE);

1324: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1325: printDebugLog(' Error in labeling and associating content item!');
1326: END IF;
1327: for i in 1..l_msg_count loop
1328: l_msg_data := FND_MSG_PUB.get(i,FND_API.G_FALSE);
1329: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1330: printDebugLog(' '||l_msg_data);
1331: END IF;
1332: end loop;

Line 1334: RAISE FND_API.g_exc_error;

1330: printDebugLog(' '||l_msg_data);
1331: END IF;
1332: end loop;
1333: x_msg_data := l_msg_data;
1334: RAISE FND_API.g_exc_error;
1335: END IF;
1336: END IF;
1337: END IF;
1338: END IF;

Line 1382: x_return_status := FND_API.g_ret_sts_success;

1378: 'Y', px_attachment_rec.default_site, TO_CHAR(l_content_item_id));
1379: END IF;
1380: END IF;
1381: x_msg_data := '';
1382: x_return_status := FND_API.g_ret_sts_success;
1383: EXCEPTION
1384: WHEN OTHERS THEN
1385: ROLLBACK TO process_content_item;
1386: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN

Line 1390: x_return_status := FND_API.g_ret_sts_error;

1386: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1387: printDebugLog(' Exception in process_content_item:');
1388: printDebugLog(' '||SQLCODE||'-'||SQLERRM);
1389: END IF;
1390: x_return_status := FND_API.g_ret_sts_error;
1391: END process_content_item;
1392:
1393: PROCEDURE process_content_items(
1394: p_label_flag IN VARCHAR2,

Line 1418: x_return_status := FND_API.g_ret_sts_success;

1414:
1415: BEGIN
1416: SAVEPOINT process_content_items;
1417: l_list_flag := 'Y';
1418: x_return_status := FND_API.g_ret_sts_success;
1419: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1420: printDebugLog(' process_content_items begin');
1421: END IF;
1422: IF px_attachment_tbl.count > 0 THEN

Line 1476: l_return_status := FND_API.g_ret_sts_success;

1472: CLOSE c_get_content_item;
1473: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1474: printDebugLog(' List flag='||l_list_flag);
1475: END IF;
1476: l_return_status := FND_API.g_ret_sts_success;
1477: IF g_mode = 'EXECUTION' THEN
1478: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1479: printDebugLog(' process_content_item start');
1480: printDebugLog(' p_label_flag='||p_label_flag);

Line 1491: IF (l_return_status <> FND_API.g_ret_sts_success) THEN

1487: x_msg_data => l_msg_data);
1488: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1489: printDebugLog(' process_content_item return:'||l_return_status);
1490: END IF;
1491: IF (l_return_status <> FND_API.g_ret_sts_success) THEN
1492: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1493: printDebugLog(' Error in processing content item');
1494: printDebugLog(' '||l_msg_data);
1495: END IF;

Line 1497: RAISE FND_API.g_exc_error;

1493: printDebugLog(' Error in processing content item');
1494: printDebugLog(' '||l_msg_data);
1495: END IF;
1496: x_msg_data := l_msg_data;
1497: RAISE FND_API.g_exc_error;
1498: END IF;
1499: END IF;
1500: IF (l_return_status = FND_API.g_ret_sts_success) THEN
1501: IF (l_list_flag = 'Y') THEN

Line 1500: IF (l_return_status = FND_API.g_ret_sts_success) THEN

1496: x_msg_data := l_msg_data;
1497: RAISE FND_API.g_exc_error;
1498: END IF;
1499: END IF;
1500: IF (l_return_status = FND_API.g_ret_sts_success) THEN
1501: IF (l_list_flag = 'Y') THEN
1502: IF (px_attachment_tbl(l_i).duplicate_flag = 'N') THEN
1503: g_item_created := g_item_created + 1;
1504: END IF;

Line 1603: x_return_status := FND_API.g_ret_sts_error;

1599: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1600: printDebuglog(' exception in process_content_items end');
1601: printDebuglog(' '||SQLCODE||'-'||SQLERRM);
1602: END IF;
1603: x_return_status := FND_API.g_ret_sts_error;
1604: END process_content_items;
1605:
1606: PROCEDURE clean_data(x_return_status OUT NOCOPY VARCHAR2)
1607: IS

Line 1681: x_return_status := FND_API.g_ret_sts_success;

1677: COMMIT;
1678: ELSE
1679: CLOSE c_get_date_csr;
1680: END IF;
1681: x_return_status := FND_API.g_ret_sts_success;
1682: EXCEPTION
1683: WHEN OTHERS THEN
1684: ROLLBACK TO clean_data;
1685: x_return_status := FND_API.g_ret_sts_error;

Line 1685: x_return_status := FND_API.g_ret_sts_error;

1681: x_return_status := FND_API.g_ret_sts_success;
1682: EXCEPTION
1683: WHEN OTHERS THEN
1684: ROLLBACK TO clean_data;
1685: x_return_status := FND_API.g_ret_sts_error;
1686: END clean_data;
1687:
1688: PROCEDURE attachment_mig(p_mode IN VARCHAR2,
1689: p_default_mig_lang IN VARCHAR2,

Line 1944: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1940: x_msg_data => l_msg_data);
1941: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1942: printDebuglog(' process_content_items return:'||l_return_status);
1943: END IF;
1944: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1945: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1946: printDebuglog(' exception in process_content_items');
1947: END IF;
1948: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;

Line 1948: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1944: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1945: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1946: printDebuglog(' exception in process_content_items');
1947: END IF;
1948: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1949: END IF;
1950: END LOOP;
1951: CLOSE c_get_item_csr;
1952: -- Migrate all unused attachments in content repository

Line 1996: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1992: x_msg_data => l_msg_data);
1993: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1994: printDebuglog(' After process_content_items for content repository:'||l_return_status);
1995: END IF;
1996: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1997: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1998: printDebuglog(' exception in process_content_items for content repository:');
1999: printDebuglog(' '||l_msg_data);
2000: END IF;

Line 2001: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1997: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
1998: printDebuglog(' exception in process_content_items for content repository:');
1999: printDebuglog(' '||l_msg_data);
2000: END IF;
2001: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2002: END IF;
2003: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
2004: printDebuglog('Content repository migration End');
2005: END IF;

Line 2006: x_status := FND_API.g_ret_sts_success;

2002: END IF;
2003: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
2004: printDebuglog('Content repository migration End');
2005: END IF;
2006: x_status := FND_API.g_ret_sts_success;
2007: EXCEPTION
2008: WHEN OTHERS THEN
2009: x_status := FND_API.g_ret_sts_error||l_msg_data;
2010: END attachment_mig;

Line 2009: x_status := FND_API.g_ret_sts_error||l_msg_data;

2005: END IF;
2006: x_status := FND_API.g_ret_sts_success;
2007: EXCEPTION
2008: WHEN OTHERS THEN
2009: x_status := FND_API.g_ret_sts_error||l_msg_data;
2010: END attachment_mig;
2011:
2012: PROCEDURE ocmMigration(errbuf OUT NOCOPY VARCHAR2,
2013: retcode OUT NOCOPY VARCHAR2,

Line 2029: IF (l_status <> FND_API.G_RET_STS_SUCCESS) THEN

2025: IF (p_mode = 'EXECUTION') THEN
2026: create_log(p_code => 'IBE_OCM_MIG',
2027: p_status => 'START',
2028: x_status => l_status);
2029: IF (l_status <> FND_API.G_RET_STS_SUCCESS) THEN
2030: l_msg_data := 'Error when creating log file';
2031: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2032: END IF;
2033: END IF;

Line 2031: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2027: p_status => 'START',
2028: x_status => l_status);
2029: IF (l_status <> FND_API.G_RET_STS_SUCCESS) THEN
2030: l_msg_data := 'Error when creating log file';
2031: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2032: END IF;
2033: END IF;
2034: IF p_debug_flag = 'Y' THEN
2035: IBE_M_MIGRATION_PVT.g_debug := p_debug_flag;

Line 2091: l_status := substr(l_msg_data,1,length(FND_API.G_RET_STS_SUCCESS));

2087: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
2088: printDebuglog('After migrating attachment:');
2089: printDebuglog(' status_message='||l_msg_data);
2090: END IF;
2091: l_status := substr(l_msg_data,1,length(FND_API.G_RET_STS_SUCCESS));
2092: IF (l_status <> FND_API.G_RET_STS_SUCCESS) THEN
2093: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2094: END IF;
2095: IF (p_mode = 'EXECUTION') THEN

Line 2092: IF (l_status <> FND_API.G_RET_STS_SUCCESS) THEN

2088: printDebuglog('After migrating attachment:');
2089: printDebuglog(' status_message='||l_msg_data);
2090: END IF;
2091: l_status := substr(l_msg_data,1,length(FND_API.G_RET_STS_SUCCESS));
2092: IF (l_status <> FND_API.G_RET_STS_SUCCESS) THEN
2093: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2094: END IF;
2095: IF (p_mode = 'EXECUTION') THEN
2096: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN

Line 2093: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2089: printDebuglog(' status_message='||l_msg_data);
2090: END IF;
2091: l_status := substr(l_msg_data,1,length(FND_API.G_RET_STS_SUCCESS));
2092: IF (l_status <> FND_API.G_RET_STS_SUCCESS) THEN
2093: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2094: END IF;
2095: IF (p_mode = 'EXECUTION') THEN
2096: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
2097: printDebuglog('Set the profile for iStore-OCM integration');

Line 2147: IF (l_status <> FND_API.G_RET_STS_SUCCESS) THEN

2143: x_status => l_status);
2144: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
2145: printDebuglog('After updating log for migration:'||l_status);
2146: END IF;
2147: IF (l_status <> FND_API.G_RET_STS_SUCCESS) THEN
2148: l_msg_data := 'Error when updating log file';
2149: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2150: END IF;
2151: END IF;

Line 2149: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2145: printDebuglog('After updating log for migration:'||l_status);
2146: END IF;
2147: IF (l_status <> FND_API.G_RET_STS_SUCCESS) THEN
2148: l_msg_data := 'Error when updating log file';
2149: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2150: END IF;
2151: END IF;
2152: END IF;
2153: -- Insert the log into IBE_MIGRATION_HISTORY

Line 2162: IF (l_status <> FND_API.g_ret_sts_success) THEN

2158: clean_data(x_return_status => l_status);
2159: IF IBE_M_MIGRATION_PVT.g_debug = 'Y' THEN
2160: printDebuglog('After cleaning old data:'||l_status);
2161: END IF;
2162: IF (l_status <> FND_API.g_ret_sts_success) THEN
2163: l_msg_data := 'Error when cleaning old data';
2164: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2165: END IF;
2166: END IF;

Line 2164: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;

2160: printDebuglog('After cleaning old data:'||l_status);
2161: END IF;
2162: IF (l_status <> FND_API.g_ret_sts_success) THEN
2163: l_msg_data := 'Error when cleaning old data';
2164: raise Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2165: END IF;
2166: END IF;
2167: retcode := 0;
2168: errbuf := 'SUCCESS';