The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT *
FROM gl_autoreverse_options
WHERE rowid = X_Rowid
FOR UPDATE of criteria_set_Id NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
PROCEDURE Update_Row(X_Rowid VARCHAR2,
X_criteria_set_Id NUMBER,
X_Je_Category_Name VARCHAR2,
X_Method_Code VARCHAR2,
X_Reversal_Period_Code VARCHAR2,
X_Reversal_Date_Code VARCHAR2,
X_Autoreverse_Flag VARCHAR2,
X_Autopost_Reversal_Flag VARCHAR2,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER,
X_Last_Update_Login NUMBER,
X_Attribute1 VARCHAR2,
X_Attribute2 VARCHAR2,
X_Attribute3 VARCHAR2,
X_Attribute4 VARCHAR2,
X_Attribute5 VARCHAR2,
X_Attribute6 VARCHAR2,
X_Attribute7 VARCHAR2,
X_Attribute8 VARCHAR2,
X_Attribute9 VARCHAR2,
X_Attribute10 VARCHAR2,
X_Attribute11 VARCHAR2,
X_Attribute12 VARCHAR2,
X_Attribute13 VARCHAR2,
X_Attribute14 VARCHAR2,
X_Attribute15 VARCHAR2,
X_Context VARCHAR2
) IS
BEGIN
UPDATE gl_autoreverse_options
SET
criteria_set_id = X_criteria_set_Id,
je_category_name = X_Je_Category_Name,
method_code = X_Method_Code,
reversal_period_code = X_Reversal_Period_Code,
reversal_date_code = X_Reversal_Date_Code,
autoreverse_flag = X_Autoreverse_Flag,
autopost_reversal_flag = X_Autopost_Reversal_Flag,
last_update_date = X_Last_Update_Date,
last_updated_by = X_Last_Updated_By,
last_update_login = X_Last_Update_Login,
attribute1 = X_Attribute1,
attribute2 = X_Attribute2,
attribute3 = X_Attribute3,
attribute4 = X_Attribute4,
attribute5 = X_Attribute5,
attribute6 = X_Attribute6,
attribute7 = X_Attribute7,
attribute8 = X_Attribute8,
attribute9 = X_Attribute9,
attribute10 = X_Attribute10,
attribute11 = X_Attribute11,
attribute12 = X_Attribute12,
attribute13 = X_Attribute13,
attribute14 = X_Attribute14,
attribute15 = X_Attribute15,
context = X_Context
WHERE rowid = X_Rowid;
END Update_Row;
PROCEDURE insert_reversal_cat( x_je_category_name VARCHAR2,
x_created_by NUMBER,
x_last_updated_by NUMBER,
x_last_update_login NUMBER ) IS
CURSOR c_dup IS
SELECT 'Duplicate'
FROM gl_autoreverse_options
WHERE je_category_name = x_je_category_name ;
INSERT INTO gl_autoreverse_options (
criteria_set_id,
je_category_name,
method_code,
reversal_period_code,
autoreverse_flag,
autopost_reversal_flag,
last_update_date, last_updated_by,
created_by, creation_date,
last_update_login)
SELECT DISTINCT criteria_set_id,
x_je_category_name,
'S',
'NO_DEFAULT',
'N',
'N',
sysdate, x_last_updated_by,
x_created_by, sysdate,
x_last_update_login
FROM GL_AUTOREVERSE_OPTIONS;
'GL_JE_CATEGORIES_PKG.insert_reversal_cat');
END insert_reversal_cat;
PROCEDURE insert_criteria_reversal_cat(
x_criteria_set_id NUMBER,
x_created_by NUMBER,
x_last_updated_by NUMBER,
x_last_update_login NUMBER ) IS
BEGIN
INSERT INTO gl_autoreverse_options (
criteria_set_id,
je_category_name,
method_code,
reversal_period_code,
reversal_date_code,
autoreverse_flag,
autopost_reversal_flag,
last_update_date, last_updated_by,
created_by, creation_date,
last_update_login)
SELECT x_criteria_set_id,
jc.je_category_name,
decode(jc.je_category_name,
'Revalue Profit/Loss', 'C',
'MRC Open Balances','C',
'Income Statement Close','C',
'Income Offset','C',
'S'),
decode(jc.je_category_name,
'Income Statement Close', 'SAME_PERIOD',
'Income Offset', 'SAME_PERIOD',
'Balance Sheet Close','NEXT_PERIOD',
'NO_DEFAULT'),
decode(jc.je_category_name,
'Income Statement Close', 'LAST_DAY',
'Income Offset', 'LAST_DAY',
'Balance Sheet Close','FIRST_DAY',
NULL) ,
'N',
'N',
sysdate, x_last_updated_by,
x_created_by, sysdate,
x_last_update_login
FROM GL_JE_CATEGORIES jc;
'GL_AUTOREVERSE_OPTIONS_PKG.insert_ledger_reversal_cat');
END insert_criteria_reversal_cat;