The following lines contain the word 'select', 'insert', 'update' or 'delete':
ELSIF l_CON_rec.operation = QP_GLOBALS.G_OPR_UPDATE
OR l_CON_rec.operation = QP_GLOBALS.G_OPR_DELETE
THEN
l_CON_rec.db_flag := FND_API.G_TRUE;
IF l_CON_rec.operation = QP_GLOBALS.G_OPR_DELETE THEN
QP_Validate_Con.Entity_Delete
( x_return_status => l_return_status
, p_CON_rec => l_CON_rec
);
IF l_CON_rec.operation = QP_GLOBALS.G_OPR_DELETE THEN
QP_Con_Util.Delete_Row
( p_prc_context_id => l_CON_rec.prc_context_id
);
l_CON_rec.last_update_date := SYSDATE;
l_CON_rec.last_updated_by := FND_GLOBAL.USER_ID;
l_CON_rec.last_update_login := FND_GLOBAL.LOGIN_ID;
IF l_CON_rec.operation = QP_GLOBALS.G_OPR_UPDATE THEN
QP_Con_Util.Update_Row (l_CON_rec);
QP_Con_Util.Insert_Row (l_CON_rec);
ELSIF l_SEG_rec.operation = QP_GLOBALS.G_OPR_UPDATE
OR l_SEG_rec.operation = QP_GLOBALS.G_OPR_DELETE
THEN
l_SEG_rec.db_flag := FND_API.G_TRUE;
IF l_SEG_rec.operation = QP_GLOBALS.G_OPR_DELETE THEN
QP_Validate_Seg.Entity_Delete
( x_return_status => l_return_status
, p_SEG_rec => l_SEG_rec
);
IF l_SEG_rec.operation = QP_GLOBALS.G_OPR_DELETE THEN
QP_Seg_Util.Delete_Row
( p_segment_id => l_SEG_rec.segment_id
);
l_SEG_rec.last_update_date := SYSDATE;
l_SEG_rec.last_updated_by := FND_GLOBAL.USER_ID;
l_SEG_rec.last_update_login := FND_GLOBAL.LOGIN_ID;
IF l_SEG_rec.operation = QP_GLOBALS.G_OPR_UPDATE THEN
QP_Seg_Util.Update_Row (l_SEG_rec);
QP_Seg_Util.Insert_Row (l_SEG_rec);