DBA Data[Home] [Help]

PACKAGE BODY: APPS.IGS_PS_VAL_COP

Source


1 PACKAGE BODY IGS_PS_VAL_COp AS
2 /* $Header: IGSPS27B.pls 115.5 2002/11/29 03:00:05 nsidana ship $ */
3   -------------------------------------------------------------------------------------------
4   --Change History:
5   --Who         When            What
6   --smadathi    28-AUG-2001     Bug No. 1956374 .The function genp_val_staff_prsn removed
7 
8   -------------------------------------------------------------------------------------------
9   --
10   -- Validate IGS_PS_COURSE Offering Option is active.
11   FUNCTION CRSP_VAL_COO_INACTIV(
12   p_course_cd IN VARCHAR2 ,
13   p_version_number IN NUMBER ,
14   p_cal_type IN VARCHAR2 ,
15   p_location_cd IN VARCHAR2 ,
16   p_attendance_mode IN VARCHAR2 ,
17   p_attendance_type IN VARCHAR2 ,
18   p_message_name OUT NOCOPY VARCHAR2 )
19   RETURN BOOLEAN AS
20   BEGIN
21   	p_message_name := NULL;
22   	-- check for INACTIVE IGS_PS_VER
23   	IF (IGS_PS_VAL_CRS.crsp_val_iud_crv_dtl(
24   			p_course_cd,
25   			p_version_number,
26   			p_message_name) = FALSE) THEN
27   		RETURN FALSE;
28   	END IF;
29   	-- Check for closed calendar type
30   	IF (IGS_CA_GEN_002.CALP_VAL_CI_CAT(p_cal_type, p_message_name) = FALSE) THEN
31   		RETURN FALSE;
32   	END IF;
33   	-- Check for closed IGS_AD_LOCATION code
34   	-- As part of the bug# 1956374 changed to the below call from IGS_PS_VAL_COO.crsp_val_loc_cd
35   	IF (IGS_PS_VAL_UOO.crsp_val_loc_cd(
36   			p_location_cd,
37   			p_message_name) = FALSE) THEN
38   		RETURN FALSE;
39   	END IF;
40   	-- Check for closed attendance mode
41   	IF (IGS_PS_VAL_COo.crsp_val_coo_am(
42   			p_attendance_mode,
43   			p_message_name) = FALSE) THEN
44   		RETURN FALSE;
45   	END IF;
46   	-- Check for closed attendance type
47   	IF (IGS_PS_VAL_COo.crsp_val_coo_att(
48   			p_attendance_type,
49   			p_message_name) = FALSE) THEN
50   		RETURN FALSE;
51   	END IF;
52   	RETURN TRUE;
53   END crsp_val_coo_inactiv;
54 END IGS_PS_VAL_COp;