[Home] [Help]
11: BEGIN -- grdp_val_award_type
12: -- Description: Validate the award specified by the award_cd has a
13: -- s_award_type the same as that supplied.
14: DECLARE
15: v_award_rec IGS_PS_AWD.s_award_type%TYPE;
16: v_ret_val BOOLEAN DEFAULT TRUE;
17: cst_course CONSTANT VARCHAR2(6) := 'COURSE';
18: cst_honorary CONSTANT VARCHAR2(8) := 'HONORARY';
19: cst_special CONSTANT VARCHAR2(7) := 'SPECIAL';
18: cst_honorary CONSTANT VARCHAR2(8) := 'HONORARY';
19: cst_special CONSTANT VARCHAR2(7) := 'SPECIAL';
20: CURSOR c_award IS
21: SELECT s_award_type
22: FROM IGS_PS_AWD
23: WHERE award_cd = p_award_cd;
24: BEGIN
25: p_message_name := NULL;
26: IF p_award_cd IS NULL OR
112: p_award_cd IN VARCHAR2 ,
113: p_message_name OUT NOCOPY VARCHAR2 )
114: RETURN BOOLEAN AS
115: v_other_detail VARCHAR(255);
116: v_closed_ind IGS_PS_AWD.closed_ind%TYPE;
117: CURSOR c_aw IS
118: SELECT closed_ind
119: FROM IGS_PS_AWD aw
120: WHERE aw.award_cd = p_award_cd;
115: v_other_detail VARCHAR(255);
116: v_closed_ind IGS_PS_AWD.closed_ind%TYPE;
117: CURSOR c_aw IS
118: SELECT closed_ind
119: FROM IGS_PS_AWD aw
120: WHERE aw.award_cd = p_award_cd;
121: BEGIN
122: -- check if the award is closed
123: OPEN c_aw;