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_Id IN OUT NOCOPY NUMBER,
p_Distribution_Rule_Id IN NUMBER,
p_Worksheet_Id IN NUMBER,
p_Distribution_Date IN DATE,
p_Distributed_Flag IN VARCHAR2,
p_Last_Update_Date IN DATE,
p_Last_Updated_By IN NUMBER,
p_Last_Update_Login IN NUMBER,
p_Created_By IN NUMBER,
p_Creation_Date IN DATE
)
IS
--
l_api_name CONSTANT VARCHAR2(30) := 'Insert_Row';
SELECT rowid
FROM psb_ws_distributions
WHERE distribution_id = p_distribution_id ;
SELECT psb_ws_distributions_s.nextval
FROM dual;
SAVEPOINT Insert_Row_Pvt ;
INSERT INTO psb_ws_distributions
(
Distribution_Id,
Distribution_Rule_Id,
Worksheet_Id,
Distribution_Date,
Distributed_Flag,
last_update_date,
last_updated_by,
last_update_login,
created_by,
creation_date
)
VALUES
(
p_Distribution_Id,
p_Distribution_Rule_Id,
p_Worksheet_Id,
p_Distribution_Date,
p_Distributed_Flag,
p_Last_Update_Date,
p_Last_Updated_By,
p_Last_Update_Login,
p_Created_By,
p_Creation_Date
);
ROLLBACK TO Insert_Row_Pvt ;
ROLLBACK TO Insert_Row_Pvt ;
ROLLBACK TO Insert_Row_Pvt ;
END Insert_Row;
SELECT Distribution_Id,
Distribution_Rule_Id,
Worksheet_Id,
Distribution_Date,
Distributed_Flag
FROM psb_ws_distributions
WHERE rowid = p_Row_Id
FOR UPDATE of Distribution_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_Row_Id IN 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_Last_Update_Date IN DATE,
p_Last_Updated_By IN NUMBER,
p_Last_Update_Login IN NUMBER
)
IS
--
l_api_name CONSTANT VARCHAR2(30) := 'Update_Row';
SAVEPOINT Update_Row_Pvt ;
UPDATE psb_ws_distributions
SET
distribution_id = p_distribution_id,
distribution_rule_id = p_distribution_rule_id,
worksheet_id = p_worksheet_id,
distribution_date = p_distribution_date,
distributed_flag = p_distributed_flag,
last_update_date = p_Last_Update_Date,
last_updated_by = p_Last_Updated_By,
last_update_login = p_Last_Update_Login
WHERE rowid = p_Row_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_Row_Id IN VARCHAR2
)
IS
--
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Row';
SAVEPOINT Delete_Row_Pvt ;
DELETE psb_ws_distributions
WHERE rowid = p_Row_Id;
ROLLBACK TO Delete_Row_Pvt ;
ROLLBACK TO Delete_Row_Pvt ;
ROLLBACK TO Delete_Row_Pvt ;
END Delete_Row;