The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW (
X_ROWID in out nocopy VARCHAR2,
X_METHOD_ID in NUMBER,
X_FORMULA_ACTUAL in VARCHAR2,
X_FORMULA_DISPLAYED in VARCHAR2,
X_FORMULA_PARSED in VARCHAR2,
X_CREATION_DATE in DATE,
X_CREATED_BY in NUMBER,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_LOGIN in NUMBER,
X_ORIGINAL_RATE IN NUMBER DEFAULT NULL,
X_REVISED_RATE IN NUMBER DEFAULT NULL,
X_GUARANTEE_RATE IN NUMBER DEFAULT NULL,
p_log_level_rec in fa_api_types.log_level_rec_type default null) is
CURSOR C is SELECT rowid FROM fa_formulas
where method_id = X_Method_Id;
INSERT INTO fa_formulas (
method_id,
formula_actual,
formula_displayed,
formula_parsed,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login,
original_rate,
revised_rate,
guarantee_rate
) VALUES (
X_Method_ID,
X_Formula_Actual,
X_Formula_Displayed,
X_Formula_Parsed,
X_Creation_Date,
X_Created_By,
X_Last_Update_Date,
X_Last_Updated_By,
X_Last_Update_Login,
X_Original_Rate,
X_Revised_Rate,
X_Guarantee_Rate
);
calling_fn => 'fa_formulas_pkg.insert_row'
,p_log_level_rec => p_log_level_rec);
end INSERT_ROW;
SELECT method_id,
formula_actual,
formula_displayed,
formula_parsed,
original_rate,
revised_rate,
guarantee_rate
FROM fa_formulas
where method_id = X_Method_Id
FOR UPDATE of method_id NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
procedure UPDATE_ROW (
X_METHOD_ID in NUMBER,
X_FORMULA_ACTUAL in VARCHAR2,
X_FORMULA_DISPLAYED in VARCHAR2,
X_FORMULA_PARSED in VARCHAR2,
X_LAST_UPDATE_DATE in DATE,
X_LAST_UPDATED_BY in NUMBER,
X_LAST_UPDATE_LOGIN in NUMBER,
X_ORIGINAL_RATE IN NUMBER,
X_REVISED_RATE IN NUMBER,
X_GUARANTEE_RATE IN NUMBER,
p_log_level_rec in fa_api_types.log_level_rec_type default null) is
begin
UPDATE fa_formulas
SET method_id = X_Method_ID,
formula_actual = X_Formula_Actual,
formula_displayed = X_Formula_Displayed,
formula_parsed = X_Formula_Parsed,
last_update_date = X_Last_Update_Date,
last_updated_by = X_Last_Updated_By,
last_update_login = X_Last_Update_Login,
original_rate = X_Original_Rate,
revised_rate = X_Revised_Rate,
guarantee_rate = X_Guarantee_Rate
WHERE method_id = X_method_id;
calling_fn => 'fa_formulas_pkg.update_row'
,p_log_level_rec => p_log_level_rec);
end UPDATE_ROW;
procedure DELETE_ROW (
X_METHOD_ID in NUMBER
,p_log_level_rec in fa_api_types.log_level_rec_type default null) is
begin
DELETE FROM fa_formulas
where method_id = X_Method_Id;
calling_fn => 'fa_formulas_pkg.delete_row'
,p_log_level_rec => p_log_level_rec);
end DELETE_ROW;
X_DB_LAST_UPDATED_BY NUMBER,
X_DB_LAST_UPDATE_DATE DATE,
X_OWNER in VARCHAR2,
X_LAST_UPDATE_DATE in DATE,
X_FORMULA_ACTUAL in VARCHAR2,
X_FORMULA_DISPLAYED in VARCHAR2,
X_FORMULA_PARSED in VARCHAR2,
X_ORIGINAL_RATE IN NUMBER DEFAULT NULL,
X_REVISED_RATE IN NUMBER DEFAULT NULL,
X_GUARANTEE_RATE IN NUMBER DEFAULT NULL,
p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) is
h_record_exists number(15);
select count(*)
into h_record_exists
from fa_formulas
where method_id = X_Method_ID;
if (fnd_load_util.upload_test(user_id, x_last_update_date,
x_db_last_updated_by,x_db_last_update_date,
X_CUSTOM_MODE)) then
fa_formulas_pkg.update_row (
X_Method_ID => X_Method_ID,
X_Formula_Actual => X_Formula_Actual,
X_Formula_Displayed => X_Formula_Displayed,
X_Formula_Parsed => X_Formula_Parsed,
X_Last_Update_Date => sysdate,
X_Last_Updated_By => user_id,
X_Last_Update_Login => 0,
X_Original_Rate => X_Original_Rate,
X_Revised_Rate => X_Revised_Rate,
X_Guarantee_Rate => X_Guarantee_Rate
,p_log_level_rec => p_log_level_rec);
fa_formulas_pkg.insert_row (
X_Rowid => row_id,
X_Method_ID => X_Method_ID,
X_Formula_Actual => X_Formula_Actual,
X_Formula_Displayed => X_Formula_Displayed,
X_Formula_Parsed => X_Formula_Parsed,
X_Creation_Date => sysdate,
X_Created_By => user_id,
X_Last_Update_Date => sysdate,
X_Last_Updated_By => user_id,
X_Last_Update_Login => 0,
X_Original_Rate => X_Original_Rate,
X_Revised_Rate => X_Revised_Rate,
X_Guarantee_Rate => X_Guarantee_Rate
,p_log_level_rec => p_log_level_rec);
x_last_update_date IN DATE,
x_formula_actual IN VARCHAR2,
x_formula_displayed IN VARCHAR2,
x_formula_parsed IN VARCHAR2,
x_original_rate IN NUMBER DEFAULT NULL,
x_revised_rate IN NUMBER DEFAULT NULL,
x_guarantee_rate IN NUMBER DEFAULT NULL
) IS
methods_err exception;
h_last_update_date date;
h_last_updated_by number;
h_last_update_date := fa_cache_pkg.fazccmt_record.last_update_date;
h_last_updated_by := fa_cache_pkg.fazccmt_record.last_updated_by;
x_db_last_update_date => h_last_update_date,
x_db_last_updated_by => h_last_updated_by,
x_owner => x_owner,
x_last_update_date => x_last_update_date,
x_formula_actual => x_formula_actual,
x_formula_displayed => x_formula_displayed,
x_formula_parsed => x_formula_parsed,
x_original_rate => x_original_rate,
x_revised_rate => x_revised_rate,
x_guarantee_rate => x_guarantee_rate);
calling_fn => 'update fa_formulas');