[Home] [Help]
PACKAGE BODY: APPS.GHR_CPDF_CHECK4A
Source
1 package body GHR_CPDF_CHECK4A as
2 /* $Header: ghcpdf4a.pkb 120.6.12010000.2 2008/08/05 15:03:30 ubhat ship $ */
3
4 -- Legal Authority
5
6 procedure chk_Legal_Authority_a
7 (p_To_Play_Plan in varchar2
8 ,p_Agency_Sub_Element in varchar2
9 ,p_First_Action_NOA_LA_Code1 in varchar2
10 ,p_First_Action_NOA_LA_Code2 in varchar2
11 ,p_First_NOAC_Lookup_Code in varchar2
12 ,p_effective_date in date
13 ,p_position_occupied_code in varchar2
14 ) is
15 begin
16
17 --300.07.2
18 if p_First_NOAC_Lookup_Code= '302'
19 and
20 NOT ( p_First_Action_NOA_LA_Code1 in
21 ('SQM','SRM','UFM','USM','V8V') AND
22 p_First_Action_NOA_LA_Code2 in
23 ('SQM','SRM','UFM','USM','V8V') ) THEN
24 hr_utility.set_message(8301, 'GHR_37348_ALL_PROCEDURE_FAIL');
25 hr_utility.raise_error;
26 end if;
27
28 --300.10.2
29 if p_First_NOAC_Lookup_Code= '303'
30 and
31 NOT ( p_First_Action_NOA_LA_Code1 in
32 ('AZM','USM','V3P','V8V','ZLM') AND
33 p_First_Action_NOA_LA_Code2 in
34 ('AZM','USM','V3P','V8V','ZLM') ) THEN
35 hr_utility.set_message(8301, 'GHR_37349_ALL_PROCEDURE_FAIL');
36 hr_utility.raise_error;
37 end if;
38
39 --300.13.2
40 if p_First_NOAC_Lookup_Code= '304'
41 and
42 NOT ( p_First_Action_NOA_LA_Code1 in
43 ('SQM','USM','V8V') AND
44 p_First_Action_NOA_LA_Code2 in
45 ('SQM','USM','V8V') ) THEN
46 hr_utility.set_message(8301, 'GHR_37350_ALL_PROCEDURE_FAIL');
47 hr_utility.raise_error;
48 end if;
49
50 --300.16.2
51 -- added 'Z2U' on 22-jul-1998
52 -- Update/Change Date By Effective Date Comment
53 -- 10/2 08/13/99 vravikan 01-Aug-1999 Change R5M to R6M
54 if p_effective_date >= fnd_date.canonical_to_date('19'||'99/08/01') then
55 if p_First_NOAC_Lookup_Code= '312'
56 and
57 NOT ( p_First_Action_NOA_LA_Code1 in
58 ('RPM','RPR','RQM','RRM','RSM','RTM','RTR','RUM','RWM',
59 'RXM','R6M','R7M','R8M','R9M','V8V','Z2U','ZVB','ZVC') AND
60 p_First_Action_NOA_LA_Code2 in
61 ('RPM','RPR','RQM','RRM','RSM','RTM','RTR','RUM','RWM',
62 'RXM','R6M','R7M','R8M','R9M','V8V','Z2U','ZVB','ZVC') ) THEN
63 hr_utility.set_message(8301, 'GHR_37082_ALL_PROCEDURE_FAIL');
64 hr_utility.raise_error;
65 end if;
66 else
67 if p_First_NOAC_Lookup_Code= '312'
68 and
69 NOT ( p_First_Action_NOA_LA_Code1 in
70 ('RPM','RPR','RQM','RRM','RSM','RTM','RTR','RUM','RWM',
71 'RXM','R5M','R7M','R8M','R9M','V8V','Z2U','ZVB','ZVC') AND
72 p_First_Action_NOA_LA_Code2 in
73 ('RPM','RPR','RQM','RRM','RSM','RTM','RTR','RUM','RWM',
74 'RXM','R5M','R7M','R8M','R9M','V8V','Z2U','ZVB','ZVC') ) THEN
75 hr_utility.set_message(8301, 'GHR_37351_ALL_PROCEDURE_FAIL');
76 hr_utility.raise_error;
77 end if;
78 end if;
79
80 --300.19.2
81 -- Update/Change Date By Effective Date Comment
82 -- 10/2 08/13/99 vravikan 01-Aug-1999 Change R5M to R6M
83 if p_effective_date >= fnd_date.canonical_to_date('19'||'99/08/01') then
84 if p_First_NOAC_Lookup_Code= '317'
85 and
86 NOT ( p_First_Action_NOA_LA_Code1 in
87 ('RPM','RQM','RRM','RSM','RUM','R6M','R7M','R8M','R9M','V8V','ZVB','ZVC') AND
88 p_First_Action_NOA_LA_Code2 in
89 ('RPM','RQM','RRM','RSM','RUM','R6M','R7M','R8M','R9M','V8V','ZVB','ZVC') ) THEN
90 hr_utility.set_message(8301, 'GHR_37083_ALL_PROCEDURE_FAIL');
91 hr_utility.raise_error;
92 end if;
93 else
94 if p_First_NOAC_Lookup_Code= '317'
95 and
96 NOT ( p_First_Action_NOA_LA_Code1 in
97 ('RPM','RQM','RRM','RSM','RUM','R5M','R7M','R8M','R9M','V8V','ZVB','ZVC') AND
98 p_First_Action_NOA_LA_Code2 in
99 ('RPM','RQM','RRM','RSM','RUM','R5M','R7M','R8M','R9M','V8V','ZVB','ZVC') ) THEN
100 hr_utility.set_message(8301, 'GHR_37352_ALL_PROCEDURE_FAIL');
101 hr_utility.raise_error;
102 end if;
103 end if;
104
105 --305.02.2
106 -- added 'Z2U' on 22-jul-1998
107 -- added 'Z2W' on 9-oct-98
108 -- Upd 47 23-Jun-06 Raju From Begining Added VAA
109 if p_First_NOAC_Lookup_Code= '330'
110 and
111 NOT ( p_First_Action_NOA_LA_Code1 in
112 ('HAM','LTM','LUM','QGM','QHM','RYM','UAM','UFM','VAA','VAJ','VHJ','VJJ','VWP',
113 'VWR','V2J','V4J','V5J','V6J','V7J','V8J','V8K','V8V','V9A','V9B','Z2U',
114 'Z2W','ZEM','ZLM','ZVB','ZVC') AND
115 p_First_Action_NOA_LA_Code2 in
116 ('HAM','LTM','LUM','QGM','QHM','RYM','UAM','UFM','VAA','VAJ','VHJ','VJJ','VWP',
117 'VWR','V2J','V4J','V5J','V6J','V7J','V8J','V8K','V8V','V9A','V9B','Z2U',
118 'Z2W','ZEM','ZLM','ZVB','ZVC') ) THEN
119 hr_utility.set_message(8301, 'GHR_37353_ALL_PROCEDURE_FAIL');
120 hr_utility.raise_error;
121 end if;
122
123 --307.02.2
124 -- Renumbered from 307.01.2
125 if p_First_NOAC_Lookup_Code= '351'
126 and
127 NOT ( p_First_Action_NOA_LA_Code1 ='RPM' AND
128 p_First_Action_NOA_LA_Code2 ='RPM' ) THEN
129 hr_utility.set_message(8301, 'GHR_37354_ALL_PROCEDURE_FAIL');
130 hr_utility.raise_error;
131 end if;
132
133 --310.02.2
134 -- added 'Z2U' on 22-jul-1998
135 if p_First_NOAC_Lookup_Code= '352'
136 and
137 NOT ( p_First_Action_NOA_LA_Code1 in
138 ('DBM','DFM','DKM','HAM','PDM','PZM','VCR','VCS','VCT',
139 'VCW','VDJ','V8V','Z2U','ZPM','ZVB','ZVC') AND
140 p_First_Action_NOA_LA_Code2 in
141 ('DBM','DFM','DKM','HAM','PDM','PZM','VCR','VCS','VCT',
142 'VCW','VDJ','V8V','Z2U','ZPM','ZVB','ZVC') ) THEN
143 hr_utility.set_message(8301, 'GHR_37355_ALL_PROCEDURE_FAIL');
144 hr_utility.raise_error;
145 end if;
146
147 --310.05.2
148 -- Update/Change Date By Effective Date Comment
149 -- 9/5 08/12/99 vravikan 01-Apr-1999 Add ZJV
150 -- 2038423 10/08/01 vravikan Add ZJW
151
152 if p_effective_date >= to_date('1999/04/01','yyyy/mm/dd') then
153
154 if p_First_NOAC_Lookup_Code= '353'
155 and
156 NOT ( p_First_Action_NOA_LA_Code1 in
157 ('Q3K','UFM','V8V','ZJR','ZJS','ZJT','ZJU','ZJV','ZJW','ZVB','ZVC') AND
158 p_First_Action_NOA_LA_Code2 in
159 ('Q3K','UFM','V8V','ZJR','ZJS','ZJT','ZJU','ZJV','ZJW','ZVB','ZVC') ) THEN
160 hr_utility.set_message(8301, 'GHR_37167_ALL_PROCEDURE_FAIL');
161 hr_utility.raise_error;
162 end if;
163 else
164 if p_First_NOAC_Lookup_Code= '353'
165 and
166 NOT ( p_First_Action_NOA_LA_Code1 in
167 ('Q3K','UFM','V8V','ZJR','ZJS','ZJT','ZJU','ZJW','ZVB','ZVC') AND
168 p_First_Action_NOA_LA_Code2 in
169 ('Q3K','UFM','V8V','ZJR','ZJS','ZJT','ZJU','ZJW','ZVB','ZVC') ) THEN
170 hr_utility.set_message(8301, 'GHR_37356_ALL_PROCEDURE_FAIL');
171 hr_utility.raise_error;
172 end if;
173 end if;
174 --310.11.2
175 -- added legal authority Z2W on 9-oct-98
176 --upd47 26-Jun-06 Raju From Beginning Added Z5N
177 if p_First_NOAC_Lookup_Code= '356' and
178 NOT ( p_First_Action_NOA_LA_Code1 in
179 ('HAM','PNM','PNR','UAM','UFM','VDK','VGL','V8K','V8V','Z2W','ZVB','ZVC','Z5N') AND
180 p_First_Action_NOA_LA_Code2 in
181 ('HAM','PNM','PNR','UAM','UFM','VDK','VGL','V8K','V8V','Z2W','ZVB','ZVC','Z5N') ) THEN
182 hr_utility.set_message(8301, 'GHR_37357_ALL_PROCEDURE_FAIL');
183 hr_utility.raise_error;
184 end if;
185
186 --310.14.2
187 -- added 'Z2U' on 22-jul-1998
188 if p_First_NOAC_Lookup_Code= '357'
189 and
190 NOT ( p_First_Action_NOA_LA_Code1 in
191 ('A3M','C7M','HAM','LTM','LUM','MUM','R9Q','UAM','UFM',
192 'USM','UTM','UXM','UYM','VAA','VCM','V8K','V8N','V8V',
193 'Z2U','ZLJ','ZLK','ZLL','ZLM','ZVB','ZVC') AND
194 p_First_Action_NOA_LA_Code2 in
195 ('A3M','C7M','HAM','LTM','LUM','MUM','R9Q','UAM','UFM',
196 'USM','UTM','UXM','UYM','VAA','VCM','V8K','V8N','V8V',
197 'Z2U','ZLJ','ZLK','ZLL','ZLM','ZVB','ZVC') ) THEN
198 hr_utility.set_message(8301, 'GHR_37358_ALL_PROCEDURE_FAIL');
199 hr_utility.raise_error;
200 end if;
201
202 --315.02.2
203 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
204 -- added 'Z2U' on 22-jul-1998
205 if p_effective_date >= fnd_date.canonical_to_date('19'||'99/01/01') then
206 if p_First_NOAC_Lookup_Code= '385'
207 and
208 NOT ( p_First_Action_NOA_LA_Code1 in
209 ( 'HAM','L2M','L4M','L5M','L6M','L8M','LXM','UFM','VGL',
210 'VUM','VYM','V2M','V8V','Z2U','ZSP','ZVB','ZVC') AND
211 p_First_Action_NOA_LA_Code2 in
212 ('HAM','L2M','L4M','L5M','L6M','L8M','LXM','UFM','VGL',
213 'VUM','VYM','V2M','V8V','Z2U','ZSP','ZVB','ZVC') ) THEN
214 hr_utility.set_message(8301, 'GHR_37095_ALL_PROCEDURE_FAIL');
215 hr_utility.raise_error;
216 end if;
217
218 else
219 if p_First_NOAC_Lookup_Code= '385'
220 and
221 NOT ( p_First_Action_NOA_LA_Code1 in
222 ( 'HAM','L2M','L4M','L5M','L6M','L8M','LXM','UFM',
223 'VUM','VYM','V2M','V8V','Z2U','ZSP','ZVB','ZVC') AND
224 p_First_Action_NOA_LA_Code2 in
225 ('HAM','L2M','L4M','L5M','L6M','L8M','LXM','UFM',
226 'VUM','VYM','V2M','V8V','Z2U','ZSP','ZVB','ZVC') ) THEN
227 hr_utility.set_message(8301, 'GHR_37359_ALL_PROCEDURE_FAIL');
228 hr_utility.raise_error;
229 end if;
230 end if;
231 --320.02.2
232 if p_First_NOAC_Lookup_Code= '430' then
233 if p_First_Action_NOA_LA_Code1 not in ('CUL','ZVB','ZVC') or
234 NVL(p_First_Action_NOA_LA_Code2, 'CUL') not in ('CUL','ZVB','ZVC') then
235 hr_utility.set_message(8301, 'GHR_37360_ALL_PROCEDURE_FAIL');
236 hr_utility.raise_error;
237 end if;
238 end if;
239
240 --320.05.2
241 if p_First_NOAC_Lookup_Code= '450'
242 and
243 NOT ( p_First_Action_NOA_LA_Code1 in
244 ( 'UAM','UFM','USP','USR','VAA','VAB','VAC','VAD','VAE','VAV', 'V4J',
245 'V8V','VWJ','ZEM','ZVB','ZVC') AND
246 p_First_Action_NOA_LA_Code2 in
247 ('UAM','UFM','USP','USR','VAA','VAB','VAC','VAD','VAE','VAV', 'V4J',
248 'V8V','VWJ','ZEM','ZVB','ZVC') ) THEN
249 hr_utility.set_message(8301, 'GHR_37361_ALL_PROCEDURE_FAIL');
250 hr_utility.raise_error;
251 end if;
252
253
254 --320.08.2
255 if p_First_NOAC_Lookup_Code= '452'
256 and
257 NOT ( p_First_Action_NOA_LA_Code1 in
258 ( 'UAM','UFM','USM','VAJ', 'VHJ','V8V','ZVB','ZVC') AND
259 p_First_Action_NOA_LA_Code2 in
260 ('UAM','UFM','USM','VAJ', 'VHJ','V8V','ZVB','ZVC') ) THEN
261 hr_utility.set_message(8301, 'GHR_37362_ALL_PROCEDURE_FAIL');
262 hr_utility.raise_error;
263 end if;
264
265 --320.11.2
266 if p_First_NOAC_Lookup_Code= '460'
267 and
268 NOT ( p_First_Action_NOA_LA_Code1 in
269 ( 'DAK','DAM','L9K','NYM','Q3K','UFM','V8V','ZJR','ZJT','ZVB','ZVC') AND
270 p_First_Action_NOA_LA_Code2 in
271 ('DAK','DAM','L9K','NYM','Q3K','UFM','V8V','ZJR','ZJT','ZVB','ZVC') ) THEN
272 hr_utility.set_message(8301, 'GHR_37363_ALL_PROCEDURE_FAIL');
273 hr_utility.raise_error;
274 end if;
275
276 --320.14.2
277 -- Update Date By Effective Date Comment
278 -- 8 01/28/99 vravikan 01/01/99 End date
279 if p_effective_date < fnd_date.canonical_to_date('19'||'99/01/01') then
280 if p_First_NOAC_Lookup_Code= '462'
281 and
282 NOT ( p_First_Action_NOA_LA_Code1 in
283 ( 'GFM','R4M','UFM','V8V','ZVB') AND
284 p_First_Action_NOA_LA_Code2 in
285 ('GFM','R4M','UFM','V8V','ZVB') ) THEN
286 hr_utility.set_message(8301, 'GHR_37364_ALL_PROCEDURE_FAIL');
287 hr_utility.raise_error;
288 end if;
289 end if;
290
291 --320.17.2
292 if p_First_NOAC_Lookup_Code= '471'
293 and
294 NOT ( p_First_Action_NOA_LA_Code1 in
295 ( 'L9K','PNM','UFM','USM','VAJ','VDR','V8V','ZVB','ZVC') AND
296 p_First_Action_NOA_LA_Code2 in
297 ('L9K','PNM','UFM','USM','VAJ','VDR','V8V','ZVB','ZVC') ) THEN
298 hr_utility.set_message(8301, 'GHR_37365_ALL_PROCEDURE_FAIL');
299 hr_utility.raise_error;
300 end if;
301
302 --320.20.2
303 if p_First_NOAC_Lookup_Code= '472'
304 and
305 NOT ( p_First_Action_NOA_LA_Code1 in
306 ( 'L9K','PNM','UFM','USM','VAJ','VDR','V8V','ZVB','ZVC') AND
307 p_First_Action_NOA_LA_Code2 in
308 ('L9K','PNM','UFM','USM','VAJ','VDR','V8V','ZVB','ZVC') ) THEN
309 hr_utility.set_message(8301, 'GHR_37366_ALL_PROCEDURE_FAIL');
310 hr_utility.raise_error;
311 end if;
312
313
314 --320.23.2
315 -- Update/Change Date By Effective Date Comment
316 -- 9/5 08/12/99 vravikan 01-Apr-1999 Add ZJV
317 -- 2038423 10/08/01 vravikan Add ZJW
318
319 if p_effective_date >= to_date('1999/04/01','yyyy/mm/dd') then
320
321 if p_First_NOAC_Lookup_Code= '473'
322 and
323 NOT ( p_First_Action_NOA_LA_Code1 in
324 ( 'Q3K','V8V','ZJU','ZJV','ZJW','ZVB','ZVC') AND
325 p_First_Action_NOA_LA_Code2 in
326 ('Q3K','V8V','ZJU','ZJV','ZJW','ZVB','ZVC') ) THEN
327 hr_utility.set_message(8301, 'GHR_37066_ALL_PROCEDURE_FAIL');
328 hr_utility.raise_error;
329 end if;
330 else
331 if p_First_NOAC_Lookup_Code= '473'
332 and
333 NOT ( p_First_Action_NOA_LA_Code1 in
334 ( 'Q3K','V8V','ZJU','ZJW','ZVB','ZVC') AND
335 p_First_Action_NOA_LA_Code2 in
336 ('Q3K','V8V','ZJU','ZJW','ZVB','ZVC') ) THEN
337 hr_utility.set_message(8301, 'GHR_37367_ALL_PROCEDURE_FAIL');
338 hr_utility.raise_error;
339 end if;
340
341 end if;
342
343 --320.26.2
344 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
345
346 -- added legal authority Z2W on 9-oct-98
347 if p_effective_date >= fnd_date.canonical_to_date('19'||'99/01/01') then
348 if p_First_NOAC_Lookup_Code= '480'
349 and
350 NOT ( p_First_Action_NOA_LA_Code1 in
351 ('UFM','V3M','VGL','Z2W','ZSP','ZVB','ZVC') AND
352 p_First_Action_NOA_LA_Code2 in
353 ('UFM','V3M','VGL','Z2W','ZSP','ZVB','ZVC') ) THEN
354 hr_utility.set_message(8301, 'GHR_37096_ALL_PROCEDURE_FAIL');
355 hr_utility.raise_error;
356 end if;
357 else
358 if p_First_NOAC_Lookup_Code= '480'
359 and
360 NOT ( p_First_Action_NOA_LA_Code1 in
361 ('UFM','V3M','Z2W','ZSP','ZVB','ZVC') AND
362 p_First_Action_NOA_LA_Code2 in
363 ('UFM','V3M','Z2W','ZSP','ZVB','ZVC') ) THEN
364 hr_utility.set_message(8301, 'GHR_37368_ALL_PROCEDURE_FAIL');
365 hr_utility.raise_error;
366 end if;
367 end if;
368
369 --
370 -- START OF 325.02.2
371 -- added 'BNK' and deleted 'VHM' for the april 98 release
372 -- added 'Z2U' on 22-jul-1998
373 -- added 'ZTA','Z2W' on 9-oct-98
374 -- Update Date By Effective Date Comment
375 -- 8 03/09/99 vravikan 01/31/99 Delete BEA,BMC,BNE
376 -- ,BNW,BRM
377 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
378 -- 11/1 12/13/99 vravikan 01-Dec-99 Add ZBA
379 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
380 -- 17-Aug-00 vravikan From Begining Add ZBA
381 -- 08-Dec-00 vravikan From Begining Delete ZTA
385 -- Upd 43 09-NOV-05 Raju From beginning Added BAE
382 -- 30-Oct-03 Ashley From Begining Added BAB,BAC,BAD,BYO
383 -- 30-APR-04 Madhuri From Beginning Added LYP for 500
384 -- Upd 37 09-NOV-04 Madhuri From beginning Added LAC's - BNR, BNT
386 -- Upd 39 07-MAR-06 vnarasim From beginning Added BNY
387 -- Upd 47 23-Jun-06 Raju From Begining Added ZJK, Z5B, Z5C, Z5D, Z5E
388 -- upd49 19-Jan-07 Raju From 01-Feb-2005 Bug#5619873 delete BNT
389 -- upd49 19-Jan-07 Raju From Beginning Bug#5619873 add BAF
390 -- Upd 54 12-Jun-07 vmididho From Begining delete BAF
391 --
392 if p_effective_date >= to_date('19'||'99/12/01','yyyy/mm/dd') then
393 if p_effective_date < fnd_date.canonical_to_date('2005/02/01') then --Bug#5619873
394 if p_First_NOAC_Lookup_Code= '500' and
395 NOT ( p_First_Action_NOA_LA_Code1 in
396 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
397 'BAB','BAC','BAD','BAE','BYO',
398 'BBM','BDN','BLM','BNK','BNR', 'BNT','BNY',
399 'BNM','BNN','BWA','BWM',
400 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
401 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
402 'LSM','LWM','LYM','LZM','L1M','L2K','L3M','LYP',
403 'PNR','P5M','UDM','VJM','V1P','V8N','VGL','Z2U','Z2W',
404 'ZBA', 'ZGM','ZGY','ZHK','ZJK','ZJM','ZLM','ZMM','ZQM',
405 'ZRM','ZSK','ZSP','ZTR','ZTU','ZTZ','Z5B','Z5C','Z5D','Z5E') AND
406 p_First_Action_NOA_LA_Code2 in
407 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
408 'BAB','BAC','BAD','BAE','BYO',
409 'BBM','BDN','BLM','BNK','BNR', 'BNT','BNY',
410 'BNM','BNN','BWA','BWM',
411 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
412 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
413 'LSM','LWM','LYM','LZM','L1M','L2K','L3M','LYP',
414 'PNR','P5M','UDM','VJM','V1P','V8N','VGL','Z2U','Z2W',
415 'ZBA',
416 'ZGM','ZGY','ZHK','ZJK','ZJM','ZLM','ZMM','ZQM',
417 'ZRM','ZSK','ZSP','ZTR','ZTU','ZTZ','Z5B','Z5C','Z5D','Z5E') ) THEN
418 hr_utility.set_message(8301, 'GHR_37299_ALL_PROCEDURE_FAIL');
419 hr_utility.raise_error;
420 end if;
421 else --Begin Bug#5619873
422 if p_First_NOAC_Lookup_Code= '500' and
423 NOT ( p_First_Action_NOA_LA_Code1 in
424 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
425 'BAB','BAC','BAD','BAE','BYO',
426 'BBM','BDN','BLM','BNK','BNR','BNY',
427 'BNM','BNN','BWA','BWM',
428 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
429 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
430 'LSM','LWM','LYM','LZM','L1M','L2K','L3M','LYP',
431 'PNR','P5M','UDM','VJM','V1P','V8N','VGL','Z2U','Z2W',
432 'ZBA', 'ZGM','ZGY','ZHK','ZJK','ZJM','ZLM','ZMM','ZQM',
433 'ZRM','ZSK','ZSP','ZTR','ZTU','ZTZ','Z5B','Z5C','Z5D','Z5E') AND
434 p_First_Action_NOA_LA_Code2 in
435 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
436 'BAB','BAC','BAD','BAE','BYO',
437 'BBM','BDN','BLM','BNK','BNR','BNY',
438 'BNM','BNN','BWA','BWM',
439 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
440 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
441 'LSM','LWM','LYM','LZM','L1M','L2K','L3M','LYP',
442 'PNR','P5M','UDM','VJM','V1P','V8N','VGL','Z2U','Z2W',
443 'ZBA',
444 'ZGM','ZGY','ZHK','ZJK','ZJM','ZLM','ZMM','ZQM',
445 'ZRM','ZSK','ZSP','ZTR','ZTU','ZTZ','Z5B','Z5C','Z5D','Z5E') ) THEN
446 hr_utility.set_message(8301, 'GHR_37862_ALL_PROCEDURE_FAIL');
447 hr_utility.raise_error;
448 end if;
449 end if; --Begin Bug#5619873
450 elsif p_effective_date > to_date('19'||'99/11/01','yyyy/mm/dd') then
451
452 if p_First_NOAC_Lookup_Code= '500'
453 and
454 NOT ( p_First_Action_NOA_LA_Code1 in
455 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
456 'BAB','BAC','BAD','BAE','BYO',
457 'BBM','BDN','BLM','BNK','BNR', 'BNT','BNY',
458 'BNM','BNN','BWA','BWM',
459 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
460 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
461 'LSM','LWM','LYM','LZM','L1M','L2K','L3M','LYP',
462 'PNR','P5M','UDM','VJM','V1P','V8N','VGL','Z2U','Z2W',
463 'ZBA','ZGM','ZGY','ZHK','ZJK','ZJM','ZLM','ZMM','ZQM',
464 'ZRM','ZSK','ZSP','ZTR','ZTU','ZTZ','Z5B','Z5C','Z5D','Z5E') AND
465 p_First_Action_NOA_LA_Code2 in
466 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
467 'BAB','BAC','BAD','BAE','BYO',
468 'BBM','BDN','BLM','BNK','BNR', 'BNT','BNY',
469 'BNM','BNN','BWA','BWM',
470 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
471 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
472 'LSM','LWM','LYM','LZM','L1M','L2K','L3M','LYP',
473 'PNR','P5M','UDM','VJM','V1P','V8N','VGL','Z2U','Z2W',
474 'ZBA','ZGM','ZGY','ZHK','ZJK','ZJM','ZLM','ZMM','ZQM',
475 'ZRM','ZSK','ZSP','ZTR','ZTU','ZTZ','Z5B','Z5C','Z5D','Z5E') ) THEN
476 hr_utility.set_message(8301, 'GHR_37169_ALL_PROCEDURE_FAIL');
477 hr_utility.raise_error;
478 end if;
479 elsif p_effective_date > to_date('19'||'99/01/31','yyyy/mm/dd') then
480
481 if p_First_NOAC_Lookup_Code= '500'
482 and
483 NOT ( p_First_Action_NOA_LA_Code1 in
487 'BNM','BNN','BWA','BWM',
484 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
485 'BAB','BAC','BAD','BAE','BYO',
486 'BBM','BDN','BLM','BNK','BNR', 'BNT','BNY',
488 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
489 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
490 'LSM','LWM','LYM','LZM','L1M','L2K','L3M','LYP',
491 'PNR','P5M','VJM','V1P','V8N','VGL','Z2U','Z2W',
492 'ZBA','ZGM','ZGY','ZHK','ZJK','ZJM','ZLM','ZMM','ZQM',
493 'ZRM','ZSK','ZSP','ZTR','ZTU','ZTZ','Z5B','Z5C','Z5D','Z5E') AND
494 p_First_Action_NOA_LA_Code2 in
495 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
496 'BAB','BAC','BAD','BAE','BYO',
497 'BBM','BDN','BLM','BNK','BNR', 'BNT','BNY',
498 'BNM','BNN','BWA','BWM',
499 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
500 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
501 'LSM','LWM','LYM','LZM','L1M','L2K','L3M','LYP',
502 'PNR','P5M','VJM','V1P','V8N','VGL','Z2U','Z2W',
503 'ZBA','ZGM','ZGY','ZHK','ZJK','ZJM','ZLM','ZMM','ZQM',
504 'ZRM','ZSK','ZSP','ZTR','ZTU','ZTZ','Z5B','Z5C','Z5D','Z5E') ) THEN
505 hr_utility.set_message(8301, 'GHR_37044_ALL_PROCEDURE_FAIL');
506 hr_utility.raise_error;
507 end if;
508 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
509 if p_First_NOAC_Lookup_Code= '500'
510 and
511 NOT ( p_First_Action_NOA_LA_Code1 in
512 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
513 'BAB','BAC','BAD','BAE','BYO',
514 'BBM','BDN','BEA','BLM','BMC','BNE','BNK','BNR', 'BNT','BNY',
515 'BNM','BNN','BNW','BRM','BWA','BWM',
516 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
517 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
518 'LSM','LWM','LYM','LZM','L1M','L2K','L3M','LYP',
519 'PNR','P5M','VJM','V1P','V8N','VGL','Z2U','Z2W',
520 'ZBA','ZGM','ZGY','ZHK','ZJK','ZJM','ZLM','ZMM','ZQM',
521 'ZRM','ZSK','ZSP','ZTR','ZTU','ZTZ','Z5B','Z5C','Z5D','Z5E') AND
522 p_First_Action_NOA_LA_Code2 in
523 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
524 'BAB','BAC','BAD','BAE','BYO',
525 'BBM','BDN','BEA','BLM','BMC','BNE','BNK','BNR', 'BNT','BNY',
526 'BNM','BNN','BNW','BRM','BWA','BWM',
527 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
528 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
529 'LSM','LWM','LYM','LZM','L1M','L2K','L3M','LYP',
530 'PNR','P5M','VJM','V1P','V8N','VGL','Z2U','Z2W',
531 'ZBA','ZGM','ZGY','ZHK','ZJK','ZJM','ZLM','ZMM','ZQM',
532 'ZRM','ZSK','ZSP','ZTR','ZTU','ZTZ','Z5B','Z5C','Z5D','Z5E') ) THEN
533 hr_utility.set_message(8301, 'GHR_37098_ALL_PROCEDURE_FAIL');
534 hr_utility.raise_error;
535 end if;
536 else
537 if p_First_NOAC_Lookup_Code= '500'
538 and
539 NOT ( p_First_Action_NOA_LA_Code1 in
540 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
541 'BAB','BAC','BAD','BAE','BYO',
542 'BBM','BDN','BEA','BLM','BMC','BNE','BNK','BNR', 'BNT','BNY',
543 'BNM','BNN','BNW','BRM','BWA','BWM',
544 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
545 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
546 'LSM','LWM','LYM','LZM','L1M','L2K','L3M','LYP',
547 'PNR','P5M','VJM','V1P','V8N','Z2U','Z2W',
548 'ZBA','ZGM','ZGY','ZHK','ZJK','ZJM','ZLM','ZMM','ZQM',
549 'ZRM','ZSK','ZSP','ZTR','ZTU','ZTZ','Z5B','Z5C','Z5D','Z5E') AND
550 p_First_Action_NOA_LA_Code2 in
551 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
552 'BAB','BAC','BAD','BAE','BYO',
553 'BBM','BDN','BEA','BLM','BMC','BNE','BNK','BNR', 'BNT','BNY',
554 'BNM','BNN','BNW','BRM','BWA','BWM',
555 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
556 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
557 'LSM','LWM','LYM','LZM','L1M','L2K','L3M','LYP',
558 'PNR','P5M','VJM','V1P','V8N','Z2U','Z2W',
559 'ZBA','ZGM','ZGY','ZHK','ZJK','ZJM','ZLM','ZMM','ZQM',
560 'ZRM','ZSK','ZSP','ZTR','ZTU','ZTZ','Z5B','Z5C','Z5D','Z5E') ) THEN
561 hr_utility.set_message(8301, 'GHR_37369_ALL_PROCEDURE_FAIL');
562 hr_utility.raise_error;
563 end if;
564
565 end if;
566 -- END OF 325.02.2
567 --
568 -- START OF 325.05.2
569 -- added 'BNK' for the april 98 release
570 -- added 'Z2U' on 22-jul-1998
571 -- added 'ZTA','Z2W' on 9-oct-98
572 -- Update Date By Effective Date Comment
573 -- 8 03/09/99 vravikan 01/31/99 Delete BEA,BMC
574 -- ,BNE,BNW,BRM
575 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
576 -- 11/1 12/13/99 vravikan 01-Dec-99 Add ZBA
577 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
578 -- 17-Aug-00 vravikan From Begining Add ZBA,Delete BNP
579 -- 08-Dec-00 vravikan From Begining Delete ZTA
580 -- 30-Oct-03 Ashley From Begining Added BAB,BAC,BAD,BYO
581 -- 30-APR-04 Madhuri From Beginning Added LYP for 501
582 -- Upd 37 09-NOV-04 Madhuri From beginning Added LAC's - BNR, BNT
583 -- Upd 43 09-NOV-05 Raju From beginning Added BAE
584 -- upd49 19-Jan-07 Raju From beginning Bug#5619873 delete BNT,add BAF
585 -- Upd 54 12-Jun-07 vmididho From Begining delete BAF
586 if p_effective_date >= to_date('19'||'99/12/01','yyyy/mm/dd') then
587 if p_First_NOAC_Lookup_Code= '501'
588 and
592 'BBM','BDN','BLM','BNK','BNR','BNY',
589 NOT ( p_First_Action_NOA_LA_Code1 in
590 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
591 'BAB','BAC','BAD','BAE','BYO',
593 'BNM','BNN','BWA','BWM',
594 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
595 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
596 'LSM','LYM','LZM','L1M','L2K','L3M','LYP','PNR',
597 'P5M','UDM','V1P','V8M','V8N','VGL','Z2U','Z2W','ZGM',
598 'ZBA','ZHK','ZJK','ZJM',
599 'ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ') AND
600 p_First_Action_NOA_LA_Code2 in
601 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
602 'BAB','BAC','BAD','BAE','BYO',
603 'BBM','BDN','BLM','BNK','BNR', 'BNY',
604 'BNM','BNN','BWA','BWM',
605 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
606 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
607 'LSM','LYM','LZM','L1M','L2K','L3M','LYP','PNR',
608 'P5M','UDM','V1P','V8M','V8N','VGL','Z2U','Z2W','ZGM',
609 'ZBA','ZHK','ZJK','ZJM',
610 'ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ') ) THEN
611 hr_utility.set_message(8301, 'GHR_37300_ALL_PROCEDURE_FAIL');
612 hr_utility.raise_error;
613 end if;
614 elsif p_effective_date > to_date('19'||'99/11/01','yyyy/mm/dd') then
615 if p_First_NOAC_Lookup_Code= '501'
616 and
617 NOT ( p_First_Action_NOA_LA_Code1 in
618 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
619 'BAB','BAC','BAD','BAE','BYO',
620 'BBM','BDN','BLM','BNK','BNR', 'BNY',
621 'BNM','BNN','BWA','BWM',
622 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
623 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
624 'LSM','LYM','LZM','L1M','L2K','L3M','LYP','PNR',
625 'P5M','UDM','V1P','V8M','V8N','VGL','Z2U','Z2W',
626 'ZBA','ZGM','ZHK','ZJK','ZJM',
627 'ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ') AND
628 p_First_Action_NOA_LA_Code2 in
629 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
630 'BAB','BAC','BAD','BAE','BYO',
631 'BBM','BDN','BLM','BNK','BNR', 'BNY',
632 'BNM','BNN','BWA','BWM',
633 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
634 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
635 'LSM','LYM','LZM','L1M','L2K','L3M','LYP','PNR',
636 'P5M','UDM','V1P','V8M','V8N','VGL','Z2U','Z2W',
637 'ZBA','ZGM','ZHK','ZJK','ZJM',
638 'ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ') ) THEN
639 hr_utility.set_message(8301, 'GHR_37289_ALL_PROCEDURE_FAIL');
640 hr_utility.raise_error;
641 end if;
642 elsif p_effective_date > to_date('19'||'99/01/31','yyyy/mm/dd') then
643 if p_First_NOAC_Lookup_Code= '501'
644 and
645 NOT ( p_First_Action_NOA_LA_Code1 in
646 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
647 'BAB','BAC','BAD','BAE','BYO',
648 'BBM','BDN','BLM','BNK','BNR', 'BNY',
649 'BNM','BNN','BWA','BWM',
650 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
651 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
652 'LSM','LYM','LZM','L1M','L2K','L3M','LYP','PNR',
653 'P5M','V1P','V8M','V8N','VGL','Z2U','Z2W','ZGM','ZHK','ZJK','ZJM',
654 'ZBA','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ') AND
655 p_First_Action_NOA_LA_Code2 in
656 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
657 'BAB','BAC','BAD','BAE','BYO',
658 'BBM','BDN','BLM','BNK','BNR', 'BNY',
659 'BNM','BNN','BWA','BWM',
660 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
661 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
662 'LSM','LYM','LZM','L1M','L2K','L3M','LYP','PNR',
663 'P5M','V1P','V8M','V8N','VGL','Z2U','Z2W','ZGM','ZHK','ZJK','ZJM',
664 'ZBA','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ') ) THEN
665 hr_utility.set_message(8301, 'GHR_37045_ALL_PROCEDURE_FAIL');
666 hr_utility.raise_error;
667 end if;
668 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
669 if p_First_NOAC_Lookup_Code= '501'
670 and
671 NOT ( p_First_Action_NOA_LA_Code1 in
672 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
673 'BAB','BAC','BAD','BAE','BYO',
674 'BBM','BDN','BEA','BLM','BMC','BNE','BNK','BNR', 'BNY',
675 'BNM','BNN','BNW','BRM','BWA','BWM',
676 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
677 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
678 'LSM','LYM','LZM','L1M','L2K','L3M','LYP','PNR',
679 'P5M','V1P','V8M','V8N','VGL','Z2U','Z2W','ZGM','ZHK','ZJK','ZJM',
680 'ZBA','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ') AND
681 p_First_Action_NOA_LA_Code2 in
682 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
683 'BAB','BAC','BAD','BAE','BYO',
684 'BBM','BDN','BEA','BLM','BMC','BNE','BNK','BNR', 'BNY',
685 'BNM','BNN','BNW','BRM','BWA','BWM',
686 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
687 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
688 'LSM','LYM','LZM','L1M','L2K','L3M','LYP','PNR',
689 'P5M','V1P','V8M','V8N','VGL','Z2U','Z2W','ZGM','ZHK','ZJK','ZJM',
690 'ZBA','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ') ) THEN
691 hr_utility.set_message(8301, 'GHR_37084_ALL_PROCEDURE_FAIL');
692 hr_utility.raise_error;
693 end if;
694 else
695 if p_First_NOAC_Lookup_Code= '501'
696 and
697 NOT ( p_First_Action_NOA_LA_Code1 in
698 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
702 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
699 'BAB','BAC','BAD','BAE','BYO',
700 'BBM','BDN','BEA','BLM','BMC','BNE','BNK','BNR', 'BNY',
701 'BNM','BNN','BNW','BRM','BWA','BWM',
703 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
704 'LSM','LYM','LZM','L1M','L2K','L3M','LYP','PNR',
705 'P5M','V1P','V8M','V8N','Z2U','Z2W','ZGM','ZHK','ZJK','ZJM',
706 'ZBA','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ') AND
707 p_First_Action_NOA_LA_Code2 in
708 ('ABK','ABL','ABM','ACA','ACM','AYM','A2M',
709 'BAB','BAC','BAD','BAE','BYO',
710 'BBM','BDN','BEA','BLM','BMC','BNE','BNK','BNR','BNY',
711 'BNM','BNN','BNW','BRM','BWA','BWM',
712 'BYM','HAM','K1M','K7M','K8M','K9M','LBM',
713 'LEM','LHM','LJM','LKM','LKP','LLM','LPM',
714 'LSM','LYM','LZM','L1M','L2K','L3M','LYP','PNR',
715 'P5M','V1P','V8M','V8N','Z2U','Z2W','ZGM','ZHK','ZJK','ZJM',
716 'ZBA','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ') ) THEN
717 hr_utility.set_message(8301, 'GHR_37370_ALL_PROCEDURE_FAIL');
718 hr_utility.raise_error;
719 end if;
720
721 end if;
722
723 -- END OF 325.05.2
724 --
725
726 --325.17.2
727 -- added 'Z2U' on 22-jul-1998
728 -- Update/Change Date By Effective Date Comment
729 -- 8/5 03/09/99 vravikan Add BWA
730 -- 8/5 03/09/99 vravikan 02/27/99 Delete ACM
731 if p_effective_date >= fnd_date.canonical_to_date('19'||'99/02/27') then
732 if p_First_NOAC_Lookup_Code= '507'
733 and
734 NOT ( p_First_Action_NOA_LA_Code1 in
735 ('ABL','ABM','ABR','ABS','AYM','BWA','BWM',
736 'HAM','HDM','HGM','HJM','HLM','NUM','PNR',
737 'V1P','V8N','Z2U','ZLM','ZRM','ZSK') AND
738 p_First_Action_NOA_LA_Code2 in
739 ('ABL','ABM','ABR','ABS','AYM','BWA','BWM',
740 'HAM','HDM','HGM','HJM','HLM','NUM','PNR',
741 'V1P','V8N','Z2U','ZLM','ZRM','ZSK') ) THEN
742 hr_utility.set_message(8301, 'GHR_37052_ALL_PROCEDURE_FAIL');
743 hr_utility.raise_error;
744 end if;
745 else
746 if p_First_NOAC_Lookup_Code= '507'
747 and
748 NOT ( p_First_Action_NOA_LA_Code1 in
749 ('ABL','ABM','ABR','ABS','ACM','AYM','BWA','BWM',
750 'HAM','HDM','HGM','HJM','HLM','NUM','PNR',
751 'V1P','V8N','Z2U','ZLM','ZRM','ZSK') AND
752 p_First_Action_NOA_LA_Code2 in
753 ('ABL','ABM','ABR','ABS','ACM','AYM','BWA','BWM',
754 'HAM','HDM','HGM','HJM','HLM','NUM','PNR',
755 'V1P','V8N','Z2U','ZLM','ZRM','ZSK') ) THEN
756 hr_utility.set_message(8301, 'GHR_37371_ALL_PROCEDURE_FAIL');
757 hr_utility.raise_error;
758 end if;
759 end if;
760
761
762 --325.20.2
763 -- added 'Z2U' on 22-jul-1998
764 -- added 'Z2W' on 9-oct-98
765 -- Update/Change Date By Effective Date Comment
766 -- 8/5 03/09/99 vravikan 01/31/99 Delete BEA,BMC,BNE,BNW,BRM
767 -- 8/5 03/09/99 vravikan Add ZTU
768 -- 8/5 03/09/99 vravikan 02/27/99 Delete ACM,MLL,MCM
769 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
770 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
771 -- 10/30/03 Ashley From Begining Added BAB,BAC,BAD,BYO
772 -- Upd 43 09-NOV-05 Raju From beginning Added BAE
773 -- Upd 47 23-Jun-06 Raju From Begining Added Z5B, Z5C, Z5F, Z5H, Z5J
774 -- upd49 19-Jan-07 Raju From Beginning Bug#5619873 add BAF
775 -- Upd 54 12-Jun-07 vmididho From Begining delete BAF
776
777 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
778 if p_First_NOAC_Lookup_Code= '508'
779 and
780 NOT ( p_First_Action_NOA_LA_Code1 in
781 ('ABK','ABL','ABM','ABR','ABS','AYM',
782 'BAB','BAC','BAD','BAE','BYO',
783 'BWA','BWM','HAM','MEM','MGM','MJM','MLK',
784 'MLM','MMM','NMM','NUM','PNR','UDM','VJM',
785 'V1P','V8N','VGL','Z2U','Z2W','ZJK','ZJM','ZLM',
786 'ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ','Z5B','Z5C','Z5F','Z5H','Z5J') AND
787 p_First_Action_NOA_LA_Code2 in
788 ('ABK','ABL','ABM','ABR','ABS','AYM',
789 'BAB','BAC','BAD','BAE','BYO',
790 'BWA','BWM','HAM','MEM','MGM','MJM','MLK',
791 'MLM','MMM','NMM','NUM','PNR','UDM','VJM',
792 'V1P','V8N','VGL','Z2U','Z2W','ZJK','ZJM','ZLM',
793 'ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ','Z5B','Z5C','Z5F','Z5H','Z5J') ) THEN
794 hr_utility.set_message(8301, 'GHR_37290_ALL_PROCEDURE_FAIL');
795 hr_utility.raise_error;
796 end if;
797 elsif p_effective_date >= to_date('19'||'99/02/27','yyyy/mm/dd') then
798 if p_First_NOAC_Lookup_Code= '508'
799 and
800 NOT ( p_First_Action_NOA_LA_Code1 in
801 ('ABK','ABL','ABM','ABR','ABS','AYM',
802 'BAB','BAC','BAD','BAE','BYO',
803 'BWA','BWM','HAM','MEM','MGM','MJM','MLK',
804 'MLM','MMM','NMM','NUM','PNR','VJM',
805 'V1P','V8N','VGL','Z2U','Z2W','ZJK','ZJM','ZLM',
806 'ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ','Z5B','Z5C','Z5F','Z5H','Z5J') AND
807 p_First_Action_NOA_LA_Code2 in
808 ('ABK','ABL','ABM','ABR','ABS','AYM',
809 'BAB','BAC','BAD','BAE','BYO',
813 'ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ','Z5B','Z5C','Z5F','Z5H','Z5J') ) THEN
810 'BWA','BWM','HAM','MEM','MGM','MJM','MLK',
811 'MLM','MMM','NMM','NUM','PNR','VJM',
812 'V1P','V8N','VGL','Z2U','Z2W','ZJK','ZJM','ZLM',
814 hr_utility.set_message(8301, 'GHR_37053_ALL_PROCEDURE_FAIL');
815 hr_utility.raise_error;
816 end if;
817 elsif p_effective_date > to_date('19'||'99/01/31','yyyy/mm/dd') then
818 if p_First_NOAC_Lookup_Code= '508'
819 and
820 NOT ( p_First_Action_NOA_LA_Code1 in
821 ('ABK','ABL','ABM','ABR','ABS','ACM','AYM',
822 'BAB','BAC','BAD','BAE','BYO',
823 'BWA','BWM','HAM','MCM','MEM','MGM','MJM','MLK',
824 'MLL','MLM','MMM','NMM','NUM','PNR','VJM',
825 'V1P','V8N','VGL','Z2U','Z2W','ZJK','ZJM','ZLM',
826 'ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ','Z5B','Z5C','Z5F','Z5H','Z5J') AND
827 p_First_Action_NOA_LA_Code2 in
828 ('ABK','ABL','ABM','ABR','ABS','ACM','AYM',
829 'BAB','BAC','BAD','BAE','BYO',
830 'BWA','BWM','HAM','MCM','MEM','MGM','MJM','MLK',
831 'MLL','MLM','MMM','NMM','NUM','PNR','VJM',
832 'V1P','V8N','VGL','Z2U','Z2W','ZJK','ZJM','ZLM',
833 'ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ','Z5B','Z5C','Z5F','Z5H','Z5J') ) THEN
834 hr_utility.set_message(8301, 'GHR_37046_ALL_PROCEDURE_FAIL');
835 hr_utility.raise_error;
836 end if;
837 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
838 if p_First_NOAC_Lookup_Code= '508'
839 and
840 NOT ( p_First_Action_NOA_LA_Code1 in
841 ('ABK','ABL','ABM','ABR','ABS','ACM','AYM',
842 'BAB','BAC','BAD','BAE','BYO',
843 'BEA','BMC','BNE','BNW','BRM','BWA',
844 'BWM','HAM','MCM','MEM','MGM','MJM','MLK',
845 'MLL','MLM','MMM','NMM','NUM','PNR','VJM',
846 'V1P','V8N','VGL','Z2U','Z2W','ZJK','ZJM','ZLM',
847 'ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ','Z5B','Z5C','Z5F','Z5H','Z5J') AND
848 p_First_Action_NOA_LA_Code2 in
849 ('ABK','ABL','ABM','ABR','ABS','ACM','AYM',
850 'BAB','BAC','BAD','BAE','BYO',
851 'BEA','BMC','BNE','BNW','BRM','BWA',
852 'BWM','HAM','MCM','MEM','MGM','MJM','MLK',
853 'MLL','MLM','MMM','NMM','NUM','PNR','VJM',
854 'V1P','V8N','VGL','Z2U','Z2W','ZJK','ZJM','ZLM',
855 'ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ','Z5B','Z5C','Z5F','Z5H','Z5J') ) THEN
856 hr_utility.set_message(8301, 'GHR_37099_ALL_PROCEDURE_FAIL');
857 hr_utility.raise_error;
858 end if;
859
860 else
861 if p_First_NOAC_Lookup_Code= '508'
862 and
863 NOT ( p_First_Action_NOA_LA_Code1 in
864 ('ABK','ABL','ABM','ABR','ABS','ACM','AYM',
865 'BAB','BAC','BAD','BAE','BYO',
866 'BEA','BMC','BNE','BNW','BRM','BWA',
867 'BWM','HAM','MCM','MEM','MGM','MJM','MLK',
868 'MLL','MLM','MMM','NMM','NUM','PNR','VJM',
869 'V1P','V8N','Z2U','Z2W','ZJK','ZJM','ZLM',
870 'ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ','Z5B','Z5C','Z5F','Z5H','Z5J') AND
871 p_First_Action_NOA_LA_Code2 in
872 ('ABK','ABL','ABM','ABR','ABS','ACM','AYM',
873 'BAB','BAC','BAD','BAE','BYO',
874 'BEA','BMC','BNE','BNW','BRM','BWA',
875 'BWM','HAM','MCM','MEM','MGM','MJM','MLK',
876 'MLL','MLM','MMM','NMM','NUM','PNR','VJM',
877 'V1P','V8N','Z2U','Z2W','ZJK','ZJM','ZLM',
878 'ZQM','ZRM','ZSK','ZSP','ZTU','ZTZ','Z5B','Z5C','Z5F','Z5H','Z5J') ) THEN
879 hr_utility.set_message(8301, 'GHR_37372_ALL_PROCEDURE_FAIL');
880 hr_utility.raise_error;
881 end if;
882 end if;
883
884 --325.23.2
885 -- added 'Z2U' on 22-jul-1998
886 -- UPDATE/CHANGE DATE UPDATED BY EFFECTIVE_DATE COMMENTS
887 -------------------------------------------------------------------------------------
888 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
889 -- 14-SEP-2004 Madhuri
890 -------------------------------------------------------------------------------------
891 IF ( p_effective_date <= to_date('20'||'04/08/31','yyyy/mm/dd') ) THEN
892
893 IF p_effective_date >= fnd_date.canonical_to_date('19'||'99/01/01') then
894 if p_First_NOAC_Lookup_Code= '512'
895 and
896 NOT ( p_First_Action_NOA_LA_Code1 in
897 ('ABL','ABM','AYM','BWM','HAM',
898 'MAM','MBM','PNR','V1P','V8N','VGL',
899 'Z2U','ZLM','ZRM','ZSK','ZSP','ZTU') AND
900 p_First_Action_NOA_LA_Code2 in
901 ('ABL','ABM','AYM','BWM','HAM',
902 'MAM','MBM','PNR','V1P','V8N','VGL',
903 'Z2U','ZLM','ZRM','ZSK','ZSP','ZTU') ) THEN
904 hr_utility.set_message(8301, 'GHR_37100_ALL_PROCEDURE_FAIL');
905 hr_utility.raise_error;
906 end if;
907 ELSE
908 if p_First_NOAC_Lookup_Code= '512'
909 and
910 NOT ( p_First_Action_NOA_LA_Code1 in
911 ('ABL','ABM','AYM','BWM','HAM',
912 'MAM','MBM','PNR','V1P','V8N',
913 'Z2U','ZLM','ZRM','ZSK','ZSP','ZTU') AND
914 p_First_Action_NOA_LA_Code2 in
915 ('ABL','ABM','AYM','BWM','HAM',
916 'MAM','MBM','PNR','V1P','V8N',
917 'Z2U','ZLM','ZRM','ZSK','ZSP','ZTU') ) THEN
918 hr_utility.set_message(8301, 'GHR_37373_ALL_PROCEDURE_FAIL');
919 hr_utility.raise_error;
920 end if;
921 END IF;
922
923 END IF; -- END DATE CHECK
924
925 --325.26.2
926 -- added 'Z2U' on 22-jul-1998
930 -- 8 03/09/99 vravikan 02/27/99 Delete ACM,NEL,MXM,CTM
927 -- added 'Z2W' on 12-oct-1998
928 -- Update Date By Effective Date Bug Comment
929 -- 8 03/09/99 vravikan 01/31/99 Delete BEA,BMC,BNE,BNW,BRM
931 -- 8 04/22/99 vravikan 02/27/99 871385 Add CTM,MXM
932 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
933 -- 9/3 09/15/99 vravikan 27-Feb-99 992944 Delete CTM,MXM
934 -- 11/17/99 AVR 27-Feb-99 1079338 Add MXM
935 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
936 -- 10/30/03 Ashley From Begining Added BAB,BAC,BAD,BYO
937 -- Upd 43 09-NOV-05 Raju From beginning Added BAE
938 -- Upd 47 23-Jun-06 Raju From Begining Added Z5B, Z5C, Z5F, Z5G, Z5H
939 -- upd49 19-Jan-07 Raju From Beginning Bug#5619873 add BAF,WTA,WTB,WUM
940 -- Upd 54 12-Jun-07 vmididho From Begining delete BAF
941
942 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
943 if p_First_NOAC_Lookup_Code= '515'
944 and
945 NOT ( p_First_Action_NOA_LA_Code1 in
946 ('ABL','ABM','ABR','ABS','AYM',
947 'BAB','BAC','BAD','BAE','BYO','BNM','BWA','BWM',
948 'HAM','KLM','MXM','M6M','M8M',
949 'NAM','NCM','NEM','NMM','NUM','PNR',
950 'SZX','UDM','VGL','VJM','V1P','V8L',
951 'V8N','WTA','WTB','WUM','Z2U','Z2W','ZJK',
952 'ZLM','ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') AND
953 p_First_Action_NOA_LA_Code2 in
954 ('ABL','ABM','ABR','ABS','AYM',
955 'BAB','BAC','BAD','BAE','BYO','BNM','BWA','BWM',
956 'HAM','KLM','MXM','M6M','M8M',
957 'NAM','NCM','NEM','NMM','NUM','PNR',
958 'SZX','UDM','VGL','VJM','V1P','V8L',
959 'V8N','WTA','WTB','WUM','Z2U','Z2W','ZJK',
960 'ZLM','ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') ) THEN
961 hr_utility.set_message(8301, 'GHR_37291_ALL_PROCEDURE_FAIL');
962 hr_utility.raise_error;
963 end if;
964 elsif p_effective_date > to_date('19'||'99/02/28','yyyy/mm/dd') then
965 if p_First_NOAC_Lookup_Code= '515'
966 and
967 NOT ( p_First_Action_NOA_LA_Code1 in
968 ('ABL','ABM','ABR','ABS','AYM',
969 'BAB','BAC','BAD','BAE','BYO','BNM','BWA','BWM',
970 'HAM','KLM','MXM','M6M','M8M',
971 'NAM','NCM','NEM','NMM','NUM','PNR',
972 'SZX','VGL','VJM','V1P','V8L','V8N','WTA','WTB','WUM','Z2U','Z2W','ZJK',
973 'ZLM','ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') AND
974 p_First_Action_NOA_LA_Code2 in
975 ('ABL','ABM','ABR','ABS','AYM',
976 'BAB','BAC','BAD','BAE','BYO','BNM','BWA','BWM',
977 'HAM','KLM','MXM','M6M','M8M',
978 'NAM','NCM','NEM','NMM','NUM','PNR',
979 'SZX','VGL','VJM','V1P','V8L','V8N','WTA','WTB','WUM','Z2U','Z2W','ZJK',
980 'ZLM','ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') ) THEN
981 hr_utility.set_message(8301, 'GHR_37054_ALL_PROCEDURE_FAIL');
982 hr_utility.raise_error;
983 end if;
984 elsif p_effective_date > to_date('19'||'99/01/31','yyyy/mm/dd') then
985 if p_First_NOAC_Lookup_Code= '515'
986 and
987 NOT ( p_First_Action_NOA_LA_Code1 in
988 ('ABL','ABM','ABR','ABS','ACM','AYM',
989 'BAB','BAC','BAD','BAE','BYO','BNM','BWA','BWM',
990 'CTM','HAM','KLM','MXM','M6M','M8M',
991 'NAM','NCM','NEL','NEM','NMM','NUM','PNR',
992 'SZX','VGL','VJM','V1P','V8L','V8N','WTA','WTB','WUM','Z2U','Z2W','ZJK',
993 'ZLM','ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') AND
994 p_First_Action_NOA_LA_Code2 in
995 ('ABL','ABM','ABR','ABS','ACM','AYM',
996 'BAB','BAC','BAD','BAE','BYO','BNM','BWA','BWM',
997 'CTM','HAM','KLM','MXM','M6M','M8M',
998 'NAM','NCM','NEL','NEM','NMM','NUM','PNR',
999 'SZX','VGL','VJM','V1P','V8L','V8N','WTA','WTB','WUM','Z2U','Z2W','ZJK',
1000 'ZLM','ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') ) THEN
1001 hr_utility.set_message(8301, 'GHR_37047_ALL_PROCEDURE_FAIL');
1002 hr_utility.raise_error;
1003 end if;
1004 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
1005 if p_First_NOAC_Lookup_Code= '515'
1006 and
1007 NOT ( p_First_Action_NOA_LA_Code1 in
1008 ('ABL','ABM','ABR','ABS','ACM','AYM',
1009 'BAB','BAC','BAD','BAE','BYO',
1010 'BEA','BMC','BNE','BNM','BRM','BWA','BWM',
1011 'CTM','HAM','KLM','MXM','M6M','M8M',
1012 'NAM','NCM','NEL','NEM','NMM','NUM','PNR',
1013 'SZX','VJM','V1P','V8L','VGL','V8N','WTA','WTB','WUM','Z2U','Z2W','ZJK',
1014 'ZLM','ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') AND
1015 p_First_Action_NOA_LA_Code2 in
1016 ('ABL','ABM','ABR','ABS','ACM','AYM',
1017 'BAB','BAC','BAD','BAE','BYO',
1018 'BEA','BMC','BNE','BNM','BRM','BWA','BWM',
1019 'CTM','HAM','KLM','MXM','M6M','M8M',
1020 'NAM','NCM','NEL','NEM','NMM','NUM','PNR',
1021 'SZX','VGL','VJM','V1P','V8L','V8N','WTA','WTB','WUM','Z2U','Z2W','ZJK',
1022 'ZLM','ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') ) THEN
1023 hr_utility.set_message(8301, 'GHR_37170_ALL_PROCEDURE_FAIL');
1024 hr_utility.raise_error;
1025 end if;
1026
1027 else
1028 if p_First_NOAC_Lookup_Code= '515'
1032 'BAB','BAC','BAD','BAE','BYO',
1029 and
1030 NOT ( p_First_Action_NOA_LA_Code1 in
1031 ('ABL','ABM','ABR','ABS','ACM','AYM',
1033 'BEA','BMC','BNE','BNM','BRM','BWA','BWM',
1034 'CTM','HAM','KLM','MXM','M6M','M8M',
1035 'NAM','NCM','NEL','NEM','NMM','NUM','PNR',
1036 'SZX','VJM','V1P','V8L','V8N','WTA','WTB','WUM','Z2U','Z2W','ZJK',
1037 'ZLM','ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') AND
1038 p_First_Action_NOA_LA_Code2 in
1039 ('ABL','ABM','ABR','ABS','ACM','AYM',
1040 'BAB','BAC','BAD','BAE','BYO',
1041 'BEA','BMC','BNE','BNM','BRM','BWA','BWM',
1042 'CTM','HAM','KLM','MXM','M6M','M8M',
1043 'NAM','NCM','NEL','NEM','NMM','NUM','PNR',
1044 'SZX','VJM','V1P','V8L','V8N','WTA','WTB','WUM','Z2U','Z2W','ZJK',
1045 'ZLM','ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') ) THEN
1046 hr_utility.set_message(8301, 'GHR_37374_ALL_PROCEDURE_FAIL');
1047 hr_utility.raise_error;
1048 end if;
1049 end if;
1050 --325.29.2
1051 /* This is commented by skutteti on 8-apr-98 as this has to be deleted as per the
1052 update 6 of the edit manual for the april release.
1053
1054 if p_First_NOAC_Lookup_Code= '517'
1055 and
1056 NOT ((p_First_Action_NOA_LA_Code1 in
1057 ('ABL','ABM','ABR','ABS','BWM','HAM','MXM',
1058 'M2M','M4M','M6M','M8M','NCM','NEM','NUM',
1059 'PNR','UAM','UFM','V1P','V8N','V8V','ZLM',
1060 'ZSK','ZSP','ZVB','ZVM','Z2M') OR
1061 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y') AND
1062 LENGTH(p_First_Action_NOA_LA_Code1) =3 AND p_First_Action_NOA_LA_Code1 <>'WWM' ))
1063 AND
1064 (p_First_Action_NOA_LA_Code2 in
1065 ('ABL','ABM','ABR','ABS','BWM','HAM','MXM',
1066 'M2M','M4M','M6M','M8M','NCM','NEM','NUM',
1067 'PNR','UAM','UFM','V1P','V8N','V8V','ZLM',
1068 'ZSK','ZSP','ZVB','ZVM','Z2M') OR
1069 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y') AND
1070 LENGTH(p_First_Action_NOA_LA_Code1) =3 AND p_First_Action_NOA_LA_Code1 <>'WWM')))
1071 THEN
1072 hr_utility.set_message(8301, 'GHR_37375_ALL_PROCEDURE_FAIL');
1073 hr_utility.raise_error;
1074 end if;
1075 */
1076
1077 --325.32.2
1078 -- Upd 47 23-Jun-06 Raju From Begining Added AYM,Z5C
1079 if p_First_NOAC_Lookup_Code= '520'
1080 and
1081 NOT ( p_First_Action_NOA_LA_Code1 in
1082 ('ABM','AYM','BWM','HAM','HNM','HRM','PNR','V1P','ZLM','ZRM','ZSK','Z5C') AND
1083 p_First_Action_NOA_LA_Code2 in
1084 ('ABM','AYM','BWM','HAM','HNM','HRM','PNR','V1P','ZLM','ZRM','ZSK','Z5C') ) THEN
1085 hr_utility.set_message(8301, 'GHR_37376_ALL_PROCEDURE_FAIL');
1086 hr_utility.raise_error;
1087 end if;
1088 --325.35.2
1089 if p_First_NOAC_Lookup_Code= '522'
1090 and
1091 NOT ( p_First_Action_NOA_LA_Code1 in
1092 ('ABM','BWM','HAM','HNM','HRM','H3M','PNR','V1P','ZLM','ZRM','ZSK') AND
1093 p_First_Action_NOA_LA_Code2 in
1094 ('ABM','BWM','HAM','HNM','HRM','H3M','PNR','V1P','ZLM','ZRM','ZSK') ) THEN
1095 hr_utility.set_message(8301, 'GHR_37377_ALL_PROCEDURE_FAIL');
1096 hr_utility.raise_error;
1097 end if;
1098
1099 --325.38.2
1100 if p_First_NOAC_Lookup_Code= '524'
1101 and
1102 NOT ( p_First_Action_NOA_LA_Code1 in
1103 ('ABM','A7M','BWM','HAM','HNM','LBM','NFM','NMM','PNR','V1P','ZLM','ZRM','ZSK') AND
1104 p_First_Action_NOA_LA_Code2 in
1105 ('ABM','A7M','BWM','HAM','HNM','LBM','NFM','NMM','PNR','V1P','ZLM','ZRM','ZSK') ) THEN
1106 hr_utility.set_message(8301, 'GHR_37378_ALL_PROCEDURE_FAIL');
1107 hr_utility.raise_error;
1108 end if;
1109
1110 --325.44.2
1111 -- added 'Z2U' on 22-jul-1998
1112 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
1113 -- 11/2 12/14/99 vravikan From the Start Add ABR
1114 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
1115
1116 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
1117
1118 if p_First_NOAC_Lookup_Code= '540'
1119 and
1120 NOT ( p_First_Action_NOA_LA_Code1 in
1121 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM','NUM',
1122 'PNR','QGM','QHM','UDM','USM','U2M','VAJ','VCS',
1123 'VCT','VCW','VDJ','VFJ','VGJ','VGL','VHJ','V1P',
1124 'V8N','Z2U','ZLM','ZSK','ZSP') AND
1125 p_First_Action_NOA_LA_Code2 in
1126 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM','NUM',
1127 'PNR','QGM','QHM','UDM','USM','U2M','VAJ','VCS',
1128 'VCT','VCW','VDJ','VFJ','VGJ','VGL','VHJ','V1P',
1129 'V8N','Z2U','ZLM','ZSK','ZSP') ) THEN
1130 hr_utility.set_message(8301, 'GHR_37292_ALL_PROCEDURE_FAIL');
1131 hr_utility.raise_error;
1132 end if;
1133 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
1134
1135 if p_First_NOAC_Lookup_Code= '540'
1136 and
1137 NOT ( p_First_Action_NOA_LA_Code1 in
1138 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM','NUM',
1139 'PNR','QGM','QHM','USM','U2M','VAJ','VCS',
1140 'VCT','VCW','VDJ','VFJ','VGJ','VGL','VHJ','V1P',
1141 'V8N','Z2U','ZLM','ZSK','ZSP') AND
1142 p_First_Action_NOA_LA_Code2 in
1143 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM','NUM',
1144 'PNR','QGM','QHM','USM','U2M','VAJ','VCS',
1148 hr_utility.raise_error;
1145 'VCT','VCW','VDJ','VFJ','VGJ','VGL','VHJ','V1P',
1146 'V8N','Z2U','ZLM','ZSK','ZSP') ) THEN
1147 hr_utility.set_message(8301, 'GHR_37171_ALL_PROCEDURE_FAIL');
1149 end if;
1150 else
1151 if p_First_NOAC_Lookup_Code= '540'
1152 and
1153 NOT ( p_First_Action_NOA_LA_Code1 in
1154 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM','NUM',
1155 'PNR','QGM','QHM','USM','U2M','VAJ','VCS',
1156 'VCT','VCW','VDJ','VFJ','VGJ','VHJ','V1P',
1157 'V8N','Z2U','ZLM','ZSK','ZSP') AND
1158 p_First_Action_NOA_LA_Code2 in
1159 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM','NUM',
1160 'PNR','QGM','QHM','USM','U2M','VAJ','VCS',
1161 'VCT','VCW','VDJ','VFJ','VGJ','VHJ','V1P',
1162 'V8N','Z2U','ZLM','ZSK','ZSP') ) THEN
1163 hr_utility.set_message(8301, 'GHR_37379_ALL_PROCEDURE_FAIL');
1164 hr_utility.raise_error;
1165 end if;
1166
1167 end if;
1168 --325.47.2
1169 -- added 'Z2U' on 22-jul-1998
1170 -- Update/Change Date By Effective Date Comment
1171 -- 8/5 03/09/99 vravikan Add ABR
1172 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
1173 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
1174
1175 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
1176
1177 if p_First_NOAC_Lookup_Code= '541'
1178 and
1179 NOT ( p_First_Action_NOA_LA_Code1 in
1180 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM','NUM',
1181 'PNR','QGM','QHM','UDM','USM','U2M','VAJ','VCS',
1182 'VCT','VCW','VDJ','VFJ','VGJ','VGL','VHJ','V1P',
1183 'V8N','Z2U','ZLM','ZSK','ZSP') AND
1184 p_First_Action_NOA_LA_Code2 in
1185 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM','NUM',
1186 'PNR','QGM','QHM','UDM','USM','U2M','VAJ','VCS',
1187 'VCT','VCW','VDJ','VFJ','VGJ','VHJ','VGL','V1P',
1188 'V8N','Z2U','ZLM','ZSK','ZSP') ) THEN
1189 hr_utility.set_message(8301, 'GHR_37293_ALL_PROCEDURE_FAIL');
1190 hr_utility.raise_error;
1191 end if;
1192 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
1193
1194 if p_First_NOAC_Lookup_Code= '541'
1195 and
1196 NOT ( p_First_Action_NOA_LA_Code1 in
1197 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM','NUM',
1198 'PNR','QGM','QHM','USM','U2M','VAJ','VCS',
1199 'VCT','VCW','VDJ','VFJ','VGJ','VGL','VHJ','V1P',
1200 'V8N','Z2U','ZLM','ZSK','ZSP') AND
1201 p_First_Action_NOA_LA_Code2 in
1202 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM','NUM',
1203 'PNR','QGM','QHM','USM','U2M','VAJ','VCS',
1204 'VCT','VCW','VDJ','VFJ','VGJ','VHJ','VGL','V1P',
1205 'V8N','Z2U','ZLM','ZSK','ZSP') ) THEN
1206 hr_utility.set_message(8301, 'GHR_37172_ALL_PROCEDURE_FAIL');
1207 hr_utility.raise_error;
1208 end if;
1209 else
1210 if p_First_NOAC_Lookup_Code= '541'
1211 and
1212 NOT ( p_First_Action_NOA_LA_Code1 in
1213 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM','NUM',
1214 'PNR','QGM','QHM','USM','U2M','VAJ','VCS',
1215 'VCT','VCW','VDJ','VFJ','VGJ','VHJ','V1P',
1216 'V8N','Z2U','ZLM','ZSK','ZSP') AND
1217 p_First_Action_NOA_LA_Code2 in
1218 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM','NUM',
1219 'PNR','QGM','QHM','USM','U2M','VAJ','VCS',
1220 'VCT','VCW','VDJ','VFJ','VGJ','VHJ','V1P',
1221 'V8N','Z2U','ZLM','ZSK','ZSP') ) THEN
1222 hr_utility.set_message(8301, 'GHR_37380_ALL_PROCEDURE_FAIL');
1223 hr_utility.raise_error;
1224 end if;
1225
1226 end if;
1227 --325.50.2
1228 -- Dec 2001 Patch 1-Nov-01 Delete AWM
1229 if p_effective_date < to_date('2001/11/01','yyyy/mm/dd') then
1230 if p_First_NOAC_Lookup_Code= '542'
1231 and
1232 NOT ( p_First_Action_NOA_LA_Code1 in
1233 ('BWM','HAM','HRM','NRM','NTM','PNR',
1234 'P3M','P5M','UFM','V2M','ZLM','ZSK','ZVB','ZVC') AND
1235 p_First_Action_NOA_LA_Code2 in
1236 ('BWM','HAM','HRM','NRM','NTM','PNR',
1237 'P3M','P5M','UFM','V2M','ZLM','ZSK','ZVB','ZVC') ) THEN
1238 hr_utility.set_message(8301, 'GHR_37381_ALL_PROCEDURE_FAIL');
1239 hr_utility.raise_error;
1240 end if;
1241 else
1242 if p_First_NOAC_Lookup_Code= '542'
1243 and
1244 NOT ( p_First_Action_NOA_LA_Code1 in
1245 ('BWM','HAM','HRM','NRM','NTM','PNR',
1246 'P3M','P5M','UFM','V2M','ZLM','ZSK','ZVB','ZVC') AND
1247 p_First_Action_NOA_LA_Code2 in
1248 ('BWM','HAM','HRM','NRM','NTM','PNR',
1249 'P3M','P5M','UFM','V2M','ZLM','ZSK','ZVB','ZVC') ) THEN
1250 hr_utility.set_message(8301, 'GHR_37903_ALL_PROCEDURE_FAIL');
1251 hr_utility.raise_error;
1252 end if;
1253 end if;
1254 --325.53.2
1255 -- Dec 2001 Patch 1-Nov-01 Delete AWM
1256 if p_effective_date < to_date('2001/11/01','yyyy/mm/dd') then
1257 if p_First_NOAC_Lookup_Code= '543'
1258 and
1259 NOT ( p_First_Action_NOA_LA_Code1 in
1260 ('BWM','HAM','PNR',
1261 'UFM','VBJ','VCJ','ZLM','ZSK','ZVB','ZVC') AND
1262 p_First_Action_NOA_LA_Code2 in
1263 ('BWM','HAM','PNR',
1264 'UFM','VBJ','VCJ','ZLM','ZSK','ZVB','ZVC') ) THEN
1265 hr_utility.set_message(8301, 'GHR_37382_ALL_PROCEDURE_FAIL');
1266 hr_utility.raise_error;
1270 and
1267 end if;
1268 else
1269 if p_First_NOAC_Lookup_Code= '543'
1271 NOT ( p_First_Action_NOA_LA_Code1 in
1272 ('BWM','HAM','PNR',
1273 'UFM','VBJ','VCJ','ZLM','ZSK','ZVB','ZVC') AND
1274 p_First_Action_NOA_LA_Code2 in
1275 ('BWM','HAM','PNR',
1276 'UFM','VBJ','VCJ','ZLM','ZSK','ZVB','ZVC') ) THEN
1277 hr_utility.set_message(8301, 'GHR_37902_ALL_PROCEDURE_FAIL');
1278 hr_utility.raise_error;
1279 end if;
1280 end if;
1281
1282 --325.57.2
1283 -- Dec 2001 Patch 1-Nov-01 Add AUM
1284 if p_effective_date < to_date('2001/11/01','yyyy/mm/dd') then
1285 if p_First_NOAC_Lookup_Code= '546'
1286 and
1287 NOT ( p_First_Action_NOA_LA_Code1 in
1288 ('AUM','AWM','BWM','HAM','NSM','NWM','PNR',
1289 'UFM','V4L','ZLM','ZSK','ZVB','ZVC') AND
1290 p_First_Action_NOA_LA_Code2 in
1291 ('AUM','AWM','BWM','HAM','NSM','NWM','PNR',
1292 'UFM','V4L','ZLM','ZSK','ZVB','ZVC') ) THEN
1293 hr_utility.set_message(8301, 'GHR_37383_ALL_PROCEDURE_FAIL');
1294 hr_utility.raise_error;
1295 end if;
1296 else
1297 if p_First_NOAC_Lookup_Code= '546'
1298 and
1299 NOT ( p_First_Action_NOA_LA_Code1 in
1300 ('AUM','AWM','BWM','HAM','NSM','NWM','PNR',
1301 'UFM','V4L','ZLM','ZSK','ZVB','ZVC') AND
1302 p_First_Action_NOA_LA_Code2 in
1303 ('AUM','AWM','BWM','HAM','NSM','NWM','PNR',
1304 'UFM','V4L','ZLM','ZSK','ZVB','ZVC') ) THEN
1305 hr_utility.set_message(8301, 'GHR_37901_ALL_PROCEDURE_FAIL');
1306 hr_utility.raise_error;
1307 end if;
1308 end if;
1309
1310 --325.60.2
1311 if p_First_NOAC_Lookup_Code= '548'
1312 and
1313 NOT ( p_First_Action_NOA_LA_Code1 in
1314 ('AWM','BWM','HAM','NVM','PNR',
1315 'UFM','V4M','ZLM','ZSK','ZVB','ZVC') AND
1316 p_First_Action_NOA_LA_Code2 in
1317 ('AWM','BWM','HAM','NVM','PNR',
1318 'UFM','V4M','ZLM','ZSK','ZVB','ZVC') ) THEN
1319 hr_utility.set_message(8301, 'GHR_37384_ALL_PROCEDURE_FAIL');
1320 hr_utility.raise_error;
1321 end if;
1322
1323 --325.63.2
1324 if p_First_NOAC_Lookup_Code= '549'
1325 and
1326 NOT ( p_First_Action_NOA_LA_Code1 in
1327 ('AWM','BWM','HAM','PNR',
1328 'UFM','V4P','ZLM','ZSK','ZVB','ZVC') AND
1329 p_First_Action_NOA_LA_Code2 in
1330 ('AWM','BWM','HAM','PNR',
1331 'UFM','V4P','ZLM','ZSK','ZVB','ZVC') ) THEN
1332 hr_utility.set_message(8301, 'GHR_37385_ALL_PROCEDURE_FAIL');
1333 hr_utility.raise_error;
1334 end if;
1335
1336 /* Commented -- Dec 2001 Patch
1337 --325.66.2
1338 if p_First_NOAC_Lookup_Code= '550'
1339 and
1340 NOT ( p_First_Action_NOA_LA_Code1 in
1341 ('HAM','PNR','P5M','TJK','TRK','TRL','TTK','TXK',
1342 'ZLM','ZSK','ZRM') AND
1343 p_First_Action_NOA_LA_Code2 in
1344 ('HAM','PNR','P5M','TJK','TRK','TRL','TTK','TXK',
1345 'ZLM','ZSK','ZRM') ) THEN
1346 hr_utility.set_message(8301, 'GHR_37386_ALL_PROCEDURE_FAIL');
1347 hr_utility.raise_error;
1348 end if;
1349 */
1350 /* Commented -- Dec 2001 Patch
1351
1352 --325.69.2
1353 if p_First_NOAC_Lookup_Code= '551'
1354 and
1355 NOT ( p_First_Action_NOA_LA_Code1 in
1356 ('HAM','PNR','P5M','TJK','TRL','TTK','TXK',
1357 'ZLM','ZSK','ZRM') AND
1358 p_First_Action_NOA_LA_Code2 in
1359 ('HAM','PNR','P5M','TJK','TRL','TTK','TXK',
1360 'ZLM','ZSK','ZRM') ) THEN
1361 hr_utility.set_message(8301, 'GHR_37387_ALL_PROCEDURE_FAIL');
1362 hr_utility.raise_error;
1363 end if;
1364 */
1365 /* Commented -- Dec 2001 Patch
1366
1367 --325.72.2
1368 if p_First_NOAC_Lookup_Code= '553'
1369 and
1370 NOT ( p_First_Action_NOA_LA_Code1 in
1371 ('HAM','PNR','TMK','TNK','TNM',
1372 'ZLM','ZSK') AND
1373 p_First_Action_NOA_LA_Code2 in
1374 ('HAM','PNR','TMK','TNK','TNM',
1375 'ZLM','ZSK') ) THEN
1376 hr_utility.set_message(8301, 'GHR_37388_ALL_PROCEDURE_FAIL');
1377 hr_utility.raise_error;
1378 end if;
1379 */
1380 /* Commented -- Dec 2001 Patch
1381
1382 --325.75.2
1383 if p_First_NOAC_Lookup_Code= '554'
1384 and
1385 NOT ( p_First_Action_NOA_LA_Code1 in
1386 ('HAM','PNR','TMK','TNK',
1387 'ZRM','ZSK') AND
1388 p_First_Action_NOA_LA_Code2 in
1389 ('HAM','PNR','TMK','TNK',
1390 'ZRM','ZSK') ) THEN
1391 hr_utility.set_message(8301, 'GHR_37389_ALL_PROCEDURE_FAIL');
1392 hr_utility.raise_error;
1393 end if;
1394 */
1395 /* Commented -- Dec 2001 Patch
1396
1397 --325.78.2
1398 if p_First_NOAC_Lookup_Code= '555'
1399 and
1400 NOT ( p_First_Action_NOA_LA_Code1 in
1401 ('HAM','PNR','TPK','ZLM','ZSK') AND
1402 p_First_Action_NOA_LA_Code2 in
1403 ('HAM','PNR','TPK','ZLM','ZSK') ) THEN
1404 hr_utility.set_message(8301, 'GHR_37390_ALL_PROCEDURE_FAIL');
1405 hr_utility.raise_error;
1406 end if;
1407 */
1408
1409 --325.81.2
1410 -- 10/4 08/13/99 vravikan 01-Jan-1999 Add VGL
1414 -- 08-Dec-00 vravikan From Begining Delete ZTA
1411 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
1412 -- 11/11 12/20/99 vravikan 01-Jan-1999 Change legal authorities "Y--" to "Y-- (except 'YKB')
1413 -- 21-Sep-00 vravikan From Begining Change legal authorities "Y--" to "Y-- (except 'YKB')
1415 -- added 'ZTA' on 12-oct-1998
1416 -- upd51 06-Feb-07 Raju From Begining Bug#5745356 add Legal autority Z6J
1417
1418 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
1419 if p_First_NOAC_Lookup_Code= '570'
1420 and
1421 NOT ((p_First_Action_NOA_LA_Code1 in
1422 ('ABK','ABL','ABM','ABR','BPM',
1423 'BWM','H2L','HAM','J8M','PNR','QGM','QHM','UAM',
1424 'UDM','UFM',
1425 'USM','U2M','VAJ','VCS', 'VCT', 'VCW','VDJ',
1426 'VFJ','VGJ','VGL','VHJ','V1P','V8K','Z2U','ZKM','ZLM','ZNM',
1427 'ZRM','ZSK','ZSP','ZTZ','ZVB','ZVC','Z2M','Z6J') OR
1428 ((SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X'))
1429 OR
1430 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('Y') AND
1431 p_First_Action_NOA_LA_Code1 <> 'YKB' )
1432 AND
1433 LENGTH(p_First_Action_NOA_LA_Code1) =3 )
1434 )
1435 AND
1436 (p_First_Action_NOA_LA_Code2 in
1437 ('ABK','ABL','ABM','ABR','BPM',
1438 'BWM','H2L','HAM','J8M','PNR','QGM','QHM','UAM',
1439 'UDM','UFM',
1440 'USM','U2M','VAJ','VCS', 'VCT', 'VCW','VDJ',
1441 'VFJ','VGJ','VGL','VHJ','V1P','V8K','Z2U','ZKM','ZLM','ZNM',
1442 'ZRM','ZSK','ZSP','ZTZ','ZVB','ZVC','Z2M','Z6J') OR
1443 ((SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X'))
1444 OR
1445 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('Y') AND
1446 p_First_Action_NOA_LA_Code2 <> 'YKB'
1447 ) AND
1448 LENGTH(p_First_Action_NOA_LA_Code2) =3 )))
1449 THEN
1450 hr_utility.set_message(8301, 'GHR_37294_ALL_PROCEDURE_FAIL');
1451 hr_utility.raise_error;
1452 end if;
1453 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
1454 if p_First_NOAC_Lookup_Code= '570'
1455 and
1456 NOT ((p_First_Action_NOA_LA_Code1 in
1457 ('ABK','ABL','ABM','ABR','BPM',
1458 'BWM','H2L','HAM','J8M','PNR','QGM','QHM','UAM','UFM',
1459 'USM','U2M','VAJ','VCS', 'VCT', 'VCW','VDJ',
1460 'VFJ','VGJ','VGL','VHJ','V1P','V8K','Z2U','ZKM','ZLM','ZNM',
1461 'ZRM','ZSK','ZSP','ZTZ','ZVB','ZVC','Z2M','Z6J') OR
1462 ((SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X'))
1463 OR
1464 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('Y') AND
1465 p_First_Action_NOA_LA_Code1 <> 'YKB' )
1466 AND
1467 LENGTH(p_First_Action_NOA_LA_Code1) =3 )
1468 )
1469 AND
1470 (p_First_Action_NOA_LA_Code2 in
1471 ('ABK','ABL','ABM','ABR','BPM',
1472 'BWM','H2L','HAM','J8M','PNR','QGM','QHM','UAM','UFM',
1473 'USM','U2M','VAJ','VCS', 'VCT', 'VCW','VDJ',
1474 'VFJ','VGJ','VGL','VHJ','V1P','V8K','Z2U','ZKM','ZLM','ZNM',
1475 'ZRM','ZSK','ZSP','ZTZ','ZVB','ZVC','Z2M','Z6J') OR
1476 ((SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X'))
1477 OR
1478 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('Y') AND
1479 p_First_Action_NOA_LA_Code2 <> 'YKB'
1480 ) AND
1481 LENGTH(p_First_Action_NOA_LA_Code2) =3 )))
1482 THEN
1483 hr_utility.set_message(8301, 'GHR_37173_ALL_PROCEDURE_FAIL');
1484 hr_utility.raise_error;
1485 end if;
1486 else
1487 if p_First_NOAC_Lookup_Code= '570'
1488 and
1489 NOT ((p_First_Action_NOA_LA_Code1 in
1490 ('ABK','ABL','ABM','ABR','BPM',
1491 'BWM','H2L','HAM','J8M','PNR','QGM','QHM','UAM','UFM',
1492 'USM','U2M','VAJ','VCS', 'VCT', 'VCW','VDJ',
1493 'VFJ','VGJ','VHJ','V1P','V8K','Z2U','ZKM','ZLM','ZNM',
1494 'ZRM','ZSK','ZSP','ZTZ','ZVB','ZVC','Z2M','Z6J') OR
1495 SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X') OR
1496 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('Y') AND
1497 p_First_Action_NOA_LA_Code1 <> 'YKB' )
1498 )
1499 AND
1500 (p_First_Action_NOA_LA_Code2 in
1501 ('ABK','ABL','ABM','ABR','BPM',
1502 'BWM','H2L','HAM','J8M','PNR','QGM','QHM','UAM','UFM',
1503 'USM','U2M','VAJ','VCS', 'VCT', 'VCW','VDJ',
1504 'VFJ','VGJ','VHJ','V1P','V8K','Z2U','ZKM','ZLM','ZNM',
1505 'ZRM','ZSK','ZSP','ZTZ','ZVB','ZVC','Z2M','Z6J') OR
1506 SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X') OR
1507 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('Y') AND
1508 p_First_Action_NOA_LA_Code2 <> 'YKB' )
1509 )
1510 )
1511 THEN
1512 hr_utility.set_message(8301, 'GHR_37391_ALL_PROCEDURE_FAIL');
1513 hr_utility.raise_error;
1514 end if;
1515
1516 end if;
1517
1518 --325.84.2
1519 -- added 'ZTA' on 12-oct-1998
1520 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
1521 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
1522 -- upd51 06-Feb-07 Raju From Begining Bug#5745356 add Legal autority Z6J
1523
1527 NOT ((p_First_Action_NOA_LA_Code1 in
1524 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
1525 if p_First_NOAC_Lookup_Code= '571'
1526 and
1528 ('ABK','ABL','ABM','ABR','BPM',
1529 'BWM','H2L','HAM','J8M','PNR','UAM','UDM','UFM',
1530 'V1P','V8K','V8V','VGL','Z2M','ZKM','ZLM','ZNM',
1531 'ZSK','ZSP','ZTA','ZVB','ZVC','ZWM','Z6J') OR
1532 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y') AND
1533 LENGTH(p_First_Action_NOA_LA_Code1) =3 ))
1534 AND
1535 (p_First_Action_NOA_LA_Code2 in
1536 ('ABK','ABL','ABM','ABR','BPM',
1537 'BWM','H2L','HAM','J8M','PNR','UAM','UDM','UFM',
1538 'V1P','V8K','V8V','VGL','Z2M','ZKM','ZLM','ZNM',
1539 'ZSK','ZSP','ZTA','ZVB','ZVC','ZWM','Z6J') OR
1540 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y') AND
1541 LENGTH(p_First_Action_NOA_LA_Code1) =3 )))
1542 THEN
1543 hr_utility.set_message(8301, 'GHR_37295_ALL_PROCEDURE_FAIL');
1544 hr_utility.raise_error;
1545 end if;
1546 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
1547 if p_First_NOAC_Lookup_Code= '571'
1548 and
1549 NOT ((p_First_Action_NOA_LA_Code1 in
1550 ('ABK','ABL','ABM','ABR','BPM',
1551 'BWM','H2L','HAM','J8M','PNR','UAM','UFM',
1552 'V1P','V8K','V8V','VGL','Z2M','ZKM','ZLM','ZNM',
1553 'ZSK','ZSP','ZTA','ZVB','ZVC','ZWM','Z6J') OR
1554 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y') AND
1555 LENGTH(p_First_Action_NOA_LA_Code1) =3 ))
1556 AND
1557 (p_First_Action_NOA_LA_Code2 in
1558 ('ABK','ABL','ABM','ABR','BPM',
1559 'BWM','H2L','HAM','J8M','PNR','UAM','UFM',
1560 'V1P','V8K','V8V','VGL','Z2M','ZKM','ZLM','ZNM',
1561 'ZSK','ZSP','ZTA','ZVB','ZVC','ZWM','Z6J') OR
1562 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y') AND
1563 LENGTH(p_First_Action_NOA_LA_Code1) =3 )))
1564 THEN
1565 hr_utility.set_message(8301, 'GHR_37174_ALL_PROCEDURE_FAIL');
1566 hr_utility.raise_error;
1567 end if;
1568 else
1569 if p_First_NOAC_Lookup_Code= '571'
1570 and
1571 NOT ((p_First_Action_NOA_LA_Code1 in
1572 ('ABK','ABL','ABM','ABR','BPM',
1573 'BWM','H2L','HAM','J8M','PNR','UAM','UFM',
1574 'V1P','V8K','V8V','Z2M','ZKM','ZLM','ZNM',
1575 'ZSK','ZSP','ZTA','ZVB','ZVC','ZWM','Z6J') OR
1576 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y') AND
1577 LENGTH(p_First_Action_NOA_LA_Code1) =3 ))
1578 AND
1579 (p_First_Action_NOA_LA_Code2 in
1580 ('ABK','ABL','ABM','ABR','BPM',
1581 'BWM','H2L','HAM','J8M','PNR','UAM','UFM',
1582 'V1P','V8K','V8V','Z2M','ZKM','ZLM','ZNM',
1583 'ZSK','ZSP','ZTA','ZVB','ZVC','ZWM','Z6J') OR
1584 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y') AND
1585 LENGTH(p_First_Action_NOA_LA_Code1) =3 )))
1586 THEN
1587 hr_utility.set_message(8301, 'GHR_37392_ALL_PROCEDURE_FAIL');
1588 hr_utility.raise_error;
1589 end if;
1590 end if;
1591
1592 --325.90.2
1593 -- added 'Z2U' on 22-jul-1998
1594 -- Update Date By Effective Date Comment
1595 -- 8 03/09/99 vravikan 01/31/99 Delete BEA,BMC,BNE, BNW,BRM
1596 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
1597 -- 9/3 09/14/99 vravikan 28-Feb-99 Delete CTM,NEL
1598 -- Dec 2001 Patch vravikan 01-Oct-01 Delete BFS,MYM, MZM
1599 if p_effective_date >= to_date('2001/10/01','yyyy/mm/dd') then
1600 if p_First_NOAC_Lookup_Code= '590'
1601 and
1602 NOT ((p_First_Action_NOA_LA_Code1 in
1603 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1604 'BPM','BWA',
1605 'BWM','CRK','CRL','CRN','C1K','C2K',
1606 'C3K','C4K','C1L','C2L','C3L','C4L','C1N',
1607 'C2N','C3N','C4N','H2L','HAM','J8M','KLM',
1608 'MXM','M6M','M8M','NAM','NCM',
1609 'NEM','NUM','NVM','PNR','UAM','UFM',
1610 'VJM','V1P','V4M','V4P','V8K','V8L','VGL',
1611 'V8N','V8V','Z2U','ZJK','ZKM','ZLM',
1612 'ZNM','ZQM','ZRM','ZSK','ZSP','ZTM') OR
1613 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y') AND
1614 LENGTH(p_First_Action_NOA_LA_Code1) =3 ))
1615 AND
1616 (p_First_Action_NOA_LA_Code2 in
1617 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1618 'BPM','BWA',
1619 'BWM','CRK','CRL','CRN','C1K','C2K',
1620 'C3K','C4K','C1L','C2L','C3L','C4L','C1N',
1621 'C2N','C3N','C4N','H2L','HAM','J8M','KLM',
1622 'MXM','M6M','M8M','NAM','NCM',
1623 'NEM','NUM','NVM','PNR','UAM','UFM',
1624 'VJM','V1P','V4M','V4P','V8K','V8L','VGL',
1625 'V8N','V8V','Z2U','ZJK','ZKM','ZLM',
1626 'ZNM','ZQM','ZRM','ZSK','ZSP','ZTM') OR
1627 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X','Y') AND
1628 LENGTH(p_First_Action_NOA_LA_Code2) =3 )))
1629 THEN
1630 hr_utility.set_message(8301, 'GHR_37921_ALL_PROCEDURE_FAIL');
1631 hr_utility.raise_error;
1632 end if;
1633 elsif p_effective_date >= to_date('1999/02/28','yyyy/mm/dd') then
1634 if p_First_NOAC_Lookup_Code= '590'
1635 and
1639 'BWM','CRK','CRL','CRN','C1K','C2K',
1636 NOT ((p_First_Action_NOA_LA_Code1 in
1637 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1638 'BPM','BWA',
1640 'C3K','C4K','C1L','C2L','C3L','C4L','C1N',
1641 'C2N','C3N','C4N','H2L','HAM','J8M','KLM',
1642 'MXM','MYM','MZM','M6M','M8M','NAM','NCM',
1643 'NEM','NUM','NVM','PNR','UAM','UFM',
1644 'VJM','V1P','V4M','V4P','V8K','V8L','VGL',
1645 'V8N','V8V','Z2U','ZJK','ZKM','ZLM',
1646 'ZNM','ZQM','ZRM','ZSK','ZSP','ZTM') OR
1647 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y') AND
1648 LENGTH(p_First_Action_NOA_LA_Code1) =3 ))
1649 AND
1650 (p_First_Action_NOA_LA_Code2 in
1651 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1652 'BPM','BWA',
1653 'BWM','CRK','CRL','CRN','C1K','C2K',
1654 'C3K','C4K','C1L','C2L','C3L','C4L','C1N',
1655 'C2N','C3N','C4N','H2L','HAM','J8M','KLM',
1656 'MXM','MYM','MZM','M6M','M8M','NAM','NCM',
1657 'NEM','NUM','NVM','PNR','UAM','UFM',
1658 'VJM','V1P','V4M','V4P','V8K','V8L','VGL',
1659 'V8N','V8V','Z2U','ZJK','ZKM','ZLM',
1660 'ZNM','ZQM','ZRM','ZSK','ZSP','ZTM') OR
1661 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X','Y') AND
1662 LENGTH(p_First_Action_NOA_LA_Code2) =3 )))
1663 THEN
1664 hr_utility.set_message(8301, 'GHR_37189_ALL_PROCEDURE_FAIL');
1665 hr_utility.raise_error;
1666 end if;
1667 elsif p_effective_date > to_date('1999/01/31','yyyy/mm/dd') then
1668 if p_First_NOAC_Lookup_Code= '590'
1669 and
1670 NOT ((p_First_Action_NOA_LA_Code1 in
1671 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1672 'BPM','BWA',
1673 'BWM','CRK','CRL','CRN','CTM','C1K','C2K',
1674 'C3K','C4K','C1L','C2L','C3L','C4L','C1N',
1675 'C2N','C3N','C4N','H2L','HAM','J8M','KLM',
1676 'MXM','MYM','MZM','M6M','M8M','NAM','NCM',
1677 'NEL','NEM','NUM','NVM','PNR','UAM','UFM',
1678 'VJM','V1P','V4M','V4P','V8K','V8L','VGL',
1679 'V8N','V8V','Z2U','ZJK','ZKM','ZLM',
1680 'ZNM','ZQM','ZRM','ZSK','ZSP','ZTM') OR
1681 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y') AND
1682 LENGTH(p_First_Action_NOA_LA_Code1) =3 ))
1683 AND
1684 (p_First_Action_NOA_LA_Code2 in
1685 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1686 'BPM','BWA',
1687 'BWM','CRK','CRL','CRN','CTM','C1K','C2K',
1688 'C3K','C4K','C1L','C2L','C3L','C4L','C1N',
1689 'C2N','C3N','C4N','H2L','HAM','J8M','KLM',
1690 'MXM','MYM','MZM','M6M','M8M','NAM','NCM',
1691 'NEL','NEM','NUM','NVM','PNR','UAM','UFM',
1692 'VJM','V1P','V4M','V4P','V8K','V8L','VGL',
1693 'V8N','V8V','Z2U','ZJK','ZKM','ZLM',
1694 'ZNM','ZQM','ZRM','ZSK','ZSP','ZTM') OR
1695 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X','Y') AND
1696 LENGTH(p_First_Action_NOA_LA_Code2) =3 )))
1697 THEN
1698 hr_utility.set_message(8301, 'GHR_37048_ALL_PROCEDURE_FAIL');
1699 hr_utility.raise_error;
1700 end if;
1701 elsif p_effective_date >= to_date('1999/01/01','yyyy/mm/dd') then
1702 if p_First_NOAC_Lookup_Code= '590'
1703 and
1704 NOT ((p_First_Action_NOA_LA_Code1 in
1705 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1706 'BEA','BMC','BNE','BNW','BPM','BRM','BWA',
1707 'BWM','CRK','CRL','CRN','CTM','C1K','C2K',
1708 'C3K','C4K','C1L','C2L','C3L','C4L','C1N',
1709 'C2N','C3N','C4N','H2L','HAM','J8M','KLM',
1710 'MXM','MYM','MZM','M6M','M8M','NAM','NCM',
1711 'NEL','NEM','NUM','NVM','PNR','UAM','UFM',
1712 'VJM','V1P','V4M','V4P','V8K','V8L','VGL',
1713 'V8N','V8V','Z2U','ZJK','ZKM','ZLM',
1714 'ZNM','ZQM','ZRM','ZSK','ZSP','ZTM') OR
1715 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y') AND
1716 LENGTH(p_First_Action_NOA_LA_Code1) =3 ))
1717 AND
1718 (p_First_Action_NOA_LA_Code2 in
1719 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1720 'BEA','BMC','BNE','BNW','BPM','BRM','BWA',
1721 'BWM','CRK','CRL','CRN','CTM','C1K','C2K',
1722 'C3K','C4K','C1L','C2L','C3L','C4L','C1N',
1723 'C2N','C3N','C4N','H2L','HAM','J8M','KLM',
1724 'MXM','MYM','MZM','M6M','M8M','NAM','NCM',
1725 'NEL','NEM','NUM','NVM','PNR','UAM','UFM',
1726 'VJM','V1P','V4M','V4P','V8K','V8L','VGL',
1727 'V8N','V8V','Z2U','ZJK','ZKM','ZLM',
1728 'ZNM','ZQM','ZRM','ZSK','ZSP','ZTM') OR
1729 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X','Y') AND
1730 LENGTH(p_First_Action_NOA_LA_Code2) =3 )))
1731 THEN
1732 hr_utility.set_message(8301, 'GHR_37175_ALL_PROCEDURE_FAIL');
1733 hr_utility.raise_error;
1734 end if;
1735 else
1736 if p_First_NOAC_Lookup_Code= '590'
1737 and
1738 NOT ((p_First_Action_NOA_LA_Code1 in
1739 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1740 'BEA','BMC','BNE','BNW','BPM','BRM','BWA',
1741 'BWM','CRK','CRL','CRN','CTM','C1K','C2K',
1742 'C3K','C4K','C1L','C2L','C3L','C4L','C1N',
1743 'C2N','C3N','C4N','H2L','HAM','J8M','KLM',
1747 'V8N','V8V','Z2U','ZJK','ZKM','ZLM',
1744 'MXM','MYM','MZM','M6M','M8M','NAM','NCM',
1745 'NEL','NEM','NUM','NVM','PNR','UAM','UFM',
1746 'VJM','V1P','V4M','V4P','V8K','V8L',
1748 'ZNM','ZQM','ZRM','ZSK','ZSP','ZTM') OR
1749 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y') AND
1750 LENGTH(p_First_Action_NOA_LA_Code1) =3 ))
1751 AND
1752 (p_First_Action_NOA_LA_Code2 in
1753 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1754 'BEA','BMC','BNE','BNW','BPM','BRM','BWA',
1755 'BWM','CRK','CRL','CRN','CTM','C1K','C2K',
1756 'C3K','C4K','C1L','C2L','C3L','C4L','C1N',
1757 'C2N','C3N','C4N','H2L','HAM','J8M','KLM',
1758 'MXM','MYM','MZM','M6M','M8M','NAM','NCM',
1759 'NEL','NEM','NUM','NVM','PNR','UAM','UFM',
1760 'VJM','V1P','V4M','V4P','V8K','V8L',
1761 'V8N','V8V','Z2U','ZJK','ZKM','ZLM',
1762 'ZNM','ZQM','ZRM','ZSK','ZSP','ZTM') OR
1763 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X','Y') AND
1764 LENGTH(p_First_Action_NOA_LA_Code2) =3 )))
1765 THEN
1766 hr_utility.set_message(8301, 'GHR_37393_ALL_PROCEDURE_FAIL');
1767 hr_utility.raise_error;
1768 end if;
1769 end if;
1770 --328.02.2
1771 -- added LA code ZSE on 23-jul-98
1772 --upd47 26-Jun-06 Raju From Beginning Added ZSL
1773 if p_First_NOAC_Lookup_Code= '803'
1774 and
1775 NOT ( p_First_Action_NOA_LA_Code1 in
1776 ('CGM','ZLM','ZSM','ZSE','ZSL') AND
1777 p_First_Action_NOA_LA_Code2 in
1778 ('CGM','ZLM','ZSM','ZSE','ZSL') ) THEN
1779 hr_utility.set_message(8301, 'GHR_37394_ALL_PROCEDURE_FAIL');
1780 hr_utility.raise_error;
1781 end if;
1782
1783 --328.10.2
1784 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
1785 -- 17-Aug-00 vravikan From the Start Add V7R
1786 -- 17-Aug-00 vravikan From the Start Delete ZTS
1787 -- 25-May-02 vnarasim From the Start Modified date,
1788 -- added ZTS in else
1789 -- part.
1790 if p_effective_date >= to_date('20'||'00/08/01','yyyy/mm/dd') then
1791 if p_First_NOAC_Lookup_Code= '810'
1792 and
1793 NOT ( p_First_Action_NOA_LA_Code1 in
1794 ('UDM','UFM','VPG','VPH','VXK','V8K',
1795 'V8N','V8V','ZLM','V7R','ZTZ','ZVB','ZVC') AND
1796 p_First_Action_NOA_LA_Code2 in
1797 ('UDM','UFM','VPG','VPH','VXK','V8K',
1798 'V8N','V8V','ZLM','V7R','ZTZ','ZVB','ZVC') ) THEN
1799 hr_utility.set_message(8301, 'GHR_37296_ALL_PROCEDURE_FAIL');
1800 hr_utility.raise_error;
1801 end if;
1802 else
1803 if p_First_NOAC_Lookup_Code= '810'
1804 and
1805 NOT ( p_First_Action_NOA_LA_Code1 in
1806 ('UFM','VPG','VPH','VXK','V8K','V8N','V8V','ZLM','V7R','ZTS','ZTZ','ZVB','ZVC') AND
1807 p_First_Action_NOA_LA_Code2 in
1808 ('UFM','VPG','VPH','VXK','V8K','V8N','V8V','ZLM','V7R','ZTS','ZTZ','ZVB','ZVC') ) THEN
1809 hr_utility.set_message(8301, 'GHR_37395_ALL_PROCEDURE_FAIL');
1810 hr_utility.raise_error;
1811 end if;
1812 end if;
1813
1814 --329.05.2
1815 -- added ZPK on 23-jul-1998
1816 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
1817 -- 17-Aug-00 vravikan From the Start Add V7R
1818 -- Dec 2001 Patch vravikan 01-Oct-2001 Delete ZPK
1819 -- UPD 41(Bug 4567571) Raju 08-Nov-2005 Add VPO and VPT
1820
1821 if p_effective_date >= to_date('2001/10/01','yyyy/mm/dd') then
1822 if p_First_NOAC_Lookup_Code= '815'
1823 and
1824 NOT ( p_First_Action_NOA_LA_Code1 in
1825 ('UAM','UDM','UFM','VPF','V7R','V8K','V8N','V8V','ZLM','ZVB','ZVC','VPO','VPT') AND
1826 p_First_Action_NOA_LA_Code2 in
1827 ('UAM','UDM','UFM','VPF','V7R','V8K','V8N','V8V','ZLM','ZVB','ZVC','VPO','VPT') ) THEN
1828 hr_utility.set_message(8301, 'GHR_37920_ALL_PROCEDURE_FAIL');
1829 hr_utility.raise_error;
1830 end if;
1831 elsif p_effective_date >= to_date('1999/11/01','yyyy/mm/dd') then
1832 if p_First_NOAC_Lookup_Code= '815'
1833 and
1834 NOT ( p_First_Action_NOA_LA_Code1 in
1835 ('UAM','UDM','UFM','VPF','V7R','V8K','V8N','V8V','ZPK','ZLM','ZVB','ZVC','VPO','VPT') AND
1836 p_First_Action_NOA_LA_Code2 in
1837 ('UAM','UDM','UFM','VPF','V7R','V8K','V8N','V8V','ZPK','ZLM','ZVB','ZVC','VPO','VPT') ) THEN
1838 hr_utility.set_message(8301, 'GHR_37297_ALL_PROCEDURE_FAIL');
1839 hr_utility.raise_error;
1840 end if;
1841 else
1842 if p_First_NOAC_Lookup_Code= '815'
1843 and
1844 NOT ( p_First_Action_NOA_LA_Code1 in
1845 ('UAM','UFM','VPF','V7R','V8K','V8N','V8V','ZPK','ZLM','ZVB','ZVC','VPO','VPT') AND
1846 p_First_Action_NOA_LA_Code2 in
1847 ('UAM','UFM','VPF','V7R','V8K','V8N','V8V','ZPK','ZLM','ZVB','ZVC','VPO','VPT') ) THEN
1848 hr_utility.set_message(8301, 'GHR_37396_ALL_PROCEDURE_FAIL');
1849 hr_utility.raise_error;
1850 end if;
1851 end if;
1852 --329.07.2
1853 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
1854 -- 17-Aug-00 vravikan From the Start Add V7R
1858 and
1855 -- UPD 41(Bug 4567571) Raju 08-Nov-2005 Add VPO and VPW
1856 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
1857 if p_First_NOAC_Lookup_Code= '816'
1859 NOT ( p_First_Action_NOA_LA_Code1 in
1860 ('UAM','UDM','UFM','VPF','V7R','V8K','V8N','V8V','ZLM','ZTY','ZVB','ZVC','VPO','VPW') AND
1861 p_First_Action_NOA_LA_Code2 in
1862 ('UAM','UDM','UFM','VPF','V7R','V8K','V8N','V8V','ZLM','ZTY','ZVB','ZVC','VPO','VPW') ) THEN
1863 hr_utility.set_message(8301, 'GHR_37298_ALL_PROCEDURE_FAIL');
1864 hr_utility.raise_error;
1865 end if;
1866 else
1867 if p_First_NOAC_Lookup_Code= '816'
1868 and
1869 NOT ( p_First_Action_NOA_LA_Code1 in
1870 ('UAM','UFM','VPF','V7R','V8K','V8N','V8V','ZLM','ZTY','ZVB','ZVC','VPO','VPW') AND
1871 p_First_Action_NOA_LA_Code2 in
1872 ('UAM','UFM','VPF','V7R','V8K','V8N','V8V','ZLM','ZTY','ZVB','ZVC','VPO','VPW') ) THEN
1873 hr_utility.set_message(8301, 'GHR_37397_ALL_PROCEDURE_FAIL');
1874 hr_utility.raise_error;
1875 end if;
1876 end if;
1877 --329.09.2
1878 if p_First_NOAC_Lookup_Code= '818'
1879 and
1880 NOT ( p_First_Action_NOA_LA_Code1 in
1881 ('RMM','UFM','V8K','V8N','V8V','ZLM','ZVB','ZVC') AND
1882 p_First_Action_NOA_LA_Code2 in
1883 ('RMM','UFM','V8K','V8N','V8V','ZLM','ZVB','ZVC') ) THEN
1884 hr_utility.set_message(8301, 'GHR_37398_ALL_PROCEDURE_FAIL');
1885 hr_utility.raise_error;
1886 end if;
1887 -- 329.18.2
1888 -- 10-Nov-2005 Raju Created the edit
1889 -- 14-Apr-2008 Raju added VPA,VPB, VPC
1890 -- If Nature of Action is 827, the Legal Authority must be VPN, VPR, VPS, VPX, VPY, Z4G, Z4H
1891 if p_First_NOAC_Lookup_Code= '827' and
1892 NOT ( p_First_Action_NOA_LA_Code1 in
1893 ('VPA','VPB','VPC','VPN', 'VPR', 'VPS', 'VPX', 'VPY', 'Z4G', 'Z4H') AND
1894 p_First_Action_NOA_LA_Code2 in
1895 ('VPA','VPB','VPC','VPN', 'VPR', 'VPS', 'VPX', 'VPY', 'Z4G', 'Z4H') ) THEN
1896 hr_utility.set_message(8301, 'GHR_38987_ALL_PROCEDURE_FAIL');
1897 hr_utility.raise_error;
1898 end if;
1899
1900 --329.30.2
1901 -- Update Date By Effective Date Comment
1902 -- 05-NOV-03 ajose From the begining Added the Edit as a part of EOY03 changes
1903 --upd47 26-Jun-06 Raju From 01-May-2006 Terminate the edit
1904 if p_effective_date < fnd_date.canonical_to_date('2006/05/01') then
1905 IF p_First_NOAC_Lookup_Code= '849' AND
1906 NOT ( p_First_Action_NOA_LA_Code1 IN
1907 ('V9N','V9P') AND
1908 p_First_Action_NOA_LA_Code2 IN
1909 ('V9N','V9P') ) THEN
1910 hr_utility.set_message(8301, 'GHR_38840_ALL_PROCEDURE_FAIL');
1911 hr_utility.raise_error;
1912 END IF;
1913 end if;
1914
1915 --329.50.2
1916 if p_First_NOAC_Lookup_Code= '867'
1917 and
1918 NOT ( p_First_Action_NOA_LA_Code1 in
1919 ('Q9K','ZVB','ZVC') AND
1920 p_First_Action_NOA_LA_Code2 in
1921 ('Q9K','ZVB','ZVC') ) THEN
1922 hr_utility.set_message(8301, 'GHR_37399_ALL_PROCEDURE_FAIL');
1923 hr_utility.raise_error;
1924 end if;
1925
1926 --329.55.2
1927 if p_First_NOAC_Lookup_Code= '868'
1928 and
1929 NOT ( p_First_Action_NOA_LA_Code1 in
1930 ('Q9M','ZVB','ZVC') AND
1931 p_First_Action_NOA_LA_Code2 in
1932 ('Q9M','ZVB','ZVC') ) THEN
1933 hr_utility.set_message(8301, 'GHR_37400_ALL_PROCEDURE_FAIL');
1934 hr_utility.raise_error;
1935 end if;
1936
1937 --329.58.2
1938 -- 11/9 12/14/99 vravikan 01-Nov-1999 New Edit
1939 -- If nature of action is 871, then legal authority must be UAM
1940 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
1941 if p_First_NOAC_Lookup_Code= '871'
1942 and
1943 NOT ( p_First_Action_NOA_LA_Code1 in
1944 ('UAM') AND
1945 p_First_Action_NOA_LA_Code2 in
1946 ('UAM') ) THEN
1947 hr_utility.set_message(8301, 'GHR_37407_ALL_PROCEDURE_FAIL');
1948 hr_utility.raise_error;
1949 end if;
1950 end if;
1951 --Commented as per EOY 2003 cpdf changes by Ashley
1952 --330.02.2
1953 -- Award Req 8/15/00 vravikan 30-sep-2000 End date
1954 -- 17-Aug-00 vravikan From the Start Add V7R
1955 /* if p_effective_date <= to_date('2000/09/30','yyyy/mm/dd') then
1956 if p_First_NOAC_Lookup_Code= '875'
1957 and
1958 NOT ( p_First_Action_NOA_LA_Code1 in
1959 ('UFM','V3G','V4G','V7R','V8V','ZVB') AND
1960 p_First_Action_NOA_LA_Code2 in
1961 ('UFM','V3G','V4G','V7R','V8V','ZVB') ) THEN
1962 hr_utility.set_message(8301, 'GHR_37401_ALL_PROCEDURE_FAIL');
1963 hr_utility.raise_error;
1964 end if;
1965 end if;*/
1966
1967 --Commented as per EOY 2003 cpdf changes by Ashley
1968 --330.05.2
1969 -- Award Req 8/15/00 vravikan 30-sep-2000 End date
1970 -- 17-Aug-00 vravikan From the Start Add V7R
1971 /* if p_effective_date <= to_date('2000/09/30','yyyy/mm/dd') then
1972 if p_First_NOAC_Lookup_Code= '876'
1973 and
1974 NOT ( p_First_Action_NOA_LA_Code1 in
1975 ('UFM','V3G','V4G','V7R','V8V','ZVB') AND
1976 p_First_Action_NOA_LA_Code2 in
1977 ('UFM','V3G','V4G','V7R','V8V','ZVB') ) THEN
1978 hr_utility.set_message(8301, 'GHR_37402_ALL_PROCEDURE_FAIL');
1979 hr_utility.raise_error;
1980 end if;
1981 end if;*/
1982
1983 --Commented as per EOY 2003 cpdf changes by Ashley
1984 --330.08.2
1985 -- Award Req 8/15/00 vravikan 30-sep-2000 End date
1986 -- 17-Aug-00 vravikan From the Start Add V7R
1987 /* if p_effective_date <= to_date('2000/09/30','yyyy/mm/dd') then
1988 if p_First_NOAC_Lookup_Code= '877'
1989 and
1990 NOT ( p_First_Action_NOA_LA_Code1 in
1991 ('UFM','VGL','V3F','V3G','V4G','V7R','V8V','ZVB') AND
1992 p_First_Action_NOA_LA_Code2 in
1993 ('UFM','VGL','V3F','V3G','V4G','V7R','V8V','ZVB') ) THEN
1994 hr_utility.set_message(8301, 'GHR_37403_ALL_PROCEDURE_FAIL');
1995 hr_utility.raise_error;
1996 end if;
1997 end if;
1998 */
1999
2000 --330.11.2
2001 -- 11/3 12/14/99 vravikan 01-Nov-1999 Add UBM
2002 -- Upd 47 23-Jun-06 Raju From Begining Added V9N,V9P
2003 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
2004 if p_First_NOAC_Lookup_Code= '878'
2005 and
2006 NOT ( p_First_Action_NOA_LA_Code1 in
2007 ('UBM','UFM','V8G','V7G','V9N','V9P','ZVB','ZVC') AND
2008 p_First_Action_NOA_LA_Code2 in
2009 ('UBM','UFM','V8G','V7G','V9N','V9P','ZVB','ZVC') ) THEN
2010 hr_utility.set_message(8301, 'GHR_37408_ALL_PROCEDURE_FAIL');
2011 hr_utility.raise_error;
2012 end if;
2013 else
2014 if p_First_NOAC_Lookup_Code= '878'
2015 and
2016 NOT ( p_First_Action_NOA_LA_Code1 in
2017 ('UFM','V8G','V7G','V9N','V9P','ZVB','ZVC') AND
2018 p_First_Action_NOA_LA_Code2 in
2019 ('UFM','V8G','V7G','V9N','V9P','ZVB','ZVC') ) THEN
2020 hr_utility.set_message(8301, 'GHR_37404_ALL_PROCEDURE_FAIL');
2021 hr_utility.raise_error;
2022 end if;
2023 end if;
2024
2025 --330.12.2
2026 -- 11/3 12/14/99 vravikan 01-Nov-1999 Add UBM
2027 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
2028 if p_First_NOAC_Lookup_Code= '879'
2029 and
2030 NOT ( p_First_Action_NOA_LA_Code1 in
2031 ('UBM','UFM','VWK','ZLM','ZVB','ZVC') AND
2032 p_First_Action_NOA_LA_Code2 in
2033 ('UBM','UFM','VWK','ZLM','ZVB','ZVC') ) THEN
2034 hr_utility.set_message(8301, 'GHR_37409_ALL_PROCEDURE_FAIL');
2035 hr_utility.raise_error;
2036 end if;
2037 else
2038 if p_First_NOAC_Lookup_Code= '879'
2039 and
2040 NOT ( p_First_Action_NOA_LA_Code1 in
2041 ('UFM','VWK','ZLM','ZVB','ZVC') AND
2042 p_First_Action_NOA_LA_Code2 in
2043 ('UFM','VWK','ZLM','ZVB','ZVC') ) THEN
2044 hr_utility.set_message(8301, 'GHR_37405_ALL_PROCEDURE_FAIL');
2045 hr_utility.raise_error;
2046 end if;
2047 end if;
2048 --Commented as per EOY 2003 cpdf changes by Ashley
2049 --330.14.2
2050 -- added 'Z2W' on 12-oct-1998
2051 -- Award Req 8/15/00 vravikan 30-sep-2000 End date
2052 -- 17-Aug-00 vravikan From the Start Add V7R
2053 /* if p_effective_date <= to_date('2000/09/30','yyyy/mm/dd') then
2054 if p_First_NOAC_Lookup_Code= '885'
2055 and
2056 NOT ( p_First_Action_NOA_LA_Code1 in
2057 ('Q4M','UAM','UFM','VGL','V4R','V7R','V8V',
2058 'Z2W','ZLM','ZSR','Z2M','ZVB') AND
2059 p_First_Action_NOA_LA_Code2 in
2060 ('Q4M','UAM','UFM','VGL','V4R','V7R','V8V',
2061 'Z2W','ZLM','ZSR','Z2M','ZVB') ) THEN
2062 hr_utility.set_message(8301, 'GHR_37406_ALL_PROCEDURE_FAIL');
2063 hr_utility.raise_error;
2064 end if;
2065 end if;
2066 */
2067
2068 end chk_Legal_Authority_a;
2069
2070 end GHR_CPDF_CHECK4A;