The following lines contain the word 'select', 'insert', 'update' or 'delete':
PV_PROCESS_RULES_PKG.Insert_Row(
px_PROCESS_RULE_ID => x_PROCESS_RULE_ID
,p_PARENT_RULE_ID => p_PROCESS_RULE_rec.PARENT_RULE_ID
,p_LAST_UPDATE_DATE => SYSDATE
,p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID
,p_CREATION_DATE => SYSDATE
,p_CREATED_BY => FND_GLOBAL.USER_ID
,p_LAST_UPDATE_LOGIN => FND_GLOBAL.CONC_LOGIN_ID
,p_OBJECT_VERSION_NUMBER => p_PROCESS_RULE_rec.OBJECT_VERSION_NUMBER
,p_REQUEST_ID => p_PROCESS_RULE_rec.REQUEST_ID
,p_PROGRAM_APPLICATION_ID => p_PROCESS_RULE_rec.PROGRAM_APPLICATION_ID
,p_PROGRAM_ID => p_PROCESS_RULE_rec.PROGRAM_ID
,p_PROGRAM_UPDATE_DATE => p_PROCESS_RULE_rec.PROGRAM_UPDATE_DATE
,p_PROCESS_TYPE => p_PROCESS_RULE_rec.PROCESS_TYPE
,p_RANK => p_PROCESS_RULE_rec.RANK
,p_STATUS_CODE => p_PROCESS_RULE_rec.STATUS_CODE
,p_START_DATE => p_PROCESS_RULE_rec.START_DATE
,p_END_DATE => p_PROCESS_RULE_rec.END_DATE
,p_ACTION => p_PROCESS_RULE_rec.ACTION
,p_ACTION_VALUE => p_PROCESS_RULE_rec.ACTION_VALUE
,p_OWNER_RESOURCE_ID => p_PROCESS_RULE_rec.OWNER_RESOURCE_ID
,p_CURRENCY_CODE => p_PROCESS_RULE_rec.CURRENCY_CODE
,p_PROCESS_RULE_NAME => p_PROCESS_RULE_rec.PROCESS_RULE_NAME
,p_DESCRIPTION => p_PROCESS_RULE_rec.DESCRIPTION
,p_ATTRIBUTE_CATEGORY => p_PROCESS_RULE_rec.ATTRIBUTE_CATEGORY
,p_ATTRIBUTE1 => p_PROCESS_RULE_rec.ATTRIBUTE1
,p_ATTRIBUTE2 => p_PROCESS_RULE_rec.ATTRIBUTE2
,p_ATTRIBUTE3 => p_PROCESS_RULE_rec.ATTRIBUTE3
,p_ATTRIBUTE4 => p_PROCESS_RULE_rec.ATTRIBUTE4
,p_ATTRIBUTE5 => p_PROCESS_RULE_rec.ATTRIBUTE5
,p_ATTRIBUTE6 => p_PROCESS_RULE_rec.ATTRIBUTE6
,p_ATTRIBUTE7 => p_PROCESS_RULE_rec.ATTRIBUTE7
,p_ATTRIBUTE8 => p_PROCESS_RULE_rec.ATTRIBUTE8
,p_ATTRIBUTE9 => p_PROCESS_RULE_rec.ATTRIBUTE9
,p_ATTRIBUTE10 => p_PROCESS_RULE_rec.ATTRIBUTE10
,p_ATTRIBUTE11 => p_PROCESS_RULE_rec.ATTRIBUTE11
,p_ATTRIBUTE12 => p_PROCESS_RULE_rec.ATTRIBUTE12
,p_ATTRIBUTE13 => p_PROCESS_RULE_rec.ATTRIBUTE13
,p_ATTRIBUTE14 => p_PROCESS_RULE_rec.ATTRIBUTE14
,p_ATTRIBUTE15 => p_PROCESS_RULE_rec.ATTRIBUTE15
);
PROCEDURE Update_process_rule(
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,
P_Identity_Resource_Id IN NUMBER,
P_PROCESS_RULE_Rec IN PV_RULE_RECTYPE_PUB.RULES_REC_TYPE,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
Cursor C_Get_process_rule(pc_PROCESS_RULE_ID Number) IS
Select OBJECT_VERSION_NUMBER
From PV_PROCESS_RULES_B
where process_rule_id = pc_process_rule_id
For Update NOWAIT;
l_api_name CONSTANT VARCHAR2(30) := 'Update_process_rule';
SAVEPOINT UPDATE_PROCESS_RULE_PVT;
AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Private API: - Open Cursor to Select');
FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
p_validation_mode => AS_UTILITY_PVT.G_UPDATE,
P_PROCESS_RULE_Rec => P_PROCESS_RULE_Rec,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
P_Validation_mode => AS_UTILITY_PVT.G_UPDATE,
P_Parent_Rule_ID => p_PROCESS_RULE_rec.PARENT_RULE_ID,
P_Child_Rule_ID => P_PROCESS_RULE_Rec.PROCESS_RULE_ID,
P_RANK => p_PROCESS_RULE_rec.rank,
X_Return_Status => x_return_status,
X_Msg_Count => x_msg_count,
X_Msg_Data => x_msg_data);
P_Validation_mode => AS_UTILITY_PVT.G_UPDATE,
P_START_DATE => p_PROCESS_RULE_rec.start_date,
P_END_DATE => p_PROCESS_RULE_rec.end_date,
X_Return_Status => x_return_status,
X_Msg_Count => x_msg_count,
X_Msg_Data => x_msg_data);
P_Validation_mode => AS_UTILITY_PVT.G_UPDATE,
P_Parent_Rule_ID => p_PROCESS_RULE_rec.PARENT_RULE_ID,
P_START_DATE => p_PROCESS_RULE_rec.start_date,
X_Return_Status => x_return_status,
X_Msg_Count => x_msg_count,
X_Msg_Data => x_msg_data);
G_ACTION := 'UPDATE';
P_Validation_mode => AS_UTILITY_PVT.G_UPDATE,
P_Parent_Rule_ID => p_PROCESS_RULE_rec.process_RULE_ID,
P_STATUS => p_PROCESS_RULE_rec.status_code,
X_Return_Status => x_return_status,
X_Msg_Count => x_msg_count,
X_Msg_Data => x_msg_data);
AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling update table handler');
PV_PROCESS_RULES_PKG.Update_Row(
p_PROCESS_RULE_ID => p_PROCESS_RULE_rec.PROCESS_RULE_ID
,p_LAST_UPDATE_DATE => SYSDATE
,p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID
,p_CREATION_DATE => FND_API.G_MISS_DATE
,p_CREATED_BY => FND_API.G_MISS_NUM
,p_LAST_UPDATE_LOGIN => FND_GLOBAL.CONC_LOGIN_ID
,p_OBJECT_VERSION_NUMBER => p_PROCESS_RULE_rec.OBJECT_VERSION_NUMBER
,p_REQUEST_ID => p_PROCESS_RULE_rec.REQUEST_ID
,p_PROGRAM_APPLICATION_ID => p_PROCESS_RULE_rec.PROGRAM_APPLICATION_ID
,p_PROGRAM_ID => p_PROCESS_RULE_rec.PROGRAM_ID
,p_PROGRAM_UPDATE_DATE => p_PROCESS_RULE_rec.PROGRAM_UPDATE_DATE
,p_PROCESS_TYPE => p_PROCESS_RULE_rec.PROCESS_TYPE
,p_RANK => p_PROCESS_RULE_rec.RANK
,p_STATUS_CODE => p_PROCESS_RULE_rec.STATUS_CODE
,p_START_DATE => p_PROCESS_RULE_rec.START_DATE
,p_END_DATE => p_PROCESS_RULE_rec.END_DATE
,p_ACTION => p_PROCESS_RULE_rec.ACTION
,p_ACTION_VALUE => p_PROCESS_RULE_rec.ACTION_VALUE
,p_OWNER_RESOURCE_ID => p_PROCESS_RULE_rec.OWNER_RESOURCE_ID
,p_CURRENCY_CODE => p_PROCESS_RULE_rec.CURRENCY_CODE
,p_PROCESS_RULE_NAME => p_PROCESS_RULE_rec.PROCESS_RULE_NAME
,p_DESCRIPTION => p_PROCESS_RULE_rec.DESCRIPTION
,p_ATTRIBUTE_CATEGORY => p_PROCESS_RULE_rec.ATTRIBUTE_CATEGORY
,p_ATTRIBUTE1 => p_PROCESS_RULE_rec.ATTRIBUTE1
,p_ATTRIBUTE2 => p_PROCESS_RULE_rec.ATTRIBUTE2
,p_ATTRIBUTE3 => p_PROCESS_RULE_rec.ATTRIBUTE3
,p_ATTRIBUTE4 => p_PROCESS_RULE_rec.ATTRIBUTE4
,p_ATTRIBUTE5 => p_PROCESS_RULE_rec.ATTRIBUTE5
,p_ATTRIBUTE6 => p_PROCESS_RULE_rec.ATTRIBUTE6
,p_ATTRIBUTE7 => p_PROCESS_RULE_rec.ATTRIBUTE7
,p_ATTRIBUTE8 => p_PROCESS_RULE_rec.ATTRIBUTE8
,p_ATTRIBUTE9 => p_PROCESS_RULE_rec.ATTRIBUTE9
,p_ATTRIBUTE10 => p_PROCESS_RULE_rec.ATTRIBUTE10
,p_ATTRIBUTE11 => p_PROCESS_RULE_rec.ATTRIBUTE11
,p_ATTRIBUTE12 => p_PROCESS_RULE_rec.ATTRIBUTE12
,p_ATTRIBUTE13 => p_PROCESS_RULE_rec.ATTRIBUTE13
,p_ATTRIBUTE14 => p_PROCESS_RULE_rec.ATTRIBUTE14
,p_ATTRIBUTE15 => p_PROCESS_RULE_rec.ATTRIBUTE15
);
End Update_process_rule;
PROCEDURE Delete_process_rule(
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,
P_Identity_Resource_Id IN NUMBER,
P_PROCESS_RULE_Rec IN PV_RULE_RECTYPE_PUB.RULES_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) := 'Delete_process_rule';
select parent_rule_id, process_type
from pv_process_rules_vl
where process_rule_id = pc_rule_id;
select process_rule_name
from fnd_profile_option_values a, pv_process_rules_tl b,
fnd_profile_options c
where a.profile_option_value = to_char(pc_rule_id)
and a.profile_option_value = b.process_rule_id AND
b.language = USERENV('LANG') and
a.application_Id = 691 and
a.profile_option_id = c.profile_option_id AND
c.profile_option_name = 'PV_AUTO_MATCHING_RULE';
select process_rule_name
from pv_entity_rules_applied a, pv_process_rules_vl b
where a.process_rule_id = pc_rule_id
and a.process_rule_id = b.process_rule_id;
SELECT process_rule_name
FROM pv_process_rules_vl a
WHERE process_rule_id = pc_rule_id AND
EXISTS (SELECT 'x' FROM pv_entity_rules_applied b
WHERE a.process_rule_id = b.process_rule_id);
SELECT process_rule_name
FROM pv_process_rules_vl a
WHERE process_rule_id = pc_rule_id AND
EXISTS (SELECT 'x' FROM pv_entity_rules_applied b
WHERE b.parent_process_rule_id = a.process_rule_id);
select selection_criteria_id
from pv_enty_select_criteria
where process_rule_id = pc_rule_id;
select mapping_id
from pv_entity_attr_mappings
where process_rule_id = pc_rule_id;
select entity_routing_id
from pv_entity_routings
where process_rule_id = pc_rule_id;
select process_rule_id
from pv_process_rules_vl
where parent_rule_id = pc_rule_id;
l_selection_criteria_id number;
SAVEPOINT DELETE_PROCESS_RULE_PVT;
SELECT parent_rule_id, process_type
FROM pv_process_rules_vl
WHERE process_rule_id = p_PROCESS_RULE_rec.PROCESS_RULE_ID)
LOOP
IF (x.parent_rule_id IS NOT NULL) THEN
l_is_main_rule_flag := FALSE;
IF (l_process_type IN ('LEAD_RATING', 'CHANNEL_SELECTION', 'LEAD_QUALIFICATION') AND
l_is_main_rule_flag)
THEN
open lc_validate_rule_referenced2 (pc_rule_id => p_PROCESS_RULE_rec.PROCESS_RULE_ID);
PV_entyrout_PVT.Delete_entyrout(
P_Api_Version_Number => 2.0,
P_Init_Msg_List => FND_API.G_FALSE,
P_Commit => p_commit,
P_Validation_Level => p_Validation_Level,
P_Identity_Resource_Id => P_Identity_Resource_Id,
P_ENTYROUT_Rec => l_ENTYROUT_Rec,
X_Return_Status => x_return_status,
X_Msg_Count => x_msg_count,
X_Msg_Data => x_msg_data);
PV_entyattmap_PVT.Delete_entyattmap(
P_Api_Version_Number => 2.0,
P_Init_Msg_List => FND_API.G_FALSE,
P_Commit => p_commit,
P_Validation_Level => p_Validation_Level,
P_Identity_Resource_Id => P_Identity_Resource_Id,
P_ENTYATTMAP_Rec => l_ENTYATTMAP_Rec,
X_Return_Status => x_return_status,
X_Msg_Count => x_msg_count,
X_Msg_Data => x_msg_data);
fetch lc_get_selcrit into l_selection_criteria_id;
l_selcrit_rec.selection_criteria_id := l_selection_criteria_id;
PV_selcrit_PVT.Delete_selcrit(
P_Api_Version_Number => 2.0,
P_Init_Msg_List => FND_API.G_FALSE,
P_Commit => p_commit,
P_Validation_Level => p_Validation_Level,
P_Identity_Resource_Id => P_Identity_Resource_Id,
P_SELCRIT_Rec => l_SELCRIT_Rec,
X_Return_Status => x_return_status,
X_Msg_Count => x_msg_count,
X_Msg_Data => x_msg_data);
AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: PV_PROCESS_RULES_PKG.Delete_Row');
PV_PROCESS_RULES_PKG.Delete_Row(
p_PROCESS_RULE_ID => p_PROCESS_RULE_rec.PROCESS_RULE_ID);
PV_PROCESS_RULES_PKG.Delete_Row(
p_PROCESS_RULE_ID => l_process_rule_id);
End Delete_process_rule;
Select RLSB.PROCESS_RULE_ID, RLSB.LAST_UPDATE_DATE, RLSB.LAST_UPDATED_BY, RLSB.CREATION_DATE, RLSB.CREATED_BY,
RLSB.LAST_UPDATE_LOGIN, RLSB.OBJECT_VERSION_NUMBER, RLSB.REQUEST_ID, RLSB.PROGRAM_APPLICATION_ID, RLSB.PROGRAM_ID,
RLSB.PROGRAM_UPDATE_DATE, PROCESS_RULE_NAME, PARENT_RULE_ID, PROCESS_TYPE , RANK, STATUS_CODE, START_DATE, END_DATE,
ACTION, ACTION_VALUE, OWNER_RESOURCE_ID, CURRENCY_CODE, LANGUAGE, SOURCE_LANG ,DESCRIPTION, ATTRIBUTE_CATEGORY,
ATTRIBUTE1, ATTRIBUTE2, ATTRIBUTE3, ATTRIBUTE4, ATTRIBUTE5, ATTRIBUTE6, ATTRIBUTE7, ATTRIBUTE8, ATTRIBUTE9,
ATTRIBUTE10, ATTRIBUTE11, ATTRIBUTE12, ATTRIBUTE13, ATTRIBUTE14, ATTRIBUTE15
From PV_PROCESS_RULES_B RLSB,PV_PROCESS_RULES_TL RLST
where RLSB.process_rule_id = RLST.process_rule_id and
(RLSB.parent_rule_id = pc_process_rule_id or RLSB.process_rule_id = pc_process_rule_id) and
RLST.language = USERENV('LANG') order by parent_rule_id desc;
Cursor C_Get_enty_select_criteria(pc_PROCESS_RULE_ID Number) IS
Select SELECTION_CRITERIA_ID, LAST_UPDATE_DATE, LAST_UPDATED_BY, CREATION_DATE, CREATED_BY, LAST_UPDATE_LOGIN,
OBJECT_VERSION_NUMBER,REQUEST_ID,PROGRAM_APPLICATION_ID,PROGRAM_ID,PROGRAM_UPDATE_DATE,PROCESS_RULE_ID,
ATTRIBUTE_ID, SELECTION_TYPE_CODE, OPERATOR, RANK, ATTRIBUTE_CATEGORY, ATTRIBUTE1, ATTRIBUTE2, ATTRIBUTE3,
ATTRIBUTE4, ATTRIBUTE5, ATTRIBUTE6, ATTRIBUTE7, ATTRIBUTE8, ATTRIBUTE9, ATTRIBUTE10, ATTRIBUTE11, ATTRIBUTE12,
ATTRIBUTE13, ATTRIBUTE14, ATTRIBUTE15
From PV_ENTY_SELECT_CRITERIA
Where process_rule_id = pc_PROCESS_RULE_ID;
Cursor C_Get_selected_attr_values(pc_SELECTION_CRITERIA_ID Number) IS
Select ATTR_VALUE_ID,LAST_UPDATE_DATE,LAST_UPDATED_BY,CREATION_DATE,CREATED_BY,LAST_UPDATE_LOGIN,OBJECT_VERSION_NUMBER,
REQUEST_ID,PROGRAM_APPLICATION_ID,PROGRAM_ID,PROGRAM_UPDATE_DATE,SELECTION_CRITERIA_ID,ATTRIBUTE_VALUE,
ATTRIBUTE_TO_VALUE,ATTRIBUTE_CATEGORY,ATTRIBUTE1,ATTRIBUTE2,ATTRIBUTE3,ATTRIBUTE4,ATTRIBUTE5,ATTRIBUTE6,
ATTRIBUTE7,ATTRIBUTE8,ATTRIBUTE9,ATTRIBUTE10,ATTRIBUTE11,ATTRIBUTE12,ATTRIBUTE13,ATTRIBUTE14,ATTRIBUTE15,SCORE
From PV_SELECTED_ATTR_VALUES
Where SELECTION_CRITERIA_ID = pc_SELECTION_CRITERIA_ID;
Select MAPPING_ID,LAST_UPDATE_DATE,LAST_UPDATED_BY,CREATION_DATE,CREATED_BY,LAST_UPDATE_LOGIN,OBJECT_VERSION_NUMBER,
REQUEST_ID,PROGRAM_APPLICATION_ID,PROGRAM_ID,PROGRAM_UPDATE_DATE,PROCESS_RULE_ID,SOURCE_ATTR_TYPE,
SOURCE_ATTR_ID,TARGET_ATTR_TYPE,TARGET_ATTR_ID,OPERATOR,ATTRIBUTE_CATEGORY,ATTRIBUTE1,ATTRIBUTE2,
ATTRIBUTE3,ATTRIBUTE4,ATTRIBUTE5,ATTRIBUTE6,ATTRIBUTE7,ATTRIBUTE8,ATTRIBUTE9,ATTRIBUTE10,ATTRIBUTE11,
ATTRIBUTE12,ATTRIBUTE13,ATTRIBUTE14,ATTRIBUTE15
From PV_ENTITY_ATTR_MAPPINGS
Where process_rule_id = pc_PROCESS_RULE_ID;
Select ENTITY_ROUTING_ID,LAST_UPDATE_DATE,LAST_UPDATED_BY,CREATION_DATE,CREATED_BY,LAST_UPDATE_LOGIN,OBJECT_VERSION_NUMBER,
REQUEST_ID,PROGRAM_APPLICATION_ID,PROGRAM_ID,PROGRAM_UPDATE_DATE,PROCESS_RULE_ID,DISTANCE_FROM_CUSTOMER,
DISTANCE_UOM_CODE,MAX_NEAREST_PARTNER,ROUTING_TYPE,BYPASS_CM_OK_FLAG,CM_TIMEOUT,CM_TIMEOUT_UOM_CODE,PARTNER_TIMEOUT,
PARTNER_TIMEOUT_UOM_CODE,UNMATCHED_INT_RESOURCE_ID,UNMATCHED_CALL_TAP_FLAG,ATTRIBUTE_CATEGORY,ATTRIBUTE1,
ATTRIBUTE2,ATTRIBUTE3,ATTRIBUTE4,ATTRIBUTE5,ATTRIBUTE6,ATTRIBUTE7,ATTRIBUTE8,ATTRIBUTE9,ATTRIBUTE10,ATTRIBUTE11,
ATTRIBUTE12,ATTRIBUTE13,ATTRIBUTE14,ATTRIBUTE15
From PV_ENTITY_ROUTINGS
Where process_rule_id = pc_PROCESS_RULE_ID;
v_selection_criteria_id NUMBER;
x_selection_criteria_id NUMBER;
V_Get_parent_process_rules.last_update_date := null;
V_Get_parent_process_rules.last_updated_by := null;
V_Get_parent_process_rules.last_update_login := null;
V_Get_parent_process_rules.last_update_date := null;
V_Get_parent_process_rules.last_updated_by := null;
V_Get_parent_process_rules.last_update_login := null;
FOR V_Get_enty_select_criteria IN C_Get_enty_select_criteria(V_Get_parent_process_rules.process_rule_id) LOOP
if C_Get_enty_select_criteria%found then
V_Get_enty_select_criteria.process_rule_id := x_PROCESS_RULE_ID;
v_selection_criteria_id := V_Get_enty_select_criteria.SELECTION_CRITERIA_ID;
V_Get_enty_select_criteria.SELECTION_CRITERIA_ID := null;
P_Identity_Resource_Id,V_Get_enty_select_criteria,x_selection_criteria_id,x_Return_Status,
x_Msg_Count,x_Msg_Data);
FOR V_Get_selected_attr_values IN C_Get_selected_attr_values(v_selection_criteria_id) LOOP
if C_Get_selected_attr_values%found then
V_Get_selected_attr_values.SELECTION_CRITERIA_ID := x_selection_criteria_id;
V_Get_selected_attr_values.ATTR_VALUE_ID := null;
V_Get_selected_attr_values,
x_attr_value_id,
x_Return_Status,
x_Msg_Count,
x_Msg_Data);
FOR V_Get_enty_select_criteria IN C_Get_enty_select_criteria(P_PROCESS_RULE_Rec.Process_Rule_Id) LOOP
if C_Get_enty_select_criteria%found then
V_Get_enty_select_criteria.process_rule_id := x_PROCESS_RULE_ID;
v_selection_criteria_id := V_Get_enty_select_criteria.SELECTION_CRITERIA_ID;
V_Get_enty_select_criteria.SELECTION_CRITERIA_ID := null;
P_Identity_Resource_Id,V_Get_enty_select_criteria,x_selection_criteria_id,x_Return_Status,
x_Msg_Count,x_Msg_Data);
FOR V_Get_selected_attr_values IN C_Get_selected_attr_values(v_selection_criteria_id) LOOP
if C_Get_selected_attr_values%found then
V_Get_selected_attr_values.SELECTION_CRITERIA_ID := x_selection_criteria_id;
V_Get_selected_attr_values.ATTR_VALUE_ID := null;
P_Identity_Resource_Id,V_Get_selected_attr_values,x_attr_value_id,x_Return_Status,
x_Msg_Count,x_Msg_Data);
SELECT 'X'
FROM pv_process_rules_b
WHERE process_rule_id = c_process_rule_id;
ELSIF(p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
-- validate NOT NULL column
IF (p_process_rule_id IS NULL) OR
(p_process_rule_id = FND_API.G_MISS_NUM)
THEN
AS_UTILITY_PVT.Set_Message(
p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
p_msg_name => 'API_MISSING_ID',
p_token1 => 'COLUMN',
p_token1_value => 'PROCESS_RULE_ID');
SELECT 'X'
FROM jtf_rs_resource_extns res
WHERE res.resource_id = c_resource_id;
SELECT 'X'
FROM fnd_currencies
WHERE currency_code = C_Currency_Code
and nvl(start_date_active, sysdate) <= sysdate
and nvl(end_date_active, sysdate) >= sysdate
and enabled_flag = 'Y';
SELECT child.rank
FROM pv_process_rules_vl parent,
pv_process_rules_vl child
WHERE parent.process_rule_id = pc_parent_rule_id AND
parent.process_rule_id = child.parent_rule_id AND
child.process_rule_id <> NVL(pc_child_rule_id, 0) AND
child.rank = pc_rank;
p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
IF (p_rank IS NULL) OR (p_rank = FND_API.G_MISS_NUM) THEN
AS_UTILITY_PVT.Set_Message(
p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
p_msg_name => 'API_MISSING_RANK',
p_token1 => 'RANK',
p_token1_value => p_rank);
p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
IF (P_START_DATE is not null and P_END_DATE is not null)
THEN
IF P_END_DATE < P_START_DATE
THEN
FND_MESSAGE.Set_Name('PV', 'PV_END_DATE_GREATER_START_DATE');
IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE OR p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
IF (P_PARENT_RULE_ID is null or P_PARENT_RULE_ID = FND_API.G_MISS_NUM) then
IF (P_START_DATE is null or P_START_DATE = FND_API.G_MISS_DATE) then
FND_MESSAGE.Set_Name('PV', 'PV_STARTDATE_NOTNULL');
SELECT 'x' result
FROM fnd_profile_options a,
fnd_profile_option_values b
WHERE a.profile_option_id = b.profile_option_id AND
a.profile_option_name = 'PV_AUTO_MATCHING_RULE' AND
b.application_id = 691 AND
b.profile_option_value = TO_CHAR(p_parent_rule_id);
IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE OR p_validation_mode = AS_UTILITY_PVT.G_UPDATE)
THEN
IF (P_PARENT_RULE_ID is null or P_PARENT_RULE_ID = FND_API.G_MISS_NUM) then
IF (P_STATUS is null or P_STATUS = FND_API.G_MISS_CHAR) then
FND_MESSAGE.Set_Name('PV', 'PV_STATUS_NOTNULL');
IF (G_PROCESS_TYPE = 'LEAD_MONITOR' AND G_ACTION = 'UPDATE' AND
p_status = 'ACTIVE') THEN
-- --------------------------------------------------------------
-- Check the database for the "before" image. We need to compare
-- the before image to the after image.
-- --------------------------------------------------------------
FOR x IN (SELECT status_code FROM pv_process_rules_b
WHERE process_rule_id = p_parent_rule_id)
LOOP
l_previous_status := x.status_code;
ELSIF (G_PROCESS_TYPE = 'PARTNER_MATCHING' AND G_ACTION = 'UPDATE' AND
p_status <> 'ACTIVE')
THEN
FOR x IN lc_check_rule_reference LOOP
l_result := x.result;