The following lines contain the word 'select', 'insert', 'update' or 'delete':
select list_source_code into l_list_source_code
from qp_list_headers_b
where list_header_id = p_PRICE_LIST_LINE_tbl(1).list_header_id;
select list_source_code into l_list_source_code
from qp_list_headers_b
where list_header_id = (select list_header_id from qp_list_lines
where list_line_id = p_PRICE_LIST_LINE_tbl(1).list_line_id);