The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT substr('M4UXGEN-' || to_char(sysdate,'dd-mon-yyyy') || '-' || lpad(cln_debug_s.nextval,8,'0'),1,28)
INTO l_log_fil
FROM dual;
SELECT UPPER(TRIM(extn_name)), TRIM(trading_partner_id),
UPPER(TRIM(validation_type)), dtd_or_schema_location,
root_node, base_dir
INTO g_hdr_rec.extn_name, g_hdr_rec.tp_id, g_hdr_rec.valdtn_typ, g_hdr_rec.dtd_schma_loc,
g_hdr_rec.xml_root_node, g_hdr_rec.dtd_base_dir
FROM m4u_xml_extensions
WHERE extn_name = a_extn_name
AND trading_partner_id = a_tp_id;
SELECT UPPER(TRIM(extn_name)), TRIM(trading_partner_id),
UPPER(TRIM(validation_type)), dtd_or_schema_location,
root_node, base_dir
INTO g_hdr_rec.extn_name, g_hdr_rec.tp_id, g_hdr_rec.valdtn_typ, g_hdr_rec.dtd_schma_loc,
g_hdr_rec.xml_root_node, g_hdr_rec.dtd_base_dir
FROM m4u_xml_extensions
WHERE extn_name = a_extn_name
AND trading_partner_id = 'M4U_DEFAULT_TP';
SELECT node_id, node_sequence, node_name, UPPER(TRIM(node_type)),
level_id, parent_node_id, UPPER(TRIM(mapping_type)),
UPPER(TRIM(view_name)), UPPER(TRIM(column_name)), view_level_id,
UPPER(TRIM(variable_name)), constant_val
FROM m4u_element_mappings
WHERE extn_name = a_extn_name
AND NVL(trading_partner_id,'@@') = NVL(a_tp_id,'@@')
AND ignore_mapping <> 'Y'
ORDER BY node_sequence ASC;
g_elmnt_map.DELETE;
cln_debug_pub.add('deleted g_elmnt_map',1);
SELECT DISTINCT level_id
FROM m4u_element_mappings
WHERE extn_name = a_extn_name
AND NVL(trading_partner_id,'@@') = NVL(a_tp_id,'@@');
g_lvl_rec_tab.delete;
cln_debug_pub.add('Deleted g_lvl_rec_tab',1);
l_lvl_rec.vals.delete;
SELECT level_id, view_name, where_clause
FROM m4u_level_views
WHERE extn_name = a_extn_name
AND NVL(trading_partner_id,'@@') = NVL(a_tp_id,'@@');
l_view_rec.bind_tab.DELETE;
l_view_rec.col_tab.DELETE;
SELECT DISTINCT UPPER(TRIM(column_name)) col
FROM m4u_element_mappings
WHERE extn_name = a_extn_name AND NVL(trading_partner_id,'@@') = a_tp_id
AND view_level_id = a_lvl_id AND view_name = a_view_nam
AND TRIM(column_name) IS NOT NULL
UNION
SELECT DISTINCT UPPER(TRIM(source_column)) col
FROM m4u_view_binding
WHERE extn_name = a_extn_name AND NVL(trading_partner_id,'@@') = a_tp_id
AND source_level_id = a_lvl_id AND source_view = a_view_nam
AND TRIM(source_column) IS NOT NULL;
x_view_rec.col_tab.delete;
cln_debug_pub.add('Delete - x_view_rec.col_tab',1);
x_view_rec.exec_sql := 'SELECT 1';
SELECT TRIM(bind_variable), UPPER(TRIM(bind_type)),
UPPER(TRIM(source_view)), UPPER(TRIM(source_column)),
UPPER(TRIM(source_var)), source_level_id
FROM m4u_view_binding
WHERE extn_name = a_extn_name
AND NVL(trading_partner_id,'@@') = NVL(a_tp_id,'@@')
AND view_name = a_view_nam
AND level_id = a_lvl_id;
x_view_rec.bind_tab.delete;
cln_debug_pub.add('bind_tab deleted',1);
g_glb_var_tab.DELETE;
cln_debug_pub.add('Deleted g_glb_var_tab',1);
l_vals.delete;
l_lvl_rec.end_tag_stk.delete;
l_lvl_rec.vals.delete;
l_lvl_rec.end_tag_stk.delete;
cln_debug_pub.add('deleted l_lvl_rec.end_tag_stk',1);
l_lvl_rec.vals.delete;
cln_debug_pub.add('deleted l_lvl_rec.vals',1);
g_lvl_stk.delete;
g_elmnt_map.delete;
g_glb_var_tab.delete;
g_lvl_rec_tab.delete;