The following lines contain the word 'select', 'insert', 'update' or 'delete':
G_ACTION_INSERT CONSTANT VARCHAR2(10) := 'INSERT';
G_ACTION_UPDATE CONSTANT VARCHAR2(10) := 'UPDATE';
SELECT *
-- SELECT creation_date, last_update_date
FROM BIS_ACTUAL_VALUES
WHERE TARGET_LEVEL_ID = l_target_level_id
AND ORG_LEVEL_VALUE = l_organization_ID_char
AND TIME_LEVEL_VALUE = l_time_level_value
AND NVL(DIMENSION1_LEVEL_VALUE,'-999')=NVL(x_DIMENSION1_LEVEL_VALUE,'-999')
AND NVL(DIMENSION2_LEVEL_VALUE,'-999')=NVL(x_DIMENSION2_LEVEL_VALUE,'-999')
AND NVL(DIMENSION3_LEVEL_VALUE,'-999')=NVL(x_DIMENSION3_LEVEL_VALUE,'-999')
AND NVL(DIMENSION4_LEVEL_VALUE,'-999')=NVL(x_DIMENSION4_LEVEL_VALUE,'-999')
AND NVL(DIMENSION5_LEVEL_VALUE,'-999')=NVL(x_DIMENSION5_LEVEL_VALUE,'-999')
ORDER BY CREATION_DATE
FOR UPDATE;
SELECT tg.target_level_id
INTO l_target_level_id
FROM bis_target_levels tg
WHERE tg.short_name = x_target_lvl_short_name;
SELECT DISTINCT o.organization_id
INTO l_organization_id
FROM hr_all_organization_units o
WHERE o.organization_id = x_organization_id;
l_action := G_ACTION_UPDATE;
l_action := G_ACTION_INSERT;
IF l_action = G_ACTION_UPDATE AND l_time_level_value IS NOT NULL THEN
UPDATE bis_actual_values
SET TARGET_LEVEL_ID = l_target_level_id
, ORG_LEVEL_VALUE = l_organization_id_char
, TIME_LEVEL_VALUE = l_time_level_value
, DIMENSION1_LEVEL_VALUE = x_dimension1_level_value
, DIMENSION2_LEVEL_VALUE = x_dimension2_level_value
, DIMENSION3_LEVEL_VALUE = x_dimension3_level_value
, DIMENSION4_LEVEL_VALUE = x_dimension4_level_value
, DIMENSION5_LEVEL_VALUE = x_dimension5_level_value
, ACTUAL_VALUE = x_actual_value
, LAST_UPDATE_DATE = SYSDATE
, LAST_UPDATED_BY = FND_GLOBAL.USER_ID
, LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
WHERE CURRENT OF cr_actual;
ELSIF l_action = G_ACTION_INSERT AND l_time_level_value IS NOT NULL THEN
IF cr_actual%ISOPEN THEN CLOSE cr_actual; END IF;
INSERT INTO bis_actual_values
(
ACTUAL_ID -- Fix for #3493470
, TARGET_LEVEL_ID
, ORG_LEVEL_VALUE
, TIME_LEVEL_VALUE
, DIMENSION1_LEVEL_VALUE
, DIMENSION2_LEVEL_VALUE
, DIMENSION3_LEVEL_VALUE
, DIMENSION4_LEVEL_VALUE
, DIMENSION5_LEVEL_VALUE
, ACTUAL_VALUE
, CREATION_DATE
, CREATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATED_BY
, LAST_UPDATE_LOGIN
)
VALUES
( BIS_ACTUAL_VALUES_S.NEXTVAL -- Fix for #3493470.
, l_target_level_id
, l_organization_id_char
, l_time_level_value
, x_dimension1_level_value
, x_dimension2_level_value
, x_dimension3_level_value
, x_dimension4_level_value
, x_dimension5_level_value
, x_actual_value
, SYSDATE
, FND_GLOBAL.USER_ID
, SYSDATE
, FND_GLOBAL.USER_ID
, FND_GLOBAL.LOGIN_ID
);
SELECT distinct sel.organization_id
FROM bis_user_ind_selections sel
WHERE sel.target_level_id = l_target_level_id;
SELECT target_level_id, time_level_name
INTO l_target_level_id, l_time_level_name
FROM bis_target_levels_v
WHERE short_name = p_target_lvl_short_name;
SELECT start_date, end_date
FROM gl_periods
WHERE UPPER(period_type) = UPPER(p_period_type)
AND UPPER(period_set_name) = UPPER(p_calendar);
SELECT TO_NUMBER(le.set_of_books_id)
FROM hr_legal_entities le
WHERE le.organization_id = p_organization_id
--
UNION SELECT TO_NUMBER(ou.set_of_books_id)
FROM hr_legal_entities le, hr_operating_units ou
WHERE ou.organization_id = p_organization_id
AND ou.legal_entity_id = le.organization_id
--
UNION SELECT od.set_of_books_id
FROM org_organization_definitions od
WHERE od.organization_id = p_organization_id;
SELECT sob.period_set_name
FROM gl_periods gl,
gl_sets_of_books sob,
bis_levels l,
BIS_TARGET_LEVELS TL
WHERE
UPPER(TL.short_name) = UPPER(p_target_lvl_short_name)
AND TL.time_level_id = l.level_id
AND upper(l.short_name) = UPPER(gl.period_type)
AND sob_id = sob.set_of_books_id
AND gl.period_set_name = sob.period_set_name;