The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
X_Funds_Check_Level_Code VARCHAR2,
X_Dr_Cr_Code VARCHAR2,
X_Amount_Type VARCHAR2,
X_Boundary_Code VARCHAR2,
X_Template_Id NUMBER,
X_Last_Update_Date DATE,
X_Last_Updated_by NUMBER,
X_Created_By NUMBER,
X_Creation_Date DATE,
X_Last_Update_Login NUMBER,
X_Funding_Budget_Version_Id NUMBER
) IS
CURSOR check_overlaps IS
SELECT 'Overlap'
FROM DUAL
WHERE EXISTS
(SELECT 'X'
FROM gl_budgets b1,
gl_budget_versions bv1,
gl_summary_bc_options sa,
gl_period_statuses pf1,
gl_period_statuses pl1,
gl_budgets b2,
gl_budget_versions bv2,
gl_period_statuses pf2,
gl_period_statuses pl2
WHERE b1.current_version_id = bv1.version_num
AND b1.budget_name = bv1.budget_name
AND bv1.budget_version_id = sa.funding_budget_version_id
AND b1.first_valid_period_name = pf1.period_name
AND b1.last_valid_period_name = pl1.period_name
AND b2.current_version_id = bv2.version_num
AND b2.budget_name = bv2.budget_name
AND bv2.budget_version_id = x_funding_budget_version_id
AND b2.first_valid_period_name = pf2.period_name
AND b2.last_valid_period_name = pl2.period_name
AND sa.template_id = X_Template_Id
AND pf1.application_id = 101
AND pf1.ledger_id = b1.ledger_id
AND pl1.application_id = 101
AND pl1.ledger_id = b1.ledger_id
AND pf2.application_id = 101
AND pf2.ledger_id = b2.ledger_id
AND pl2.application_id = 101
AND pl2.ledger_id = b2.ledger_id
AND NOT ( (pl1.effective_period_num < pf2.effective_period_num)
OR (pf1.effective_period_num > pl2.effective_period_num)
)
);
SELECT rowid
FROM gl_summary_bc_options
WHERE template_id = X_Template_Id
AND funding_budget_version_id = X_Funding_Budget_Version_Id;
INSERT INTO GL_SUMMARY_BC_OPTIONS(
template_id,
last_update_date,
last_updated_by,
funds_check_level_code,
amount_type,
boundary_code,
created_by,
creation_date,
dr_cr_code,
last_update_login,
funding_budget_version_id)
VALUES (
X_Template_Id,
X_Last_Update_Date,
X_Last_Updated_By,
X_Funds_Check_Level_Code,
X_Amount_Type,
X_Boundary_Code,
X_Created_By,
X_Creation_Date,
X_Dr_Cr_Code,
X_Last_Update_Login,
X_Funding_Budget_Version_Id);
END Insert_Row;
X_Last_Update_Date DATE,
X_Last_Updated_by NUMBER,
X_Created_By NUMBER,
X_Creation_Date DATE,
X_Last_Update_Login NUMBER,
X_Funding_Budget_Version_Id NUMBER
) IS
CURSOR C IS
SELECT *
FROM GL_SUMMARY_BC_OPTIONS
WHERE rowid = X_Rowid
FOR UPDATE of template_id NOWAIT;
AND ( (Recinfo.last_update_date = X_Last_Update_Date)
OR ( (Recinfo.last_update_date IS NULL)
AND (X_Last_Update_Date IS NULL)))
AND ( (Recinfo.last_updated_by = X_Last_Updated_By)
OR ( (Recinfo.last_updated_by IS NULL)
AND (X_Last_Updated_By IS NULL)))
AND ( (Recinfo.funds_check_level_code = X_Funds_Check_Level_Code)
OR ( (Recinfo.funds_check_level_code IS NULL)
AND (X_Funds_Check_Level_Code IS NULL)))
AND ( (Recinfo.amount_type = X_Amount_Type)
OR ( (Recinfo.amount_type IS NULL)
AND (X_Amount_Type IS NULL)))
AND ( (Recinfo.boundary_code = X_Boundary_Code)
OR ( (Recinfo.boundary_code IS NULL)
AND (X_Boundary_Code IS NULL)))
AND ( (Recinfo.created_by = X_Created_By)
OR ( (Recinfo.created_by IS NULL)
AND (X_Created_By IS NULL)))
AND ( (Recinfo.creation_date = X_Creation_Date)
OR ( (Recinfo.creation_date IS NULL)
AND (X_Creation_Date IS NULL)))
AND ( (Recinfo.dr_cr_code = X_Dr_Cr_Code)
OR ( (Recinfo.dr_cr_code IS NULL)
AND (X_Dr_Cr_Code IS NULL)))
AND ( (Recinfo.last_update_login = X_Last_Update_Login)
OR ( (Recinfo.last_update_login IS NULL)
AND (X_Last_Update_Login IS NULL)))
AND ( (Recinfo.funding_budget_version_id = X_Funding_Budget_Version_Id)
OR ( (Recinfo.funding_budget_version_id IS NULL)
AND (X_Funding_Budget_Version_Id IS NULL)))
) then
return;
PROCEDURE Insert_BC_Options(X_Rowid IN OUT NOCOPY VARCHAR2,
X_Funds_Check_Level_Code VARCHAR2,
X_Dr_Cr_Code VARCHAR2,
X_Amount_Type VARCHAR2,
X_Boundary_Code VARCHAR2,
X_Template_Id NUMBER,
X_Last_Update_Date DATE,
X_Last_Updated_by NUMBER,
X_Created_By NUMBER,
X_Creation_Date DATE,
X_Last_Update_Login NUMBER,
X_Funding_Budget_Version_Id NUMBER
) IS
CURSOR check_funds_check_level IS
SELECT 'X'
FROM GL_LOOKUPS
WHERE LOOKUP_TYPE = 'FUNDS_CHECK_LEVEL'
AND lookup_code = X_Funds_Check_Level_Code;
SELECT 'X'
FROM GL_LOOKUPS_AMOUNT_TYPES_V
WHERE amount_type = X_Amount_Type;
SELECT 'X'
FROM GL_LOOKUPS_BOUNDARIES_V
WHERE boundary_code = X_Boundary_Code;
SELECT 'X'
FROM GL_BUDGET_VERSIONS
WHERE budget_version_id = X_Funding_Budget_Version_Id;
SELECT 'X'
FROM GL_LOOKUPS
WHERE LOOKUP_TYPE = 'DR_CR'
AND lookup_code = X_Dr_Cr_Code;
SELECT gl1.enable_budgetary_control_flag
INTO L_Budgetary_Control_Flag
FROM gl_ledgers gl1, gl_summary_templates gl2
WHERE gl2.template_id = X_Template_Id
AND gl1.ledger_id = gl2.ledger_id;
Insert_Row(X_Rowid,
X_Funds_Check_Level_Code,
X_Dr_Cr_Code,
X_Amount_Type,
X_Boundary_Code,
X_Template_Id,
X_Last_Update_Date,
X_Last_Updated_by,
X_Created_By,
X_Creation_Date,
X_Last_Update_Login,
X_Funding_Budget_Version_Id
);
'GL_SUMMARY_BC_OPTIONS_PKG.Insert_BC_Options');
END Insert_BC_Options;