[Home] [Help]
9: RETURN BOOLEAN AS
10: BEGIN
11: DECLARE
12:
13: v_language_cd IGS_PE_LANGUAGE_CD%ROWTYPE;
14: CURSOR c_language_cd IS
15: SELECT *
16: FROM IGS_PE_LANGUAGE_CD
17: WHERE govt_language_cd = p_govt_language_cd and
12:
13: v_language_cd IGS_PE_LANGUAGE_CD%ROWTYPE;
14: CURSOR c_language_cd IS
15: SELECT *
16: FROM IGS_PE_LANGUAGE_CD
17: WHERE govt_language_cd = p_govt_language_cd and
18: closed_ind = 'N';
19: BEGIN
20: -- Validate the update on a govt_language_record.
18: closed_ind = 'N';
19: BEGIN
20: -- Validate the update on a govt_language_record.
21: -- A IGS_PE_GOV_COUNTRYCD record cannot be closed if
22: -- there are IGS_PE_LANGUAGE_CD records mapped to it that
23: -- are still open
24: IF (p_closed_ind = 'Y') THEN
25: -- check if open IGS_PE_LANGUAGE_CD records exist
26: OPEN c_language_cd;
21: -- A IGS_PE_GOV_COUNTRYCD record cannot be closed if
22: -- there are IGS_PE_LANGUAGE_CD records mapped to it that
23: -- are still open
24: IF (p_closed_ind = 'Y') THEN
25: -- check if open IGS_PE_LANGUAGE_CD records exist
26: OPEN c_language_cd;
27: FETCH c_language_cd INTO v_language_cd;
28: IF (c_language_cd%FOUND) THEN
29: CLOSE c_language_cd;