DBA Data[Home] [Help]

PACKAGE: APPS.PER_PCE_BUS

Source


1 PACKAGE per_pce_bus AUTHID CURRENT_USER as
2 /* $Header: pepcerhi.pkh 120.0 2005/05/31 12:56:18 appldev noship $ */
3 --
4 -- ---------------------------------------------------------------------------
5 -- |----------------------< set_security_group_id >--------------------------|
6 -- ---------------------------------------------------------------------------
7 -- {Start Of Comments}
8 --
9 --  Description:
10 --    Sets the security_group_id IN CLIENT_INFO for the appropriate business
11 --    group context.
12 --
13 --  Prerequisites:
14 --    The primary key identified by p_cagr_entitlement_id
15 --     already exists.
16 --
17 --  In Arguments:
18 --    p_cagr_entitlement_id
19 --
20 --
21 --  Post Success:
22 --    The security_group_id will be set IN CLIENT_INFO.
23 --
24 --  Post Failure:
25 --    An error is raised if the value does not exist.
26 --
27 --  Access Status:
28 --    Internal Development Use Only.
29 --
30 -- {End Of Comments}
31 -- ---------------------------------------------------------------------------
32 PROCEDURE set_security_group_id
33   (p_cagr_entitlement_id     IN NUMBER
34   ,p_collective_agreement_id IN per_cagr_entitlements.collective_agreement_ID%TYPE
35   );
36 --
37 --
38 -- ---------------------------------------------------------------------------
39 -- |---------------------< return_legislation_code >-------------------------|
40 -- ---------------------------------------------------------------------------
41 -- {Start Of Comments}
42 --
43 --  Description:
44 --    RETURN the legislation code for a specific primary key value
45 --
46 --  Prerequisites:
47 --    The primary key identified by p_cagr_entitlement_id
48 --     already exists.
49 --
50 --  In Arguments:
51 --    p_cagr_entitlement_id
52 --
53 --
54 --  Post Success:
55 --    The business group's legislation code will be returned.
56 --
57 --  Post Failure:
58 --    An error is raised if the value does not exist.
59 --
60 --  Access Status:
61 --    Internal Development Use Only.
62 --
63 -- {End Of Comments}
64 -- ---------------------------------------------------------------------------
65 FUNCTION return_legislation_code
66   (p_cagr_entitlement_id     IN NUMBER
67   ,p_collective_agreement_id IN per_cagr_entitlements.collective_agreement_ID%TYPE
68   )
69   RETURN VARCHAR2 ;
70 --
71 --
72 -- ----------------------------------------------------------------------------
73 -- |---------------------------< insert_validate >----------------------------|
74 -- ----------------------------------------------------------------------------
75 -- {Start of comments}
76 --
77 -- Description:
78 --   This procedure controls the execution of all insert business rules
79 --   validation.
80 --
81 -- Prerequisites:
82 --   This private procedure is called from ins procedure.
83 --
84 -- In Parameters:
85 --   A Pl/Sql record structure.
86 --
87 -- Post Success:
88 --   Processing continues.
89 --
90 -- Post Failure:
91 --   If a business rules fails the error will not be handled by this procedure
92 --   unless explicity coded.
93 --
94 -- Developer Implementation Notes:
95 --   For insert, your business rules should be executed from this procedure
96 --   and should ideally (unless really necessary) just be straight procedure
97 --   or function calls. Try and avoid using conditional branching logic.
98 --
99 -- Access Status:
100 --   Internal Row Handler Use Only.
101 --
102 -- {End of comments}
103 -- ----------------------------------------------------------------------------
104 PROCEDURE insert_validate
105   (p_effective_date               IN DATE
106   ,p_rec                          IN per_pce_shd.g_rec_type
107   );
108 --
109 -- ----------------------------------------------------------------------------
110 -- |---------------------------< update_validate >----------------------------|
111 -- ----------------------------------------------------------------------------
112 -- {Start Of Comments}
113 --
114 -- Description:
115 --   This procedure controls the execution of all update business rules
116 --   validation.
117 --
118 -- Prerequisites:
119 --   This private procedure is called from upd procedure.
120 --
121 -- In Parameters:
122 --   A Pl/Sql record structure.
123 --
124 -- Post Success:
125 --   Processing continues.
126 --
127 -- Post Failure:
128 --   If a business rules fails the error will not be handled by this procedure
129 --   unless explicity coded.
130 --
131 -- Access Status:
132 --   Internal Row Handler Use Only.
133 --
134 -- {End Of Comments}
135 -- ----------------------------------------------------------------------------
136 PROCEDURE update_validate
137   (p_effective_date               IN DATE
138   ,p_rec                          IN per_pce_shd.g_rec_type
139   );
140 --
141 -- ----------------------------------------------------------------------------
142 -- |---------------------------< delete_validate >----------------------------|
143 -- ----------------------------------------------------------------------------
144 -- {Start Of Comments}
145 --
146 -- Description:
147 --   This procedure controls the execution of all delete business rules
148 --   validation.
149 --
150 -- Prerequisites:
151 --   This private procedure is called from del procedure.
152 --
153 -- In Parameters:
154 --   A Pl/Sql record structure.
155 --
156 -- Post Success:
157 --   Processing continues.
158 --
159 -- Post Failure:
160 --   If a business rules fails the error will not be handled by this procedure
161 --   unless explicity coded.
162 --
163 -- Developer Implementation Notes:
164 --   For delete, your business rules should be executed from this procedure
165 --   and should ideally (unless really necessary) just be straight procedure
166 --   or function calls. Try and avoid using conditional branching logic.
167 --
168 -- Access Status:
169 --   Internal Row Handler Use Only.
170 --
171 -- {End Of Comments}
172 -- ----------------------------------------------------------------------------
173 PROCEDURE delete_validate
174   (p_rec              IN per_pce_shd.g_rec_type
175   );
176 --
177 -- ----------------------------------------------------------------------------
178 -- |----------------------------< chk_start_date >----------------------------|
179 -- ----------------------------------------------------------------------------
180 -- {Start Of Comments}
181 --
182 -- Description:
183 --   This procedure is used to validate the start date
184 --
185 -- Prerequisites:
186 --   This is a private function and can only be called from the ins or upd
187 --   attribute processes.
188 --
189 -- In Parameters:
190 --
191 -- Post Success:
192 --   A returning record structure will be returned.
193 --
194 -- Post Failure:
195 --   If the validation fails a error message will be raised.
196 --
197 -- Developer Implementation Notes:
198 --   None.
199 --
200 -- Access Status:
201 --   Internal Development Use Only.
202 --
203 -- {End Of Comments}
204 -- ----------------------------------------------------------------------------
205 --
206 PROCEDURE chk_start_date
207   (p_cagr_entitlement_id     IN per_cagr_entitlements.cagr_entitlement_id%TYPE
208   ,p_start_date              IN per_cagr_entitlements.start_date%TYPE
209   ,p_end_date                IN per_cagr_entitlements.end_date%TYPE
210   ,p_collective_Agreement_id IN per_cagr_entitlements.collective_agreement_id%TYPE
211   );
212 --
213 -- ----------------------------------------------------------------------------
214 -- |-----------------------------< chk_end_date >-----------------------------|
215 -- ----------------------------------------------------------------------------
216 -- {Start Of Comments}
217 --
218 -- Description:
219 --   This procedure is used to validate the end date
220 --
221 -- Prerequisites:
222 --   This is a private function and can only be called from the ins or upd
223 --   attribute processes.
224 --
225 -- In Parameters:
226 --
227 -- Post Success:
228 --   A returning record structure will be returned.
229 --
230 -- Post Failure:
231 --   If the validation fails a error message will be raised.
232 --
233 -- Developer Implementation Notes:
234 --   None.
235 --
236 -- Access Status:
237 --   Internal Development Use Only.
238 --
239 -- {End Of Comments}
240 -- ----------------------------------------------------------------------------
241 PROCEDURE chk_end_date
242   (p_cagr_entitlement_id     IN per_cagr_entitlements.cagr_entitlement_id%TYPE
243   ,p_start_date              IN per_cagr_entitlements.start_date%TYPE
244   ,p_end_date                IN per_cagr_entitlements.end_date%TYPE
245   ,p_effective_date          IN DATE
246   );
247 END per_pce_bus;