The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT c.flex_value_id
INTO l_company
FROM FND_ID_FLEX_SEGMENTS a, FND_SEGMENT_ATTRIBUTE_VALUES b, fnd_flex_values c,
fnd_flex_values_tl d
WHERE a.ID_FLEX_CODE = 'GL#'
AND a.APPLICATION_ID = 101
AND a.ID_FLEX_NUM in (select chart_of_accounts_id from
gl_ledgers_public_v where
ledger_id = X_Ledger)
AND a.application_id = b.application_id
AND a.id_flex_code = b.id_flex_code
AND a.id_flex_num = b.id_flex_num
AND a.application_column_name = b.application_column_name
AND b.attribute_value = 'Y'
AND b.segment_attribute_type = ('GL_BALANCING')
AND a.flex_value_set_id = c.flex_value_set_id
AND c.flex_value_id = d.flex_value_id
AND d.language = userenv('LANG')
AND c.summary_flag = 'N'
AND c.flex_value = X_Company;
SELECT c.flex_value_id
INTO l_cost_center
FROM FND_ID_FLEX_SEGMENTS a, FND_SEGMENT_ATTRIBUTE_VALUES b, fnd_flex_values c,
fnd_flex_values_tl d
WHERE a.ID_FLEX_CODE = 'GL#'
AND a.APPLICATION_ID = 101
AND a.ID_FLEX_NUM in (select chart_of_accounts_id from
gl_ledgers_public_v where
ledger_id = X_Ledger)
AND a.application_id = b.application_id
AND a.id_flex_code = b.id_flex_code
AND a.id_flex_num = b.id_flex_num
AND a.application_column_name = b.application_column_name
AND b.attribute_value = 'Y'
AND b.segment_attribute_type = ('FA_COST_CTR')
AND a.flex_value_set_id = c.flex_value_set_id
AND c.flex_value_id = d.flex_value_id
AND d.language = userenv('LANG')
AND c.summary_flag = 'N'
AND c.flex_value = X_Cost_Center;
SELECT c.flex_value_id
INTO l_account
FROM FND_ID_FLEX_SEGMENTS a, FND_SEGMENT_ATTRIBUTE_VALUES b, fnd_flex_values c,
fnd_flex_values_tl d
WHERE a.ID_FLEX_CODE = 'GL#'
AND a.APPLICATION_ID = 101
AND a.ID_FLEX_NUM in (select chart_of_accounts_id from
gl_ledgers_public_v where
ledger_id = X_Ledger)
AND a.application_id = b.application_id
AND a.id_flex_code = b.id_flex_code
AND a.id_flex_num = b.id_flex_num
AND a.application_column_name = b.application_column_name
AND b.attribute_value = 'Y'
AND b.segment_attribute_type = ('GL_ACCOUNT')
AND a.flex_value_set_id = c.flex_value_set_id
AND c.flex_value_id = d.flex_value_id
AND d.language = userenv('LANG')
AND c.flex_value = X_Fin_Item;
SELECT f.flex_value_id
INTO l_user_defined_dim
FROM fnd_flex_values f, fnd_flex_values_tl t, fii_financial_dimensions ffd
WHERE flex_value_set_id in
(SELECT MASTER_VALUE_SET_ID id FROM fii_financial_dimensions
WHERE dimension_short_name = 'FII_USER_DEFINED_1'
UNION
SELECT map.flex_value_set_id1 id
FROM fii_dim_mapping_rules map, fii_slg_assignments sts, fii_source_ledger_groups slg,
gl_ledgers_public_v sob
WHERE map.dimension_short_name = 'FII_USER_DEFINED_1'
AND map.chart_of_accounts_id = sts.chart_of_accounts_id
AND sts.source_ledger_group_id = slg.source_ledger_group_id
AND slg.usage_code = 'DBI'
AND sts.ledger_id = sob.ledger_id
AND sob.ledger_id = X_Ledger)
AND f.flex_value_id = t.flex_value_id
AND t.language = userenv('LANG')
AND ffd.dimension_short_name = 'FII_USER_DEFINED_1'
AND ffd.dbi_enabled_flag = 'Y'
AND f.flex_value = X_User_Defined_Dim;
INSERT INTO FII_BUDGET_INTERFACE
(plan_type_code, prim_amount_g, report_time_period, report_date, version_date, sec_amount_g, conversion_rate,
fin_item, fin_category_id, prod_category_id, company, company_id,
cost_center, cost_center_id, user_dim1, user_dim1_id, ledger_id)
VALUES
(X_Plan_Type, X_Prim_Amt, X_Time_Period, X_Date, to_date(X_Version_Date, 'DD-MM-YYYY'), l_sec_amt, X_Rate,
X_Fin_Item, l_account, X_Product, X_Company, l_Company,
X_Cost_Center, l_Cost_Center, X_User_Defined_Dim, l_User_Defined_Dim, X_Ledger);
UPDATE FII_BUDGET_INTERFACE
SET
plan_type_code = X_Plan_Type,
prim_amount_g = X_Prim_Amt,
report_time_period = X_Time_Period,
report_date = X_Date,
fin_item = X_Fin_Item,
fin_category_id = l_account,
prod_category_id = X_Product,
conversion_rate = X_Rate,
sec_amount_g = l_sec_amt,
company = X_Company,
company_id = l_Company,
cost_center = X_Cost_Center,
cost_center_id = l_Cost_Center,
version_date = to_date(X_Version_Date, 'DD-MM-YYYY'),
User_Dim1 = X_User_Defined_Dim,
user_dim1_id = l_User_Defined_Dim,
ledger_id = X_Ledger,
status_code = null
WHERE
rowid = chartorowid(X_RowID);
UPDATE FII_BUDGET_INTERFACE
SET status_code = NULL;