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_org_id NUMBER,
p_period_set_name VARCHAR2,
p_period_name VARCHAR2,
p_cc_period_status VARCHAR2,
p_last_update_date DATE,
p_last_updated_by NUMBER,
p_last_update_login NUMBER,
p_created_by NUMBER,
p_creation_date DATE
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Insert_Row';
CURSOR C IS SELECT ROWID FROM igc_cc_periods_all
WHERE org_id = p_org_id
AND period_set_name = p_period_set_name
AND period_name = p_period_name;
SAVEPOINT Insert_Row_Pvt ;
INSERT INTO igc_cc_periods_all
(
org_id,
period_set_name,
period_name,
cc_period_status,
last_update_date,
last_updated_by,
last_update_login,
created_by,
creation_date
)
VALUES
(
p_org_id,
p_period_set_name,
p_period_name,
p_cc_period_status,
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 * FROM igc_cc_periods_all
WHERE rowid = p_row_id
FOR UPDATE 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 OUT NOCOPY VARCHAR2,
p_org_id NUMBER,
p_period_set_name VARCHAR2,
p_period_name VARCHAR2,
p_cc_period_status VARCHAR2,
p_last_update_date DATE,
p_last_updated_by NUMBER,
p_last_update_login NUMBER
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Row';
SAVEPOINT Update_Row_Pvt ;
UPDATE igc_cc_periods_all
SET
org_id = p_org_id,
cc_period_status = p_cc_period_status,
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 FROM igc_cc_periods_all
WHERE rowid = p_row_id;
ROLLBACK TO Delete_Row_Pvt ;
ROLLBACK TO Delete_Row_Pvt ;
ROLLBACK TO Delete_Row_Pvt ;
END Delete_Row;
SELECT '1'
FROM igc_cc_periods_all
WHERE org_id = p_org_id
AND period_set_name = p_period_set_name
AND period_name = p_period_name
AND (
p_row_id IS NULL
OR
rowid <> p_row_id
);