The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row(X_Rowid IN OUT VARCHAR2,
X_Fee_Rule_Id IN OUT NUMBER,
X_Effective_Start_Date DATE,
X_Effective_End_Date DATE,
X_Garn_Category VARCHAR2,
X_State_Code VARCHAR2,
X_Addl_Garn_Fee_Amount NUMBER,
X_Correspondence_Fee NUMBER,
X_Creator_Type VARCHAR2,
X_Fee_Amount NUMBER,
X_Fee_Rule VARCHAR2,
X_Max_Fee_Amount NUMBER,
X_Pct_Current NUMBER,
X_Take_Fee_On_Proration VARCHAR2,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER,
X_Last_Update_Login NUMBER,
X_Created_By NUMBER,
X_Creation_Date DATE
) IS
CURSOR C IS SELECT rowid FROM PAY_US_GARN_FEE_RULES_F
WHERE fee_rule_id = X_Fee_Rule_Id;
CURSOR C2 IS SELECT pay_us_garn_fee_rules_s.nextval FROM sys.dual;
INSERT INTO PAY_US_GARN_FEE_RULES_F(
fee_rule_id,
effective_start_date,
effective_end_date,
garn_category,
state_code,
addl_garn_fee_amount,
correspondence_fee,
creator_type,
fee_amount,
fee_rule,
max_fee_amount,
pct_current,
take_fee_on_proration,
last_update_date,
last_updated_by,
last_update_login,
created_by,
creation_date
) VALUES (
X_Fee_Rule_Id,
X_Effective_Start_Date,
X_Effective_End_Date,
X_Garn_Category,
X_State_Code,
X_Addl_Garn_Fee_Amount,
X_Correspondence_Fee,
X_Creator_Type,
X_Fee_Amount,
X_Fee_Rule,
X_Max_Fee_Amount,
X_Pct_Current,
X_Take_Fee_On_Proration,
X_Last_Update_Date,
X_Last_Updated_By,
X_Last_Update_Login,
X_Created_By,
X_Creation_Date
);
END Insert_Row;
SELECT *
FROM PAY_US_GARN_FEE_RULES_F
WHERE rowid = X_Rowid
FOR UPDATE of Fee_Rule_Id NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
PROCEDURE Update_Row(X_Rowid VARCHAR2,
X_Fee_Rule_Id NUMBER,
X_Effective_Start_Date DATE,
X_Effective_End_Date DATE,
X_Garn_Category VARCHAR2,
X_State_Code VARCHAR2,
X_Addl_Garn_Fee_Amount NUMBER,
X_Correspondence_Fee NUMBER,
X_Creator_Type VARCHAR2,
X_Fee_Amount NUMBER,
X_Fee_Rule VARCHAR2,
X_Max_Fee_Amount NUMBER,
X_Pct_Current NUMBER,
X_Take_Fee_On_Proration VARCHAR2,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER,
X_Last_Update_Login NUMBER
) IS
BEGIN
UPDATE PAY_US_GARN_FEE_RULES_F
SET
fee_rule_id = X_Fee_Rule_Id,
effective_start_date = X_Effective_Start_Date,
effective_end_date = X_Effective_End_Date,
garn_category = X_Garn_Category,
state_code = X_State_Code,
addl_garn_fee_amount = X_Addl_Garn_Fee_Amount,
correspondence_fee = X_Correspondence_Fee,
creator_type = X_Creator_Type,
fee_amount = X_Fee_Amount,
fee_rule = X_Fee_Rule,
max_fee_amount = X_Max_Fee_Amount,
pct_current = X_Pct_Current,
take_fee_on_proration = X_Take_Fee_On_Proration,
last_update_date = X_Last_Update_Date,
last_updated_by = X_Last_Updated_By,
last_update_login = X_Last_Update_Login
WHERE rowid = X_Rowid;
END Update_Row;
PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
BEGIN
DELETE FROM PAY_US_GARN_FEE_RULES_F
WHERE rowid = X_Rowid;
END Delete_Row;
SELECT count(1)
INTO DUMMY
FROM pay_us_garn_fee_rules_f
WHERE state_code = X_State_Code
AND GARN_CATEGORY = X_Garn_Category;