The following lines contain the word 'select', 'insert', 'update' or 'delete':
G_LAST_UPDATE_DATE DATE := sysdate;
G_LAST_UPDATED_BY NUMBER := fnd_global.user_id;
G_LAST_UPDATE_LOGIN NUMBER := fnd_global.login_id;
SELECT COUNT(*)
INTO l_tmp
FROM cn_trx_factors
WHERE revenue_class_id = p_rev_class_id
AND quota_id = p_quota_id
AND quota_rule_id = p_quota_rule_id
AND trx_type = p_trx_factor_rec.trx_type ;
PROCEDURE update_trx_factors
(
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,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_quota_name IN VARCHAR2,
p_rev_class_name IN VARCHAR2,
p_trx_factor_rec_tbl IN CN_PLAN_ELEMENT_PUB.trx_factor_rec_tbl_type
:= CN_PLAN_ELEMENT_PUB.G_MISS_TRX_FACTOR_REC_TBL,
x_loading_status OUT NOCOPY VARCHAR2,
p_org_id IN NUMBER
) IS
l_api_name CONSTANT VARCHAR2(30)
:= 'Update_Trx_Factors';
SAVEPOINT Update_trx_Factors ;
x_loading_status := 'CN_UPDATED';
AND ( x_loading_status = 'CN_UPDATED' )
THEN
IF p_trx_factor_rec_tbl.COUNT > 0 THEN
FOR i IN p_trx_factor_rec_tbl.first .. p_trx_factor_rec_tbl.last LOOP
IF (p_trx_factor_rec_tbl.exists(i)) AND
(p_trx_factor_rec_tbl(i).rev_class_name =
p_rev_class_name )
THEN
l_trx_factor_rec.rev_class_name := p_trx_factor_rec_tbl(i).rev_class_name;
x_loading_status := 'CN_UPDATED' ;
UPDATE cn_trx_factors
SET event_factor = p_trx_factor_rec_tbl(i).event_factor
WHERE quota_id = l_quota_id
AND quota_rule_id = l_quota_rule_id
AND trx_type = Ltrim(Rtrim(p_trx_factor_rec_tbl(i).trx_type)) ;
ROLLBACK TO Update_Trx_Factors;
ROLLBACK TO Update_Trx_Factors;
ROLLBACK TO Update_Trx_Factors;
END Update_Trx_Factors;