PACKAGE BODY: APPS.PAY_NAF_BUS

Source

1 PACKAGE BODY pay_naf_bus
2  /* $Header: pynafrhi.pkb 120.1.12020000.1 2012/08/14 10:05:06 achandwa noship $ */
3  AS
4 
5   g_package varchar2(33) DEFAULT 'pay_naf_bus.';
6 
7   PROCEDURE insert_validate
8     (p_rec IN OUT NOCOPY pay_naf_shd.g_rec_type) IS
9     l_proc varchar2(72) DEFAULT g_package
10                                 || 'insert_validate';
11   BEGIN
12     hr_utility.set_location ('Entering:'
13                              || l_proc
14                             ,5);
15 
16     hr_utility.set_location (' Leaving:'
17                              || l_proc
18                             ,10);
19   END insert_validate;
20 
21   PROCEDURE update_validate
22     (p_rec IN OUT NOCOPY pay_naf_shd.g_rec_type) IS
23     l_proc varchar2(72) DEFAULT g_package
24                                 || 'insert_validate';
25   BEGIN
26     hr_utility.set_location ('Entering:'
27                              || l_proc
28                             ,5);
29 
30     hr_utility.set_location (' Leaving:'
31                              || l_proc
32                             ,10);
33   END update_validate;
34 
35   PROCEDURE delete_validate
36     (p_rec IN pay_naf_shd.g_rec_type) IS
37     l_proc varchar2(72) DEFAULT g_package
38                                 || 'insert_validate';
39   BEGIN
40     hr_utility.set_location ('Entering:'
41                              || l_proc
42                             ,5);
43 
44     hr_utility.set_location (' Leaving:'
45                              || l_proc
46                             ,10);
47   END delete_validate;
48 END pay_naf_bus;