DBA Data[Home] [Help]

APPS.CSP_PLANNER_NOTIFICATIONS dependencies on FND_API

Line 132: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

128: ,p_sort IN VARCHAR2 := '1'
129: ) IS
130: l_api_version_number CONSTANT NUMBER := 1.0;
131: l_api_name CONSTANT VARCHAR2(30) := 'create_notifications';
132: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
133: l_msg_count NUMBER;
134: l_msg_data VARCHAR2(2000);
135: l_user_id NUMBER;
136: l_login_id NUMBER;

Line 249: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

245: BEGIN
246: SAVEPOINT Create_Notifications_PUB;
247:
248: -- Standard call to check for call compatibility.
249: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
250: p_api_version,
251: l_api_name,
252: G_PKG_NAME)
253: THEN

Line 254: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

250: p_api_version,
251: l_api_name,
252: G_PKG_NAME)
253: THEN
254: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
255: END IF;
256:
257: -- initialize return status, get audit columns
258: --x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 258: --x_return_status := FND_API.G_RET_STS_SUCCESS;

254: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
255: END IF;
256:
257: -- initialize return status, get audit columns
258: --x_return_status := FND_API.G_RET_STS_SUCCESS;
259: SELECT Sysdate INTO l_today FROM dual;
260: l_user_id := nvl(fnd_global.user_id, 0) ;
261: l_login_id := nvl(fnd_global.login_id, -1);
262:

Line 445: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

441: , p_exception_set_id => l_exception_set_id
442: , x_return_status => l_Return_status
443: , x_msg_data => l_msg_data);
444:
445: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
446: RAISE FND_API.G_EXC_ERROR;
447: END IF;
448:
449: -- 3. if p_restock is 'yes', and notifications for any src type is yes

Line 446: RAISE FND_API.G_EXC_ERROR;

442: , x_return_status => l_Return_status
443: , x_msg_data => l_msg_data);
444:
445: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
446: RAISE FND_API.G_EXC_ERROR;
447: END IF;
448:
449: -- 3. if p_restock is 'yes', and notifications for any src type is yes
450: -- create notifications for that src type and restock the rest

Line 476: p_init_msg_list => FND_API.G_FALSE,

472: IF (l_count = 0) THEN -- only if item is not on suppresses notif
473: -- calculate need by date based on usage
474: csp_auto_aslmsl_pvt.calculate_needby_date
475: (p_api_version_number => 1.0,
476: p_init_msg_list => FND_API.G_FALSE,
477: p_commit => FND_API.G_FALSE,
478: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
479: p_inventory_item_id => l_item_attr_rec.item_id,
480: p_organization_id => p_organization_id,

Line 477: p_commit => FND_API.G_FALSE,

473: -- calculate need by date based on usage
474: csp_auto_aslmsl_pvt.calculate_needby_date
475: (p_api_version_number => 1.0,
476: p_init_msg_list => FND_API.G_FALSE,
477: p_commit => FND_API.G_FALSE,
478: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
479: p_inventory_item_id => l_item_attr_rec.item_id,
480: p_organization_id => p_organization_id,
481: p_onhand_quantity => l_index.tot_Avail_qty,

Line 478: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

474: csp_auto_aslmsl_pvt.calculate_needby_date
475: (p_api_version_number => 1.0,
476: p_init_msg_list => FND_API.G_FALSE,
477: p_commit => FND_API.G_FALSE,
478: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
479: p_inventory_item_id => l_item_attr_rec.item_id,
480: p_organization_id => p_organization_id,
481: p_onhand_quantity => l_index.tot_Avail_qty,
482: x_needby_date => l_need_by_date,

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

483: x_return_status => l_return_status,
484: x_msg_count => l_msg_count,
485: x_msg_data => l_msg_data);
486:
487: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
488: RAISE FND_API.G_EXC_ERROR;
489: END IF;
490:
491: IF (l_item_attr_rec.repetitive_planned_item = 'Y' AND p_repitem = 1) OR

Line 488: RAISE FND_API.G_EXC_ERROR;

484: x_msg_count => l_msg_count,
485: x_msg_data => l_msg_data);
486:
487: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
488: RAISE FND_API.G_EXC_ERROR;
489: END IF;
490:
491: IF (l_item_attr_rec.repetitive_planned_item = 'Y' AND p_repitem = 1) OR
492: (l_item_attr_rec.repetitive_planned_item = 'N' AND l_item_attr_rec.mbf = 2) THEN

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

577: ,x_msg_count => l_msg_count
578: ,x_msg_data => l_msg_data
579: );
580:
581: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
582: RAISE FND_API.G_EXC_ERROR;
583: END IF;
584: END IF;
585: ELSIF (l_item_attr_rec.src_type = 2) THEN

