The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW (
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_return_status OUT NOCOPY VARCHAR2,
p_msg_count OUT NOCOPY NUMBER,
p_msg_data OUT NOCOPY VARCHAR2,
--
P_ROWID IN OUT NOCOPY VARCHAR2,
P_RULE_ID IN NUMBER,
P_TRANSACTION_TYPE IN VARCHAR2,
--Following 1 parameter added for Bug # 2123930.
P_ENABLE_FLAG IN VARCHAR2,
p_Last_Update_Date DATE,
p_Last_Updated_By NUMBER,
p_Last_Update_Login NUMBER,
p_Created_By NUMBER,
p_Creation_Date DATE
) is
--
l_api_name CONSTANT VARCHAR2(30) := 'Insert_Row';
select ROWID
from PSB_RULE_TRANSACTION_TYPE
where RULE_ID = P_RULE_ID;
SAVEPOINT Insert_Row_Pvt ;
insert into PSB_RULE_TRANSACTION_TYPE (
RULE_ID,
TRANSACTION_TYPE,
ENABLE_FLAG, --added for Bug # 2123930
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN
) values (
P_RULE_ID,
P_TRANSACTION_TYPE,
P_ENABLE_FLAG, --added for Bug # 2123930
P_LAST_UPDATE_DATE,
P_LAST_UPDATED_BY,
P_LAST_UPDATE_DATE,
P_LAST_UPDATED_BY,
P_LAST_UPDATE_LOGIN
);
ROLLBACK TO Insert_Row_Pvt ;
ROLLBACK TO Insert_Row_Pvt ;
ROLLBACK TO Insert_Row_Pvt ;
END Insert_Row;
cursor c1 is select
TRANSACTION_TYPE
from PSB_RULE_TRANSACTION_TYPE
where RULE_ID = P_RULE_ID
for update of RULE_ID nowait;
select 1
from PSB_RULE_TRANSACTION_TYPE
where RULE_ID = P_RULE_ID
for update of RULE_ID nowait;
procedure UPDATE_ROW (
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_return_status OUT NOCOPY VARCHAR2,
p_msg_count OUT NOCOPY NUMBER,
p_msg_data OUT NOCOPY VARCHAR2,
--
P_RULE_ID IN NUMBER,
P_TRANSACTION_TYPE IN VARCHAR2,
--Following 1 parameter added for Bug # 2123930.
P_ENABLE_FLAG IN VARCHAR2,
p_Last_Update_Date DATE,
p_Last_Updated_By NUMBER,
p_Last_Update_Login NUMBER
) is
--
l_api_name CONSTANT VARCHAR2(30) := 'Update_Row';
SAVEPOINT Update_Row_Pvt ;
/* update PSB_RULE_TRANSACTION_TYPE set
TRANSACTION_TYPE = P_TRANSACTION_TYPE,
LAST_UPDATE_DATE = P_LAST_UPDATE_DATE,
LAST_UPDATED_BY = P_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = P_LAST_UPDATE_LOGIN
where RULE_ID = P_RULE_ID
;
update PSB_RULE_TRANSACTION_TYPE set
ENABLE_FLAG = P_ENABLE_FLAG,
LAST_UPDATE_DATE = P_LAST_UPDATE_DATE,
LAST_UPDATED_BY = P_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = P_LAST_UPDATE_LOGIN
where RULE_ID = P_RULE_ID
and TRANSACTION_TYPE = P_TRANSACTION_TYPE
;
ROLLBACK TO Update_Row_Pvt ;
ROLLBACK TO Update_Row_Pvt ;
ROLLBACK TO Update_Row_Pvt ;
END Update_Row;
procedure DELETE_ROW (
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_commit IN VARCHAR2 := FND_API.G_FALSE,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
p_return_status OUT NOCOPY VARCHAR2,
p_msg_count OUT NOCOPY NUMBER,
p_msg_data OUT NOCOPY VARCHAR2,
--
P_RULE_ID IN NUMBER,
P_TRANSACTION_TYPE IN VARCHAR2,
--Following 1 parameter added for Bug # 2123930.
P_ENABLE_FLAG IN VARCHAR2
) is
--
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Row';
SAVEPOINT Delete_Row_Pvt ;
delete from PSB_RULE_TRANSACTION_TYPE
where RULE_ID = P_RULE_ID
and TRANSACTION_TYPE = P_TRANSACTION_TYPE;
ROLLBACK TO Delete_Row_Pvt ;
ROLLBACK TO Delete_Row_Pvt ;
ROLLBACK TO Delete_Row_Pvt ;
END Delete_Row;