468: --| |
469: --+==========================================================================+
470: -- Func end of comments
471: FUNCTION Validate_Type
472: ( p_lookup_type IN gem_lookups.lookup_type%TYPE
473: , p_lookup_code IN gem_lookups.lookup_code%TYPE
474: )
475: RETURN BOOLEAN
476: IS
469: --+==========================================================================+
470: -- Func end of comments
471: FUNCTION Validate_Type
472: ( p_lookup_type IN gem_lookups.lookup_type%TYPE
473: , p_lookup_code IN gem_lookups.lookup_code%TYPE
474: )
475: RETURN BOOLEAN
476: IS
477: l_lookup_type gem_lookups.lookup_type%TYPE;
473: , p_lookup_code IN gem_lookups.lookup_code%TYPE
474: )
475: RETURN BOOLEAN
476: IS
477: l_lookup_type gem_lookups.lookup_type%TYPE;
478: CURSOR gem_lookups_c1 IS
479: SELECT
480: lookup_type
481: FROM
474: )
475: RETURN BOOLEAN
476: IS
477: l_lookup_type gem_lookups.lookup_type%TYPE;
478: CURSOR gem_lookups_c1 IS
479: SELECT
480: lookup_type
481: FROM
482: gem_lookups
478: CURSOR gem_lookups_c1 IS
479: SELECT
480: lookup_type
481: FROM
482: gem_lookups
483: WHERE
484: lookup_type = p_lookup_type
485: AND lookup_code = p_lookup_code;
486:
484: lookup_type = p_lookup_type
485: AND lookup_code = p_lookup_code;
486:
487: BEGIN
488: OPEN gem_lookups_c1;
489: FETCH gem_lookups_c1 INTO l_lookup_type;
490: IF (gem_lookups_c1%NOTFOUND)
491: THEN
492: CLOSE gem_lookups_c1;
485: AND lookup_code = p_lookup_code;
486:
487: BEGIN
488: OPEN gem_lookups_c1;
489: FETCH gem_lookups_c1 INTO l_lookup_type;
490: IF (gem_lookups_c1%NOTFOUND)
491: THEN
492: CLOSE gem_lookups_c1;
493: RETURN FALSE;
486:
487: BEGIN
488: OPEN gem_lookups_c1;
489: FETCH gem_lookups_c1 INTO l_lookup_type;
490: IF (gem_lookups_c1%NOTFOUND)
491: THEN
492: CLOSE gem_lookups_c1;
493: RETURN FALSE;
494: ELSE
488: OPEN gem_lookups_c1;
489: FETCH gem_lookups_c1 INTO l_lookup_type;
490: IF (gem_lookups_c1%NOTFOUND)
491: THEN
492: CLOSE gem_lookups_c1;
493: RETURN FALSE;
494: ELSE
495: CLOSE gem_lookups_c1;
496: RETURN TRUE;
491: THEN
492: CLOSE gem_lookups_c1;
493: RETURN FALSE;
494: ELSE
495: CLOSE gem_lookups_c1;
496: RETURN TRUE;
497: END IF;
498:
499: EXCEPTION