FUNCTION: APPS.GET_CONTACT_POINT_COUNT

Source

1 FUNCTION      Get_Contact_Point_Count
2 				   ( P_PHONE_NUMBER_S1 IN VARCHAR2
3 				   , P_PHONE_NUMBER_S2 IN VARCHAR2
4 				   , P_PHONE_NUMBER_S3 IN VARCHAR2
5 				   , P_PHONE_NUMBER_S4 IN VARCHAR2
6 				   , P_PHONE_NUMBER_S5 IN VARCHAR2
7 				   , P_PHONE_NUMBER_S6 IN VARCHAR2
8 				   )
9 				RETURN NUMBER
10 				IS
11 				   l_num_contact_points NUMBER(5);
12 				BEGIN
13 
14 				   	l_num_contact_points := 0;
15 
16 					IF P_PHONE_NUMBER_S1 IS NOT NULL THEN
17 						l_num_contact_points := l_num_contact_points + 1;
18 					END IF;
19 
20 					IF P_PHONE_NUMBER_S2 IS NOT NULL THEN
21 						l_num_contact_points := l_num_contact_points + 1;
22 					END IF;
23 
24 					IF P_PHONE_NUMBER_S3 IS NOT NULL THEN
25 						l_num_contact_points := l_num_contact_points + 1;
26 					END IF;
27 
28 					IF P_PHONE_NUMBER_S4 IS NOT NULL THEN
29 						l_num_contact_points := l_num_contact_points + 1;
30 					END IF;
31 
32 					IF P_PHONE_NUMBER_S5 IS NOT NULL THEN
33 						l_num_contact_points := l_num_contact_points + 1;
34 					END IF;
35 
36 					IF P_PHONE_NUMBER_S6 IS NOT NULL THEN
37 						l_num_contact_points := l_num_contact_points + 1;
38 					END IF;
39 
40 				RETURN l_num_contact_points;
41 
42 				END Get_Contact_Point_Count;