FUNCTION: SYS.FOR_VERSION_BEGINNING

Source

1 FUNCTION for_version_beginning (v_filename IN VARCHAR2, v_version IN VARCHAR2)
2   RETURN VARCHAR2 AS
3   l_version VARCHAR2(10);
4 BEGIN
5   SELECT substr(dbms_registry.version('CATPROC'), 1, 10)
6     INTO l_version
7     FROM dual;
8 
9   IF (l_version >= v_version ) THEN
10     RETURN v_filename;
11   ELSE
12     RETURN dbms_registry.nothing_script;
13   END IF;
14 
15 END for_version_beginning;