The following lines contain the word 'select', 'insert', 'update' or 'delete':
| PROCEDURE Insert_Row |
+=======================================================================*/
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_Row_Id IN OUT NOCOPY VARCHAR2,
--
p_Distribution_Rule_Line_Id IN NUMBER,
p_Distribution_Rule_Id IN NUMBER,
p_Budget_Group_Id IN NUMBER,
p_distribute_flag IN VARCHAR2,
p_distribute_all_level_flag IN VARCHAR2,
p_download_flag IN VARCHAR2,
p_download_all_level_flag IN VARCHAR2,
p_year_category_type IN VARCHAR2,
p_attribute1 in varchar2,
p_attribute2 in varchar2,
p_attribute3 in varchar2,
p_attribute4 in varchar2,
p_attribute5 in varchar2,
p_attribute6 in varchar2,
p_attribute7 in varchar2,
p_attribute8 in varchar2,
p_attribute9 in varchar2,
p_attribute10 in varchar2,
p_context in varchar2,
p_mode in varchar2
)
IS
CURSOR C IS
SELECT rowid
FROM psb_ws_distribution_rule_lines
WHERE distribution_rule_line_id = p_distribution_rule_line_id ;
P_LAST_UPDATE_DATE DATE;
P_LAST_UPDATED_BY NUMBER;
P_LAST_UPDATE_LOGIN NUMBER;
l_api_name CONSTANT VARCHAR2(30) := 'Insert_Row';
SAVEPOINT Insert_Row_Pvt ;
P_LAST_UPDATE_DATE := SYSDATE;
P_LAST_UPDATED_BY := 1;
P_LAST_UPDATE_LOGIN := 0;
P_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
if P_LAST_UPDATED_BY is NULL then
P_LAST_UPDATED_BY := -1;
P_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
if P_LAST_UPDATE_LOGIN is NULL then
P_LAST_UPDATE_LOGIN := -1;
INSERT INTO psb_ws_distribution_rule_lines
( distribution_rule_line_id,
distribution_rule_id,
budget_group_id,
distribute_flag,
distribute_all_level_flag,
download_flag ,
download_all_level_flag ,
year_category_type,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
context,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login
)
VALUES
( p_distribution_rule_line_id,
p_Distribution_rule_id,
p_budget_group_id,
p_distribute_flag,
p_distribute_all_level_flag,
p_download_flag ,
p_download_all_level_flag ,
p_year_category_type,
p_attribute1,
p_attribute2,
p_attribute3,
p_attribute4,
p_attribute5,
p_attribute6,
p_attribute7,
p_attribute8,
p_attribute9,
p_attribute10,
p_context,
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;
SELECT distribution_rule_line_id,
distribution_rule_id,
budget_group_id,
distribute_flag,
distribute_all_level_flag,
download_flag,
download_all_level_flag ,
year_category_type,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
context
FROM psb_ws_distribution_rule_lines
WHERE distribution_rule_line_id = p_distribution_rule_line_id
FOR UPDATE of distribution_rule_id NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
| PROCEDURE Update_Row |
+==========================================================================*/
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_Distribution_Rule_Line_Id IN NUMBER,
p_Distribution_Rule_Id IN NUMBER,
p_Budget_Group_Id IN NUMBER,
p_distribute_flag IN VARCHAR2,
p_distribute_all_level_flag IN VARCHAR2,
p_download_flag IN VARCHAR2,
p_download_all_level_flag IN VARCHAR2,
p_year_category_type IN VARCHAR2,
p_attribute1 in varchar2,
p_attribute2 in varchar2,
p_attribute3 in varchar2,
p_attribute4 in varchar2,
p_attribute5 in varchar2,
p_attribute6 in varchar2,
p_attribute7 in varchar2,
p_attribute8 in varchar2,
p_attribute9 in varchar2,
p_attribute10 in varchar2,
p_context in varchar2,
p_mode in varchar2
)
IS
P_LAST_UPDATE_DATE DATE;
P_LAST_UPDATED_BY NUMBER;
P_LAST_UPDATE_LOGIN NUMBER;
l_api_name CONSTANT VARCHAR2(30) := 'Update_Row';
SAVEPOINT Update_Row_Pvt ;
P_LAST_UPDATE_DATE := SYSDATE;
P_LAST_UPDATED_BY := 1;
P_LAST_UPDATE_LOGIN := 0;
P_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
if P_LAST_UPDATED_BY is NULL then
P_LAST_UPDATED_BY := -1;
P_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
if P_LAST_UPDATE_LOGIN is NULL then
P_LAST_UPDATE_LOGIN := -1;
UPDATE psb_ws_distribution_rule_lines
SET
distribution_rule_id = p_distribution_rule_id,
Budget_Group_Id = p_Budget_Group_Id ,
distribute_flag = p_distribute_flag ,
distribute_all_level_flag = p_distribute_all_level_flag ,
download_flag = p_download_flag ,
download_all_level_flag = p_download_all_level_flag ,
year_category_type = p_year_category_type ,
attribute1 = p_attribute1,
attribute2 = p_attribute2,
attribute3 = p_attribute3,
attribute4 = p_attribute4,
attribute5 = p_attribute5,
attribute6 = p_attribute6,
attribute7 = p_attribute7,
attribute8 = p_attribute8,
attribute9 = p_attribute9,
attribute10 = p_attribute10,
context = p_context,
last_update_date = p_last_update_date,
last_updated_by = p_last_updated_by,
last_update_login = p_last_update_login
WHERE distribution_rule_line_id = p_distribution_rule_line_id;
ROLLBACK TO Update_Row_Pvt ;
ROLLBACK TO Update_Row_Pvt ;
ROLLBACK TO Update_Row_Pvt ;
END Update_Row;
| PROCEDURE Delete_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_Distribution_Rule_Line_Id IN NUMBER
)
IS
--
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Row';
SAVEPOINT Delete_Row_Pvt ;
DELETE psb_ws_distribution_rule_lines
WHERE distribution_rule_line_id = p_distribution_rule_line_id;
ROLLBACK TO Delete_Row_Pvt ;
ROLLBACK TO Delete_Row_Pvt ;
ROLLBACK TO Delete_Row_Pvt ;
END Delete_Row;
SELECT '1'
FROM psb_ws_distribution_rules
WHERE name = p_name
AND ( (p_Row_Id IS NULL)
OR (RowId <> p_Row_Id) );
PROCEDURE Distribution_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_Row_Id IN OUT NOCOPY VARCHAR2,
--
p_Distribution_Id IN NUMBER,
p_Distribution_Rule_Id IN NUMBER,
p_Worksheet_Id IN NUMBER,
p_distribution_date IN DATE,
p_distributed_flag IN VARCHAR2,
p_distribution_instructions IN VARCHAR2,
p_distribution_option_flag IN VARCHAR2,
p_revision_option_flag IN VARCHAR2,
p_mode IN VARCHAR2
)
IS
CURSOR C IS
SELECT rowid
FROM psb_ws_distributions
WHERE distribution_id = p_distribution_id ;
P_LAST_UPDATE_DATE DATE;
P_LAST_UPDATED_BY NUMBER;
P_LAST_UPDATE_LOGIN NUMBER;
l_api_name CONSTANT VARCHAR2(30) := 'Distribution_Insert_Row';
SAVEPOINT Distribution_Insert_Row_Pvt ;
P_LAST_UPDATE_DATE := SYSDATE;
P_LAST_UPDATED_BY := 1;
P_LAST_UPDATE_LOGIN := 0;
P_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
if P_LAST_UPDATED_BY is NULL then
P_LAST_UPDATED_BY := -1;
P_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
if P_LAST_UPDATE_LOGIN is NULL then
P_LAST_UPDATE_LOGIN := -1;
INSERT INTO psb_ws_distributions
( distribution_id,
distribution_rule_id,
worksheet_id,
distribution_date,
distributed_flag,
distribution_instructions,
distribution_option_flag,
revision_option_flag,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login
)
VALUES
( p_distribution_id,
p_Distribution_rule_id,
p_worksheet_id,
p_distribution_date,
p_distributed_flag,
p_distribution_instructions,
p_distribution_option_flag,
p_revision_option_flag,
p_last_update_date,
p_last_updated_by,
p_last_update_date,
p_last_updated_by,
p_last_update_login
);
ROLLBACK TO Distribution_Insert_Row_Pvt ;
ROLLBACK TO Distribution_Insert_Row_Pvt ;
ROLLBACK TO Distribution_Insert_Row_Pvt ;
END Distribution_Insert_Row;
PROCEDURE Rules_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_Row_Id IN OUT NOCOPY VARCHAR2,
--
p_Distribution_Rule_Id IN NUMBER,
p_Budget_Group_Id IN NUMBER,
p_Name IN VARCHAR2,
p_mode in varchar2
)
IS
CURSOR C IS
SELECT rowid
FROM psb_ws_distribution_rules
WHERE distribution_rule_id = p_distribution_rule_id ;
P_LAST_UPDATE_DATE DATE;
P_LAST_UPDATED_BY NUMBER;
P_LAST_UPDATE_LOGIN NUMBER;
l_api_name CONSTANT VARCHAR2(30) := 'Rules_Insert_Row';
SAVEPOINT Rules_Insert_Row_Pvt ;
P_LAST_UPDATE_DATE := SYSDATE;
P_LAST_UPDATED_BY := 1;
P_LAST_UPDATE_LOGIN := 0;
P_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
if P_LAST_UPDATED_BY is NULL then
P_LAST_UPDATED_BY := -1;
P_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
if P_LAST_UPDATE_LOGIN is NULL then
P_LAST_UPDATE_LOGIN := -1;
INSERT INTO psb_ws_distribution_rules
( distribution_rule_id,
name,
budget_group_id,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login
)
VALUES
( p_distribution_rule_id,
p_Name,
p_budget_group_id,
p_last_update_date,
p_last_updated_by,
p_last_update_date,
p_last_updated_by,
p_last_update_login
);
ROLLBACK TO Rules_Insert_Row_Pvt ;
ROLLBACK TO Rules_Insert_Row_Pvt ;
ROLLBACK TO Rules_Insert_Row_Pvt ;
END Rules_Insert_Row;
| PROCEDURE Delete_Row |
+==========================================================================*/
PROCEDURE Rules_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_Distribution_Rule_Id IN NUMBER
)
IS
--
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Row';
SAVEPOINT Rules_Delete_Row_Pvt ;
SELECT count(*) INTO l_ws_count
FROM psb_ws_distributions
WHERE distribution_rule_id = p_distribution_rule_id;
DELETE psb_ws_distribution_rules
WHERE distribution_rule_id = p_distribution_rule_id;
DELETE psb_ws_distribution_rule_lines
WHERE distribution_rule_id = p_distribution_rule_id;
ROLLBACK TO Rules_Delete_Row_Pvt ;
ROLLBACK TO Rules_Delete_Row_Pvt ;
ROLLBACK TO Rules_Delete_Row_Pvt ;
END Rules_Delete_Row;
SELECT budget_group_id ,
distribute_flag ,
distribute_all_level_flag ,
download_flag ,
download_all_level_flag ,
year_category_type ,
attribute1 ,
attribute2 ,
attribute3 ,
attribute4 ,
attribute5 ,
attribute6 ,
attribute7 ,
attribute8 ,
attribute9 ,
attribute10 ,
context
FROM psb_ws_distribution_rule_lines
WHERE distribution_rule_id = p_Source_Distribution_Rule_Id ;
SELECT psb_ws_distribution_rules_s.NEXTVAL
INTO l_dist_rule_id FROM dual;
RULES_INSERT_ROW (
p_api_version => 1.0,
p_init_msg_list => fnd_api.g_false,
p_commit => fnd_api.g_false,
p_validation_level => fnd_api.g_valid_level_full,
p_return_status => l_return_status,
p_msg_count => p_msg_count,
p_msg_data => p_msg_data,
p_row_id => l_rowid,
p_distribution_rule_id => l_dist_rule_id,
p_name => p_target_rule_name,
p_budget_group_id => p_Source_Budget_Group ,
p_mode => 'R'
);
SELECT psb_ws_distribute_rule_lines_s.NEXTVAL
INTO l_dist_rule_line_id FROM dual;
INSERT_ROW (
p_api_version => 1.0,
p_init_msg_list => fnd_api.g_false,
p_commit => fnd_api.g_false,
p_validation_level => fnd_api.g_valid_level_full,
p_return_status => l_return_status,
p_msg_count => p_msg_count,
p_msg_data => p_msg_data,
p_row_id => l_rowid,
p_distribution_rule_line_id => l_dist_rule_line_id,
p_distribution_rule_id => l_dist_rule_id,
p_budget_group_id => lines_rec.budget_group_id,
p_distribute_flag => lines_rec.distribute_flag,
p_distribute_all_level_flag => lines_rec.distribute_all_level_flag,
p_download_flag => lines_rec.download_flag ,
p_download_all_level_flag => lines_rec.download_all_level_flag ,
p_year_category_type => lines_rec.year_category_type ,
p_attribute1 => lines_rec.attribute1,
p_attribute2 => lines_rec.attribute2,
p_attribute3 => lines_rec.attribute3,
p_attribute4 => lines_rec.attribute4,
p_attribute5 => lines_rec.attribute5,
p_attribute6 => lines_rec.attribute6,
p_attribute7 => lines_rec.attribute7,
p_attribute8 => lines_rec.attribute8,
p_attribute9 => lines_rec.attribute9,
p_attribute10 => lines_rec.attribute10,
p_context => lines_rec.context,
p_mode => 'R'
);