307: RAISE l_submit_failure_exc;
308: END IF;
309: COMMIT;
310:
311: x_return_status := FND_API.G_RET_STS_SUCCESS;
312: x_return_message := 'Submitted Item Copy request successfully';
313:
314: IF (g_proc_level >= g_debug_level)
315: THEN
322: EXCEPTION
323: WHEN l_submit_failure_exc THEN
324: FND_MESSAGE.Set_Name('INV', 'INV_UNABLE_TO_SUBMIT_CONC');
325: x_return_message := SUBSTR(FND_MESSAGE.Get, 1, 255);
326: x_return_status := FND_API.G_RET_STS_ERROR;
327: END Submit_Item_Import;
328:
329: --========================================================================
330: -- PROCEDURE : Copy_Org_Items
390: ,'Y'
391: ,'Y'
392: );
393:
394: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
395: RETURN;
396: END IF;
397: IF (g_statement_level >= g_debug_level)
398: THEN
409: ,p_validate
410: ,'Y'
411: ,'N'
412: );
413: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
414: RETURN;
415: END IF;
416: IF (g_statement_level >= g_debug_level)
417: THEN
428: ,p_validate
429: ,'N'
430: ,'Y'
431: );
432: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
433: RETURN;
434: END IF;
435: IF (g_statement_level >= g_debug_level)
436: THEN
447: ,p_validate
448: ,'N'
449: ,'N'
450: );
451: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
452: RETURN;
453: END IF;
454: IF (g_statement_level >= g_debug_level)
455: THEN
629: ,'enter procedure'
630: );
631: END IF;
632:
633: x_return_status := FND_API.G_RET_STS_SUCCESS;
634:
635: -- Find number of items from source organizations based on input
636: -- parameters p_copy_base_models and p_copy_eng_items
637: SELECT COUNT(*)
834:
835:
836: -- error while assigning master defaults
837: IF l_return_code <> 0 THEN
838: x_return_status := FND_API.G_RET_STS_ERROR;
839: RETURN;
840: END IF;
841:
842: -- Serial Tagging Enh -- bug 9913552
851: x_return_status => x_ret_sts);
852:
853:
854:
855: IF x_ret_sts <>FND_API.G_RET_STS_SUCCESS THEN
856: x_return_status:= FND_API.G_RET_STS_ERROR;
857: return;
858: END IF;
859: END IF;
852:
853:
854:
855: IF x_ret_sts <>FND_API.G_RET_STS_SUCCESS THEN
856: x_return_status:= FND_API.G_RET_STS_ERROR;
857: return;
858: END IF;
859: END IF;
860: -- Assign Status attributes
866: );
867:
868: -- error while assigning status attributes
869: IF l_return_code <> 0 THEN
870: x_return_status := FND_API.G_RET_STS_ERROR;
871: RETURN;
872: END IF;
873: l_counter := l_counter + 1;
874:
1051: , x_return_message => x_return_message
1052: , p_request_count => l_request_count
1053: );
1054:
1055: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1056: RETURN;
1057: END IF;
1058:
1059: l_min_index := l_max_index + 1;
1084: );
1085: END IF;
1086: EXCEPTION
1087: WHEN OTHERS THEN
1088: x_return_status := FND_API.G_RET_STS_ERROR;
1089: x_return_message := FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE);
1090: x_return_message := x_return_message || FND_GLOBAL.NewLine || SQLCODE || ' : ' || SQLERRM;
1091:
1092: IF(g_statement_level >= g_debug_level)
1085: END IF;
1086: EXCEPTION
1087: WHEN OTHERS THEN
1088: x_return_status := FND_API.G_RET_STS_ERROR;
1089: x_return_message := FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE);
1090: x_return_message := x_return_message || FND_GLOBAL.NewLine || SQLCODE || ' : ' || SQLERRM;
1091:
1092: IF(g_statement_level >= g_debug_level)
1093: THEN