[Home] [Help]
4: --msrinivi 24-AUG-2001 Bug No. 1956374 .The function genp_val_prsn_id removed
5: --
6: -- Validate assessment assessor type closed indicator.
7: FUNCTION assp_val_asst_closed(
8: p_ass_assessor_type IN IGS_AS_ASSESSOR_TYPE.ass_assessor_type%TYPE ,
9: P_MESSAGE_NAME OUT NOCOPY VARCHAR2 )
10: RETURN BOOLEAN AS
11:
12: BEGIN -- assp_val_asst_closed
12: BEGIN -- assp_val_asst_closed
13: -- Validate the assessemnt assessor type closed indicator
14: DECLARE
15: CURSOR c_asst(
16: cp_ass_assessor_type IGS_AS_ASSESSOR_TYPE.ass_assessor_type%TYPE) IS
17: SELECT closed_ind
18: FROM IGS_AS_ASSESSOR_TYPE
19: WHERE ass_assessor_type = cp_ass_assessor_type;
20: v_asst_rec c_asst%ROWTYPE;
14: DECLARE
15: CURSOR c_asst(
16: cp_ass_assessor_type IGS_AS_ASSESSOR_TYPE.ass_assessor_type%TYPE) IS
17: SELECT closed_ind
18: FROM IGS_AS_ASSESSOR_TYPE
19: WHERE ass_assessor_type = cp_ass_assessor_type;
20: v_asst_rec c_asst%ROWTYPE;
21: cst_yes CONSTANT CHAR := 'Y';
22: BEGIN