Line 582: RAISE FND_API.G_EXC_ERROR;

578: ,x_msg_data => l_msg_data
579: );
580:
581: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
582: RAISE FND_API.G_EXC_ERROR;
583: END IF;
584: END IF;
585: ELSIF (l_item_attr_rec.src_type = 2) THEN
586: -- if source type is 2-Supplier, external purchase req.

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

654: , p_pur_revision => nvl(fnd_profile.value('INV_PURCHASING_BY_REVISION'),2)
655: , x_ret_stat => l_return_status
656: , x_ret_mesg => l_msg_data);
657:
658: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
659: RAISE FND_API.G_EXC_ERROR;
660: END IF;
661: END IF;
662: ELSE

Line 659: RAISE FND_API.G_EXC_ERROR;

655: , x_ret_stat => l_return_status
656: , x_ret_mesg => l_msg_data);
657:
658: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
659: RAISE FND_API.G_EXC_ERROR;
660: END IF;
661: END IF;
662: ELSE
663: -- no source type defined, create a notification with source missing.

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

1257: ,x_msg_count => l_msg_count
1258: ,x_msg_data => l_msg_data
1259: );
1260:
1261: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1262: RAISE FND_API.G_EXC_ERROR;
1263: ELSE
1264: update csp_notifications
1265: set status = 5

Line 1262: RAISE FND_API.G_EXC_ERROR;

1258: ,x_msg_data => l_msg_data
1259: );
1260:
1261: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1262: RAISE FND_API.G_EXC_ERROR;
1263: ELSE
1264: update csp_notifications
1265: set status = 5
1266: where notification_id = onc.notification_id;

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

1325: , p_pur_revision => nvl(fnd_profile.value('INV_PURCHASING_BY_REVISION'),2)
1326: , x_ret_stat => l_return_status
1327: , x_ret_mesg => l_msg_data);
1328:
1329: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1330: RAISE FND_API.G_EXC_ERROR;
1331: ELSE
1332: update csp_notifications
1333: set status = 5

Line 1330: RAISE FND_API.G_EXC_ERROR;

1326: , x_ret_stat => l_return_status
1327: , x_ret_mesg => l_msg_data);
1328:
1329: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1330: RAISE FND_API.G_EXC_ERROR;
1331: ELSE
1332: update csp_notifications
1333: set status = 5
1334: where notification_id = onc.notification_id;

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

1374: , build_in_wip => l_item_attr_rec1.build_in_wip
1375: , pick_components => l_item_attr_rec1.pick_components
1376: , x_ret_stat => l_return_status
1377: , x_ret_mesg => l_msg_data);
1378: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1379: RAISE FND_API.G_EXC_ERROR;
1380: ELSE
1381: update csp_notifications
1382: set status = 5

Line 1379: RAISE FND_API.G_EXC_ERROR;

1375: , pick_components => l_item_attr_rec1.pick_components
1376: , x_ret_stat => l_return_status
1377: , x_ret_mesg => l_msg_data);
1378: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1379: RAISE FND_API.G_EXC_ERROR;
1380: ELSE
1381: update csp_notifications
1382: set status = 5
1383: where notification_id = onc.notification_id;

Line 1816: x_ret_stat := FND_API.G_RET_STS_SUCCESS;

1812: po_org_id);
1813:
1814: END IF;
1815:
1816: x_ret_stat := FND_API.G_RET_STS_SUCCESS;
1817: x_ret_mesg := '';
1818:
1819: EXCEPTION
1820: WHEN OTHERS THEN

Line 1829: x_ret_stat := FND_API.G_RET_STS_ERROR;

1825: FROM mfg_lookups
1826: WHERE lookup_type = 'INV_MMX_RPT_MSGS'
1827: AND lookup_code = 1;
1828:
1829: x_ret_stat := FND_API.G_RET_STS_ERROR;
1830: END re_po;
1831:
1832: PROCEDURE re_wip( item_id IN NUMBER
1833: , qty IN NUMBER

Line 1883: x_ret_stat := FND_API.G_RET_STS_SUCCESS;

1879: qty,
1880: DECODE(approval,1,1,2,3));
1881: END IF;
1882:
1883: x_ret_stat := FND_API.G_RET_STS_SUCCESS;
1884: x_ret_mesg := '';
1885:
1886: EXCEPTION
1887: WHEN OTHERS THEN

