69: -- MODIFICATION HISTORY
70: -- Person Date Comments
71: -- --------- -------- ------------------------------------------
72: -- MSONTER 21/08/98 Initial creation of function
73: FUNCTION repp_val_location( p_location_cd IN OUT NOCOPY IGS_AD_LOCATION_ALL.location_cd%TYPE,
74: p_msg_name OUT NOCOPY VARCHAR2)
75: RETURN BOOLEAN
76: AS
77: --
75: RETURN BOOLEAN
76: AS
77: --
78: -- Local Cursors
79: CURSOR c_loc(cp_loc_cd IGS_AD_LOCATION.location_cd%TYPE)
80: IS
81: SELECT
82: 'x'
83: FROM IGS_AD_LOCATION LOC
79: CURSOR c_loc(cp_loc_cd IGS_AD_LOCATION.location_cd%TYPE)
80: IS
81: SELECT
82: 'x'
83: FROM IGS_AD_LOCATION LOC
84: WHERE
85: loc.location_cd LIKE cp_loc_cd
86: AND loc.closed_ind = 'N';
87: --