[Home] [Help]
32: -- for Routine jobs derived requested quantity and task start date
33: -- Pre-reqs :
34: -- Parameters :
35: --
36: -- Standard OUT Parameters :
37: -- x_return_status OUT VARCHAR2 Required
38: --
39: -- Check_Material_Aval Parameters :
40: -- p_calling_module IN NUMBER ,
102: 'At the start of PL SQL procedure. Inventory item ID : ' || p_inventory_item_id);
103: END IF;
104:
105: --------------------Initialize ----------------------------------
106: -- Standard Start of API savepoint
107: SAVEPOINT check_availability;
108: -- Initialize API return status to success
109: x_return_status := FND_API.G_RET_STS_SUCCESS;
110: -- Initialize message list if p_init_msg_list is set to TRUE.
410: -- for Routine jobs derived requested quantity and task start date
411: -- Pre-reqs :
412: -- Parameters :
413: --
414: -- Standard IN Parameters :
415: -- p_api_version IN NUMBER Required
416: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
417: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
418: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
418: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
419: -- Based on this flag, the API will set the default attributes.
420: -- p_module_type In VARCHAR2 Default NULL
421: -- This will be null.
422: -- Standard OUT Parameters :
423: -- x_return_status OUT VARCHAR2 Required
424: -- x_msg_count OUT NUMBER Required
425: -- x_msg_data OUT VARCHAR2 Required
426: --
482: END IF;
483: -- dbms_output.put_line( 'start private API:');
484:
485: --------------------Initialize ----------------------------------
486: -- Standard Start of API savepoint
487: SAVEPOINT check_material_aval;
488: -- Standard call to check for call compatibility.
489: IF FND_API.to_boolean(p_init_msg_list)
490: THEN
484:
485: --------------------Initialize ----------------------------------
486: -- Standard Start of API savepoint
487: SAVEPOINT check_material_aval;
488: -- Standard call to check for call compatibility.
489: IF FND_API.to_boolean(p_init_msg_list)
490: THEN
491: FND_MSG_PUB.initialize;
492: END IF;
689: -- visit, which are defined at Route Operation level
690: -- Pre-reqs :
691: -- Parameters :
692: --
693: -- Standard IN Parameters :
694: -- p_api_version IN NUMBER Required
695: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
696: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
697: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
697: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
698: -- Based on this flag, the API will set the default attributes.
699: -- p_module_type In VARCHAR2 Default NULL
700: -- This will be null.
701: -- Standard OUT Parameters :
702: -- x_return_status OUT VARCHAR2 Required
703: -- x_msg_count OUT NUMBER Required
704: -- x_msg_data OUT VARCHAR2 Required
705: --
744: AND LOOKUP_TYPE(+) = 'AHL_VWP_TASK_STATUS'
745: AND LOOKUP_code = task_status_code;
746: c_Visit_Task_Matrl_Rec Visit_Task_Matrl_Cur%ROWTYPE;
747:
748: --Standard local variables
749: l_api_name CONSTANT VARCHAR2(30) := 'Get_Visit_Task_Materials';
750: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
751: l_api_version CONSTANT NUMBER := 1.0;
752: l_return_status VARCHAR2(1);
760: fnd_log.string(l_log_procedure,
761: L_DEBUG_KEY ||'.begin',
762: 'At the start of PL SQL procedure. Visit Id = ' || p_visit_id);
763: END IF;
764: -- Standard Start of API savepoint
765: SAVEPOINT Get_Visit_Task_Materials;
766: -- Initialize message list if p_init_msg_list is set to TRUE.
767: IF FND_API.to_boolean(p_init_msg_list) THEN
768: FND_MSG_PUB.initialize;
768: FND_MSG_PUB.initialize;
769: END IF;
770: -- Initialize API return status to success
771: x_return_status := FND_API.G_RET_STS_SUCCESS;
772: -- Standard call to check for call compatibility.
773: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
774: l_api_version,
775: l_api_name,G_PKG_NAME)
776: THEN
924: -- for Routine jobs derived requested quantity and task start date
925: -- Pre-reqs :
926: -- Parameters :
927: --
928: -- Standard IN Parameters :
929: -- p_api_version IN NUMBER Required
930: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
931: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
932: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
932: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
933: -- Based on this flag, the API will set the default attributes.
934: -- p_module_type In VARCHAR2 Default NULL
935: -- This will be null.
936: -- Standard OUT Parameters :
937: -- x_return_status OUT VARCHAR2 Required
938: -- x_msg_count OUT NUMBER Required
939: -- x_msg_data OUT VARCHAR2 Required
940: --
998: CURSOR Instance_Id_Cur IS
999: SELECT instance_id
1000: FROM MRP_AP_APPS_INSTANCES;
1001:
1002: --Standard local variables
1003: l_api_name CONSTANT VARCHAR2(30) := 'CALL_ATP';
1004: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
1005: l_api_version CONSTANT NUMBER := 1.0;
1006: l_return_status VARCHAR2(1);
1031: fnd_log.string(l_log_procedure,
1032: L_DEBUG_KEY ||'.begin',
1033: 'At the start of PL SQL procedure. Number of Records : ' || l_planned_matrl_tbl.COUNT);
1034: END IF;
1035: -- Standard Start of API savepoint
1036: SAVEPOINT Call_ATP;
1037: -- Initialize message list if p_init_msg_list is set to TRUE.
1038: IF FND_API.to_boolean(p_init_msg_list) THEN
1039: FND_MSG_PUB.initialize;
1039: FND_MSG_PUB.initialize;
1040: END IF;
1041: -- Initialize API return status to success
1042: x_return_status := FND_API.G_RET_STS_SUCCESS;
1043: -- Standard call to check for call compatibility.
1044: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
1045: l_api_version,
1046: l_api_name,G_PKG_NAME)
1047: THEN
1361: -- for Routine jobs derived requested quantity and task start date
1362: -- Pre-reqs :
1363: -- Parameters :
1364: --
1365: -- Standard IN Parameters :
1366: -- p_api_version IN NUMBER Required
1367: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
1368: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
1369: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
1369: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
1370: -- Based on this flag, the API will set the default attributes.
1371: -- p_module_type In VARCHAR2 Default NULL
1372: -- This will be null.
1373: -- Standard OUT Parameters :
1374: -- x_return_status OUT VARCHAR2 Required
1375: -- x_msg_count OUT NUMBER Required
1376: -- x_msg_data OUT VARCHAR2 Required
1377: --
1465: AND ASMT.ORGANIZATION_ID = KFV.ORGANIZATION_ID(+)
1466: AND AVTL.STATUS_CODE = FLV.LOOKUP_CODE
1467: AND FLV.LOOKUP_TYPE(+) = 'AHL_VWP_TASK_STATUS';
1468:
1469: --Standard local variables
1470: l_api_name CONSTANT VARCHAR2(30) := 'Schedule_Planned_Matrls';
1471: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
1472: l_api_version CONSTANT NUMBER := 1.0;
1473: l_return_status VARCHAR2(1);
1485: fnd_log.string(l_log_procedure,
1486: L_DEBUG_KEY ||'.begin',
1487: 'At the start of PL SQL procedure. Number of Records : ' || l_planned_matrl_tbl.COUNT);
1488: END IF;
1489: -- Standard Start of API savepoint
1490: SAVEPOINT schedule_planned_matrls;
1491: -- Initialize message list if p_init_msg_list is set to TRUE.
1492: IF FND_API.to_boolean(p_init_msg_list) THEN
1493: FND_MSG_PUB.initialize;
1493: FND_MSG_PUB.initialize;
1494: END IF;
1495: -- Initialize API return status to success
1496: x_return_status := FND_API.G_RET_STS_SUCCESS;
1497: -- Standard call to check for call compatibility.
1498: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
1499: l_api_version,
1500: l_api_name,G_PKG_NAME)
1501: THEN
1627: END IF;
1628: END LOOP;
1629: END IF;
1630:
1631: -- Standard check of p_commit
1632: IF FND_API.TO_BOOLEAN(p_commit) THEN
1633: COMMIT WORK;
1634: END IF;
1635:
1676: -- for Routine jobs derived requested quantity and task start date
1677: -- Pre-reqs :
1678: -- Parameters :
1679: --
1680: -- Standard IN Parameters :
1681: -- p_api_version IN NUMBER Required
1682: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
1683: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
1684: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
1684: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
1685: -- Based on this flag, the API will set the default attributes.
1686: -- p_module_type In VARCHAR2 Default NULL
1687: -- This will be null.
1688: -- Standard OUT Parameters :
1689: -- x_return_status OUT VARCHAR2 Required
1690: -- x_msg_count OUT NUMBER Required
1691: -- x_msg_data OUT VARCHAR2 Required
1692: --
1730: AND NVL(schm.status, 'X') <> 'IN-SERVICE' --Added by sowsubra for Issue 105
1731: AND schm.visit_id = C_VISIT_ID;
1732: -- yazhou 03-JUL-2006 ends
1733:
1734: --Standard local variables
1735: l_api_name CONSTANT VARCHAR2(30) := 'Schedule_All_Materials';
1736: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
1737: l_api_version CONSTANT NUMBER := 1.0;
1738: l_return_status VARCHAR2(1);
1748: fnd_log.string(l_log_procedure,
1749: L_DEBUG_KEY ||'.begin',
1750: 'At the start of PL SQL procedure. Visit Id = ' || p_visit_id);
1751: END IF;
1752: -- Standard Start of API savepoint
1753: SAVEPOINT Schedule_All_Materials;
1754: -- Initialize message list if p_init_msg_list is set to TRUE.
1755: IF FND_API.to_boolean(p_init_msg_list) THEN
1756: FND_MSG_PUB.initialize;
1756: FND_MSG_PUB.initialize;
1757: END IF;
1758: -- Initialize API return status to success
1759: x_return_status := FND_API.G_RET_STS_SUCCESS;
1760: -- Standard call to check for call compatibility.
1761: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
1762: l_api_version,
1763: l_api_name,G_PKG_NAME)
1764: THEN
1852: ', Error Message : ' || x_planned_matrl_tbl(i).error_message);
1853: END IF;
1854: END LOOP;
1855: END IF;
1856: -- Standard check of p_commit
1857: IF FND_API.TO_BOOLEAN(p_commit) THEN
1858: COMMIT WORK;
1859: END IF;
1860:
1903: -- have since been soft-deleted.
1904: -- Pre-reqs :
1905: -- Parameters :
1906: --
1907: -- Standard IN Parameters :
1908: -- p_api_version IN NUMBER Required
1909: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
1910: -- Standard OUT Parameters :
1911: -- x_return_status OUT VARCHAR2 Required
1906: --
1907: -- Standard IN Parameters :
1908: -- p_api_version IN NUMBER Required
1909: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
1910: -- Standard OUT Parameters :
1911: -- x_return_status OUT VARCHAR2 Required
1912: -- x_msg_count OUT NUMBER Required
1913: -- x_msg_data OUT VARCHAR2 Required
1914: --
1944: SELECT NVL(ATP_FLAG, 'N') from mtl_system_items
1945: WHERE INVENTORY_ITEM_ID = c_item_id
1946: AND ORGANIZATION_ID = c_org_id;
1947:
1948: --Standard local variables
1949: l_api_name CONSTANT VARCHAR2(30) := 'Unschedule_deleted_materials';
1950: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
1951: l_api_version CONSTANT NUMBER := 1.0;
1952: l_return_status VARCHAR2(1);
1974: fnd_log.string(l_log_procedure, L_DEBUG_KEY ||'.begin',
1975: 'At the start of PL/SQL procedure. Number of Records: ' || p_deleted_matrl_tbl.COUNT);
1976: END IF;
1977:
1978: -- Standard Start of API savepoint
1979: SAVEPOINT Unschedule_deleted_materials;
1980:
1981: -- Initialize message list if p_init_msg_list is set to TRUE.
1982: IF FND_API.to_boolean(p_init_msg_list) THEN
1985:
1986: -- Initialize API return status to success
1987: x_return_status := FND_API.G_RET_STS_SUCCESS;
1988:
1989: -- Standard call to check for call compatibility.
1990: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version, l_api_version, l_api_name, G_PKG_NAME) THEN
1991: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1992: END IF;
1993: