300:
301: OZF_CODE_CONVERSION_PVT.create_code_conversion
302: (
303: p_api_version_number => 1.0 ,
304: p_init_msg_list => FND_API.G_FALSE,
305: p_commit => FND_API.G_FALSE,
306: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
307: x_return_status => x_return_Status,
308: x_msg_count => x_msg_Count,
301: OZF_CODE_CONVERSION_PVT.create_code_conversion
302: (
303: p_api_version_number => 1.0 ,
304: p_init_msg_list => FND_API.G_FALSE,
305: p_commit => FND_API.G_FALSE,
306: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
307: x_return_status => x_return_Status,
308: x_msg_count => x_msg_Count,
309: x_msg_data => x_msg_Data,
302: (
303: p_api_version_number => 1.0 ,
304: p_init_msg_list => FND_API.G_FALSE,
305: p_commit => FND_API.G_FALSE,
306: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
307: x_return_status => x_return_Status,
308: x_msg_count => x_msg_Count,
309: x_msg_data => x_msg_Data,
310: p_code_conversion_tbl => l_code_conversion_tbl,
309: x_msg_data => x_msg_Data,
310: p_code_conversion_tbl => l_code_conversion_tbl,
311: x_code_conversion_id_tbl => l_code_conversion_id_tbl);
312:
313: IF x_return_Status = FND_API.G_RET_STS_ERROR THEN
314: IF fnd_msg_pub.Check_Msg_Level(fnd_msg_pub.G_MSG_LVL_ERROR) THEN
315: l_message := fnd_msg_pub.get(p_encoded => fnd_api.g_false);
316: raise_application_error( -20000, l_message);
317: END IF;
311: x_code_conversion_id_tbl => l_code_conversion_id_tbl);
312:
313: IF x_return_Status = FND_API.G_RET_STS_ERROR THEN
314: IF fnd_msg_pub.Check_Msg_Level(fnd_msg_pub.G_MSG_LVL_ERROR) THEN
315: l_message := fnd_msg_pub.get(p_encoded => fnd_api.g_false);
316: raise_application_error( -20000, l_message);
317: END IF;
318: ELSIF x_return_Status = FND_API.G_RET_STS_UNEXP_ERROR THEN
319: fnd_message.set_name ('OZF', 'OZF_WADI_CREATE_ERROR');
314: IF fnd_msg_pub.Check_Msg_Level(fnd_msg_pub.G_MSG_LVL_ERROR) THEN
315: l_message := fnd_msg_pub.get(p_encoded => fnd_api.g_false);
316: raise_application_error( -20000, l_message);
317: END IF;
318: ELSIF x_return_Status = FND_API.G_RET_STS_UNEXP_ERROR THEN
319: fnd_message.set_name ('OZF', 'OZF_WADI_CREATE_ERROR');
320: l_message := fnd_message.get();
321: raise_application_error( -20000, l_message);
322: END IF;
335: ELSE
336: OZF_CODE_CONVERSION_PVT.update_code_conversion
337: (
338: p_api_version_number => 1.0 ,
339: p_init_msg_list => FND_API.G_FALSE,
340: p_commit => FND_API.G_FALSE,
341: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
342: x_return_status => x_return_Status,
343: x_msg_count => x_msg_Count,
336: OZF_CODE_CONVERSION_PVT.update_code_conversion
337: (
338: p_api_version_number => 1.0 ,
339: p_init_msg_list => FND_API.G_FALSE,
340: p_commit => FND_API.G_FALSE,
341: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
342: x_return_status => x_return_Status,
343: x_msg_count => x_msg_Count,
344: x_msg_data => x_msg_Data,
337: (
338: p_api_version_number => 1.0 ,
339: p_init_msg_list => FND_API.G_FALSE,
340: p_commit => FND_API.G_FALSE,
341: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
342: x_return_status => x_return_Status,
343: x_msg_count => x_msg_Count,
344: x_msg_data => x_msg_Data,
345: p_code_conversion_tbl => l_code_conversion_tbl,
347: );
348:
349: -- OZF_UTILITY_PVT.debug_message('after update code conversion'||x_msg_Count);
350:
351: IF x_return_Status = FND_API.G_RET_STS_ERROR THEN
352: l_message := fnd_msg_pub.get(p_encoded => fnd_api.g_true);
353: OZF_UTILITY_PVT.debug_message('Message '||l_message);
354:
355: IF length( l_message) > 30 THEN
348:
349: -- OZF_UTILITY_PVT.debug_message('after update code conversion'||x_msg_Count);
350:
351: IF x_return_Status = FND_API.G_RET_STS_ERROR THEN
352: l_message := fnd_msg_pub.get(p_encoded => fnd_api.g_true);
353: OZF_UTILITY_PVT.debug_message('Message '||l_message);
354:
355: IF length( l_message) > 30 THEN
356: l_message := substr(l_message,1,30);
355: IF length( l_message) > 30 THEN
356: l_message := substr(l_message,1,30);
357: END IF;
358: raise_application_error( -20000, l_message);
359: ELSIF x_return_Status = FND_API.G_RET_STS_UNEXP_ERROR THEN
360: fnd_message.set_name ('OZF', 'OZF_WADI_UPDATE_ERROR');
361: l_message := fnd_message.get();
362: raise_application_error( -20000, l_message);
363: END IF;
375: --commit;
376:
377: EXCEPTION
378: WHEN ozf_webadi_error THEN
379: x_return_status := FND_API.G_RET_STS_ERROR;
380: /* IF length( l_message) > 30 THEN
381: l_message := substr(l_message,1,30);
382: END IF; */
383: raise_application_error( -20000, l_message);
380: /* IF length( l_message) > 30 THEN
381: l_message := substr(l_message,1,30);
382: END IF; */
383: raise_application_error( -20000, l_message);
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
385: IF length( SQLERRM) > 30 THEN
386: ozf_utility_pvt.debug_message(substr(SQLERRM,12,30));
387: fnd_message.set_name ('OZF', substr(SQLERRM,12,30));
388: ELSE
387: fnd_message.set_name ('OZF', substr(SQLERRM,12,30));
388: ELSE
389: fnd_message.set_name ('OZF', SQLERRM);
390: END IF;
391: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
392: WHEN OTHERS THEN
393: IF length( SQLERRM) > 30 THEN
394: ozf_utility_pvt.debug_message(substr(SQLERRM,12,30));
395: fnd_message.set_name ('OZF', substr(SQLERRM,12,30));
395: fnd_message.set_name ('OZF', substr(SQLERRM,12,30));
396: ELSE
397: fnd_message.set_name ('OZF', SQLERRM);
398: END IF;
399: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
400: END CODE_CONVERSION_WEBADI;
401:
402:
403: PROCEDURE RESALE_WEBADI
711: BEGIN
712:
713: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' start');
714:
715: x_return_status := FND_API.G_RET_STS_SUCCESS;
716:
717: -- R12 MOAC Enhancement (+)
718: IF P_ORG_ID IS NULL THEN
719: fnd_message.set_name ('OZF', 'OZF_ENTER_OPEARTING_UNIT');
730: IF l_org_id IS NULL THEN
731: fnd_message.set_name ('OZF', 'OZF_ENTER_OPERATING_UNIT');
732: l_error_message := fnd_message.get();
733: raise_application_error( -20000, l_error_message);
734: --x_return_status := FND_API.G_RET_STS_ERROR;
735: --RAISE FND_API.G_EXC_ERROR;
736: END IF;
737:
738: MO_GLOBAL.set_policy_context('S', l_org_id);
731: fnd_message.set_name ('OZF', 'OZF_ENTER_OPERATING_UNIT');
732: l_error_message := fnd_message.get();
733: raise_application_error( -20000, l_error_message);
734: --x_return_status := FND_API.G_RET_STS_ERROR;
735: --RAISE FND_API.G_EXC_ERROR;
736: END IF;
737:
738: MO_GLOBAL.set_policy_context('S', l_org_id);
739: -- R12 MOAC Enhancement (-)
1482: l_text := l_text||'Resale Batch ID '||l_int_line_tbl(1).resale_batch_id||' \n ';
1483:
1484: insert_resale_int_line (
1485: p_api_version_number => 1.0,
1486: p_init_msg_list => FND_API.G_FALSE,
1487: p_Commit => FND_API.G_FALSE,
1488: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1489: p_int_line_tbl => l_int_line_tbl,
1490: x_return_status => x_return_status,
1483:
1484: insert_resale_int_line (
1485: p_api_version_number => 1.0,
1486: p_init_msg_list => FND_API.G_FALSE,
1487: p_Commit => FND_API.G_FALSE,
1488: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1489: p_int_line_tbl => l_int_line_tbl,
1490: x_return_status => x_return_status,
1491: x_msg_count => l_msg_count,
1484: insert_resale_int_line (
1485: p_api_version_number => 1.0,
1486: p_init_msg_list => FND_API.G_FALSE,
1487: p_Commit => FND_API.G_FALSE,
1488: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1489: p_int_line_tbl => l_int_line_tbl,
1490: x_return_status => x_return_status,
1491: x_msg_count => l_msg_count,
1492: x_msg_data => l_msg_data );
1490: x_return_status => x_return_status,
1491: x_msg_count => l_msg_count,
1492: x_msg_data => l_msg_data );
1493:
1494: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1495: l_text := l_text||'Error in Create Line '||SQLERRM||' \n ';
1496: fnd_message.set_name ('OZF', 'OZF_WADI_CREATE_LINE_ERROR');
1497: l_error_message := fnd_message.get();
1498: raise_application_error( -20000, l_error_message);
1495: l_text := l_text||'Error in Create Line '||SQLERRM||' \n ';
1496: fnd_message.set_name ('OZF', 'OZF_WADI_CREATE_LINE_ERROR');
1497: l_error_message := fnd_message.get();
1498: raise_application_error( -20000, l_error_message);
1499: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1500: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1501: END IF;
1502:
1503: ELSIF l_status_code IN ('OPEN','NEW','PROCESSED','DISPUTED') AND p_resale_line_int_id IS NOT NULL THEN
1496: fnd_message.set_name ('OZF', 'OZF_WADI_CREATE_LINE_ERROR');
1497: l_error_message := fnd_message.get();
1498: raise_application_error( -20000, l_error_message);
1499: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1500: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1501: END IF;
1502:
1503: ELSIF l_status_code IN ('OPEN','NEW','PROCESSED','DISPUTED') AND p_resale_line_int_id IS NOT NULL THEN
1504:
1546:
1547: Update_Resale_Batch
1548: (
1549: p_api_version_number => 1.0,
1550: p_init_msg_list => FND_API.G_FALSE,
1551: P_Commit => FND_API.G_FALSE,
1552: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1553: p_int_batch_rec => l_resale_batch_rec,
1554: x_return_status => x_return_status,
1547: Update_Resale_Batch
1548: (
1549: p_api_version_number => 1.0,
1550: p_init_msg_list => FND_API.G_FALSE,
1551: P_Commit => FND_API.G_FALSE,
1552: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1553: p_int_batch_rec => l_resale_batch_rec,
1554: x_return_status => x_return_status,
1555: x_msg_count => l_msg_count,
1548: (
1549: p_api_version_number => 1.0,
1550: p_init_msg_list => FND_API.G_FALSE,
1551: P_Commit => FND_API.G_FALSE,
1552: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1553: p_int_batch_rec => l_resale_batch_rec,
1554: x_return_status => x_return_status,
1555: x_msg_count => l_msg_count,
1556: x_msg_data => l_msg_data
1555: x_msg_count => l_msg_count,
1556: x_msg_data => l_msg_data
1557: );
1558:
1559: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1560: l_text := l_text||'Error in Update Batch '||SQLERRM||' \n ';
1561: fnd_message.set_name ('OZF', 'OZF_WADI_UPDATE_BATCH_ERROR');
1562: l_error_message := fnd_message.get();
1563: raise_application_error( -20000, l_error_message);
1560: l_text := l_text||'Error in Update Batch '||SQLERRM||' \n ';
1561: fnd_message.set_name ('OZF', 'OZF_WADI_UPDATE_BATCH_ERROR');
1562: l_error_message := fnd_message.get();
1563: raise_application_error( -20000, l_error_message);
1564: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1566: END IF;
1567:
1568: ozf_utility_pvt.debug_message('x_return_status '||x_return_status);
1561: fnd_message.set_name ('OZF', 'OZF_WADI_UPDATE_BATCH_ERROR');
1562: l_error_message := fnd_message.get();
1563: raise_application_error( -20000, l_error_message);
1564: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1566: END IF;
1567:
1568: ozf_utility_pvt.debug_message('x_return_status '||x_return_status);
1569: END IF;
1571: l_text := l_text||'Updating line record ';
1572: Update_Resale_Int_Line
1573: (
1574: p_api_version_number => 1.0,
1575: p_init_msg_list => FND_API.G_FALSE,
1576: P_Commit => FND_API.G_FALSE,
1577: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1578: p_int_line_tbl => l_int_line_tbl,
1579: x_return_status => x_return_status,
1572: Update_Resale_Int_Line
1573: (
1574: p_api_version_number => 1.0,
1575: p_init_msg_list => FND_API.G_FALSE,
1576: P_Commit => FND_API.G_FALSE,
1577: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1578: p_int_line_tbl => l_int_line_tbl,
1579: x_return_status => x_return_status,
1580: x_msg_count => l_msg_count,
1573: (
1574: p_api_version_number => 1.0,
1575: p_init_msg_list => FND_API.G_FALSE,
1576: P_Commit => FND_API.G_FALSE,
1577: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1578: p_int_line_tbl => l_int_line_tbl,
1579: x_return_status => x_return_status,
1580: x_msg_count => l_msg_count,
1581: x_msg_data => l_msg_data
1580: x_msg_count => l_msg_count,
1581: x_msg_data => l_msg_data
1582: );
1583:
1584: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1585: l_text := l_text||'Error in Update Line '||SQLERRM||' \n ';
1586: fnd_message.set_name ('OZF', 'OZF_WADI_UPDATE_LINE_ERROR');
1587: l_error_message := fnd_message.get();
1588: raise_application_error( -20000, l_error_message);
1585: l_text := l_text||'Error in Update Line '||SQLERRM||' \n ';
1586: fnd_message.set_name ('OZF', 'OZF_WADI_UPDATE_LINE_ERROR');
1587: l_error_message := fnd_message.get();
1588: raise_application_error( -20000, l_error_message);
1589: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1590: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1591: END IF;
1592: ozf_utility_pvt.debug_message('x_return_status '||x_return_status);
1593: l_text := l_text||'line record updated';
1586: fnd_message.set_name ('OZF', 'OZF_WADI_UPDATE_LINE_ERROR');
1587: l_error_message := fnd_message.get();
1588: raise_application_error( -20000, l_error_message);
1589: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1590: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1591: END IF;
1592: ozf_utility_pvt.debug_message('x_return_status '||x_return_status);
1593: l_text := l_text||'line record updated';
1594:
1604: UTL_FILE.FCLOSE(l_file);
1605:
1606: EXCEPTION
1607: WHEN ozf_webadi_error THEN
1608: x_return_status := FND_API.G_RET_STS_ERROR;
1609: raise_application_error( -20000, l_error_message);
1610: WHEN UTL_FILE.INVALID_PATH THEN
1611: RAISE_APPLICATION_ERROR(-20100,'Invalid Path');
1612: WHEN UTL_FILE.INVALID_MODE THEN
1620: WHEN UTL_FILE.READ_ERROR then
1621: RAISE_APPLICATION_ERROR(-20105,'Read Error');
1622: WHEN UTL_FILE.INTERNAL_ERROR then
1623: RAISE_APPLICATION_ERROR(-20106,'Internal Error');
1624: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1625: UTL_FILE.FCLOSE(l_file);
1626: IF length( SQLERRM) > 30 THEN
1627: ozf_utility_pvt.debug_message(substr(SQLERRM,12,30));
1628: fnd_message.set_name ('OZF', substr(SQLERRM,12,30));
1628: fnd_message.set_name ('OZF', substr(SQLERRM,12,30));
1629: ELSE
1630: fnd_message.set_name ('OZF', SQLERRM);
1631: END IF;
1632: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1633: WHEN OTHERS THEN
1634: UTL_FILE.FCLOSE(l_file);
1635: IF length( SQLERRM) > 30 THEN
1636: ozf_utility_pvt.debug_message(substr(SQLERRM,12,30));
1637: fnd_message.set_name ('OZF', substr(SQLERRM,12,30));
1638: ELSE
1639: fnd_message.set_name ('OZF', SQLERRM);
1640: END IF;
1641: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1642:
1643: END RESALE_WEBADI;
1644:
1645: PROCEDURE Update_Resale_Batch (
1643: END RESALE_WEBADI;
1644:
1645: PROCEDURE Update_Resale_Batch (
1646: p_api_version_number IN NUMBER,
1647: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1648: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1649: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1650: p_int_batch_rec IN ozf_resale_batches_all%rowtype,
1651: x_return_status OUT NOCOPY VARCHAR2,
1644:
1645: PROCEDURE Update_Resale_Batch (
1646: p_api_version_number IN NUMBER,
1647: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1648: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1649: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1650: p_int_batch_rec IN ozf_resale_batches_all%rowtype,
1651: x_return_status OUT NOCOPY VARCHAR2,
1652: x_msg_count OUT NOCOPY NUMBER,
1645: PROCEDURE Update_Resale_Batch (
1646: p_api_version_number IN NUMBER,
1647: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1648: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1649: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1650: p_int_batch_rec IN ozf_resale_batches_all%rowtype,
1651: x_return_status OUT NOCOPY VARCHAR2,
1652: x_msg_count OUT NOCOPY NUMBER,
1653: x_msg_data OUT NOCOPY VARCHAR2
1732: WHERE batch_number = pc_batch_number;
1733:
1734: BEGIN
1735: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' Start');
1736: x_return_status := FND_API.G_RET_STS_SUCCESS;
1737:
1738: l_resale_batch_rec.resale_batch_id := p_int_batch_rec.resale_batch_id;
1739: l_resale_batch_rec.batch_number := p_int_batch_rec.batch_number;
1740: l_resale_batch_rec.status_code := 'OPEN';
1807:
1808: ozf_pre_process_pvt.update_interface_batch
1809: (
1810: p_api_version_number => 1.0,
1811: p_init_msg_list => FND_API.G_FALSE,
1812: P_Commit => FND_API.G_FALSE,
1813: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1814: p_int_batch_rec => l_resale_batch_rec,
1815: x_return_status => x_return_status,
1808: ozf_pre_process_pvt.update_interface_batch
1809: (
1810: p_api_version_number => 1.0,
1811: p_init_msg_list => FND_API.G_FALSE,
1812: P_Commit => FND_API.G_FALSE,
1813: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1814: p_int_batch_rec => l_resale_batch_rec,
1815: x_return_status => x_return_status,
1816: x_msg_count => x_msg_count,
1809: (
1810: p_api_version_number => 1.0,
1811: p_init_msg_list => FND_API.G_FALSE,
1812: P_Commit => FND_API.G_FALSE,
1813: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1814: p_int_batch_rec => l_resale_batch_rec,
1815: x_return_status => x_return_status,
1816: x_msg_count => x_msg_count,
1817: x_msg_data => x_msg_data
1818: );
1819:
1820:
1821:
1822: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1823: RAISE FND_API.G_EXC_ERROR;
1824: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1825: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1826: END IF;
1819:
1820:
1821:
1822: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1823: RAISE FND_API.G_EXC_ERROR;
1824: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1825: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1826: END IF;
1827: -- Standard call to get message count and if count is 1, get message info.
1820:
1821:
1822: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1823: RAISE FND_API.G_EXC_ERROR;
1824: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1825: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1826: END IF;
1827: -- Standard call to get message count and if count is 1, get message info.
1828: FND_MSG_PUB.Count_And_Get
1821:
1822: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1823: RAISE FND_API.G_EXC_ERROR;
1824: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1825: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1826: END IF;
1827: -- Standard call to get message count and if count is 1, get message info.
1828: FND_MSG_PUB.Count_And_Get
1829: (p_count => x_msg_count,
1832:
1833: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' End');
1834: EXCEPTION
1835:
1836: WHEN FND_API.G_EXC_ERROR THEN
1837: x_return_status := FND_API.G_RET_STS_ERROR;
1838: -- Standard call to get message count and if count=1, get the message
1839: FND_MSG_PUB.Count_And_Get (
1840: p_encoded => FND_API.G_FALSE,
1833: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' End');
1834: EXCEPTION
1835:
1836: WHEN FND_API.G_EXC_ERROR THEN
1837: x_return_status := FND_API.G_RET_STS_ERROR;
1838: -- Standard call to get message count and if count=1, get the message
1839: FND_MSG_PUB.Count_And_Get (
1840: p_encoded => FND_API.G_FALSE,
1841: p_count => x_msg_count,
1836: WHEN FND_API.G_EXC_ERROR THEN
1837: x_return_status := FND_API.G_RET_STS_ERROR;
1838: -- Standard call to get message count and if count=1, get the message
1839: FND_MSG_PUB.Count_And_Get (
1840: p_encoded => FND_API.G_FALSE,
1841: p_count => x_msg_count,
1842: p_data => x_msg_data
1843: );
1844: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1840: p_encoded => FND_API.G_FALSE,
1841: p_count => x_msg_count,
1842: p_data => x_msg_data
1843: );
1844: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1845: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1846: -- Standard call to get message count and if count=1, get the message
1847: FND_MSG_PUB.Count_And_Get (
1848: p_encoded => FND_API.G_FALSE,
1841: p_count => x_msg_count,
1842: p_data => x_msg_data
1843: );
1844: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1845: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1846: -- Standard call to get message count and if count=1, get the message
1847: FND_MSG_PUB.Count_And_Get (
1848: p_encoded => FND_API.G_FALSE,
1849: p_count => x_msg_count,
1844: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1845: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1846: -- Standard call to get message count and if count=1, get the message
1847: FND_MSG_PUB.Count_And_Get (
1848: p_encoded => FND_API.G_FALSE,
1849: p_count => x_msg_count,
1850: p_data => x_msg_data
1851: );
1852: WHEN OTHERS THEN
1849: p_count => x_msg_count,
1850: p_data => x_msg_data
1851: );
1852: WHEN OTHERS THEN
1853: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1854:
1855: -- Standard call to get message count and if count=1, get the message
1856: FND_MSG_PUB.Count_And_Get (
1857: p_encoded => FND_API.G_FALSE,
1853: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1854:
1855: -- Standard call to get message count and if count=1, get the message
1856: FND_MSG_PUB.Count_And_Get (
1857: p_encoded => FND_API.G_FALSE,
1858: p_count => x_msg_count,
1859: p_data => x_msg_data
1860: );
1861: END Update_Resale_Batch;
1864:
1865:
1866: PROCEDURE Update_Resale_Int_Line (
1867: p_api_version_number IN NUMBER,
1868: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1869: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1870: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1871: p_int_line_tbl IN ozf_pre_process_pvt.resale_line_int_tbl_type,
1872: x_return_status OUT NOCOPY VARCHAR2,
1865:
1866: PROCEDURE Update_Resale_Int_Line (
1867: p_api_version_number IN NUMBER,
1868: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1869: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1870: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1871: p_int_line_tbl IN ozf_pre_process_pvt.resale_line_int_tbl_type,
1872: x_return_status OUT NOCOPY VARCHAR2,
1873: x_msg_count OUT NOCOPY NUMBER,
1866: PROCEDURE Update_Resale_Int_Line (
1867: p_api_version_number IN NUMBER,
1868: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1869: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
1870: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1871: p_int_line_tbl IN ozf_pre_process_pvt.resale_line_int_tbl_type,
1872: x_return_status OUT NOCOPY VARCHAR2,
1873: x_msg_count OUT NOCOPY NUMBER,
1874: x_msg_data OUT NOCOPY VARCHAR2
2214:
2215:
2216: BEGIN
2217: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' Start');
2218: x_return_status := FND_API.G_RET_STS_SUCCESS;
2219: OZF_UTILITY_PVT.debug_message('x_return_status ' || x_return_status);
2220:
2221: l_int_line_tbl.extend;
2222: l_int_line_tbl(1).resale_batch_id := p_int_line_tbl(1).resale_batch_id;
2452:
2453: Ozf_pre_process_pvt.Update_interface_line
2454: (
2455: p_api_version_number => 1.0,
2456: p_init_msg_list => FND_API.G_FALSE,
2457: P_Commit => FND_API.G_FALSE,
2458: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2459: p_int_line_tbl => l_int_line_tbl,
2460: x_return_status => x_return_status,
2453: Ozf_pre_process_pvt.Update_interface_line
2454: (
2455: p_api_version_number => 1.0,
2456: p_init_msg_list => FND_API.G_FALSE,
2457: P_Commit => FND_API.G_FALSE,
2458: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2459: p_int_line_tbl => l_int_line_tbl,
2460: x_return_status => x_return_status,
2461: x_msg_count => x_msg_count,
2454: (
2455: p_api_version_number => 1.0,
2456: p_init_msg_list => FND_API.G_FALSE,
2457: P_Commit => FND_API.G_FALSE,
2458: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2459: p_int_line_tbl => l_int_line_tbl,
2460: x_return_status => x_return_status,
2461: x_msg_count => x_msg_count,
2462: x_msg_data => x_msg_data
2462: x_msg_data => x_msg_data
2463: );
2464: OZF_UTILITY_PVT.debug_message('x_return_status ' || x_return_status);
2465:
2466: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2467: RAISE FND_API.G_EXC_ERROR;
2468: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2470: END IF;
2463: );
2464: OZF_UTILITY_PVT.debug_message('x_return_status ' || x_return_status);
2465:
2466: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2467: RAISE FND_API.G_EXC_ERROR;
2468: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2470: END IF;
2471:
2464: OZF_UTILITY_PVT.debug_message('x_return_status ' || x_return_status);
2465:
2466: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2467: RAISE FND_API.G_EXC_ERROR;
2468: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2470: END IF;
2471:
2472: -- Standard call to get message count and if count is 1, get message info.
2465:
2466: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2467: RAISE FND_API.G_EXC_ERROR;
2468: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2470: END IF;
2471:
2472: -- Standard call to get message count and if count is 1, get message info.
2473: FND_MSG_PUB.Count_And_Get
2477:
2478: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' End');
2479: EXCEPTION
2480:
2481: WHEN FND_API.G_EXC_ERROR THEN
2482: x_return_status := FND_API.G_RET_STS_ERROR;
2483: -- Standard call to get message count and if count=1, get the message
2484: FND_MSG_PUB.Count_And_Get (
2485: p_encoded => FND_API.G_FALSE,
2478: OZF_UTILITY_PVT.debug_message('Private API: ' || l_api_name || ' End');
2479: EXCEPTION
2480:
2481: WHEN FND_API.G_EXC_ERROR THEN
2482: x_return_status := FND_API.G_RET_STS_ERROR;
2483: -- Standard call to get message count and if count=1, get the message
2484: FND_MSG_PUB.Count_And_Get (
2485: p_encoded => FND_API.G_FALSE,
2486: p_count => x_msg_count,
2481: WHEN FND_API.G_EXC_ERROR THEN
2482: x_return_status := FND_API.G_RET_STS_ERROR;
2483: -- Standard call to get message count and if count=1, get the message
2484: FND_MSG_PUB.Count_And_Get (
2485: p_encoded => FND_API.G_FALSE,
2486: p_count => x_msg_count,
2487: p_data => x_msg_data
2488: );
2489: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2485: p_encoded => FND_API.G_FALSE,
2486: p_count => x_msg_count,
2487: p_data => x_msg_data
2488: );
2489: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2490: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2491: -- Standard call to get message count and if count=1, get the message
2492: FND_MSG_PUB.Count_And_Get (
2493: p_encoded => FND_API.G_FALSE,
2486: p_count => x_msg_count,
2487: p_data => x_msg_data
2488: );
2489: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2490: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2491: -- Standard call to get message count and if count=1, get the message
2492: FND_MSG_PUB.Count_And_Get (
2493: p_encoded => FND_API.G_FALSE,
2494: p_count => x_msg_count,
2489: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2490: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2491: -- Standard call to get message count and if count=1, get the message
2492: FND_MSG_PUB.Count_And_Get (
2493: p_encoded => FND_API.G_FALSE,
2494: p_count => x_msg_count,
2495: p_data => x_msg_data
2496: );
2497: WHEN OTHERS THEN
2494: p_count => x_msg_count,
2495: p_data => x_msg_data
2496: );
2497: WHEN OTHERS THEN
2498: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2499:
2500: -- Standard call to get message count and if count=1, get the message
2501: FND_MSG_PUB.Count_And_Get (
2502: p_encoded => FND_API.G_FALSE,
2498: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2499:
2500: -- Standard call to get message count and if count=1, get the message
2501: FND_MSG_PUB.Count_And_Get (
2502: p_encoded => FND_API.G_FALSE,
2503: p_count => x_msg_count,
2504: p_data => x_msg_data
2505: );
2506: END Update_Resale_Int_Line;
2506: END Update_Resale_Int_Line;
2507:
2508: procedure insert_resale_int_line (
2509: p_api_version_number IN NUMBER,
2510: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2511: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2512: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2513: p_int_line_tbl IN ozf_pre_process_pvt.resale_line_int_tbl_type,
2514: x_return_status OUT NOCOPY VARCHAR2,
2507:
2508: procedure insert_resale_int_line (
2509: p_api_version_number IN NUMBER,
2510: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2511: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2512: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2513: p_int_line_tbl IN ozf_pre_process_pvt.resale_line_int_tbl_type,
2514: x_return_status OUT NOCOPY VARCHAR2,
2515: x_msg_count OUT NOCOPY NUMBER,
2508: procedure insert_resale_int_line (
2509: p_api_version_number IN NUMBER,
2510: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2511: p_Commit IN VARCHAR2 := FND_API.G_FALSE,
2512: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2513: p_int_line_tbl IN ozf_pre_process_pvt.resale_line_int_tbl_type,
2514: x_return_status OUT NOCOPY VARCHAR2,
2515: x_msg_count OUT NOCOPY NUMBER,
2516: x_msg_data OUT NOCOPY VARCHAR2
2525: l_org_id NUMBER;
2526: l_amount NUMBER := 0;
2527: BEGIN
2528:
2529: IF FND_API.to_Boolean( p_init_msg_list )
2530: THEN
2531: FND_MSG_PUB.initialize;
2532: END IF;
2533:
2533:
2534: -- Debug Message
2535:
2536: -- Initialize API return status to SUCCESS
2537: x_return_status := FND_API.G_RET_STS_SUCCESS;
2538:
2539: BEGIN
2540:
2541:
2795:
2796: WHEN OTHERS THEN
2797:
2798: ozf_utility_pvt.debug_message('Problem with updating line record '||SQLERRM);
2799: RAISE FND_API.G_EXC_ERROR;
2800:
2801: END;
2802:
2803:
2808: );
2809:
2810: EXCEPTION
2811:
2812: WHEN FND_API.G_EXC_ERROR THEN
2813: x_return_status := FND_API.G_RET_STS_ERROR;
2814: -- Standard call to get message count and if count=1, get the message
2815: FND_MSG_PUB.Count_And_Get (
2816: p_encoded => FND_API.G_FALSE,
2809:
2810: EXCEPTION
2811:
2812: WHEN FND_API.G_EXC_ERROR THEN
2813: x_return_status := FND_API.G_RET_STS_ERROR;
2814: -- Standard call to get message count and if count=1, get the message
2815: FND_MSG_PUB.Count_And_Get (
2816: p_encoded => FND_API.G_FALSE,
2817: p_count => x_msg_count,
2812: WHEN FND_API.G_EXC_ERROR THEN
2813: x_return_status := FND_API.G_RET_STS_ERROR;
2814: -- Standard call to get message count and if count=1, get the message
2815: FND_MSG_PUB.Count_And_Get (
2816: p_encoded => FND_API.G_FALSE,
2817: p_count => x_msg_count,
2818: p_data => x_msg_data
2819: );
2820: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2816: p_encoded => FND_API.G_FALSE,
2817: p_count => x_msg_count,
2818: p_data => x_msg_data
2819: );
2820: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2821: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2822: -- Standard call to get message count and if count=1, get the message
2823: FND_MSG_PUB.Count_And_Get (
2824: p_encoded => FND_API.G_FALSE,
2817: p_count => x_msg_count,
2818: p_data => x_msg_data
2819: );
2820: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2821: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2822: -- Standard call to get message count and if count=1, get the message
2823: FND_MSG_PUB.Count_And_Get (
2824: p_encoded => FND_API.G_FALSE,
2825: p_count => x_msg_count,
2820: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2821: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2822: -- Standard call to get message count and if count=1, get the message
2823: FND_MSG_PUB.Count_And_Get (
2824: p_encoded => FND_API.G_FALSE,
2825: p_count => x_msg_count,
2826: p_data => x_msg_data
2827: );
2828: WHEN OTHERS THEN
2825: p_count => x_msg_count,
2826: p_data => x_msg_data
2827: );
2828: WHEN OTHERS THEN
2829: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2830: -- Standard call to get message count and if count=1, get the message
2831: FND_MSG_PUB.Count_And_Get (
2832: p_encoded => FND_API.G_FALSE,
2833: p_count => x_msg_count,
2828: WHEN OTHERS THEN
2829: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2830: -- Standard call to get message count and if count=1, get the message
2831: FND_MSG_PUB.Count_And_Get (
2832: p_encoded => FND_API.G_FALSE,
2833: p_count => x_msg_count,
2834: p_data => x_msg_data
2835: );
2836: