[Home] [Help]
976:
977: l_msg_count NUMBER;
978: l_msg_data VARCHAR2(2000);
979: BEGIN
980: -- Standard call to check for call compatibility.
981: IF NOT Fnd_Api.Compatible_API_Call ( l_api_version,
982: p_api_version,
983: l_api_name,
984: G_PKG_NAME)
1018: x_msg_count => l_msg_count,
1019: x_return_status => l_return_status,
1020: x_msg_data => l_msg_data );
1021:
1022: --Standard check to count messages
1023: IF l_msg_count > 0 OR NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
1024: x_msg_count := l_msg_count;
1025: x_return_status := l_return_status;
1026: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1117: WHERE space_assignment_id = x_id);
1118: --
1119: BEGIN
1120: --------------------Initialize ----------------------------------
1121: -- Standard Start of API savepoint
1122: SAVEPOINT create_space_assignment;
1123: -- Check if API is called in debug mode. If yes, enable debug.
1124: IF G_DEBUG='Y' THEN
1125: AHL_DEBUG_PUB.enable_debug;
1127: -- Debug info.
1128: IF G_DEBUG='Y' THEN
1129: AHL_DEBUG_PUB.debug( 'enter ahl_ltp_space_assign_pvt.Create Space Assignment','+SPASN+');
1130: END IF;
1131: -- Standard call to check for call compatibility.
1132: IF FND_API.to_boolean(p_init_msg_list)
1133: THEN
1134: FND_MSG_PUB.initialize;
1135: END IF;
1211: END IF;
1212: --Assign the returned value
1213: p_x_space_assign_rec.visit_id := l_visit_id;
1214:
1215: --Standard check to count messages
1216: l_msg_count := Fnd_Msg_Pub.count_msg;
1217:
1218: IF l_msg_count > 0 THEN
1219: X_msg_count := l_msg_count;
1237: x_msg_count => l_msg_count,
1238: x_msg_data => l_msg_data );
1239:
1240:
1241: --Standard check to count messages
1242: l_msg_count := Fnd_Msg_Pub.count_msg;
1243:
1244: IF l_msg_count > 0 THEN
1245: X_msg_count := l_msg_count;
1254: x_msg_count => l_msg_count,
1255: x_return_status => l_return_status,
1256: x_msg_data => l_msg_data );
1257:
1258: --Standard check to count messages
1259: IF l_msg_count > 0 OR NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
1260: x_msg_count := l_msg_count;
1261: x_return_status := l_return_status;
1262: IF l_return_status = Fnd_Api.g_ret_sts_error THEN
1420: ELSE
1421: l_space_assign_rec.attribute15 := p_x_space_assign_rec.attribute15;
1422: END IF;
1423:
1424: --Standard check to count messages
1425: l_msg_count := Fnd_Msg_Pub.count_msg;
1426:
1427: IF l_msg_count > 0 THEN
1428: X_msg_count := l_msg_count;
1496: );
1497:
1498: p_x_space_assign_rec.space_assignment_id := l_space_assignment_id;
1499: ---------------------------End of Body---------------------------------------
1500: --Standard check to count messages
1501: l_msg_count := Fnd_Msg_Pub.count_msg;
1502:
1503: IF l_msg_count > 0 THEN
1504: X_msg_count := l_msg_count;
1505: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1506: RAISE Fnd_Api.G_EXC_ERROR;
1507: END IF;
1508:
1509: --Standard check for commit
1510: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
1511: COMMIT;
1512: END IF;
1513: -- Debug info
1604: l_temp_space_assign_rec Space_Assignment_Rec;--VWPE :: ER 12424063 :: PRAKKUM::21-APR-2011
1605:
1606: BEGIN
1607: --------------------Initialize ----------------------------------
1608: -- Standard Start of API savepoint
1609: SAVEPOINT update_space_assignment;
1610: -- Check if API is called in debug mode. If yes, enable debug.
1611: IF G_DEBUG='Y' THEN
1612: AHL_DEBUG_PUB.enable_debug;
1614: -- Debug info.
1615: IF G_DEBUG='Y' THEN
1616: AHL_DEBUG_PUB.debug( 'enter ahl_ltp_space_assign_pvt.Update Space Assignment','+SPANT+');
1617: END IF;
1618: -- Standard call to check for call compatibility.
1619: IF FND_API.to_boolean(p_init_msg_list)
1620: THEN
1621: FND_MSG_PUB.initialize;
1622: END IF;
1731: WHERE space_assignment_id = p_space_assign_rec.space_assignment_id;
1732:
1733:
1734: ---------------------------End of Body---------------------------------------
1735: --Standard check to count messages
1736: l_msg_count := Fnd_Msg_Pub.count_msg;
1737:
1738: IF l_msg_count > 0 THEN
1739: X_msg_count := l_msg_count;
1740: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1741: RAISE Fnd_Api.G_EXC_ERROR;
1742: END IF;
1743:
1744: --Standard check for commit
1745: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
1746: COMMIT;
1747: END IF;
1748: -- Debug info
1888: l_visit_spaces_rec c_visit_spaces_cur%ROWTYPE;
1889:
1890: BEGIN
1891: --------------------Initialize ----------------------------------
1892: -- Standard Start of API savepoint
1893: SAVEPOINT delete_space_assignment;
1894: -- Check if API is called in debug mode. If yes, enable debug.
1895: IF G_DEBUG='Y' THEN
1896: AHL_DEBUG_PUB.enable_debug;
1898: -- Debug info.
1899: IF G_DEBUG='Y' THEN
1900: AHL_DEBUG_PUB.debug( 'enter ahl_ltp_space_assign_pvt.Delete Space Assignment','+SPANT+');
1901: END IF;
1902: -- Standard call to check for call compatibility.
1903: IF FND_API.to_boolean(p_init_msg_list)
1904: THEN
1905: FND_MSG_PUB.initialize;
1906: END IF;
2006: DELETE FROM AHL_SPACE_ASSIGNMENTS
2007: WHERE SPACE_ASSIGNMENT_ID = p_space_assign_rec.space_assignment_id;
2008: END IF;
2009: ---------------------------End of Body---------------------------------------
2010: --Standard check to count messages
2011: l_msg_count := Fnd_Msg_Pub.count_msg;
2012:
2013: IF l_msg_count > 0 THEN
2014: X_msg_count := l_msg_count;
2015: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2016: RAISE Fnd_Api.G_EXC_ERROR;
2017: END IF;
2018:
2019: --Standard check for commit
2020: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
2021: COMMIT;
2022: END IF;
2023: -- Debug info
2195: );
2196: END IF;
2197:
2198: --------------------Initialize ----------------------------------
2199: -- Standard Start of API savepoint
2200: SAVEPOINT schedule_visit;
2201: -- Check if API is called in debug mode. If yes, enable debug.
2202: IF G_DEBUG='Y' THEN
2203: AHL_DEBUG_PUB.enable_debug;
2205: -- Debug info.
2206: IF G_DEBUG='Y' THEN
2207: AHL_DEBUG_PUB.debug( 'enter ahl_ltp_space_assign_pvt.Schedule Visit','+SPANT+');
2208: END IF;
2209: -- Standard call to check for call compatibility.
2210: IF FND_API.to_boolean(p_init_msg_list)
2211: THEN
2212: FND_MSG_PUB.initialize;
2213: END IF;
2439: END IF; --dept condtion
2440: END IF; --org condition
2441: END IF; --Schedule flag
2442: */
2443: --Standard check to count messages
2444: l_msg_count := Fnd_Msg_Pub.count_msg;
2445:
2446: IF l_msg_count > 0 THEN
2447: X_msg_count := l_msg_count;
2500: FETCH c_visit_sched_cur INTO l_dummy;
2501: CLOSE c_visit_sched_cur;
2502: */
2503:
2504: --Standard check to count messages
2505: l_msg_count := Fnd_Msg_Pub.count_msg;
2506:
2507: IF l_msg_count > 0 THEN
2508: X_msg_count := l_msg_count;
2621: x_msg_data => l_msg_data);
2622:
2623: END IF;
2624: */
2625: --Standard check to count messages
2626: l_msg_count := Fnd_Msg_Pub.count_msg;
2627:
2628: IF l_msg_count > 0 THEN
2629: X_msg_count := l_msg_count;
2632: END IF;
2633:
2634: ---------------------------End of Body---------------------------------------
2635:
2636: --Standard check for commit
2637: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
2638: COMMIT;
2639: END IF;
2640: -- Debug info
2783: i NUMBER := 0;
2784: l_visit_name VARCHAR2(80);
2785: BEGIN
2786: --------------------Initialize ----------------------------------
2787: -- Standard Start of API savepoint
2788: SAVEPOINT unschedule_visit;
2789: -- Check if API is called in debug mode. If yes, enable debug.
2790: IF G_DEBUG='Y' THEN
2791: AHL_DEBUG_PUB.enable_debug;
2793: -- Debug info.
2794: IF G_DEBUG='Y' THEN
2795: AHL_DEBUG_PUB.debug( 'enter ahl_ltp_space_assign_pvt.Unschedule Visit','+SPANT+');
2796: END IF;
2797: -- Standard call to check for call compatibility.
2798: IF FND_API.to_boolean(p_init_msg_list)
2799: THEN
2800: FND_MSG_PUB.initialize;
2801: END IF;
2984:
2985: -- Changes by mpothuku End
2986:
2987: ---------------------------End of Body---------------------------------------
2988: --Standard check to count messages
2989: l_msg_count := Fnd_Msg_Pub.count_msg;
2990:
2991: IF l_msg_count > 0 THEN
2992: X_msg_count := l_msg_count;
2993: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2994: RAISE Fnd_Api.G_EXC_ERROR;
2995: END IF;
2996:
2997: --Standard check for commit
2998: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
2999: COMMIT;
3000: END IF;
3001: -- Debug info