PACKAGE BODY: APPS.IGI_CIS_GET_PROFILE

Source

1 PACKAGE BODY IGI_CIS_GET_PROFILE AS
2 /* $Header: igicisab.pls 115.5 2002/08/29 15:06:45 sbrewer ship $ */
3 
4     FUNCTION Cis_Tax_Code RETURN VARCHAR2 IS
5         l_profile_option_value fnd_profile_option_values.profile_option_value%TYPE;
6     BEGIN
7 
8         SELECT profile_option_value
9         INTO   l_profile_option_value
10         FROM   fnd_profile_option_values fpov
11               ,fnd_profile_options       fpo
12         WHERE  UPPER(fpo.profile_option_name) = 'IGI_CIS_TAX_CODE'
13         AND    fpov.profile_option_id = fpo.profile_option_id
14         AND    fpov.level_id = 10001;
15 
16         RETURN l_profile_option_value;
17 
18     EXCEPTION
19         WHEN NO_DATA_FOUND THEN
20             l_profile_option_value := 'CIS';
21             RETURN l_profile_option_value;
22         WHEN TOO_MANY_ROWS THEN
23             l_profile_option_value := 'CIS';
24             RETURN l_profile_option_value;
25         WHEN OTHERS THEN
26             l_profile_option_value := 'CIS';
27             RETURN l_profile_option_value;
28     END Cis_Tax_Code;
29 
30     FUNCTION Cis_Tax_Group RETURN VARCHAR2 IS
31         l_profile_option_value fnd_profile_option_values.profile_option_value%TYPE;
32     BEGIN
33 
34         SELECT profile_option_value
35         INTO   l_profile_option_value
36         FROM   fnd_profile_option_values fpov
37               ,fnd_profile_options       fpo
38         WHERE  UPPER(fpo.profile_option_name) = 'IGI_CIS_TAX_GROUP'
39         AND    fpov.profile_option_id = fpo.profile_option_id
40         AND    fpov.level_id = 10001;
41 
42         RETURN l_profile_option_value;
43 
44     EXCEPTION
45         WHEN NO_DATA_FOUND THEN
46             l_profile_option_value := 'CIS';
47             RETURN l_profile_option_value;
48         WHEN TOO_MANY_ROWS THEN
49             l_profile_option_value := 'CIS';
50             RETURN l_profile_option_value;
51         WHEN OTHERS THEN
52             l_profile_option_value := 'CIS';
53             RETURN l_profile_option_value;
54     END Cis_Tax_Group;
55 
56 END IGI_CIS_GET_PROFILE;