Line 1896: x_ret_stat := FND_API.G_RET_STS_ERROR;

1892: FROM mfg_lookups
1893: WHERE lookup_type = 'INV_MMX_RPT_MSGS'
1894: AND lookup_code = 2;
1895:
1896: x_ret_stat := FND_API.G_RET_STS_ERROR;
1897: END re_wip;
1898:
1899: PROCEDURE Calculate_Excess(
1900: p_organization_id IN NUMBER

Line 1909: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1905: ,x_excess_parts_tbl OUT NOCOPY csp_planner_notifications.excess_parts_tbl
1906: ,x_return_status OUT NOCOPY VARCHAR2
1907: ,x_msg_data OUT NOCOPY VARCHAR2
1908: ,x_msg_count OUT NOCOPY NUMBER) IS
1909: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1910: l_msg_data VARCHAR2(1000);
1911: l_msg_count NUMBER;
1912: l_api_name CONSTANT VARCHAR2(30) := 'calculate_excess';
1913:

Line 1978: x_return_status := FND_API.G_RET_STS_SUCCESS;

1974:
1975: BEGIN
1976: SAVEPOINT Calculate_Excess_PUB;
1977: --initialize return status
1978: x_return_status := FND_API.G_RET_STS_SUCCESS;
1979:
1980: /* Validate cat set and MCAT struct */
1981: IF p_item_rec.category_set_id is not null then
1982: SELECT STRUCTURE_ID

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

2130: , p_exception_set_id => null --l_exception_set_id
2131: , x_return_status => l_Return_status
2132: , x_msg_data => l_msg_data);
2133:
2134: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2135: RAISE FND_API.G_EXC_ERROR;
2136: ELSE
2137: BEGIN
2138: SELECT (tot_avail_qty - max_qty) excess_qty

Line 2135: RAISE FND_API.G_EXC_ERROR;

2131: , x_return_status => l_Return_status
2132: , x_msg_data => l_msg_data);
2133:
2134: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2135: RAISE FND_API.G_EXC_ERROR;
2136: ELSE
2137: BEGIN
2138: SELECT (tot_avail_qty - max_qty) excess_qty
2139: INTO l_excess_qty

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

2226: , p_exception_set_id => null --l_exception_set_id
2227: , x_return_status => l_Return_status
2228: , x_msg_data => l_msg_data);
2229:
2230: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2231: RAISE FND_API.G_EXC_ERROR;
2232: ELSE
2233: BEGIN
2234: SELECT (tot_avail_qty - max_qty) excess_qty

Line 2231: RAISE FND_API.G_EXC_ERROR;

2227: , x_return_status => l_Return_status
2228: , x_msg_data => l_msg_data);
2229:
2230: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2231: RAISE FND_API.G_EXC_ERROR;
2232: ELSE
2233: BEGIN
2234: SELECT (tot_avail_qty - max_qty) excess_qty
2235: INTO l_excess_qty

Line 2297: WHEN FND_API.G_EXC_ERROR THEN

2293: END IF;
2294: END LOOP;
2295:
2296: EXCEPTION
2297: WHEN FND_API.G_EXC_ERROR THEN
2298: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2299: P_API_NAME => L_API_NAME
2300: ,P_PKG_NAME => G_PKG_NAME
2301: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 2306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2302: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
2303: ,X_MSG_COUNT => X_MSG_COUNT
2304: ,X_MSG_DATA => X_MSG_DATA
2305: ,X_RETURN_STATUS => X_RETURN_STATUS);
2306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2307: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2308: P_API_NAME => L_API_NAME
2309: ,P_PKG_NAME => G_PKG_NAME
2310: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 2325: x_return_status := FND_API.G_RET_STS_ERROR;

2321: FND_MSG_PUB.ADD;
2322: fnd_msg_pub.count_and_get
2323: ( p_count => x_msg_count
2324: , p_data => x_msg_data);
2325: x_return_status := FND_API.G_RET_STS_ERROR;
2326: END;
2327:
2328: PROCEDURE Generate_Repair_Recomm(
2329: p_notification_id IN NUMBER

Line 2400: l_return_status := FND_API.G_RET_STS_SUCCESS;

2396: l_Serviceable VARCHAR2(30);
2397: l_repair_supplier_id NUMBER;
2398: l_source_type VARCHAR2(30):= 'REPAIR';
2399: BEGIN
2400: l_return_status := FND_API.G_RET_STS_SUCCESS;
2401:
2402: -- Find repair supplier for the warehouse
2403: FOR rsc IN repair_suppliers_cur LOOP
2404: IF (rsc.source_type = 1) THEN