The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT pv_ge_chklst_responses_s.NEXTVAL
FROM dual;
SELECT 1
FROM PV_GE_CHKLST_RESPONSES
WHERE chklst_response_id = l_id;
l_ge_chklst_resp_rec.last_updated_by := FND_GLOBAL.USER_ID;
l_ge_chklst_resp_rec.last_update_date := SYSDATE;
l_ge_chklst_resp_rec.last_update_login := FND_GLOBAL.conc_login_id;
Pv_Ge_Chklst_Resp_Pkg.Insert_Row(
--px_chklst_response_id => l_chklst_response_id,
px_chklst_response_id => l_ge_chklst_resp_rec.chklst_response_id,
p_checklist_item_id => p_ge_chklst_resp_rec.checklist_item_id,
px_object_version_number => l_object_version_number,
p_arc_response_for_entity_code => p_ge_chklst_resp_rec.arc_response_for_entity_code,
p_response_flag => p_ge_chklst_resp_rec.response_flag,
p_response_for_entity_id => p_ge_chklst_resp_rec.response_for_entity_id,
p_created_by => FND_GLOBAL.USER_ID,
p_creation_date => SYSDATE,
p_last_updated_by => FND_GLOBAL.USER_ID,
p_last_update_date => SYSDATE,
p_last_update_login => FND_GLOBAL.conc_login_id
);
PROCEDURE Update_Ge_Chklst_Resp(
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,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_ge_chklst_resp_rec IN ge_chklst_resp_rec_type
)
IS
CURSOR c_get_ge_chklst_resp(chklst_response_id NUMBER) IS
SELECT *
FROM PV_GE_CHKLST_RESPONSES
WHERE chklst_response_id = p_ge_chklst_resp_rec.chklst_response_id;
L_API_NAME CONSTANT VARCHAR2(30) := 'Update_Ge_Chklst_Resp';
SAVEPOINT update_ge_chklst_resp_pvt;
PVX_UTILITY_PVT.debug_message('Private API: - Open Cursor to Select');
PVX_UTILITY_PVT.Error_Message(p_message_name => 'API_MISSING_UPDATE_TARGET',
p_token_name => 'INFO',
p_token_value => 'Ge_Chklst_Resp') ;
p_token_value => 'Last_Update_Date') ;
p_validation_mode => JTF_PLSQL_API.g_update,
p_ge_chklst_resp_rec => p_ge_chklst_resp_rec,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data);
Pv_Ge_Chklst_Resp_Pkg.Update_Row(
p_chklst_response_id => p_ge_chklst_resp_rec.chklst_response_id,
p_checklist_item_id => p_ge_chklst_resp_rec.checklist_item_id,
p_object_version_number => p_ge_chklst_resp_rec.object_version_number,
p_arc_response_for_entity_code => p_ge_chklst_resp_rec.arc_response_for_entity_code,
p_response_flag => p_ge_chklst_resp_rec.response_flag,
p_response_for_entity_id => p_ge_chklst_resp_rec.response_for_entity_id,
p_last_updated_by => FND_GLOBAL.USER_ID,
p_last_update_date => SYSDATE,
p_last_update_login => FND_GLOBAL.conc_login_id
);
ROLLBACK TO UPDATE_Ge_Chklst_Resp_PVT;
ROLLBACK TO UPDATE_Ge_Chklst_Resp_PVT;
ROLLBACK TO UPDATE_Ge_Chklst_Resp_PVT;
End Update_Ge_Chklst_Resp;
PROCEDURE Delete_Ge_Chklst_Resp(
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,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_chklst_response_id IN NUMBER,
p_object_version_number IN NUMBER
)
IS
L_API_NAME CONSTANT VARCHAR2(30) := 'Delete_Ge_Chklst_Resp';
SAVEPOINT delete_ge_chklst_resp_pvt;
PVX_UTILITY_PVT.debug_message( 'Private API: Calling delete table handler');
Pv_Ge_Chklst_Resp_Pkg.Delete_Row(
p_chklst_response_id => p_chklst_response_id,
p_object_version_number => p_object_version_number );
ROLLBACK TO DELETE_Ge_Chklst_Resp_PVT;
ROLLBACK TO DELETE_Ge_Chklst_Resp_PVT;
ROLLBACK TO DELETE_Ge_Chklst_Resp_PVT;
End Delete_Ge_Chklst_Resp;
SELECT *
FROM pv_ge_chklst_responses
WHERE chklst_response_id = p_ge_chklst_resp_rec.chklst_response_id;
IF p_ge_chklst_resp_rec.last_updated_by IS NULL THEN
x_complete_rec.last_updated_by := l_ge_chklst_resp_rec.last_updated_by;
IF p_ge_chklst_resp_rec.last_update_date IS NULL THEN
x_complete_rec.last_update_date := l_ge_chklst_resp_rec.last_update_date;
IF p_ge_chklst_resp_rec.last_update_login IS NULL THEN
x_complete_rec.last_update_login := l_ge_chklst_resp_rec.last_update_login;
FOR cur IN (SELECT checklist_item_id FROM pv_ge_chklst_items_b where enabled_flag ='Y'and used_by_entity_id = p_programId and
arc_used_by_entity_code = 'PRGM')
LOOP
l_ge_chklst_resp_rec.checklist_item_id := cur.checklist_item_id;