84:
85: /* Version will be something like '9.2.0.5.0' meaning major 9, minor 2*/
86: SELECT version
87: INTO l_version_string 88: FROM v$instance; 89:
90: l_pos1 := instr(l_version_string, '.');
91: if((l_pos1) = 0) then
92: /* Cant parse version. Should never happen. Assume the worst */