1 Package pqp_atd_bus as
2 /* $Header: pqatdrhi.pkh 120.0.12010000.1 2008/07/28 11:08:00 appldev ship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- |---------------------------< insert_validate >----------------------------|
6 -- ----------------------------------------------------------------------------
7 -- {Start Of Comments}
8 --
9 -- Description:
10 -- This procedure controls the execution of all insert business rules
11 -- validation.
12 --
13 -- Prerequisites:
14 -- This private procedure is called from ins procedure.
15 --
16 -- In Parameters:
17 -- A Pl/Sql record structre.
18 --
19 -- Post Success:
20 -- Processing continues.
21 --
22 -- Post Failure:
23 -- If a business rules fails the error will not be handled by this procedure
24 -- unless explicity coded.
25 --
26 -- Developer Implementation Notes:
27 -- For insert, your business rules should be executed from this procedure and
28 -- should ideally (unless really necessary) just be straight procedure or
29 -- function calls. Try and avoid using conditional branching logic.
30 --
31 -- Access Status:
32 -- Internal Row Handler Use Only.
33 --
34 -- {End Of Comments}
35 -- ----------------------------------------------------------------------------
36 /* The following error message was defined by Ashu Gupta on 08/07/2000 */
37 g_error_message VARCHAR2(4000) := NULL;
38
39 Procedure insert_validate(p_rec in pqp_atd_shd.g_rec_type
40 ,p_effective_date in date);
41 --
42 -- ----------------------------------------------------------------------------
43 -- |---------------------------< update_validate >----------------------------|
44 -- ----------------------------------------------------------------------------
45 -- {Start Of Comments}
46 --
47 -- Description:
48 -- This procedure controls the execution of all update business rules
49 -- validation.
50 --
51 -- Prerequisites:
52 -- This private procedure is called from upd procedure.
53 --
54 -- In Parameters:
55 -- A Pl/Sql record structre.
56 --
57 -- Post Success:
58 -- Processing continues.
59 --
60 -- Post Failure:
61 -- If a business rules fails the error will not be handled by this procedure
62 -- unless explicity coded.
63 --
64 -- Developer Implementation Notes:
65 -- For update, your business rules should be executed from this procedure and
66 -- should ideally (unless really necessary) just be straight procedure or
67 -- function calls. Try and avoid using conditional branching logic.
68 --
69 -- Access Status:
70 -- Internal Row Handler Use Only.
71 --
72 -- {End Of Comments}
73 -- ----------------------------------------------------------------------------
74 Procedure update_validate(p_rec in pqp_atd_shd.g_rec_type
75 ,p_effective_date in date);
76 --
77 -- ----------------------------------------------------------------------------
78 -- |---------------------------< delete_validate >----------------------------|
79 -- ----------------------------------------------------------------------------
80 -- {Start Of Comments}
81 --
82 -- Description:
83 -- This procedure controls the execution of all delete business rules
84 -- validation.
85 --
86 -- Prerequisites:
87 -- This private procedure is called from del procedure.
88 --
89 -- In Parameters:
90 -- A Pl/Sql record structre.
91 --
92 -- Post Success:
93 -- Processing continues.
94 --
95 -- Post Failure:
96 -- If a business rules fails the error will not be handled by this procedure
97 -- unless explicity coded.
98 --
99 -- Developer Implementation Notes:
100 -- For delete, your business rules should be executed from this procedure and
101 -- should ideally (unless really necessary) just be straight procedure or
102 -- function calls. Try and avoid using conditional branching logic.
103 --
104 -- Access Status:
105 -- Internal Row Handler Use Only.
106 --
107 -- {End Of Comments}
108 -- ----------------------------------------------------------------------------
109 Procedure delete_validate(p_rec in pqp_atd_shd.g_rec_type
110 ,p_effective_date in date);
111 --
112 end pqp_atd_bus;