The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT PV_ATTRIBUTE_CODES_S.NEXTVAL
FROM dual;
SELECT 1
FROM PV_ATTRIBUTE_CODES_B
WHERE ATTR_CODE_ID = l_id;
l_attribute_code_rec.last_update_date := SYSDATE;
l_attribute_code_rec.last_updated_by := G_USER_ID;
l_attribute_code_rec.last_update_login := G_LOGIN_ID;
PV_ATTRIBUTE_CODE_PKG.Insert_Row(
px_attr_code_id => l_attribute_code_rec.attr_code_id,
p_attr_code => UPPER(l_attribute_code_rec.attr_code),
p_last_update_date => l_attribute_code_rec.last_update_date,
p_last_updated_by => l_attribute_code_rec.last_updated_by,
p_creation_date => l_attribute_code_rec.creation_date,
p_created_by => l_attribute_code_rec.created_by,
p_last_update_login => l_attribute_code_rec.last_update_login,
px_object_version_number => l_attribute_code_rec.object_version_number,
p_attribute_id => l_attribute_code_rec.attribute_id,
p_enabled_flag => l_attribute_code_rec.enabled_flag,
--p_security_group_id => p_attribute_code_rec.security_group_id
p_description => l_attribute_code_rec.description
);
PROCEDURE Update_Attribute_Code(
p_api_version_number 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_attribute_code_rec IN attribute_code_rec_type
,x_object_version_number OUT NOCOPY NUMBER
)
IS
CURSOR c_get_attribute_code(cv_ATTR_CODE_ID NUMBER) IS
SELECT *
FROM PV_ATTRIBUTE_CODES_B
WHERE ATTR_CODE_ID = cv_ATTR_CODE_ID;
l_api_name CONSTANT VARCHAR2(30) := 'Update_Attribute_Code';
l_delete_flag VARCHAR2(1):='Y';
select distinct seleted.attribute_value,rules.process_rule_name
from pv_enty_select_criteria criteria,pv_selected_attr_values seleted,
pv_process_rules_vl rules,pv_attribute_codes_vl code
where code.attr_code_id= pc_attr_code_id and
criteria.attribute_id= code.attribute_id and
criteria.selection_criteria_id= seleted.selection_criteria_id and
criteria.process_rule_id= rules.process_rule_id and
seleted.attribute_value=code.attr_code;
select pp.program_id, pp.program_name, ppt.partner_type
from pv_partner_program_vl pp, pv_partner_program_type_b pt,
pv_program_partner_types ppt, pv_attribute_codes_vl code
where
pp.program_type_id = ppt.program_type_id
and pp.PROGRAM_STATUS_CODE NOT IN ('CANCEL', 'CLOSED','ARCHIVE')
and pp.program_type_id = pt.program_type_id
and pt.enabled_flag = 'Y'
and ppt.partner_type = code.attr_code
and code.attr_code_id= pc_attr_code_id
and code.attribute_id = 3;
select distinct entity
from pv_enty_attr_values entyval, pv_attribute_codes_vl code
where code.attr_code_id= pc_attr_code_id and
code.attribute_id = entyval.attribute_id and
code.attr_code=entyval.attr_value and
entyval.latest_flag = 'Y' ;
SAVEPOINT UPDATE_Attribute_Code_PVT;
PVX_Utility_PVT.debug_message('Private API: '||l_full_name||' - Open Cursor to Select');
FND_MESSAGE.set_token('MODE','Update');
l_delete_flag := 'N' ;
if(l_delete_flag = 'N') then
IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
THEN
FND_MESSAGE.Set_Name('PV', 'PV_ATTRCODE_NOTDISABLED_RULE');
l_delete_flag := 'N' ;
if(l_delete_flag = 'N') then
IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
THEN
FND_MESSAGE.Set_Name('PV', 'PV_ATTRCODE_NOTDISABLED_PROGR');
l_delete_flag := 'N';
if(l_delete_flag = 'N') then
IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
THEN
FND_MESSAGE.Set_Name('PV', 'PV_ATTRCODE_NOTDISABLED_ENTITY');
FND_MESSAGE.set_token('COLUMN',TO_CHAR(l_tar_attribute_code_rec.last_update_date));
,p_validation_mode => JTF_PLSQL_API.g_update
,p_attribute_code_rec => p_attribute_code_rec
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
PVX_Utility_PVT.debug_message('Private API: '||l_full_name||' - Calling update table handler');
PV_ATTRIBUTE_CODE_PKG.Update_Row(
p_attr_code_id => p_attribute_code_rec.attr_code_id,
p_attr_code => p_attribute_code_rec.attr_code,
p_last_update_date => SYSDATE,
p_last_updated_by => G_USER_ID,
--p_creation_date => SYSDATE,
--p_created_by => G_USER_ID,
p_last_update_login => G_LOGIN_ID,
p_object_version_number => p_attribute_code_rec.object_version_number,
p_attribute_id => p_attribute_code_rec.attribute_id,
p_enabled_flag => p_attribute_code_rec.enabled_flag,
--p_security_group_id => p_attribute_code_rec.security_group_id
p_description => p_attribute_code_rec.description
);
ROLLBACK TO UPDATE_Attribute_Code_PVT;
ROLLBACK TO UPDATE_Attribute_Code_PVT;
ROLLBACK TO UPDATE_Attribute_Code_PVT;
End Update_Attribute_Code;
PROCEDURE Delete_Attribute_Code(
p_api_version_number 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_attr_code_id IN NUMBER
,p_object_version_number IN NUMBER
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Attribute_Code';
l_delete_flag VARCHAR2(1):='Y';
select code.attr_code
from pv_attribute_codes_vl code
where code.attr_code_id= pc_attr_code_id ;
select attr.attribute_id,attr.name
from pv_attributes_vl attr,pv_attribute_codes_vl code
where code.attr_code_id= pc_attr_code_id and code.attribute_id = attr.attribute_id;
select distinct entity
from pv_enty_attr_values entyval, pv_attribute_codes_vl code
where code.attr_code_id= pc_attr_code_id and
code.attribute_id = entyval.attribute_id and
code.attr_code=entyval.attr_value;
select distinct seleted.attribute_value,rules.process_rule_name
from pv_enty_select_criteria criteria,pv_selected_attr_values seleted,
pv_process_rules_vl rules,pv_attribute_codes_vl code
where code.attr_code_id= pc_attr_code_id and
criteria.attribute_id= code.attribute_id and
criteria.selection_criteria_id= seleted.selection_criteria_id and
criteria.process_rule_id= rules.process_rule_id and
seleted.attribute_value=code.attr_code;
select distinct usage.attribute_usage_code
from pv_attribute_usages usage, pv_attribute_codes_vl code
where code.attr_code_id=pc_attr_code_id and
code.attr_code=usage.attribute_usage_code;
SAVEPOINT DELETE_Attribute_Code_PVT;
FND_MESSAGE.Set_Name('PV', 'PV_ATTRCODE_NOTDELETE_SEEDED');
l_delete_flag := 'N';
if(l_delete_flag = 'N') then
IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
THEN
FND_MESSAGE.Set_Name('PV', 'PV_ATTRCODE_VADOF_RESELLERS');
l_delete_flag := 'N';
if(l_delete_flag = 'N') then
IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
THEN
FND_MESSAGE.Set_Name('PV', 'PV_ATTRCODE_REFERENCED_USAGE');
l_delete_flag := 'N';
FOR y IN (select meaning from pv_lookups
where lookup_type = 'PV_VALID_ENTY_VALUE_TYPES'
and lookup_code = x.entity
) LOOP
l_meaning := y.meaning;
if(l_delete_flag = 'N') then
IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
THEN
FND_MESSAGE.Set_Name('PV', 'PV_ATTRCODE_REFERENCED_ENTITY');
l_delete_flag := 'N' ;
if(l_delete_flag = 'N') then
IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
THEN
FND_MESSAGE.Set_Name('PV', 'PV_ATTR_REFERENCED_RULE');
PVX_Utility_PVT.debug_message('Private API: '||l_full_name||' - Calling delete table handler');
PV_ATTRIBUTE_CODE_PKG.Delete_Row(
p_ATTR_CODE_ID => p_ATTR_CODE_ID);
ROLLBACK TO DELETE_Attribute_Code_PVT;
ROLLBACK TO DELETE_Attribute_Code_PVT;
ROLLBACK TO DELETE_Attribute_Code_PVT;
End Delete_Attribute_Code;
SELECT ATTR_CODE_ID
FROM PV_ATTRIBUTE_CODES_B
WHERE ATTR_CODE_ID = p_ATTR_CODE_ID
AND object_version_number = p_object_version
FOR UPDATE NOWAIT;
select attr_code from pv_attribute_codes_b
where attribute_id = pc_attribute_id;
IF p_attribute_code_rec.last_update_date = FND_API.G_MISS_DATE
OR p_attribute_code_rec.last_update_date IS NULL THEN
IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
FND_MESSAGE.set_name('PV', 'PV_API_MISSING_REQ_COLUMN');
FND_MESSAGE.set_token('COLUMN','last_update_date');
IF p_attribute_code_rec.last_updated_by = FND_API.G_MISS_NUM
OR p_attribute_code_rec.last_updated_by IS NULL THEN
IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
FND_MESSAGE.set_name('PV', 'PV_API_MISSING_REQ_COLUMN');
FND_MESSAGE.set_token('COLUMN','last_updated_by');
IF p_attribute_code_rec.last_update_login = FND_API.G_MISS_NUM
OR p_attribute_code_rec.last_update_login IS NULL THEN
IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
FND_MESSAGE.set_name('PV', 'PV_API_MISSING_REQ_COLUMN');
FND_MESSAGE.set_token('COLUMN','last_update_login');
IF p_attribute_code_rec.last_update_date IS NULL THEN
IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
FND_MESSAGE.set_name('PV', 'PV_API_MISSING_REQ_COLUMN');
FND_MESSAGE.set_token('COLUMN','last_update_date');
IF p_attribute_code_rec.last_updated_by IS NULL THEN
IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
FND_MESSAGE.set_name('PV', 'PV_API_MISSING_REQ_COLUMN');
FND_MESSAGE.set_token('COLUMN','last_updated_by');
IF p_attribute_code_rec.last_update_login IS NULL THEN
IF (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
FND_MESSAGE.set_name('PV', 'PV_API_MISSING_REQ_COLUMN');
FND_MESSAGE.set_token('COLUMN','last_update_login');
SELECT *
FROM pv_attribute_codes_b
WHERE attr_code_id = p_attribute_code_rec.attr_code_id;
IF p_attribute_code_rec.last_update_date = FND_API.g_miss_date THEN
x_complete_rec.last_update_date := l_attribute_code_rec.last_update_date;
IF p_attribute_code_rec.last_updated_by = FND_API.g_miss_num THEN
x_complete_rec.last_updated_by := l_attribute_code_rec.last_updated_by;
IF p_attribute_code_rec.last_update_login = FND_API.g_miss_num THEN
x_complete_rec.last_update_login := l_attribute_code_rec.last_update_login;
,p_validation_mode IN VARCHAR2 := JTF_PLSQL_API.G_UPDATE
,p_attribute_code_rec IN attribute_code_rec_type
,x_return_status OUT NOCOPY VARCHAR2
,x_msg_count OUT NOCOPY NUMBER
,x_msg_data OUT NOCOPY VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Validate_Attribute_Code';
,p_validation_mode IN VARCHAR2 := JTF_PLSQL_API.G_UPDATE
)
IS
BEGIN
-- Initialize message list if p_init_msg_list is set to TRUE.
IF FND_API.to_Boolean( p_init_msg_list )
THEN
FND_MSG_PUB.initialize;