Subversion Repositories DevTools

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
221 vnguyen 1
CREATE FUNCTION "RELEASE_MANAGER"."GET_V_EXT" (SSpkg_version IN PACKAGE_VERSIONS.pkg_version%TYPE) RETURN VARCHAR2 IS
2
 
3
/* ---------------------------------------------------------------------------
4
    Version: 3.0.0
5
   --------------------------------------------------------------------------- */
6
 
7
    SSV_EXT PACKAGE_VERSIONS.V_EXT%TYPE;
8
    lastDot NUMBER;
9
 
10
BEGIN
11
    lastDot := INSTR (SSpkg_version, '.', -1);
12
 
13
    IF ( lastDot > 0 ) AND ( lastDot != LENGTH(SSpkg_version) )
14
    THEN
15
        -- YES dot separator found --
16
        SSV_EXT := SUBSTR (SSpkg_version, lastDot, LENGTH(SSpkg_version)-lastDot+1);
17
 
18
        IF IS_VERSION_EXTENSION ( SSV_EXT )
19
        THEN
20
            RETURN SSV_EXT;
21
        ELSE
22
            RETURN NULL;
23
        END IF;
24
 
25
    ELSE
26
        -- NO dot separator found --
27
        RETURN NULL;
28
    END IF;
29
 
30
END GET_V_EXT;
31
/