The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT oagrl.id, oagrl.segment, oagrl.segment_number,
oagrl.agr_id, oagrl.source, oagrl.constants
FROM okl_acc_gen_rules_v oagr, okl_acc_gen_rul_lns_v oagrl
WHERE oagr.id = oagrl.agr_id
AND ae_line_type = p_ae_line_type
ORDER BY segment_number ASC;
l_select_string VARCHAR2(4000);
l_column_name OKL_AG_SOURCE_MAPS.SELECT_COLUMN%TYPE;
l_select_clause VARCHAR2(1000) := ' SELECT ';
SELECT select_column
FROM OKL_AG_SOURCE_MAPS
WHERE ae_line_type = p_ae_line_type
AND source = p_source_table;
l_select_string := l_select_clause || l_column_name || l_from_clause || p_source_table || l_where_clause ;
OPEN source_rec FOR l_select_string USING p_primary_key;
OPEN source_rec FOR l_select_string USING p_primary_key, p_primary_key;
l_select_string := l_select_clause || p_segment || l_from_clause || l_gl_table ||
' WHERE ' || l_ccid_column || l_equal_clause || ':1';
OPEN source_rec FOR l_select_string USING l_source_ccid;
SELECT ID,
CODE_COMBINATION_ID
FROM OKL_AE_TMPT_LNES
WHERE id = p_atl_id;