2033: --| Validates seq_dpnd_class |
2034: --| |
2035: --| DESCRIPTION |
2036: --| This function validates that Sequence Dependent Class exists |
2037: --| on cr_sqdt_cls |
2038: --| |
2039: --| PARAMETERS |
2040: --| p_seq_dpnd_class IN VARCHAR2(8) - Sequence Dependent Class |
2041: --| |
2052: )
2053: RETURN BOOLEAN
2054: IS
2055: l_seq_dpnd_class ic_item_mst.seq_dpnd_class%TYPE;
2056: CURSOR cr_sqdt_cls_c1 IS
2057: SELECT
2058: seq_dpnd_class
2059: FROM
2060: cr_sqdt_cls
2056: CURSOR cr_sqdt_cls_c1 IS
2057: SELECT
2058: seq_dpnd_class
2059: FROM
2060: cr_sqdt_cls
2061: WHERE
2062: cr_sqdt_cls.seq_dpnd_class = p_seq_dpnd_class
2063: AND cr_sqdt_cls.delete_mark = 0;
2064:
2058: seq_dpnd_class
2059: FROM
2060: cr_sqdt_cls
2061: WHERE
2062: cr_sqdt_cls.seq_dpnd_class = p_seq_dpnd_class
2063: AND cr_sqdt_cls.delete_mark = 0;
2064:
2065: BEGIN
2066:
2059: FROM
2060: cr_sqdt_cls
2061: WHERE
2062: cr_sqdt_cls.seq_dpnd_class = p_seq_dpnd_class
2063: AND cr_sqdt_cls.delete_mark = 0;
2064:
2065: BEGIN
2066:
2067: OPEN cr_sqdt_cls_c1;
2063: AND cr_sqdt_cls.delete_mark = 0;
2064:
2065: BEGIN
2066:
2067: OPEN cr_sqdt_cls_c1;
2068: FETCH cr_sqdt_cls_c1 INTO l_seq_dpnd_class;
2069: IF (cr_sqdt_cls_c1%NOTFOUND)
2070: THEN
2071: CLOSE cr_sqdt_cls_c1;
2064:
2065: BEGIN
2066:
2067: OPEN cr_sqdt_cls_c1;
2068: FETCH cr_sqdt_cls_c1 INTO l_seq_dpnd_class;
2069: IF (cr_sqdt_cls_c1%NOTFOUND)
2070: THEN
2071: CLOSE cr_sqdt_cls_c1;
2072: RETURN FALSE;
2065: BEGIN
2066:
2067: OPEN cr_sqdt_cls_c1;
2068: FETCH cr_sqdt_cls_c1 INTO l_seq_dpnd_class;
2069: IF (cr_sqdt_cls_c1%NOTFOUND)
2070: THEN
2071: CLOSE cr_sqdt_cls_c1;
2072: RETURN FALSE;
2073: ELSE
2067: OPEN cr_sqdt_cls_c1;
2068: FETCH cr_sqdt_cls_c1 INTO l_seq_dpnd_class;
2069: IF (cr_sqdt_cls_c1%NOTFOUND)
2070: THEN
2071: CLOSE cr_sqdt_cls_c1;
2072: RETURN FALSE;
2073: ELSE
2074: CLOSE cr_sqdt_cls_c1;
2075: RETURN TRUE;
2070: THEN
2071: CLOSE cr_sqdt_cls_c1;
2072: RETURN FALSE;
2073: ELSE
2074: CLOSE cr_sqdt_cls_c1;
2075: RETURN TRUE;
2076: END IF;
2077:
2078: EXCEPTION