PACKAGE: APPS.PQP_GB_PSI_LOCATION_CODES

Source

1 PACKAGE PQP_GB_PSI_LOCATION_CODES AUTHID CURRENT_USER AS
2 --  /* $Header: pqpgbpsiloc.pkh 120.0 2006/04/13 05:02:31 anshghos noship $ */
3 
4 
5 
6 --
7 -- Debug Variables.
8 --
9    g_legislation_code   per_business_groups.legislation_code%TYPE   := 'GB';
10    g_debug              BOOLEAN                      := hr_utility.debug_enabled;
11    g_effective_date     DATE;
12    g_extract_type       VARCHAR2(100);
13 
14    g_proc_name           VARCHAR2(61):= 'PQP_GB_PSI_LOCATION_CODES.';
15    g_loc_code            VARCHAR2(150);
16    g_business_group_id   NUMBER := NULL;
17    g_paypoint            VARCHAR2(5);
18 
19 ----------------------------CURSORS ------------------
20 
21   --
22   -- For location code to be fetched from location EIT
23   --
24   CURSOR csr_location_code
25           (p_loc_id        NUMBER
26           ) IS
27   select lei_information2
28   from hr_location_extra_info
29   where information_type = 'PQP_GB_PENSERV_LOCATION_INFO'
30     and location_id = p_loc_id;
31 
32 
33   --
34   -- For location code to be fetched from location EIT
35   --
36   CURSOR csr_location_name
37           (p_loc_id        NUMBER
38           ) IS
39   select location_code
40   from hr_locations_all
41   where location_id = p_loc_id;
42 
43 
44 
45   --
46 
47    -- Debug
48    PROCEDURE DEBUG (
49       p_trace_message    IN   VARCHAR2
50      ,p_trace_location   IN   NUMBER DEFAULT NULL
51    );
52 
53    -- Debug_Enter
54    PROCEDURE debug_enter (
55       p_proc_name   IN   VARCHAR2
56      ,p_trace_on    IN   VARCHAR2 DEFAULT NULL
57    );
58 
59    -- Debug_Exit
60    PROCEDURE debug_exit (
61       p_proc_name   IN   VARCHAR2
62      ,p_trace_off   IN   VARCHAR2 DEFAULT NULL
63    );
64 
65    -- Debug Others
66    PROCEDURE debug_others (
67       p_proc_name   IN   VARCHAR2
68      ,p_proc_step   IN   NUMBER DEFAULT NULL
69    );
70 
71 
72 ---
73 ---
74 ---
75   FUNCTION chk_location_codes_crit
76     (p_business_group_id       IN         NUMBER
77     ,p_loc_id                  IN         VARCHAR2
78     )
79   RETURN VARCHAR2;
80 
81 
82 
83   FUNCTION location_extract_main
84     (p_rule_parameter           IN         VARCHAR2 -- parameter
85     ,p_output                   OUT NOCOPY VARCHAR2
86     )
87   RETURN number;
88 
89 
90   FUNCTION location_codes_post_processing RETURN VARCHAR2;
91 
92 
93 END PQP_GB_PSI_LOCATION_CODES;