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 1819: x_ret_stat := FND_API.G_RET_STS_SUCCESS;

1815: po_org_id);
1816:
1817: END IF;
1818:
1819: x_ret_stat := FND_API.G_RET_STS_SUCCESS;
1820: x_ret_mesg := '';
1821:
1822: EXCEPTION
1823: WHEN OTHERS THEN

Line 1832: x_ret_stat := FND_API.G_RET_STS_ERROR;

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

Line 1886: x_ret_stat := FND_API.G_RET_STS_SUCCESS;

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

Line 1899: x_ret_stat := FND_API.G_RET_STS_ERROR;

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

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

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

Line 1981: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

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

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

Line 2138: RAISE FND_API.G_EXC_ERROR;

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

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

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

Line 2234: RAISE FND_API.G_EXC_ERROR;

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

Line 2300: WHEN FND_API.G_EXC_ERROR THEN

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

Line 2309: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 2328: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 2403: l_return_status := FND_API.G_RET_STS_SUCCESS;

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