The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT *
FROM AHL_VISITS_B
WHERE unit_schedule_id = p_unit_schedule_id
AND STATUS_CODE NOT IN ('DELETED', 'CANCELLED' , 'CLOSED');
SELECT 'X'
FROM AHL_UNIT_SCHEDULES
WHERE unit_schedule_id = p_unit_schedule_id
AND object_version_number = p_object_version_number;
SELECT unit_config_header_id
FROM AHL_UNIT_CONFIG_HEADERS
WHERE name = p_uc_name
--priyan Bug # 5303188
-- AND ahl_util_uc_pkg.get_uc_status_code (unit_config_header_id) IN ('COMPLETE', 'INCOMPLETE');
SELECT mtlp.organization_id
FROM MTL_PARAMETERS mtlp
WHERE mtlp.eam_enabled_flag = 'Y'
AND mtlp.organization_code = p_org_code;
SELECT DEPARTMENT_ID
FROM BOM_DEPARTMENTS BD
WHERE BD.DEPARTMENT_CODE = p_dept_code AND
BD.ORGANIZATION_ID = p_org_id;
SELECT *
FROM AHL_UNIT_SCHEDULES
WHERE unit_schedule_id = p_unit_shcedule_id;
PROCEDURE validate_update(
p_x_flight_schedule_rec IN OUT NOCOPY FLIGHT_SCHEDULE_REC_TYPE,
x_return_status OUT NOCOPY VARCHAR2
)
IS
-- Cursor for getting a Unit Schedule record.
CURSOR get_current_us_csr(p_unit_shcedule_id IN NUMBER) IS
SELECT *
FROM AHL_UNIT_SCHEDULES
WHERE unit_schedule_id = p_unit_shcedule_id;
l_api_name CONSTANT VARCHAR2(30) := 'validate_update';
l_update_allowed VARCHAR2(1);
l_update_allowed := is_update_allowed(
p_x_flight_schedule_rec.unit_schedule_id,
is_super_user
);
FND_MESSAGE.set_name( 'AHL','AHL_UA_UNIT_NO_UPDATE' );
'Unit config header id cannot be updated for '
||p_x_flight_schedule_rec.unit_schedule_id
);
FND_MESSAGE.set_name( 'AHL','AHL_UA_FLIGHT_NO_UPDATE' );
'Flight Number cannot be updated for '
||p_x_flight_schedule_rec.unit_schedule_id
);
FND_MESSAGE.set_name( 'AHL','AHL_UA_SEGMENT_NO_UPDATE' );
'Flight Segment cannot be updated for '
||p_x_flight_schedule_rec.unit_schedule_id
);
l_update_allowed = FND_API.G_FALSE
THEN
FND_MESSAGE.set_name( 'AHL', 'AHL_UA_DEP_DEPT_NO_UPDATE' );
'Departure deparment cannot be updated for '
||p_x_flight_schedule_rec.unit_schedule_id
);
l_update_allowed = FND_API.G_FALSE
THEN
FND_MESSAGE.set_name( 'AHL', 'AHL_UA_DEP_ORG_NO_UPDATE' );
'Departure org cannot be updated for '
||p_x_flight_schedule_rec.unit_schedule_id
);
l_update_allowed = FND_API.G_FALSE
THEN
FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ARR_DEP_NO_UPDATE' );
'Arrival Department cannot be updated for'
||p_x_flight_schedule_rec.unit_schedule_id
);
l_update_allowed = FND_API.G_FALSE
THEN
FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ARR_ORG_NO_UPDATE' );
'Arrival org cannot be updated for '
||p_x_flight_schedule_rec.unit_schedule_id
);
l_update_allowed = FND_API.G_FALSE
THEN
FND_MESSAGE.set_name( 'AHL', 'AHL_UA_EST_DEP_NO_UPDATE' );
'Estimated Departure time cannot be updated for '
||p_x_flight_schedule_rec.unit_schedule_id
);
l_update_allowed = FND_API.G_FALSE
THEN
FND_MESSAGE.set_name( 'AHL', 'AHL_UA_EST_ARR_NO_UPDATE' );
'Estimated Arrival time cannot be updated for '
||p_x_flight_schedule_rec.unit_schedule_id
);
END validate_update;
/*SELECT unit_schedule_id, actual_departure_time, actual_arrival_time
FROM AHL_UNIT_SCHEDULES_V
WHERE unit_schedule_id = (
SELECT preceding_us_id
FROM AHL_UNIT_SCHEDULES_V
WHERE unit_schedule_id = p_unit_schedule_id
);*/
SELECT
UNIT_SCHEDULE_ID,
ACTUAL_DEPARTURE_TIME,
ACTUAL_ARRIVAL_TIME
FROM
AHL_UNIT_SCHEDULES
WHERE
UNIT_SCHEDULE_ID = (
SELECT PRECEDING_US_ID
FROM AHL_UNIT_SCHEDULES
WHERE UNIT_SCHEDULE_ID = p_unit_schedule_id
);
SELECT unit_schedule_id, actual_departure_time, actual_arrival_time
FROM AHL_UNIT_SCHEDULES
WHERE unit_config_header_id = p_uc_header_id AND
Est_arrival_time < p_est_arrival_date;
SELECT actual_departure_time, actual_arrival_time
FROM AHL_UNIT_SCHEDULES
WHERE unit_schedule_id = p_unit_schedule_id;
SELECT unit_config_header_id,
EST_DEPARTURE_TIME,
EST_ARRIVAL_TIME,
ACTUAL_DEPARTURE_TIME,
ACTUAL_ARRIVAL_TIME
FROM AHL_UNIT_SCHEDULES
WHERE unit_schedule_id = p_unit_schedule_id;
AND is_delete_allowed(p_unit_schedule_id => p_x_flight_schedule_rec.unit_schedule_id,
p_is_super_user => is_super_user
) = FND_API.G_FALSE
THEN
FND_MESSAGE.set_name( 'AHL', 'AHL_UA_ACT_NO_DEL' );
||'so delete not allowed'
);
SELECT count(unit_schedule_id) INTO l_us_dup_count
FROM AHL_UNIT_SCHEDULES
WHERE UNIT_CONFIG_HEADER_ID = p_x_flight_schedule_rec.UNIT_CONFIG_HEADER_ID
AND FLIGHT_NUMBER = p_x_flight_schedule_rec.FLIGHT_NUMBER
AND SEGMENT = p_x_flight_schedule_rec.SEGMENT
AND EST_ARRIVAL_TIME = p_x_flight_schedule_rec.EST_ARRIVAL_TIME
AND EST_DEPARTURE_TIME = p_x_flight_schedule_rec.EST_DEPARTURE_TIME
AND unit_schedule_id <> nvl(p_x_flight_schedule_rec.unit_schedule_id,-100);
SELECT count(unit_schedule_id) into l_est_violation_count
FROM AHL_UNIT_SCHEDULES
WHERE est_arrival_time > p_x_flight_schedule_rec.EST_ARRIVAL_TIME AND
unit_config_header_id = p_x_flight_schedule_rec.unit_config_header_id
AND (
actual_departure_time is not null OR actual_arrival_time is not null
)
AND unit_schedule_id <> nvl(p_x_flight_schedule_rec.unit_schedule_id,-110);
SELECT unit_schedule_id, nvl(actual_arrival_time, est_arrival_time) "ARRIVAL_TIME"
FROM AHL_UNIT_SCHEDULES
WHERE unit_config_header_id = p_unit_config_header_id
ORDER BY nvl(actual_arrival_time, est_arrival_time) DESC;
SELECT unit_schedule_id, est_arrival_time "ARRIVAL_TIME"
FROM AHL_UNIT_SCHEDULES
WHERE unit_config_header_id = p_unit_config_header_id
ORDER BY est_arrival_time DESC;
UPDATE AHL_UNIT_SCHEDULES
SET preceding_us_id = l_pre_us_tbl(j).preceding_us_id
WHERE unit_schedule_id = l_pre_us_tbl(j).unit_schedule_id;
ELSIF ( p_visit_sync_rec.VISIT_RESCHEDULE_MODE = 'DELETE')
THEN
l_visit_tbl(l_visit_count).operation_flag := 'X';
INSERT INTO AHL_UNIT_SCHEDULES
(
UNIT_SCHEDULE_ID,
FLIGHT_NUMBER,
SEGMENT,
DEPARTURE_DEPT_ID,
DEPARTURE_ORG_ID,
ARRIVAL_DEPT_ID,
ARRIVAL_ORG_ID,
EST_DEPARTURE_TIME,
EST_ARRIVAL_TIME,
ACTUAL_DEPARTURE_TIME,
ACTUAL_ARRIVAL_TIME,
PRECEDING_US_ID,
UNIT_CONFIG_HEADER_ID,
VISIT_RESCHEDULE_MODE,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
OBJECT_VERSION_NUMBER,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15
) VALUES
(
AHL_UNIT_SCHEDULES_S.NEXTVAL,
p_x_flight_schedules_tbl(i).FLIGHT_NUMBER,
p_x_flight_schedules_tbl(i).SEGMENT,
p_x_flight_schedules_tbl(i).DEPARTURE_DEPT_ID,
p_x_flight_schedules_tbl(i).DEPARTURE_ORG_ID,
p_x_flight_schedules_tbl(i).ARRIVAL_DEPT_ID,
p_x_flight_schedules_tbl(i).ARRIVAL_ORG_ID,
p_x_flight_schedules_tbl(i).EST_DEPARTURE_TIME,
p_x_flight_schedules_tbl(i).EST_ARRIVAL_TIME,
p_x_flight_schedules_tbl(i).ACTUAL_DEPARTURE_TIME,
p_x_flight_schedules_tbl(i).ACTUAL_ARRIVAL_TIME,
p_x_flight_schedules_tbl(i).PRECEDING_US_ID,
p_x_flight_schedules_tbl(i).UNIT_CONFIG_HEADER_ID,
p_x_flight_schedules_tbl(i).VISIT_RESCHEDULE_MODE,
G_SYSDATE,
G_USER_ID,
G_SYSDATE,
G_USER_ID,
G_LOGIN_ID,
1,
p_x_flight_schedules_tbl(i).ATTRIBUTE_CATEGORY,
p_x_flight_schedules_tbl(i).ATTRIBUTE1,
p_x_flight_schedules_tbl(i).ATTRIBUTE2,
p_x_flight_schedules_tbl(i).ATTRIBUTE3,
p_x_flight_schedules_tbl(i).ATTRIBUTE4,
p_x_flight_schedules_tbl(i).ATTRIBUTE5,
p_x_flight_schedules_tbl(i).ATTRIBUTE6,
p_x_flight_schedules_tbl(i).ATTRIBUTE7,
p_x_flight_schedules_tbl(i).ATTRIBUTE8,
p_x_flight_schedules_tbl(i).ATTRIBUTE9,
p_x_flight_schedules_tbl(i).ATTRIBUTE10,
p_x_flight_schedules_tbl(i).ATTRIBUTE11,
p_x_flight_schedules_tbl(i).ATTRIBUTE12,
p_x_flight_schedules_tbl(i).ATTRIBUTE13,
p_x_flight_schedules_tbl(i).ATTRIBUTE14,
p_x_flight_schedules_tbl(i).ATTRIBUTE15
);
SELECT AHL_UNIT_SCHEDULES_S.CURRVAL INTO p_x_flight_schedules_tbl(i).UNIT_SCHEDULE_ID FROM DUAL ;
SELECT count(unit_schedule_id) INTO l_overlap_us_count
FROM AHL_UNIT_SCHEDULES
WHERE unit_config_header_id = p_x_flight_schedules_tbl(i).unit_config_header_id
AND (
(
(p_x_flight_schedules_tbl(i).actual_departure_time between ACTUAL_DEPARTURE_TIME and ACTUAL_ARRIVAL_TIME)
AND
( p_x_flight_schedules_tbl(i).actual_arrival_time between ACTUAL_DEPARTURE_TIME and ACTUAL_ARRIVAL_TIME)
)
OR (ACTUAL_DEPARTURE_TIME between p_x_flight_schedules_tbl(i).actual_departure_time and p_x_flight_schedules_tbl(i).actual_arrival_time)
OR (ACTUAL_ARRIVAL_TIME between p_x_flight_schedules_tbl(i).actual_departure_time and p_x_flight_schedules_tbl(i).actual_arrival_time)
)
AND unit_schedule_id <> p_x_flight_schedules_tbl(i).unit_schedule_id;
SELECT count(unit_schedule_id) INTO l_overlap_us_count
FROM AHL_UNIT_SCHEDULES
WHERE unit_config_header_id = p_x_flight_schedules_tbl(i).unit_config_header_id
/*AND (
(
(p_x_flight_schedules_tbl(i).est_departure_time between EST_DEPARTURE_TIME and EST_ARRIVAL_TIME)
AND
( p_x_flight_schedules_tbl(i).est_arrival_time between EST_DEPARTURE_TIME and EST_ARRIVAL_TIME)
)
OR (EST_DEPARTURE_TIME between p_x_flight_schedules_tbl(i).est_departure_time and p_x_flight_schedules_tbl(i).est_arrival_time)
OR (EST_ARRIVAL_TIME between p_x_flight_schedules_tbl(i).est_departure_time and p_x_flight_schedules_tbl(i).est_arrival_time)
)*/
AND (
(
((p_x_flight_schedules_tbl(i).est_departure_time>EST_DEPARTURE_TIME AND p_x_flight_schedules_tbl(i).est_departure_timeEST_DEPARTURE_TIME and p_x_flight_schedules_tbl(i).est_arrival_timep_x_flight_schedules_tbl(i).est_departure_time and EST_DEPARTURE_TIMEp_x_flight_schedules_tbl(i).est_departure_time and EST_ARRIVAL_TIME p_x_flight_schedules_tbl(i).unit_schedule_id;
PROCEDURE Update_Flight_Schedules(
p_module_type IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
p_x_flight_schedules_tbl IN OUT NOCOPY FLIGHT_SCHEDULES_TBL_TYPE
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Flight_Schedules';
SELECT est_arrival_time, arrival_org_id, arrival_dept_id
FROM AHL_UNIT_SCHEDULES
WHERE unit_schedule_id = p_unit_schedule_id;
'default_unchanged_attributes for update operation. Module type is '||p_module_type
);
validate_update
(
p_x_flight_schedules_tbl(i),
x_return_status
);
'validate_update returned with expected error..'
);
'validate_update returned with un-expected error..'
);
UPDATE AHL_UNIT_SCHEDULES SET
UNIT_SCHEDULE_ID = p_x_flight_schedules_tbl(i).UNIT_SCHEDULE_ID,
FLIGHT_NUMBER = p_x_flight_schedules_tbl(i).FLIGHT_NUMBER,
SEGMENT = p_x_flight_schedules_tbl(i).SEGMENT,
DEPARTURE_DEPT_ID = p_x_flight_schedules_tbl(i).DEPARTURE_DEPT_ID,
DEPARTURE_ORG_ID = p_x_flight_schedules_tbl(i).DEPARTURE_ORG_ID,
ARRIVAL_DEPT_ID = p_x_flight_schedules_tbl(i).ARRIVAL_DEPT_ID,
ARRIVAL_ORG_ID = p_x_flight_schedules_tbl(i).ARRIVAL_ORG_ID,
EST_DEPARTURE_TIME = p_x_flight_schedules_tbl(i).EST_DEPARTURE_TIME,
EST_ARRIVAL_TIME = p_x_flight_schedules_tbl(i).EST_ARRIVAL_TIME,
ACTUAL_DEPARTURE_TIME = p_x_flight_schedules_tbl(i).ACTUAL_DEPARTURE_TIME,
ACTUAL_ARRIVAL_TIME = p_x_flight_schedules_tbl(i).ACTUAL_ARRIVAL_TIME,
PRECEDING_US_ID = p_x_flight_schedules_tbl(i).PRECEDING_US_ID,
UNIT_CONFIG_HEADER_ID = p_x_flight_schedules_tbl(i).UNIT_CONFIG_HEADER_ID,
VISIT_RESCHEDULE_MODE = p_x_flight_schedules_tbl(i).VISIT_RESCHEDULE_MODE,
LAST_UPDATE_DATE = G_SYSDATE,
LAST_UPDATED_BY = G_USER_ID,
CREATION_DATE = G_SYSDATE,
CREATED_BY = G_USER_ID,
LAST_UPDATE_LOGIN = G_LOGIN_ID,
OBJECT_VERSION_NUMBER = p_x_flight_schedules_tbl(i).OBJECT_VERSION_NUMBER + 1,
ATTRIBUTE_CATEGORY = p_x_flight_schedules_tbl(i).ATTRIBUTE_CATEGORY,
ATTRIBUTE1 = p_x_flight_schedules_tbl(i).ATTRIBUTE1,
ATTRIBUTE2 = p_x_flight_schedules_tbl(i).ATTRIBUTE2,
ATTRIBUTE3 = p_x_flight_schedules_tbl(i).ATTRIBUTE3,
ATTRIBUTE4 = p_x_flight_schedules_tbl(i).ATTRIBUTE4,
ATTRIBUTE5 = p_x_flight_schedules_tbl(i).ATTRIBUTE5,
ATTRIBUTE6 = p_x_flight_schedules_tbl(i).ATTRIBUTE6,
ATTRIBUTE7 = p_x_flight_schedules_tbl(i).ATTRIBUTE7,
ATTRIBUTE8 = p_x_flight_schedules_tbl(i).ATTRIBUTE8,
ATTRIBUTE9 = p_x_flight_schedules_tbl(i).ATTRIBUTE9,
ATTRIBUTE10 = p_x_flight_schedules_tbl(i).ATTRIBUTE10,
ATTRIBUTE11 = p_x_flight_schedules_tbl(i).ATTRIBUTE11,
ATTRIBUTE12 = p_x_flight_schedules_tbl(i).ATTRIBUTE12,
ATTRIBUTE13 = p_x_flight_schedules_tbl(i).ATTRIBUTE13,
ATTRIBUTE14 = p_x_flight_schedules_tbl(i).ATTRIBUTE14,
ATTRIBUTE15 = p_x_flight_schedules_tbl(i).ATTRIBUTE15
WHERE
unit_schedule_id = p_x_flight_schedules_tbl(i).unit_schedule_id
AND object_version_number= p_x_flight_schedules_tbl(i).object_version_number;
'SQL Error, Update failed..'
);
SELECT count(unit_schedule_id) INTO l_overlap_us_count
FROM AHL_UNIT_SCHEDULES
WHERE unit_config_header_id = p_x_flight_schedules_tbl(i).unit_config_header_id
AND (
(
(p_x_flight_schedules_tbl(i).actual_departure_time between ACTUAL_DEPARTURE_TIME and ACTUAL_ARRIVAL_TIME)
AND
( p_x_flight_schedules_tbl(i).actual_arrival_time between ACTUAL_DEPARTURE_TIME and ACTUAL_ARRIVAL_TIME)
)
OR (ACTUAL_DEPARTURE_TIME between p_x_flight_schedules_tbl(i).actual_departure_time and p_x_flight_schedules_tbl(i).actual_arrival_time)
OR (ACTUAL_ARRIVAL_TIME between p_x_flight_schedules_tbl(i).actual_departure_time and p_x_flight_schedules_tbl(i).actual_arrival_time)
)
AND unit_schedule_id <> p_x_flight_schedules_tbl(i).unit_schedule_id;
SELECT count(unit_schedule_id) INTO l_overlap_us_count
FROM AHL_UNIT_SCHEDULES
WHERE unit_config_header_id = p_x_flight_schedules_tbl(i).unit_config_header_id
/*AND (
(
(p_x_flight_schedules_tbl(i).est_departure_time between EST_DEPARTURE_TIME and EST_ARRIVAL_TIME)
AND
( p_x_flight_schedules_tbl(i).est_arrival_time between EST_DEPARTURE_TIME and EST_ARRIVAL_TIME)
)
OR (EST_DEPARTURE_TIME between p_x_flight_schedules_tbl(i).est_departure_time and p_x_flight_schedules_tbl(i).est_arrival_time)
OR (EST_ARRIVAL_TIME between p_x_flight_schedules_tbl(i).est_departure_time and p_x_flight_schedules_tbl(i).est_arrival_time)
)*/
AND (
(
((p_x_flight_schedules_tbl(i).est_departure_time>EST_DEPARTURE_TIME AND p_x_flight_schedules_tbl(i).est_departure_timeEST_DEPARTURE_TIME and p_x_flight_schedules_tbl(i).est_arrival_timep_x_flight_schedules_tbl(i).est_departure_time and EST_DEPARTURE_TIMEp_x_flight_schedules_tbl(i).est_departure_time and EST_ARRIVAL_TIME p_x_flight_schedules_tbl(i).unit_schedule_id;
END Update_Flight_Schedules;
PROCEDURE Delete_Flight_Schedules(
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_x_flight_schedules_tbl IN OUT NOCOPY FLIGHT_SCHEDULES_TBL_TYPE
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Flight_Schedules';
AHL_VWP_VISITS_PVT.DELETE_FLIGHT_ASSOC(
p_x_flight_schedules_tbl(i).unit_schedule_id,
x_return_status
);
DELETE FROM AHL_UNIT_SCHEDULES
WHERE unit_schedule_id = p_x_flight_schedules_tbl(i).unit_schedule_id
AND object_version_number= p_x_flight_schedules_tbl(i).object_version_number;
'SQL Error, Delete failed..'
);
END Delete_Flight_Schedules;
Delete_Flight_Schedules(
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_x_flight_schedules_tbl => p_x_flight_schedules_tbl
);
Update_Flight_Schedules(
p_module_type => p_module_type,
x_return_status => x_return_status,
p_x_flight_schedules_tbl => p_x_flight_schedules_tbl
);
SELECT 'X'
FROM AHL_UNIT_SCHEDULES
WHERE unit_schedule_id = p_unit_schedule_id
AND unit_config_header_id = nvl(p_unit_config_id, unit_config_header_id);
FUNCTION is_delete_allowed
(
p_unit_schedule_id IN NUMBER,
p_is_super_user IN VARCHAR2
)
RETURN VARCHAR2
IS
--Cursor for checking if actuals are entered for the current unit schedule record.
CURSOR get_curr_actuals_csr(p_unit_schedule_id IN NUMBER)
IS
SELECT actual_departure_time, actual_arrival_time
FROM AHL_UNIT_SCHEDULES
WHERE unit_schedule_id = p_unit_schedule_id;
l_api_name CONSTANT VARCHAR2(30) := 'is_delete_allowed';
END is_delete_allowed;
FUNCTION is_update_allowed
(
p_unit_schedule_id IN NUMBER,
p_is_super_user IN VARCHAR2
)
RETURN VARCHAR2
IS
--Cursor for getting the succeeding event of an Unit Schedule.
CURSOR get_succeeding_us_csr(p_unit_schedule_id IN NUMBER) IS
SELECT actual_departure_time, actual_arrival_time
FROM AHL_UNIT_SCHEDULES
WHERE preceding_us_id = p_unit_schedule_id;
l_api_name CONSTANT VARCHAR2(30) := 'is_update_allowed';
END is_update_allowed;