PACKAGE BODY: APPS.PER_JBD_BUS

Source

1 package Body per_jbd_bus as
2 /* $Header: pejbdrhi.pkb 115.1 99/07/18 13:54:47 porting ship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- |                     Private Global Definitions                           |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package  varchar2(33)	:= '  per_jbd_bus.';  -- Global package name
9 --
10 -- ----------------------------------------------------------------------------
11 -- |---------------------------< insert_validate >----------------------------|
12 -- ----------------------------------------------------------------------------
13 Procedure insert_validate(p_rec in per_jbd_shd.g_rec_type) is
14 --
15   l_proc  varchar2(72) := g_package||'insert_validate';
16 --
17 Begin
18   hr_utility.set_location('Entering:'||l_proc, 5);
19   --
20   -- Call all supporting business operations
21   --
22   per_jbd_flex.kf(p_rec => p_rec);
23   --
24   hr_utility.set_location(' Leaving:'||l_proc, 10);
25 End insert_validate;
26 --
27 end per_jbd_bus;