1694: l_instance_role := 'PRIMARY_INSTANCE';
1695:
1696: -- Get the db version before the first '.'
1697: SELECT TO_NUMBER(substr(trim(VI.version), 1, instr(trim(VI.version), '.', 1, 1) - 1)) INTO l_db_ver 1698: FROM v$instance VI 1699: WHERE VI.instance_role = l_instance_role;
1700:
1701: RETURN l_db_ver;
1702: