The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT status_rule_Name
FROM iex_cust_status_rules
WHERE STATUS_RULE_Name = IN_STATUS_RULE_Name;
SELECT status_rule_Name
FROM iex_cust_status_rules
WHERE STATUS_RULE_Name = IN_STATUS_RULE_Name and status_rule_id <> IN_Status_Rule_ID;
SELECT iex_cust_status_rules_s.nextval
FROM sys.dual;
IEX_STATUS_RULE_PKG.insert_row(
x_rowid => l_rowid
, p_status_rule_id => x_status_rule_id
, p_status_rule_name => l_status_rule_rec.status_rule_name
, p_status_rule_description => l_status_rule_rec.status_rule_description
, p_start_date => l_status_rule_rec.start_date
, p_end_date => l_status_rule_rec.end_date
-- , p_jtf_object_code => l_status_rule_rec.jtf_object_code
, 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.USER_ID
, p_object_version_number => 1.0
);
Procedure Update_Status_Rule(p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
p_commit IN VARCHAR2,
P_STATUS_RULE_REC IN IEX_STATUS_RULE_PUB.STATUS_RULE_REC_TYPE,
x_dup_status OUT NOCOPY VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2)
IS
CURSOR C_get_Status_Rule_Rec (IN_STATUS_RULE_ID NUMBER) is
SELECT ROWID,
STATUS_RULE_ID,
STATUS_RULE_NAME,
STATUS_RULE_DESCRIPTION,
START_DATE,
END_DATE,
-- JTF_OBJECT_CODE,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY ,
LAST_UPDATE_LOGIN,
OBJECT_VERSION_NUMBER
from iex_cust_status_rules
where status_rule_id = in_status_rule_id
FOR UPDATE NOWAIT;
l_api_name CONSTANT VARCHAR2(30) := 'Update_Status_Rule';
SAVEPOINT UPDATE_STATUS_RULE_PVT;
l_status_rule_ref_rec.LAST_UPDATE_DATE,
l_status_rule_ref_rec.LAST_UPDATED_BY,
l_status_rule_ref_rec.CREATION_DATE,
l_status_rule_ref_rec.CREATED_BY,
l_status_rule_ref_rec.LAST_UPDATE_LOGIN,
l_status_rule_ref_rec.OBJECT_VERSION_NUMBER;
FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
IF (l_status_rule_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('IEX', 'API_MISSING_ID');
FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
IEX_STATUS_RULE_PKG.update_row(
x_rowid => l_rowid
, p_status_rule_id => l_status_rule_rec.status_rule_id
, p_status_rule_name => l_status_rule_rec.status_rule_name
, p_status_rule_description => l_status_rule_rec.status_rule_description
, p_start_date => l_status_rule_rec.start_date
, p_end_date => l_status_rule_rec.end_date
-- , p_jtf_object_code => l_status_rule_rec.jtf_object_code
, p_last_update_date => sysdate
, p_last_updated_by => FND_GLOBAL.USER_ID
, p_creation_date => l_status_rule_rec.creation_date
, p_created_by => l_status_rule_rec.created_by
, p_last_update_login => FND_GLOBAL.USER_ID
, p_object_version_number => l_status_rule_rec.object_version_number);
ROLLBACK TO UPDATE_STATUS_RULE_PVT;
ROLLBACK TO UPDATE_STATUS_RULE_PVT;
ROLLBACK TO UPDATE_STATUS_RULE_PVT;
END Update_Status_Rule;
Procedure Delete_Status_Rule(p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
p_commit IN VARCHAR2,
P_STATUS_RULE_ID IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2)
IS
CURSOR C_GET_STATUS_RULE (IN_STATUS_RULE_ID NUMBER) IS
SELECT rowid
FROM IEX_CUST_STATUS_RULES
WHERE STATUS_RULE_ID = IN_STATUS_RULE_ID;
SELECT Status_Rule_line_ID
FROM iex_cu_sts_rl_lines
WHERE STATUS_RULE_ID = IN_STATUS_RULE_ID;
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Status_Rule';
SAVEPOINT DELETE_STATUS_RULE_PVT;
FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
IEX_STATUS_RULE_PKG.Delete_Row(
x_rowid => l_rowid);
ROLLBACK TO DELETE_STATUS_RULE_PVT;
ROLLBACK TO DELETE_STATUS_RULE_PVT;
ROLLBACK TO DELETE_STATUS_RULE_PVT;
END Delete_Status_Rule;
SELECT iex_cu_sts_rl_lines_s.nextval
FROM sys.dual;
IEX_status_rule_line_PKG.insert_row(
x_rowid => l_rowid
, p_status_rule_line_id => x_status_rule_line_id
, p_delinquency_status => l_status_rule_line_rec.delinquency_status
, p_priority => l_status_rule_line_rec.priority
, p_enabled_flag => l_status_rule_line_rec.enabled_flag
, p_status_rule_id => l_status_rule_line_rec.status_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.USER_ID
, p_object_version_number => 1.0);
Procedure Update_status_rule_line(p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
p_commit IN VARCHAR2,
p_status_rule_line_Rec IN IEX_STATUS_RULE_PUB.status_rule_line_REC_Type,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2)
IS
CURSOR C_get_status_rule_line_Rec (IN_status_rule_line_ID NUMBER) is
select ROWID,
status_rule_line_ID,
delinquency_status,
priority,
ENABLED_FLAG,
Status_Rule_line_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY ,
LAST_UPDATE_LOGIN,
OBJECT_VERSION_NUMBER
from iex_cu_sts_rl_lines
where status_rule_line_id = in_status_rule_line_id
FOR UPDATE NOWAIT;
l_api_name CONSTANT VARCHAR2(30) := 'Update_status_rule_line';
SAVEPOINT UPDATE_status_rule_line_PVT;
l_status_rule_line_ref_rec.LAST_UPDATE_DATE,
l_status_rule_line_ref_rec.LAST_UPDATED_BY,
l_status_rule_line_ref_rec.CREATION_DATE,
l_status_rule_line_ref_rec.CREATED_BY,
l_status_rule_line_ref_rec.LAST_UPDATE_LOGIN,
l_status_rule_line_ref_Rec.OBJECT_VERSION_NUMBER;
FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
IF (l_status_rule_line_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('IEX', 'API_MISSING_ID');
FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
iex_status_rule_line_PKG.update_row(
x_rowid => l_rowid
, p_status_rule_line_id => l_status_rule_line_rec.status_rule_line_id
, p_last_update_date => sysdate
, p_last_updated_by => FND_GLOBAL.USER_ID
, p_creation_date => l_status_rule_line_rec.CREATION_DATE
, p_created_by => l_status_rule_line_rec.CREATED_BY
, p_last_update_login => FND_GLOBAL.USER_ID
, p_delinquency_status => l_status_rule_line_rec.delinquency_status
, p_priority => l_status_rule_line_rec.priority
, p_enabled_flag => l_status_rule_line_rec.enabled_flag
, p_status_rule_id => l_status_rule_line_rec.status_rule_id
, p_object_version_number => l_status_rule_line_rec.object_version_number);
ROLLBACK To UPDATE_status_rule_line_PVT;
ROLLBACK To UPDATE_status_rule_line_PVT;
ROLLBACK To UPDATE_status_rule_line_PVT;
END Update_status_rule_line;
Procedure Delete_status_rule_line(p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
p_commit IN VARCHAR2,
p_Status_Rule_id IN NUMBER,
p_status_rule_line_id IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2)
IS
CURSOR C_GET_status_rule_line (IN_status_rule_line_ID NUMBER) IS
SELECT rowid
FROM iex_cu_sts_rl_lines
WHERE status_rule_line_ID = IN_status_rule_line_ID;
l_api_name CONSTANT VARCHAR2(30) := 'Delete_status_rule_line';
SAVEPOINT DELETE_status_rule_line_PUB;
FND_MESSAGE.Set_Name('IEX', 'API_MISSING_UPDATE_TARGET');
iex_status_rule_line_PKG.Delete_Row(x_rowid => l_rowid);
ROLLBACK To DELETE_status_rule_line_PVT;
ROLLBACK To DELETE_status_rule_line_PVT;
ROLLBACK To DELETE_status_rule_line_PVT;
END Delete_status_rule_line;