[Home] [Help]
PACKAGE BODY: APPS.GHR_CPDF_CHECK4
Source
1 package body GHR_CPDF_CHECK4 as
2 /* $Header: ghcpdf04.pkb 120.9.12010000.4 2008/12/03 11:03:19 utokachi ship $ */
3
4 -- Legal Authority
5
6 procedure chk_Legal_Authority
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
16 begin
17
18 -- 250.02.2
19 -- renamed this edit from 250.01.2 for the april release
20 if (
21 p_First_Action_NOA_LA_Code1 = 'ZVB'
22 or
23 p_First_Action_NOA_LA_Code2 = 'ZVB'
24 )
25 and
26 p_agency_sub_element <>'TD03'
27 then
28 hr_utility.set_message(8301, 'GHR_37301_ALL_PROCEDURE_FAIL');
29 hr_utility.raise_error;
30 end if;
31
32 -- 250.03.2
33 --
34 -- 12/8/00 vravikan From the start Add UAM
35 -- If either legal authority is Z2U, then agency must be AF,AR,DD or NV
36 --
37 if p_effective_date > fnd_date.canonical_to_date('1998/03/01') then
38 if (p_First_Action_NOA_LA_Code1 in ('Z2U','UAM') or
39 p_First_Action_NOA_LA_Code2 in ('Z2U','UAM') ) and
40 substr(p_agency_sub_element,1,2) not in ('AF','AR','DD','NV') then
41 hr_utility.set_message(8301, 'GHR_37883_ALL_PROCEDURE_FAIL');
42 hr_utility.raise_error;
43 end if;
44 end if;
45
46 /* Commented -- Dec 2001 Patch
47 -- 250.04.2
48 -- Raju 09-Nov-2005 UPD 43(Bug 4567571) Add Edit
49 --
50 -- If either legal authority is ZPK, then agency must be PC
51 --
52 if p_effective_date > fnd_date.canonical_to_date('1998/03/01') then
53 if (p_First_Action_NOA_LA_Code1 = 'ZPK' or
54 p_First_Action_NOA_LA_Code2 = 'ZPK' ) and
55 substr(p_agency_sub_element,1,2) <> 'PC' then
56 hr_utility.set_message(8301, 'GHR_37885_ALL_PROCEDURE_FAIL');
57 hr_utility.raise_error;
58 end if;
59 end if;
60 */
61 -- Begin Bug 4567571
62 if (p_First_Action_NOA_LA_Code1 = 'BAE' or
63 p_First_Action_NOA_LA_Code2 = 'BAE' ) and
64 substr(p_agency_sub_element,1,2) IN('AF','AR','DD','NV') then
65 hr_utility.set_message(8301, 'GHR_38985_ALL_PROCEDURE_FAIL');
66 hr_utility.raise_error;
67 end if;
68 -- End Bug 4567571
69
70 --
71 -- 250.05.2 If either legal authority is Z2W,
72 -- Then agency must be AF, AR, DD, or NV.
73 --
74 if p_effective_date >= fnd_date.canonical_to_date('1998/09/01') then
75 if (p_First_Action_NOA_LA_Code1 = 'Z2W' or
76 p_First_Action_NOA_LA_Code2 = 'Z2W' ) and
77 substr(p_agency_sub_element,1,2) not in ('AF','AR','DD','NV') then
78 hr_utility.set_message(8301, 'GHR_37894_ALL_PROCEDURE_FAIL');
79 hr_utility.raise_error;
80 end if;
81 end if;
82 /* Commented as per December 2000 cpdf changes -- vravikan
83 --
84 -- 250.06.2 If either legal authority is ZTA,
85 -- And position occupied is 1,
86 -- Then agency/subelement must be DJ03.
87 --
88 if p_effective_date >= fnd_date.canonical_to_date('1998/09/01') then
89 if (p_First_Action_NOA_LA_Code1 = 'ZTA' or
90 p_First_Action_NOA_LA_Code2 = 'ZTA' ) and
91 p_position_occupied_code = '1' and
92 p_agency_sub_element <> 'DJ03' then
93 hr_utility.set_message(8301, 'GHR_37895_ALL_PROCEDURE_FAIL');
94 hr_utility.raise_error;
95 end if;
96 end if;
97
98
99 */
100 -- 250.07.2 If either legal authority is ZVC,
101 -- Then agency/subelement must be TD19.
102 -- Updation Date Updated By Remarks
103 -- ============================================
104 -- 19-MAR-2003 vnarasim Added agency/subelement HSBC.
105 -- 30-OCT-2003 Ashley Deleted agency/subelement TD19
106 --
107 if p_effective_date >= fnd_date.canonical_to_date('2000/10/01') then
108 if (p_First_Action_NOA_LA_Code1 = 'ZVC' or
109 p_First_Action_NOA_LA_Code2 = 'ZVC' ) and
110 p_agency_sub_element NOT IN ('HSBC') then
111 hr_utility.set_message(8301, 'GHR_37926_ALL_PROCEDURE_FAIL');
112 hr_utility.raise_error;
113 end if;
114 end if;
115 -- 250.08.2
116 -- deleted legal authority M4M and nature of action 117,517,761
117 if (
118 p_First_Action_NOA_LA_Code1 in ('M6M','M8M')
119 or
120 p_First_Action_NOA_LA_Code2 in ('M6M','M8M')
121 )
122 and
123 p_First_NOAC_Lookup_Code not in ('115','190','515','590','760')
124 then
125 hr_utility.set_message(8301, 'GHR_37302_ALL_PROCEDURE_FAIL');
126 hr_utility.raise_error;
127 end if;
128
129 --250.09.2
130 -- If either (first or second) Legal
131 -- Authority is UDM, then Agency must be TR.
132 -- 18-Aug-00 vravikan 01-Jan-2000 New Edit
133 if p_effective_date >= to_date('2000/01/01','yyyy/mm/dd') then
134 if (
135 p_First_Action_NOA_LA_Code1 = 'UDM'
136 or
137 p_First_Action_NOA_LA_Code2 = 'UDM'
138 )
139 and
140 substr(p_agency_sub_element,1,2) <> 'TR'
141 and
142 p_agency_sub_element is not null
143 then
144 hr_utility.set_message(8301, 'GHR_37418_ALL_PROCEDURE_FAIL');
145 hr_utility.raise_error;
146 end if;
147 end if;
148 --250.09.3
149 -- If either (first or second) Legal
150 -- Authority is UDM, then Agency must be TR.
151 -- 11/8 12/14/99 vravikan 01-Nov-1999 New Edit
152 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
153 if (
154 p_First_Action_NOA_LA_Code1 = 'UDM'
155 or
156 p_First_Action_NOA_LA_Code2 = 'UDM'
157 )
158 and
159 substr(p_agency_sub_element,1,2) <> 'TR'
160 and
161 p_agency_sub_element is not null
162 then
163 hr_utility.set_message(8301, 'GHR_37060_ALL_PROCEDURE_FAIL');
164 hr_utility.raise_error;
165 end if;
166 end if;
167 --250.13.2
168 -- upd50 06-Feb-07 Raju From 01-Oct-2006 Bug#5745356 delete Pay plan FZ
169 if p_effective_date < to_date('2006/10/01','yyyy/mm/dd') then
170 if ( p_First_Action_NOA_LA_Code1 = 'UFM' or
171 p_First_Action_NOA_LA_Code2 = 'UFM'
172 ) and
173 p_to_play_plan not in ('FA','FE','FO','FP','FZ','GG') and
174 p_to_play_plan is not null
175 then
176 hr_utility.set_message(8301, 'GHR_37303_ALL_PROCEDURE_FAIL');
177 hr_utility.set_message_token('PAY_PLAN','FA, FE, FO, FP, FZ or GG');
178 hr_utility.raise_error;
179 end if;
180 else
181 if ( p_First_Action_NOA_LA_Code1 = 'UFM' or
182 p_First_Action_NOA_LA_Code2 = 'UFM'
183 ) and
184 p_to_play_plan not in ('FA','FE','FO','FP','GG') and
185 p_to_play_plan is not null
186 then
187 hr_utility.set_message(8301, 'GHR_37303_ALL_PROCEDURE_FAIL');
188 hr_utility.set_message_token('PAY_PLAN','FA, FE, FO, FP or GG');
189 hr_utility.raise_error;
190 end if;
191 end if;
192 -- 250.16.2
193 if (
194 p_First_Action_NOA_LA_Code1 = 'V8K'
195 or
196 p_First_Action_NOA_LA_Code1 = 'V8N'
197 or
198 p_First_Action_NOA_LA_Code2 = 'V8K'
199 or
200 p_First_Action_NOA_LA_Code2 = 'V8N'
201 )
202 and
203 p_agency_sub_element not in ('AFNG','AFZG','ARNG')
204 then
205 hr_utility.set_message(8301, 'GHR_37304_ALL_PROCEDURE_FAIL');
206 hr_utility.raise_error;
207 end if;
208
209 --Begin Bug# 5745356
210 -- 250.17.2
211 if p_effective_date >= to_date('2007/01/01','yyyy/mm/dd') then
212 if (p_First_Action_NOA_LA_Code1 = 'Z6H' or p_First_Action_NOA_LA_Code2 = 'Z6H')
213 and substr(p_agency_sub_element,1,2) not in ('AF','AR','DD','NV') then
214 hr_utility.set_message(8301, 'GHR_37000_ALL_PROCEDURE_FAIL');
215 hr_utility.raise_error;
216 end if;
217 end if;
218 -- 250.18.2
219 if p_effective_date >= to_date('2007/01/01','yyyy/mm/dd') then
220 if (p_First_Action_NOA_LA_Code1 = 'Z6J' or p_First_Action_NOA_LA_Code2 = 'Z6J')
221 and substr(p_agency_sub_element,1,2) not in ('AF','AR','DD','NV') then
222 hr_utility.set_message(8301, 'GHR_37148_ALL_PROCEDURE_FAIL');
223 hr_utility.raise_error;
224 end if;
225 end if;
226 --End Bug# 5745356
227
228 -- 250.19.2
229 -- Award Req 8/15/00 vravikan 30-sep-2000 End date
230 -- Add 840-847
231 -- vnarasim 10-MAR-2003 Added 848
232 -- upd51 06-Feb-07 Raju From 01-Jan-2007 Bug#5745356 add NOAs
233 -- 849,886,887,889
234 if p_effective_date <= to_date('2000/09/30','yyyy/mm/dd') then
235 if ( p_First_NOAC_Lookup_Code <> '350' and
236 p_First_NOAC_Lookup_Code <> '355' ) and
237 ( p_First_Action_NOA_LA_Code1 is null and
238 p_First_Action_NOA_LA_Code2 is null)
239 then
240 hr_utility.set_message(8301, 'GHR_37305_ALL_PROCEDURE_FAIL');
241 hr_utility.raise_error;
242 end if;
243 elsif p_effective_date < to_date('2007/01/01','yyyy/mm/dd') then
244 if p_First_NOAC_Lookup_Code not in ('350','355','817','840','841','842','843',
245 '844','845','846','847','848','887','889') and
246 ( p_First_Action_NOA_LA_Code1 is null and
247 p_First_Action_NOA_LA_Code2 is null)
248 then
249 hr_utility.set_message(8301, 'GHR_37419_ALL_PROCEDURE_FAIL');
250 hr_utility.raise_error;
251 end if;
252 else
253 if p_First_NOAC_Lookup_Code not in ('350','355','817','840','841','842','843',
254 '844','845','846','847','848','849','886','887','889') and
255 ( p_First_Action_NOA_LA_Code1 is null and
256 p_First_Action_NOA_LA_Code2 is null)
257 then
258 --Bug# 6959477 message number 38591 is duplicated, so created new message with #38157
259 hr_utility.set_message(8301, 'GHR_38157_ALL_PROCEDURE_FAIL');
260 hr_utility.raise_error;
261 end if;
262 end if;
263
264 --250.20.2
265 if p_First_NOAC_Lookup_Code <> '356'
266 and
267 (
268 p_First_Action_NOA_LA_Code1 ='VDK'
269 or
270 p_First_Action_NOA_LA_Code2 ='VDK'
271 )
272 and
273 p_to_play_plan <> 'ES'
274 and
275 p_to_play_plan is not null
276 then
277 hr_utility.set_message(8301, 'GHR_37306_ALL_PROCEDURE_FAIL');
278 hr_utility.raise_error;
279 end if;
280
281 --250.25.2
282 -- deleted nature of action 117,517
283 if (
284 p_First_Action_NOA_LA_Code1 = 'WXM'
285 or
286 p_First_Action_NOA_LA_Code2 = 'WXM'
287 )
288 and
289 p_First_NOAC_Lookup_Code not in ('171','571')
290 then
291 hr_utility.set_message(8301, 'GHR_37307_ALL_PROCEDURE_FAIL');
292 hr_utility.raise_error;
293 end if;
294
295 --250.30.2
296 if (
297 p_First_Action_NOA_LA_Code1 = 'ZSP'
298 or
299 p_First_Action_NOA_LA_Code2 = 'ZSP'
300 )
301 and
302 p_First_NOAC_Lookup_Code <>'CM57'
303 then
304 hr_utility.set_message(8301, 'GHR_37308_ALL_PROCEDURE_FAIL');
305 hr_utility.raise_error;
306 end if;
307
308 --250.35.2
309 if (
310 p_First_Action_NOA_LA_Code1 = 'BDN'
311 or
312 p_First_Action_NOA_LA_Code1 = 'BYM'
313 or
314 p_First_Action_NOA_LA_Code2 = 'BDN'
315 or
316 p_First_Action_NOA_LA_Code2 = 'BYM'
317 )
318 and
319 (
320 p_agency_sub_element <> 'AG03'
321 and
322 p_agency_sub_element <> 'AG11'
323 )
324 then
325 hr_utility.set_message(8301, 'GHR_37309_ALL_PROCEDURE_FAIL');
326 hr_utility.raise_error;
327 end if;
328
329 --250.38.2
330 if (
331 p_First_Action_NOA_LA_Code1 = 'V8V'
332 or
333 p_First_Action_NOA_LA_Code2 = 'V8V'
334 )
335 and
336 substr(p_agency_sub_element,1,2) <> 'VA'
337 then
338 hr_utility.set_message(8301, 'GHR_37310_ALL_PROCEDURE_FAIL');
339 hr_utility.raise_error;
340 end if;
341
342 --250.39.2
343 -- Update Date By Effective Date Comment
344 -- 18-Aug-00 vravikan 01-Jun-2000 New Edit
345 /* If either legal authority is V7R,
346 Then agency/subelement must be TR93 */
347 if p_effective_date >= to_date('2000/06/01','yyyy/mm/dd') then
348 if (
349 p_First_Action_NOA_LA_Code1 = 'V7R' or
350 p_First_Action_NOA_LA_Code2 = 'V7R'
351 )
352 and
353 p_agency_sub_element <> 'TR93'
354 then
355 hr_utility.set_message(8301, 'GHR_37420_ALL_PROCEDURE_FAIL');
356 hr_utility.raise_error;
357 end if;
358 end if;
359
360 -- START OF 255.02.2
361 -- added 'BNK' and deleted 'VHM' for the april 98 release
362 -- added 'Z2U' on 22-jul-1998
363 -- added 'ZTA','Z2W' on 9-oct-1998 update 8
364 -- Update/Change Date By Effective Date Comment
365 -- 8 03/09/99 vravikan 01/31/99 Delete BEA,BMC,BNE,BNW,BRM
366 -- 10/4 08/15/99 vravikan 01-Jan-99 Add VGL
367 -- 11/9 12/13/99 vravikan 01-Nov-99 Add UDM
368 -- 11/1 12/13/99 vravikan 01-Dec-99 Add ZBA
369 -- 17-Aug-00 vravikan From Begining Add ZBA,Delete BNP
370 -- 08-Dec-00 vravikan From Begining Delete ZTA
371 -- 30-Oct-03 Ashley From Begining Added BAB,BAC,BAD,BYO
372 -- 30-APR-04 Madhuri From Beginning Added LYP for 100
373 -- Upd 37 09-NOV-04 Madhuri From beginning Added LAC's - BNR, BNT
374 -- Upd 43 09-NOV-05 Raju From beginning Added BAE
375 -- Upd 39 vnarasim From Begining Added BNY
376 -- Upd 47 23-Jun-06 Raju From Begining Added BNZ,ZJK, Z5B, Z5C
377 -- upd 49 19-Jan-07 Raju From Begining Bug#5619873 add LAC BAF
378 -- delete BNT
379 -- Upd 54 12-Jun-07 vmididho From Begining delete BAF
380 --- 3-Dec-08 Raju From Begining Added V8N Bug# 7611040
381 if p_effective_date >= to_date('19'||'99/12/01','yyyy/mm/dd') then
382 if p_First_NOAC_Lookup_Code= '100'
383 and
384 NOT(
385 p_First_Action_NOA_LA_Code1 in
386 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
387 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
388 'BBM','BDN','BKM',
389 'BLM','BNK','BNM','BNN','BNR','BNY','BNZ',
390 'BWA','BWM','BYM','HAM','K1M','K4M',
391 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
392 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
393 'QBK','QCK','UDM','VGL','VJM','V1P','V8L','V8N','Z2U','Z2W','ZGM',
394 'ZBA','ZJK','ZJM','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','Z5B','Z5C')
395 and
396 p_First_Action_NOA_LA_Code2 in
397 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
398 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
399 'BBM','BDN','BKM',
400 'BLM','BNK','BNM','BNN','BNR','BNY','BNZ',
401 'BWA','BWM','BYM','HAM','K1M','K4M',
402 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
406 )
403 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
404 'QBK','QCK','UDM','VGL','VJM','V1P','V8L','V8N','Z2U','Z2W','ZGM',
405 'ZBA','ZJK','ZJM','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','Z5B','Z5C')
407 then
408 hr_utility.set_message(8301, 'GHR_37191_ALL_PROCEDURE_FAIL');
409 hr_utility.raise_error;
410 end if;
411 elsif p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
412 if p_First_NOAC_Lookup_Code= '100'
413 and
414 NOT(
415 p_First_Action_NOA_LA_Code1 in
416 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
417 'AYM','A2M','BBM','BDN','BKM',
418 'BLM','BNK','BNM','BNN','BNR','BNY','BNZ',
419 'BAB','BAC','BAD','BAE','BYO',
420 'BWA','BWM','BYM','HAM','K1M','K4M',
421 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
422 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
423 'QBK','QCK','UDM','VGL','VJM','V1P','V8L','V8N','Z2U','Z2W','ZGM',
424 'ZBA','ZJK','ZJM','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','Z5B','Z5C')
425 and
426 p_First_Action_NOA_LA_Code2 in
427 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
428 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
429 'BBM','BDN','BKM',
430 'BLM','BNK','BNM','BNN','BNR','BNY','BNZ',
431 'BWA','BWM','BYM','HAM','K1M','K4M',
432 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
433 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
434 'QBK','QCK','UDM','VGL','VJM','V1P','V8L','V8N','Z2U','Z2W','ZGM',
435 'ZBA','ZJK','ZJM','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','Z5B','Z5C')
436 )
437 then
438 hr_utility.set_message(8301, 'GHR_37190_ALL_PROCEDURE_FAIL');
439 hr_utility.raise_error;
440 end if;
441 elsif p_effective_date > to_date('19'||'99/01/31','yyyy/mm/dd') then
442 if p_First_NOAC_Lookup_Code= '100'
443 and
444 NOT(
445 p_First_Action_NOA_LA_Code1 in
446 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
447 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
448 'BBM','BDN','BKM',
449 'BLM','BNK','BNM','BNN','BNR','BNY','BNZ',
450 'BWA','BWM','BYM','HAM','K1M','K4M',
451 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
452 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
453 'QBK','QCK','VGL','VJM','V1P','V8L','V8N','Z2U','Z2W','ZGM',
454 'ZBA','ZJK','ZJM','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','Z5B','Z5C')
455 and
456 p_First_Action_NOA_LA_Code2 in
457 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
458 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
459 'BBM','BDN','BKM',
460 'BLM','BNK','BNM','BNN','BNR','BNY','BNZ',
461 'BWA','BWM','BYM','HAM','K1M','K4M',
462 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
463 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
464 'QBK','QCK','VGL','VJM','V1P','V8L','V8N','Z2U','Z2W','ZGM',
465 'ZBA','ZJK','ZJM','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','Z5B','Z5C')
466 )
467 then
468 hr_utility.set_message(8301, 'GHR_37039_ALL_PROCEDURE_FAIL');
469 hr_utility.raise_error;
470 end if;
471 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
472 if p_First_NOAC_Lookup_Code= '100'
473 and
474 NOT(
475 p_First_Action_NOA_LA_Code1 in
476 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
477 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
478 'BBM','BDN','BEA','BKM',
479 'BLM','BMC','BNE','BNK','BNM','BNN','BNW','BNR','BNY','BNZ',
480 'BRM','BWA','BWM','BYM','HAM','K1M','K4M',
481 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
482 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
483 'QBK','QCK','VGL','VJM','V1P','V8L','V8N','Z2U','Z2W','ZGM',
484 'ZBA','ZJK','ZJM','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','Z5B','Z5C')
485 and
486 p_First_Action_NOA_LA_Code2 in
487 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
488 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
489 'BBM','BDN','BEA','BKM',
490 'BLM','BMC','BNE','BNK','BNM','BNN','BNW','BNR','BNY','BNZ',
491 'BRM','BWA','BWM','BYM','HAM','K1M','K4M',
492 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
493 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
494 'QBK','QCK','VGL','VJM','V1P','V8L','V8N','Z2U','Z2W','ZGM',
495 'ZBA','ZJK','ZJM','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','Z5B','Z5C')
496 )
497 then
498 hr_utility.set_message(8301, 'GHR_37085_ALL_PROCEDURE_FAIL');
499 hr_utility.raise_error;
500 end if;
501 else
502 if p_First_NOAC_Lookup_Code= '100'
503 and
504 NOT(
505 p_First_Action_NOA_LA_Code1 in
506 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
507 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
508 'BBM','BDN','BEA','BKM',
509 'BLM','BMC','BNE','BNK','BNM','BNN','BNW','BNR','BNY','BNZ',
510 'BRM','BWA','BWM','BYM','HAM','K1M','K4M',
511 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
512 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
513 'QBK','QCK','VJM','V1P','V8L','V8N','Z2U','Z2W','ZGM',
514 'ZBA','ZJK','ZJM','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','Z5B','Z5C')
515 and
516 p_First_Action_NOA_LA_Code2 in
517 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
521 'BRM','BWA','BWM','BYM','HAM','K1M','K4M',
518 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
519 'BBM','BDN','BEA','BKM',
520 'BLM','BMC','BNE','BNK','BNM','BNN','BNW','BNR','BNY','BNZ',
522 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
523 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
524 'QBK','QCK','VJM','V1P','V8L','V8N','Z2U','Z2W','ZGM',
525 'ZBA','ZJK','ZJM','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU','Z5B','Z5C')
526 )
527 then
528 hr_utility.set_message(8301, 'GHR_37311_ALL_PROCEDURE_FAIL');
529 hr_utility.raise_error;
530 end if;
531 end if;
532 -- END IF 255.02.2
533 --
534 -- START OF 255.04.2
535 -- added 'BNK' for the april 98 release
536 -- added 'Z2U' on 22-jul-1998
537 -- added 'ZTA','Z2W' on 9-oct-1998 update 8
538 -- Update Date By Effective Date Comment
539 -- 8 03/09/99 vravikan 01/31/99 Delete BEA,BMC,BNE,BNW,BRM
540 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
541 -- 11/1 12/13/99 vravikan 01-Dec-99 Add ZBA
542 -- 11/9 12/13/99 vravikan 01-Nov-99 Add UDM
543 -- 17-Aug-00 vravikan From Begining Add ZBA,Delete BNP
544 -- 08-Dec-00 vravikan From Begining Delete ZTA
545 -- 30-Oct-03 Ashley From Begining Added BAB,BAC,BAD,BYO
546 -- 30-APR-04 Madhuri From Beginning Added LYP for 101
547 -- Upd 37 09-NOV-04 Madhuri From beginning Added LAC's - BNR, BNT
548 -- Upd 43 09-NOV-05 Raju From beginning Added BAE
549 -- Upd 39 vnarasim From Begining Added BNY, V8N
550 --upd49 19-Jan-07 Raju From Begining Bug#5619873 add BAF , delete BNT
551 -- Upd 54 12-Jun-07 vmididho From Begining delete BAF
552 if p_effective_date >= to_date('19'||'99/12/01','yyyy/mm/dd') then
553 if p_First_NOAC_Lookup_Code= '101'
554 and
555 NOT (
556 p_First_Action_NOA_LA_Code1 in
557 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
558 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
559 'BBM','BDN','BKM',
560 'BLM','BNK','BNM','BNN','BNR','BNY',
561 'BWA','BWM','BYM','HAM','K1M','K4M',
562 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
563 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
564 'QBK','QCK','UDM','VGL','V1P','V8L','V8N','Z2U','Z2W',
565 'ZBA','ZGM','ZJK','ZJM',
566 'ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU')
567 and
568 p_First_Action_NOA_LA_Code2 in
569 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
570 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
571 'BBM','BDN','BKM',
572 'BLM','BNK','BNM','BNN','BNR','BNY',
573 'BWA','BWM','BYM','HAM','K1M','K4M',
574 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
575 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
576 'QBK','QCK','UDM','VGL','V1P','V8L','V8N','Z2U','Z2W',
577 'ZBA','ZGM','ZJK','ZJM',
578 'ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU')
579 )
580 then
581 hr_utility.set_message(8301, 'GHR_37193_ALL_PROCEDURE_FAIL');
582 hr_utility.raise_error;
583 end if;
584 elsif p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
585 if p_First_NOAC_Lookup_Code= '101'
586 and
587 NOT (
588 p_First_Action_NOA_LA_Code1 in
589 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
590 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
591 'BBM','BDN','BKM',
592 'BLM','BNK','BNM','BNN','BNR','BNY',
593 'BWA','BWM','BYM','HAM','K1M','K4M',
594 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
595 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
596 'QBK','QCK','UDM','VGL','V1P','V8L','V8N','Z2U','Z2W',
597 'ZBA','ZGM','ZJK','ZJM',
598 'ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU')
599 and
600 p_First_Action_NOA_LA_Code2 in
601 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
602 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
603 'BBM','BDN','BKM',
604 'BLM','BNK','BNM','BNN','BNR','BNY',
605 'BWA','BWM','BYM','HAM','K1M','K4M',
606 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
607 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
608 'QBK','QCK','UDM','VGL','V1P','V8L','V8N','Z2U','Z2W',
609 'ZBA','ZGM','ZJK','ZJM',
610 'ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU')
611 )
612 then
613 hr_utility.set_message(8301, 'GHR_37192_ALL_PROCEDURE_FAIL');
614 hr_utility.raise_error;
615 end if;
616 elsif p_effective_date > to_date('19'||'99/01/31','yyyy/mm/dd') then
617 if p_First_NOAC_Lookup_Code= '101'
618 and
619 NOT (
620 p_First_Action_NOA_LA_Code1 in
621 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
622 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
623 'BBM','BDN','BKM',
624 'BLM','BNK','BNM','BNN','BNR','BNY',
625 'BWA','BWM','BYM','HAM','K1M','K4M',
626 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
627 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
628 'QBK','QCK','VGL','V1P','V8L','V8N','Z2U','Z2W','ZGM','ZJK','ZJM',
629 'ZBA','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU')
630 and
634 'BBM','BDN','BKM',
631 p_First_Action_NOA_LA_Code2 in
632 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
633 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
635 'BLM','BNK','BNM','BNN','BNR','BNY',
636 'BWA','BWM','BYM','HAM','K1M','K4M',
637 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
638 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
639 'QBK','QCK','VGL','V1P','V8L','V8N','Z2U','Z2W','ZGM','ZJK','ZJM',
640 'ZBA','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU')
641 )
642 then
643 hr_utility.set_message(8301, 'GHR_37040_ALL_PROCEDURE_FAIL');
644 hr_utility.raise_error;
645 end if;
646 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
647 if p_First_NOAC_Lookup_Code= '101'
648 and
649 NOT (
650 p_First_Action_NOA_LA_Code1 in
651 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
652 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
653 'BBM','BDN','BEA','BKM',
654 'BLM','BMC','BNE','BNK','BNM','BNN','BNW','BNR','BNY',
655 'BRM','BWA','BWM','BYM','HAM','K1M','K4M',
656 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
657 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
658 'QBK','QCK','VGL','V1P','V8L','V8N','Z2U','Z2W','ZGM','ZJK','ZJM',
659 'ZBA','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU')
660 and
661 p_First_Action_NOA_LA_Code2 in
662 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
663 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
664 'BBM','BDN','BEA','BKM',
665 'BLM','BMC','BNE','BNK','BNM','BNN','BNW','BNR','BNY',
666 'BRM','BWA','BWM','BYM','HAM','K1M','K4M',
667 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
668 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
669 'QBK','QCK','VGL','V1P','V8L','V8N','Z2U','Z2W','ZGM','ZJK','ZJM',
670 'ZBA','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU')
671 )
672 then
673 hr_utility.set_message(8301, 'GHR_37087_ALL_PROCEDURE_FAIL');
674 hr_utility.raise_error;
675 end if;
676 else
677 if p_First_NOAC_Lookup_Code= '101'
678 and
679 NOT (
680 p_First_Action_NOA_LA_Code1 in
681 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
682 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
683 'BBM','BDN','BEA','BKM',
684 'BLM','BMC','BNE','BNK','BNM','BNN','BNW','BNR','BNY',
685 'BRM','BWA','BWM','BYM','HAM','K1M','K4M',
686 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
687 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
688 'QBK','QCK','V1P','V8L','V8N','Z2U','Z2W','ZGM','ZJK','ZJM',
689 'ZBA','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU')
690 and
691 p_First_Action_NOA_LA_Code2 in
692 ('ABK','ABL','ABM','ACA','ACM','ALM','AQM',
693 'AYM','A2M','BAB','BAC','BAD','BAE','BYO',
694 'BBM','BDN','BEA','BKM',
695 'BLM','BMC','BNE','BNK','BNM','BNN','BNW','BNR','BNY',
696 'BRM','BWA','BWM','BYM','HAM','K1M','K4M',
697 'K7M','K8M','K9M','LEM','LHM','LJM','LKM',
698 'LKP','L3M','LYP','PWM','P3M','P5M','P7M','QAK',
699 'QBK','QCK','V1P','V8L','V8N','Z2U','Z2W','ZGM','ZJK','ZJM',
700 'ZBA','ZJR','ZLM','ZQM','ZRM','ZSK','ZSP','ZTU')
701 )
702 then
703 hr_utility.set_message(8301, 'GHR_37312_ALL_PROCEDURE_FAIL');
704 hr_utility.raise_error;
705 end if;
706 end if;
707 -- END OF 255.04.2
708 --
709 --
710 --265.02.2
711 -- the edit is renumbered from 265.01.2 for the april release
712 -- added 'Z2U' on 22-jul-1998
713 -- Update/Change Date By Effective Date Comment
714 -- 8/5 03/09/99 vravikan From the Start Add BWA
715 -- 8/5 03/09/99 vravikan 02/27/99 Delete ACM
716
717 if p_effective_date < fnd_date.canonical_to_date('19'||'99/02/27') then
718 if p_First_NOAC_Lookup_Code= '107'
719 and
720 NOT(
721 p_First_Action_NOA_LA_Code1 in
722 ('ABL','ABM','ABR','ABS','ACM','ALM','AQM','BWA',
723 'BWM','HAM','HDM','HGM','HJM','HLM','NUM',
724 'QBK','V1P','V8N','Z2U','ZLM','ZRM','ZSK')
725 AND
726 p_First_Action_NOA_LA_Code2 in
727 ('ABL','ABM','ABR','ABS','ACM','ALM','AQM','BWA',
728 'BWM','HAM','HDM','HGM','HJM','HLM','NUM',
729 'QBK','V1P','V8N','Z2U','ZLM','ZRM','ZSK')
730 )
731 THEN
732 hr_utility.set_message(8301, 'GHR_37313_ALL_PROCEDURE_FAIL');
733 hr_utility.raise_error;
734 end if;
735 else
736 if p_First_NOAC_Lookup_Code= '107'
737 and
738 NOT(
739 p_First_Action_NOA_LA_Code1 in
740 ('ABL','ABM','ABR','ABS','ALM','AQM','BWA',
741 'BWM','HAM','HDM','HGM','HJM','HLM','NUM',
742 'QBK','V1P','V8N','Z2U','ZLM','ZRM','ZSK')
743 AND
744 p_First_Action_NOA_LA_Code2 in
745 ('ABL','ABM','ABR','ABS','ALM','AQM','BWA',
746 'BWM','HAM','HDM','HGM','HJM','HLM','NUM',
747 'QBK','V1P','V8N','Z2U','ZLM','ZRM','ZSK')
748 )
749 THEN
750 hr_utility.set_message(8301, 'GHR_37049_ALL_PROCEDURE_FAIL');
751 hr_utility.raise_error;
752 end if;
753 end if;
754
755 --265.04.2
756 -- added 'Z2U' on 22-jul-1998
757 -- added 'Z2W' on 9-oct-1998 update 8
761 -- 8 03/09/99 vravikan Add ZTU
758 -- fixed bug 738789 by changing HCM to MCM
759 -- Update Date By Effective Date Comment
760 -- 8 03/09/99 vravikan 01/31/99 Delete BEA,BMC,BNE,BNW,BRM
762 -- 8 03/09/99 vravikan 02/27/99 Delete ACM,MLL,MCM
763 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
764 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
765 -- 08-Dec-00 vravikan From Begining Add ZJM
766 -- 10/30/03 Ashley From Begining Added BAB,BAC,BAD,BYO
767 -- Upd 43 09-NOV-05 Raju From beginning Added BAE
768 -- Upd 47 23-Jun-06 Raju From beginning Added BNZ,Z5B, Z5C, Z5F, Z5H, Z5J
769 -- upd49 19-Jan-07 Raju From beginning Bug#5619873 add BAF
770 -- Upd 54 12-Jun-07 vmididho From Begining delete BAF
771 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
772 if p_First_NOAC_Lookup_Code= '108'
773 and
774 NOT ( p_First_Action_NOA_LA_Code1 in
775 ('ABK','ABL','ABM','ABR','ABS','ALM',
776 'AYM','BAB','BAC','BAD','BAE','BNZ','BYO',
777 'BWA','BWM','HAM','MEM','MGM','MJM',
778 'MLK','MLM','MMM','NUM','QAK','UDM','VGL','VJM',
779 'V1P','V8L','V8N','Z2U','Z2W','ZJK','ZLM',
780 'ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','ZJM','Z5B', 'Z5C', 'Z5F', 'Z5H', 'Z5J') AND
781 p_First_Action_NOA_LA_Code2 in
782 ('ABK','ABL','ABM','ABR','ABS','ALM',
783 'AYM','BAB','BAC','BAD','BAE','BNZ','BYO',
784 'BWA','BWM','HAM','MEM','MGM','MJM',
785 'MLK','MLM','MMM','NUM','QAK','UDM','VGL','VJM',
786 'V1P','V8L','V8N','Z2U','Z2W','ZJK','ZLM',
787 'ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','ZJM','Z5B', 'Z5C', 'Z5F', 'Z5H', 'Z5J') ) THEN
788 hr_utility.set_message(8301, 'GHR_37194_ALL_PROCEDURE_FAIL');
789 hr_utility.raise_error;
790 end if;
791 elsif p_effective_date >= to_date('19'||'99/02/27','yyyy/mm/dd') then
792 if p_First_NOAC_Lookup_Code= '108'
793 and
794 NOT ( p_First_Action_NOA_LA_Code1 in
795 ('ABK','ABL','ABM','ABR','ABS','ALM',
796 'AYM','BAB','BAC','BAD','BAE','BNZ','BYO',
797 'BWA','BWM','HAM','MEM','MGM','MJM',
798 'MLK','MLM','MMM','NUM','QAK','VGL','VJM',
799 'V1P','V8L','V8N','Z2U','Z2W','ZJK','ZLM',
800 'ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','ZJM','Z5B', 'Z5C', 'Z5F', 'Z5H', 'Z5J') AND
801 p_First_Action_NOA_LA_Code2 in
802 ('ABK','ABL','ABM','ABR','ABS','ALM',
803 'AYM','BAB','BAC','BAD','BAE','BNZ','BYO',
804 'BWA','BWM','HAM','MEM','MGM','MJM',
805 'MLK','MLM','MMM','NUM','QAK','VGL','VJM',
806 'V1P','V8L','V8N','Z2U','Z2W','ZJK','ZLM',
807 'ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','ZJM','Z5B', 'Z5C', 'Z5F', 'Z5H', 'Z5J') ) THEN
808 hr_utility.set_message(8301, 'GHR_37050_ALL_PROCEDURE_FAIL');
809 hr_utility.raise_error;
810 end if;
811 elsif p_effective_date > to_date('19'||'99/01/31','yyyy/mm/dd') then
812 if p_First_NOAC_Lookup_Code= '108'
813 and
814 NOT ( p_First_Action_NOA_LA_Code1 in
815 ('ABK','ABL','ABM','ABR','ABS','ACM','ALM',
816 'AYM','BAB','BAC','BAD','BAE','BNZ','BYO',
817 'BWA','BWM','HAM','MCM','MEM','MGM','MJM',
818 'MLK','MLL','MLM','MMM','NUM','QAK','VGL','VJM',
819 'V1P','V8L','V8N','Z2U','Z2W','ZJK','ZLM',
820 'ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','ZJM','Z5B', 'Z5C', 'Z5F', 'Z5H', 'Z5J') AND
821 p_First_Action_NOA_LA_Code2 in
822 ('ABK','ABL','ABM','ABR','ABS','ACM','ALM',
823 'AYM','BAB','BAC','BAD','BAE','BNZ','BYO',
824 'BWA','BWM','HAM','MCM','MEM','MGM','MJM',
825 'MLK','MLL','MLM','MMM','NUM','QAK','VGL','VJM',
826 'V1P','V8L','V8N','Z2U','Z2W','ZJK','ZLM',
827 'ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','ZJM','Z5B', 'Z5C', 'Z5F', 'Z5H', 'Z5J') ) THEN
828 hr_utility.set_message(8301, 'GHR_37041_ALL_PROCEDURE_FAIL');
829 hr_utility.raise_error;
830 end if;
831 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
832 if p_First_NOAC_Lookup_Code= '108'
833 and
834 NOT ( p_First_Action_NOA_LA_Code1 in
835 ('ABK','ABL','ABM','ABR','ABS','ACM','ALM',
836 'AYM','BEA','BMC','BNE','BNW','BNZ','BRM',
837 'BAB','BAC','BAD','BAE','BYO',
838 'BWA','BWM','HAM','MCM','MEM','MGM','MJM',
839 'MLK','MLL','MLM','MMM','NUM','QAK','VJM',
840 'V1P','V8L','V8N','Z2U','Z2W','ZJK','VGL','ZLM',
841 'ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','ZJM','Z5B', 'Z5C', 'Z5F', 'Z5H', 'Z5J') AND
842 p_First_Action_NOA_LA_Code2 in
843 ('ABK','ABL','ABM','ABR','ABS','ACM','ALM',
844 'AYM','BEA','BMC','BNE','BNW','BNZ','BRM',
845 'BAB','BAC','BAD','BAE','BYO',
846 'BWA','BWM','HAM','MCM','MEM','MGM','MJM',
847 'MLK','MLL','MLM','MMM','NUM','QAK','VGL','VJM',
848 'V1P','V8L','V8N','Z2U','Z2W','ZJK','ZLM',
849 'ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','ZJM','Z5B', 'Z5C', 'Z5F', 'Z5H', 'Z5J') ) THEN
850 hr_utility.set_message(8301, 'GHR_37086_ALL_PROCEDURE_FAIL');
851 hr_utility.raise_error;
852 end if;
853 else
854 if p_First_NOAC_Lookup_Code= '108'
855 and
856 NOT ( p_First_Action_NOA_LA_Code1 in
857 ('ABK','ABL','ABM','ABR','ABS','ACM','ALM',
861 'MLK','MLL','MLM','MMM','NUM','QAK','VJM',
858 'AYM','BEA','BMC','BNE','BNW','BNZ','BRM',
859 'BAB','BAC','BAD','BAE','BYO',
860 'BWA','BWM','HAM','MCM','MEM','MGM','MJM',
862 'V1P','V8L','V8N','Z2U','Z2W','ZJK','ZLM',
863 'ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','ZJM','Z5B', 'Z5C', 'Z5F', 'Z5H', 'Z5J') AND
864 p_First_Action_NOA_LA_Code2 in
865 ('ABK','ABL','ABM','ABR','ABS','ACM','ALM',
866 'AYM','BEA','BMC','BNE','BNW','BNZ','BRM',
867 'BAB','BAC','BAD','BAE','BYO',
868 'BWA','BWM','HAM','MCM','MEM','MGM','MJM',
869 'MLK','MLL','MLM','MMM','NUM','QAK','VJM',
870 'V1P','V8L','V8N','Z2U','Z2W','ZJK','ZLM',
871 'ZQM','ZRM','ZSK','ZSP','ZTM','ZTU','ZJM','Z5B', 'Z5C', 'Z5F', 'Z5H', 'Z5J') ) THEN
872 hr_utility.set_message(8301, 'GHR_37314_ALL_PROCEDURE_FAIL');
873 hr_utility.raise_error;
874 end if;
875 end if;
876
877 --265.10.2
878 -- added 'Z2U' on 22-jul-1998
879 -- added 'Z2W' on 9-oct-1998 update 8
880 -- Update Date By Effective Date Bug Comment
881 -- 8 03/09/99 vravikan 01/31/99 Delete BEA,BMC,BNE,BNW,BRM
882 -- 8 03/09/99 vravikan 02/27/99 Delete ACM,NEL,MXM,CTM
883 -- 8 04/22/99 vravikan 02/27/99 871385 Add MXM,CTM
884 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
885 -- 9/3 09/15/99 vravikan 27-Feb-99 992944 Delete MXM,CTM
886 -- 11/17/99 AVR 27-Feb-99 1079338 Add MXM
887 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
888 -- 10/30/03 Ashley From Begining Added BAB,BAC,BAD,BYO
889 -- Upd 43 09-NOV-05 Raju From beginning Added BAE
890 -- Upd 47 23-Jun-06 Raju From beginning Added Z5B, Z5C, Z5F, Z5G, Z5H
891 -- upd49 19-Jan-07 Raju From Beginning Bug#5619873 Add WTA, WTB,BAF and WUM
892 -- Upd 54 12-Jun-07 vmididho From Begining delete BAF
893
894 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
895 if p_First_NOAC_Lookup_Code= '115'
896 and
897 NOT ( p_First_Action_NOA_LA_Code1 in
898 ('ABK','ABL','ABM','ABR','ABS','ALM',
899 'AYM','BAB','BAC','BAD','BAE','BYO',
900 'BWA','BWM','HAM','KLM','MXM',
901 'M6M','M8M','NAM','NCM','NEM','NJM',
902 'NUM','QAK','SZX','UDM','VGL','VJM','V1P','V8L','V8N',
903 'WTA', 'WTB','WUM',
904 'Z2U','Z2W','ZJK','ZLM','ZQM','ZRM','ZSK',
905 'ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') AND
906 p_First_Action_NOA_LA_Code2 in
907 ('ABK','ABL','ABM','ABR','ABS','ALM',
908 'AYM','BAB','BAC','BAD','BAE','BYO',
909 'BWA','BWM','HAM','KLM','MXM',
910 'M6M','M8M','NAM','NCM','NEM','NJM',
911 'NUM','QAK','SZX','UDM','VGL','VJM','V1P','V8L','V8N',
912 'WTA', 'WTB','WUM',
913 'Z2U','Z2W','ZJK','ZLM','ZQM','ZRM','ZSK',
914 'ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') ) THEN
915 hr_utility.set_message(8301, 'GHR_37195_ALL_PROCEDURE_FAIL');
916 hr_utility.raise_error;
917 end if;
918 elsif p_effective_date > to_date('19'||'99/02/28','yyyy/mm/dd') then
919 if p_First_NOAC_Lookup_Code= '115'
920 and
921 NOT ( p_First_Action_NOA_LA_Code1 in
922 ('ABK','ABL','ABM','ABR','ABS','ALM',
923 'AYM','BAB','BAC','BAD','BAE','BYO',
924 'BWA','BWM','HAM','KLM','MXM',
925 'M6M','M8M','NAM','NCM','NEM','NJM',
926 'NUM','QAK','SZX','VGL','VJM','V1P','V8L','V8N',
927 'WTA', 'WTB','WUM',
928 'Z2U','Z2W','ZJK','ZLM','ZQM','ZRM','ZSK',
929 'ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') AND
930 p_First_Action_NOA_LA_Code2 in
931 ('ABK','ABL','ABM','ABR','ABS','ALM',
932 'AYM','BAB','BAC','BAD','BAE','BYO',
933 'BWA','BWM','HAM','KLM','MXM',
934 'M6M','M8M','NAM','NCM','NEM','NJM',
935 'NUM','QAK','SZX','VGL','VJM','V1P','V8L','V8N',
936 'WTA', 'WTB','WUM',
937 'Z2U','Z2W','ZJK','ZLM','ZQM','ZRM','ZSK',
938 'ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') ) THEN
939 hr_utility.set_message(8301, 'GHR_37051_ALL_PROCEDURE_FAIL');
940 hr_utility.raise_error;
941 end if;
942 elsif p_effective_date > to_date('19'||'99/01/31','yyyy/mm/dd') then
943 if p_First_NOAC_Lookup_Code= '115'
944 and
945 NOT ( p_First_Action_NOA_LA_Code1 in
946 ('ABK','ABL','ABM','ABR','ABS','ACM','ALM',
947 'AYM','BAB','BAC','BAD','BAE','BYO',
948 'BWA','BWM','CTM','HAM','KLM','MXM',
949 'M6M','M8M','NAM','NCM','NEL','NEM','NJM',
950 'NUM','QAK','SZX','VGL','VJM','V1P','V8L','V8N',
951 'WTA', 'WTB','WUM',
952 'Z2U','Z2W','ZJK','ZLM','ZQM','ZRM','ZSK',
953 'ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') AND
954 p_First_Action_NOA_LA_Code2 in
955 ('ABK','ABL','ABM','ABR','ABS','ACM','ALM',
956 'AYM','BAB','BAC','BAD','BAE','BYO',
957 'BWA','BWM','CTM','HAM','KLM','MXM',
958 'M6M','M8M','NAM','NCM','NEL','NEM','NJM',
959 'NUM','QAK','SZX','VGL','VJM','V1P','V8L','V8N',
960 'WTA', 'WTB','WUM',
961 'Z2U','Z2W','ZJK','ZLM','ZQM','ZRM','ZSK',
962 'ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') ) THEN
963 hr_utility.set_message(8301, 'GHR_37042_ALL_PROCEDURE_FAIL');
967 if p_First_NOAC_Lookup_Code= '115'
964 hr_utility.raise_error;
965 end if;
966 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
968 and
969 NOT ( p_First_Action_NOA_LA_Code1 in
970 ('ABK','ABL','ABM','ABR','ABS','ACM','ALM',
971 'AYM','BAB','BAC','BAD','BAE','BYO',
972 'BEA','BMC','BNE','BNW','BRM',
973 'BWA','BWM','CTM','HAM','KLM','MXM',
974 'M6M','M8M','NAM','NCM','NEL','NEM','NJM',
975 'NUM','QAK','SZX','VGL','VJM','V1P','V8L','V8N',
976 'WTA', 'WTB','WUM',
977 'Z2U','Z2W','ZJK','ZLM','ZQM','ZRM','ZSK',
978 'ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') AND
979 p_First_Action_NOA_LA_Code2 in
980 ('ABK','ABL','ABM','ABR','ABS','ACM','ALM',
981 'AYM','BAB','BAC','BAD','BAE','BYO',
982 'BEA','BMC','BNE','BNW','BRM',
983 'BWA','BWM','CTM','HAM','KLM','MXM',
984 'M6M','M8M','NAM','NCM','NEL','NEM','NJM',
985 'NUM','QAK','SZX','VGL','VJM','V1P','V8L','V8N',
986 'WTA', 'WTB','WUM',
987 'Z2U','Z2W','ZJK','ZLM','ZQM','ZRM','ZSK',
988 'ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') ) THEN
989 hr_utility.set_message(8301, 'GHR_37089_ALL_PROCEDURE_FAIL');
990 hr_utility.raise_error;
991 end if;
992 else
993 if p_First_NOAC_Lookup_Code= '115'
994 and
995 NOT ( p_First_Action_NOA_LA_Code1 in
996 ('ABK','ABL','ABM','ABR','ABS','ACM','ALM',
997 'AYM','BAB','BAC','BAD','BAE','BYO',
998 'BEA','BMC','BNE','BNW','BRM',
999 'BWA','BWM','CTM','HAM','KLM','MXM',
1000 'M6M','M8M','NAM','NCM','NEL','NEM','NJM',
1001 'NUM','QAK','SZX','VJM','V1P','V8L','V8N',
1002 'WTA', 'WTB','WUM',
1003 'Z2U','Z2W','ZJK','ZLM','ZQM','ZRM','ZSK',
1004 'ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') AND
1005 p_First_Action_NOA_LA_Code2 in
1006 ('ABK','ABL','ABM','ABR','ABS','ACM','ALM',
1007 'AYM','BAB','BAC','BAD','BAE','BYO',
1008 'BEA','BMC','BNE','BNW','BRM',
1009 'BWA','BWM','CTM','HAM','KLM','MXM',
1010 'M6M','M8M','NAM','NCM','NEL','NEM','NJM',
1011 'NUM','QAK','SZX','VJM','V1P','V8L','V8N',
1012 'WTA', 'WTB','WUM',
1013 'Z2U','Z2W','ZJK','ZLM','ZQM','ZRM','ZSK',
1014 'ZSP','ZTM','ZTU','Z5B','Z5C','Z5F','Z5G','Z5H') ) THEN
1015 hr_utility.set_message(8301, 'GHR_37316_ALL_PROCEDURE_FAIL');
1016 hr_utility.raise_error;
1017 end if;
1018 end if;
1019
1020 --265.07.2
1021 -- added 'Z2U' on 22-jul-1998
1022 -- UPDATE/CHANGE DATE UPDATED BY EFFECTIVE_DATE COMMENTS
1023 --------------------------------------------------------------------------------------------------------
1024 -- 10/4 08/13/99 vravikan 01-Jan-1999 Add VGL
1025 -- 14-SEP-2004 Madhuri Edit to be terminated as of 31 AUG 2004.
1026 -- (End Date to 31st Aug 2004)
1027 --------------------------------------------------------------------------------------------------------
1028 IF ( p_effective_date <= to_date('20'||'04/08/31','yyyy/mm/dd') ) THEN
1029
1030 IF ( p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') ) THEN
1031
1032 IF p_First_NOAC_Lookup_Code= '112' AND
1033 NOT ((p_First_Action_NOA_LA_Code1 in
1034 ('ABL','ABM','ALM','AQM','AYM','BWM','HAM',
1035 'MAM','MBM','QDK','V1P','V8N','VGL','Z2U','ZJR','ZLM',
1036 'ZRM','ZSK','ZSP','ZTM','ZTU') OR
1037 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) = 'X' AND
1038 LENGTH(p_First_Action_NOA_LA_Code1) =3 ))
1039 AND
1040 (p_First_Action_NOA_LA_Code2 in
1041 ('ABL','ABM','ALM','AQM','AYM','BWM','HAM',
1042 'MAM','MBM','QDK','V1P','V8N','VGL','Z2U','ZJR','ZLM',
1043 'ZRM','ZSK','ZSP','ZTM','ZTU') OR
1044 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) = 'X' AND
1045 LENGTH(p_First_Action_NOA_LA_Code1) =3 )))
1046 THEN
1047 hr_utility.set_message(8301, 'GHR_37088_ALL_PROCEDURE_FAIL');
1048 hr_utility.raise_error;
1049 END IF;
1050 ELSE
1051 if p_First_NOAC_Lookup_Code= '112'
1052 and
1053 NOT ((p_First_Action_NOA_LA_Code1 in
1054 ('ABL','ABM','ALM','AQM','AYM','BWM','HAM',
1055 'MAM','MBM','QDK','V1P','V8N','Z2U','ZJR','ZLM',
1056 'ZRM','ZSK','ZSP','ZTM','ZTU') OR
1057 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) = 'X' AND
1058 LENGTH(p_First_Action_NOA_LA_Code1) =3 ))
1059 AND
1060 (p_First_Action_NOA_LA_Code2 in
1061 ('ABL','ABM','ALM','AQM','AYM','BWM','HAM',
1062 'MAM','MBM','QDK','V1P','V8N','Z2U','ZJR','ZLM',
1063 'ZRM','ZSK','ZSP','ZTM','ZTU') OR
1064 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) = 'X' AND
1065 LENGTH(p_First_Action_NOA_LA_Code1) =3 )))
1066 THEN
1067 hr_utility.set_message(8301, 'GHR_37315_ALL_PROCEDURE_FAIL');
1068 hr_utility.raise_error;
1069 end if;
1070 END IF;
1071 END IF; -- CHECK for end date
1072
1073 --270.04.2
1074 -- Upd 47 23-Jun-06 Raju From beginning Added AYM, Z5C
1075 if p_First_NOAC_Lookup_Code= '120' and
1076 NOT ( p_First_Action_NOA_LA_Code1 in
1077 ('ABM','ALM','AQM','AYM','BWM','HAM','HNM','HRM',
1078 'QAK','QBK','QCK','V1P','ZLM','ZRM','ZSK','Z5C')
1079 AND p_First_Action_NOA_LA_Code2 in
1083 hr_utility.set_message(8301, 'GHR_37318_ALL_PROCEDURE_FAIL');
1080 ('ABM','ALM','AQM','AYM','BWM','HAM','HNM','HRM',
1081 'QAK','QBK','QCK','V1P','ZLM','ZRM','ZSK','Z5C')
1082 ) THEN
1084 hr_utility.raise_error;
1085 end if;
1086
1087 --270.07.2
1088 if p_First_NOAC_Lookup_Code= '122'
1089 and
1090 NOT ( p_First_Action_NOA_LA_Code1 in
1091 ('ABM','ALM','BWM','HAM','HNM','HRM',
1092 'H3M','QAK','V1P','ZLM','ZRM','ZSK') AND
1093 p_First_Action_NOA_LA_Code2 in
1094 ('ABM','ALM','BWM','HAM','HNM','HRM',
1095 'H3M','QAK','V1P','ZLM','ZRM','ZSK') ) THEN
1096 hr_utility.set_message(8301, 'GHR_37319_ALL_PROCEDURE_FAIL');
1097 hr_utility.raise_error;
1098 end if;
1099
1100 --270.10.2
1101 if p_First_NOAC_Lookup_Code= '124'
1102 and
1103 NOT ( p_First_Action_NOA_LA_Code1 in
1104 ('ABM','ALM','AQM','A7M','BWM','HAM','LBM','NFM',
1105 'NJM','NMM','QAK','QBK','QCK','V1P','ZLM','ZRM','ZSK') AND
1106 p_First_Action_NOA_LA_Code2 in
1107 ('ABM','ALM','AQM','A7M','BWM','HAM','LBM','NFM',
1108 'NJM','NMM','QAK','QBK','QCK','V1P','ZLM','ZRM','ZSK') ) THEN
1109 hr_utility.set_message(8301, 'GHR_37320_ALL_PROCEDURE_FAIL');
1110 hr_utility.raise_error;
1111 end if;
1112
1113 --275.01.2
1114 -- added effective date
1115 -- added la code Z2U on 23-jul-98
1116 if p_effective_date < fnd_date.canonical_to_date('1998/03/01') then
1117 if p_First_NOAC_Lookup_Code= '130'
1118 and
1119 NOT ( p_First_Action_NOA_LA_Code1 in
1120 ('ABS','ABT','J8M','KTM','KVM','KXM','SZT',
1121 'V1P','V8N','Z2U','ZSK','ZSP') AND
1122 p_First_Action_NOA_LA_Code2 in
1123 ('ABS','ABT','J8M','KTM','KVM','KXM','SZT',
1124 'V1P','V8N','Z2U','ZSK','ZSP') ) THEN
1125 hr_utility.set_message(8301, 'GHR_37321_ALL_PROCEDURE_FAIL');
1126 hr_utility.raise_error;
1127 end if;
1128 end if;
1129
1130 --275.02.2
1131 -- Update/Change Date By Effective Date Comment
1132 -- 10/2 08/13/99 vravikan 01-Jan-1999 Add VGL
1133 -- 11/2 12/14/99 vravikan From the Start Add ABR
1134 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
1135 --
1136 -- The edit 275.01.2 was renamed as 275.02.2 effective 01-mar-1998
1137 --
1138 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
1139 if p_First_NOAC_Lookup_Code= '130'
1140 and
1141 NOT ( p_First_Action_NOA_LA_Code1 in
1142 ('ABR','ABS','ABT','J8M','KTM','KVM','KXM','SZT',
1143 'UDM','V1P','V8N','VGL','Z2U','ZSK','ZSP') AND
1144 p_First_Action_NOA_LA_Code2 in
1145 ('ABR','ABS','ABT','J8M','KTM','KVM','KXM','SZT',
1146 'UDM','V1P','V8N','VGL','Z2U','ZSK','ZSP') ) THEN
1147 hr_utility.set_message(8301, 'GHR_37196_ALL_PROCEDURE_FAIL');
1148 hr_utility.raise_error;
1149 end if;
1150 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
1151 if p_First_NOAC_Lookup_Code= '130'
1152 and
1153 NOT ( p_First_Action_NOA_LA_Code1 in
1154 ('ABR','ABS','ABT','J8M','KTM','KVM','KXM','SZT',
1155 'V1P','V8N','VGL','Z2U','ZSK','ZSP') AND
1156 p_First_Action_NOA_LA_Code2 in
1157 ('ABR','ABS','ABT','J8M','KTM','KVM','KXM','SZT',
1158 'V1P','V8N','VGL','Z2U','ZSK','ZSP') ) THEN
1159 hr_utility.set_message(8301, 'GHR_37090_ALL_PROCEDURE_FAIL');
1160 hr_utility.raise_error;
1161 end if;
1162 elsif p_effective_date >= to_date('1998/03/01','yyyy/mm/dd') then
1163 if p_First_NOAC_Lookup_Code= '130'
1164 and
1165 NOT ( p_First_Action_NOA_LA_Code1 in
1166 ('ABR','ABS','ABT','J8M','KTM','KVM','KXM','SZT',
1167 'V1P','V8N','Z2U','ZSK','ZSP') AND
1168 p_First_Action_NOA_LA_Code2 in
1169 ('ABR','ABS','ABT','J8M','KTM','KVM','KXM','SZT',
1170 'V1P','V8N','Z2U','ZSK','ZSP') ) THEN
1171 hr_utility.set_message(8301, 'GHR_37884_ALL_PROCEDURE_FAIL');
1172 hr_utility.raise_error;
1173 end if;
1174 end if;
1175
1176 --275.04.2
1177 if p_First_NOAC_Lookup_Code= '132'
1178 and
1179 NOT ( p_First_Action_NOA_LA_Code1 in
1180 ('V1P','V6M','ZLM') AND
1181 p_First_Action_NOA_LA_Code2 in
1182 ('V1P','V6M','ZLM') ) THEN
1183 hr_utility.set_message(8301, 'GHR_37322_ALL_PROCEDURE_FAIL');
1184 hr_utility.raise_error;
1185 end if;
1186
1187 --280.02.2
1188 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
1189 -- 11/2 12/14/99 vravikan From the start Add ABR
1190 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
1191 -- renumbered from 280.01.2 for the april release
1192 -- added 'Z2U' on 22-jul-1998
1193 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
1194 if p_First_NOAC_Lookup_Code= '140'
1195 and
1196 NOT ( p_First_Action_NOA_LA_Code1 in
1197 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM',
1198 'NUM','SZW','UDM','V1P','V8N','VGL','Z2U','ZLM','ZSK','ZSP') AND
1199 p_First_Action_NOA_LA_Code2 in
1200 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM',
1204 end if;
1201 'NUM','SZW','UDM','V1P','V8N','VGL','Z2U','ZLM','ZSK','ZSP') ) THEN
1202 hr_utility.set_message(8301, 'GHR_37197_ALL_PROCEDURE_FAIL');
1203 hr_utility.raise_error;
1205 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
1206 if p_First_NOAC_Lookup_Code= '140'
1207 and
1208 NOT ( p_First_Action_NOA_LA_Code1 in
1209 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM',
1210 'NUM','SZW','V1P','V8N','VGL','Z2U','ZLM','ZSK','ZSP') AND
1211 p_First_Action_NOA_LA_Code2 in
1212 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM',
1213 'NUM','SZW','V1P','V8N','VGL','Z2U','ZLM','ZSK','ZSP') ) THEN
1214 hr_utility.set_message(8301, 'GHR_37091_ALL_PROCEDURE_FAIL');
1215 hr_utility.raise_error;
1216 end if;
1217 else
1218 if p_First_NOAC_Lookup_Code= '140'
1219 and
1220 NOT ( p_First_Action_NOA_LA_Code1 in
1221 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM',
1222 'NUM','SZW','V1P','V8N','Z2U','ZLM','ZSK','ZSP') AND
1223 p_First_Action_NOA_LA_Code2 in
1224 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM',
1225 'NUM','SZW','V1P','V8N','Z2U','ZLM','ZSK','ZSP') ) THEN
1226 hr_utility.set_message(8301, 'GHR_37323_ALL_PROCEDURE_FAIL');
1227 hr_utility.raise_error;
1228 end if;
1229 end if;
1230
1231 --280.04.2
1232 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
1233 -- 11/2 12/14/99 vravikan From the start Add ABR
1234 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
1235 -- added 'Z2U' on 22-jul-1998
1236 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
1237 if p_First_NOAC_Lookup_Code= '141'
1238 and
1239 NOT ( p_First_Action_NOA_LA_Code1 in
1240 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM',
1241 'NUM','UDM','V1P','V8N','VGL','Z2U','ZLM','ZSK','ZSP') AND
1242 p_First_Action_NOA_LA_Code2 in
1243 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM',
1244 'NUM','UDM','V1P','V8N','VGL','Z2U','ZLM','ZSK','ZSP') ) THEN
1245 hr_utility.set_message(8301, 'GHR_37198_ALL_PROCEDURE_FAIL');
1246 hr_utility.raise_error;
1247 end if;
1248 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
1249 if p_First_NOAC_Lookup_Code= '141'
1250 and
1251 NOT ( p_First_Action_NOA_LA_Code1 in
1252 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM',
1253 'NUM','V1P','V8N','VGL','Z2U','ZLM','ZSK','ZSP') AND
1254 p_First_Action_NOA_LA_Code2 in
1255 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM',
1256 'NUM','V1P','V8N','VGL','Z2U','ZLM','ZSK','ZSP') ) THEN
1257 hr_utility.set_message(8301, 'GHR_37092_ALL_PROCEDURE_FAIL');
1258 hr_utility.raise_error;
1259 end if;
1260 else
1261 if p_First_NOAC_Lookup_Code= '141'
1262 and
1263 NOT ( p_First_Action_NOA_LA_Code1 in
1264 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM',
1265 'NUM','V1P','V8N','Z2U','ZLM','ZSK','ZSP') AND
1266 p_First_Action_NOA_LA_Code2 in
1267 ('ABL','ABM','ABR','ABS','BWM','HAM','KQM',
1268 'NUM','V1P','V8N','Z2U','ZLM','ZSK','ZSP') ) THEN
1269 hr_utility.set_message(8301, 'GHR_37324_ALL_PROCEDURE_FAIL');
1270 hr_utility.raise_error;
1271 end if;
1272 end if;
1273
1274 --280.07.2
1275 -- Update Date By Effective Date Comment
1276 -- 8 01/28/99 vravikan 01/01/99 Add Legal Authorities P2M and P7M
1277 -- Dec 2001 Patch 1-Nov-01 Delete AWM
1278 if p_effective_date < to_date('1999/01/01','yyyy/mm/dd') then
1279 if p_First_NOAC_Lookup_Code= '142'
1280 and
1281 NOT ( p_First_Action_NOA_LA_Code1 in
1282 ('HAM','P3M','P5M','UFM','V2M','ZJR',
1283 'ZLM','ZSK','ZVB','ZVC') AND
1284 p_First_Action_NOA_LA_Code2 in
1285 ('HAM','P3M','P5M','UFM','V2M','ZJR',
1286 'ZLM','ZSK','ZVB','ZVC') ) THEN
1287 hr_utility.set_message(8301, 'GHR_37325_ALL_PROCEDURE_FAIL');
1288 hr_utility.raise_error;
1289 end if;
1290 elsif p_effective_date < to_date('2001/11/01','yyyy/mm/dd') then
1291 if p_First_NOAC_Lookup_Code= '142'
1292 and
1293 NOT ( p_First_Action_NOA_LA_Code1 in
1294 ('HAM','P2M','P3M','P5M','P7M','UFM','V2M','ZJR',
1295 'ZLM','ZSK','ZVB','ZVC') AND
1296 p_First_Action_NOA_LA_Code2 in
1297 ('HAM','P2M','P3M','P5M','P7M','UFM','V2M','ZJR',
1298 'ZLM','ZSK','ZVB','ZVC') ) THEN
1299 hr_utility.set_message(8301, 'GHR_37036_ALL_PROCEDURE_FAIL');
1300 hr_utility.raise_error;
1301 end if;
1302 else
1303 if p_First_NOAC_Lookup_Code= '142'
1304 and
1305 NOT ( p_First_Action_NOA_LA_Code1 in
1306 ('HAM','P2M','P3M','P5M','P7M','UFM','V2M','ZJR',
1307 'ZLM','ZSK','ZVB','ZVC') AND
1308 p_First_Action_NOA_LA_Code2 in
1309 ('HAM','P2M','P3M','P5M','P7M','UFM','V2M','ZJR',
1310 'ZLM','ZSK','ZVB','ZVC') ) THEN
1311 hr_utility.set_message(8301, 'GHR_37906_ALL_PROCEDURE_FAIL');
1312 hr_utility.raise_error;
1313 end if;
1314 end if;
1315
1316 --280.10.2
1317 -- Dec 2001 Patch 1-Nov-01 Delete AWM
1318 if p_effective_date < to_date('2001/11/01','yyyy/mm/dd') then
1322 ('HAM','UFM','VBJ','VCJ',
1319 if p_First_NOAC_Lookup_Code= '143'
1320 and
1321 NOT ( p_First_Action_NOA_LA_Code1 in
1323 'ZLM','ZSK','ZVB','ZVC') AND
1324 p_First_Action_NOA_LA_Code2 in
1325 ('HAM','UFM','VBJ','VCJ',
1326 'ZLM','ZSK','ZVB','ZVC') ) THEN
1327 hr_utility.set_message(8301, 'GHR_37326_ALL_PROCEDURE_FAIL');
1328 hr_utility.raise_error;
1329 end if;
1330 else
1331 if p_First_NOAC_Lookup_Code= '143'
1332 and
1333 NOT ( p_First_Action_NOA_LA_Code1 in
1334 ('HAM','UFM','VBJ','VCJ',
1335 'ZLM','ZSK','ZVB','ZVC') AND
1336 p_First_Action_NOA_LA_Code2 in
1337 ('HAM','UFM','VBJ','VCJ',
1338 'ZLM','ZSK','ZVB','ZVC') ) THEN
1339 hr_utility.set_message(8301, 'GHR_37905_ALL_PROCEDURE_FAIL');
1340 hr_utility.raise_error;
1341 end if;
1342 end if;
1343
1344 --280.13.2
1345 -- Dec 2001 Patch 1-Nov-01 Delete AWM
1346 if p_effective_date < to_date('2001/11/01','yyyy/mm/dd') then
1347 if p_First_NOAC_Lookup_Code= '145'
1348 and
1349 NOT ( p_First_Action_NOA_LA_Code1 in
1350 ('HAM','UFM','V6M',
1351 'ZLM','ZSK','ZVB','ZVC') AND
1352 p_First_Action_NOA_LA_Code2 in
1353 ('HAM','UFM','V6M',
1354 'ZLM','ZSK','ZVB','ZVC') ) THEN
1355 hr_utility.set_message(8301, 'GHR_37327_ALL_PROCEDURE_FAIL');
1356 hr_utility.raise_error;
1357 end if;
1358 else
1359 if p_First_NOAC_Lookup_Code= '145'
1360 and
1361 NOT ( p_First_Action_NOA_LA_Code1 in
1362 ('HAM','UFM','V6M',
1363 'ZLM','ZSK','ZVB','ZVC') AND
1364 p_First_Action_NOA_LA_Code2 in
1365 ('HAM','UFM','V6M',
1366 'ZLM','ZSK','ZVB','ZVC') ) THEN
1367 hr_utility.set_message(8301, 'GHR_37904_ALL_PROCEDURE_FAIL');
1368 hr_utility.raise_error;
1369 end if;
1370 end if;
1371
1372 -- 07/10/02 vravikan From the Start Added ZVC
1373 --280.16.2
1374 if p_First_NOAC_Lookup_Code= '146'
1375 and
1376 NOT ( p_First_Action_NOA_LA_Code1 in
1377 ('AWM','HAM','UFM','V4L','ZJR',
1378 'ZLM','ZSK','ZVB','ZVC') AND
1379 p_First_Action_NOA_LA_Code2 in
1380 ('AWM','HAM','UFM','V4L','ZJR',
1381 'ZLM','ZSK','ZVB','ZVC') ) THEN
1382 hr_utility.set_message(8301, 'GHR_37328_ALL_PROCEDURE_FAIL');
1383 hr_utility.raise_error;
1384 end if;
1385
1386 --280.19.2
1387 if p_First_NOAC_Lookup_Code= '147'
1388 and
1389 NOT ( p_First_Action_NOA_LA_Code1 in
1390 ('AWM','HAM','UFM','VAG',
1391 'ZLM','ZSK','ZVB','ZVC') AND
1392 p_First_Action_NOA_LA_Code2 in
1393 ('AWM','HAM','UFM','VAG',
1394 'ZLM','ZSK','ZVB','ZVC') ) THEN
1395 hr_utility.set_message(8301, 'GHR_37329_ALL_PROCEDURE_FAIL');
1396 hr_utility.raise_error;
1397 end if;
1398
1399 --280.22.2
1400 if p_First_NOAC_Lookup_Code= '148'
1401 and
1402 NOT ( p_First_Action_NOA_LA_Code1 in
1403 ('AWM','HAM','UFM','V4M',
1404 'ZLM','ZSK','ZVB','ZVC') AND
1405 p_First_Action_NOA_LA_Code2 in
1406 ('AWM','HAM','UFM','V4M',
1407 'ZLM','ZSK','ZVB','ZVC') ) THEN
1408 hr_utility.set_message(8301, 'GHR_37330_ALL_PROCEDURE_FAIL');
1409 hr_utility.raise_error;
1410 end if;
1411
1412 --280.25.2
1413 if p_First_NOAC_Lookup_Code= '149'
1414 and
1415 NOT ( p_First_Action_NOA_LA_Code1 in
1416 ('AWM','HAM','UFM','V4P',
1417 'ZLM','ZSK','ZVB','ZVC') AND
1418 p_First_Action_NOA_LA_Code2 in
1419 ('AWM','HAM','UFM','V4P',
1420 'ZLM','ZSK','ZVB','ZVC') ) THEN
1421 hr_utility.set_message(8301, 'GHR_37331_ALL_PROCEDURE_FAIL');
1422 hr_utility.raise_error;
1423 end if;
1424
1425 /* Commented -- Dec 2001 Patch
1426 --285.02.2
1427 --renumbered from 285.01.2 for the april release
1428 if p_First_NOAC_Lookup_Code= '150'
1429 and
1430 NOT ( p_First_Action_NOA_LA_Code1 in
1431 ('ALM','AQM','HAM','PWM','P3M','P5M','QAK','QBK','QCK','TJK','TRK','ZJR',
1432 'ZLM','ZRM','ZSK') AND
1433 p_First_Action_NOA_LA_Code2 in
1434 ('ALM','AQM','HAM','PWM','P3M','P5M','QAK','QBK','QCK','TJK','TRK','ZJR',
1435 'ZLM','ZRM','ZSK') ) THEN
1436 hr_utility.set_message(8301, 'GHR_37332_ALL_PROCEDURE_FAIL');
1437 hr_utility.raise_error;
1438 end if;
1439 */
1440
1441 /* Commented -- Dec 2001 Patch
1442 --285.04.2
1443 if p_First_NOAC_Lookup_Code= '151'
1444 and
1445 NOT ( p_First_Action_NOA_LA_Code1 in
1446 ('ALM','AQM','HAM','PWM','P3M','P5M','QAK','QBK','QCK','TJK','ZJR',
1447 'ZRM','ZSK') AND
1448 p_First_Action_NOA_LA_Code2 in
1449 ('ALM','AQM','HAM','PWM','P3M','P5M','QAK','QBK','QCK','TJK','ZJR',
1450 'ZRM','ZSK') ) THEN
1451 hr_utility.set_message(8301, 'GHR_37333_ALL_PROCEDURE_FAIL');
1452 hr_utility.raise_error;
1453 end if;
1454 */
1455 /* Commented -- Dec 2001 Patch
1456
1457 --285.07.2
1458 if p_First_NOAC_Lookup_Code= '153'
1459 and
1460 NOT ( p_First_Action_NOA_LA_Code1 in
1464 hr_utility.set_message(8301, 'GHR_37334_ALL_PROCEDURE_FAIL');
1461 ('HAM','TNM','TMK','TNK','ZLM','ZSK') AND
1462 p_First_Action_NOA_LA_Code2 in
1463 ('HAM','TNM','TMK','TNK','ZLM','ZSK') ) THEN
1465 hr_utility.raise_error;
1466 end if;
1467 */
1468 /* Commented -- Dec 2001 Patch
1469
1470 --285.10.2
1471 if p_First_NOAC_Lookup_Code= '154'
1472 and
1473 NOT ( p_First_Action_NOA_LA_Code1 in
1474 ('HAM','TMK','TNK','ZLM','ZRM','ZSK') AND
1475 p_First_Action_NOA_LA_Code2 in
1476 ('HAM','TMK','TNK','ZLM','ZRM','ZSK') ) THEN
1477 hr_utility.set_message(8301, 'GHR_37335_ALL_PROCEDURE_FAIL');
1478 hr_utility.raise_error;
1479 end if;
1480 */
1481
1482 /* Commented -- Dec 2001 Patch
1483 --285.13.2
1484 if p_First_NOAC_Lookup_Code= '155'
1485 and
1486 NOT ( p_First_Action_NOA_LA_Code1 in
1487 ('HAM','TPK''ZLM','ZSK') AND
1488 p_First_Action_NOA_LA_Code2 in
1489 ('HAM','TPK''ZLM','ZSK') ) THEN
1490 hr_utility.set_message(8301, 'GHR_37336_ALL_PROCEDURE_FAIL');
1491 hr_utility.raise_error;
1492 end if;
1493 */
1494 /* Commented -- Dec 2001 Patch
1495
1496 --285.16.2
1497 if p_First_NOAC_Lookup_Code= '157'
1498 and
1499 NOT ( p_First_Action_NOA_LA_Code1 in
1500 ('HAM','TVK''ZLM','ZSK') AND
1501 p_First_Action_NOA_LA_Code2 in
1502 ('HAM','TVK''ZLM','ZSK') ) THEN
1503 hr_utility.set_message(8301, 'GHR_37337_ALL_PROCEDURE_FAIL');
1504 hr_utility.raise_error;
1505 end if;
1506 */
1507
1508
1509 --290.02.2
1510
1511 -- renumbered from 290.01.2 for the april release
1512 -- added legal authority ZTA on 9-oct-98
1513 -- Update Date By Effective Date Comment
1514 -- 8 01/28/99 vravikan 01/01/99 Add Legal Authority P7M
1515 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
1516 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
1517 -- 11/11 12/14/99 vravikan 01-Jan-99 Change legal authorities "Y--" to "Y-- (except 'YKB')
1518 -- 17-Aug-00 vravikan From Begining Change legal authorities "Y--" to "Y-- (except 'YKB')
1519 -- 08-Dec-00 vravikan From Begining Delete ZTA
1520 -- upd51 06-Feb-07 Raju From Begining Bug#5745356 add legal authority Z6J
1521
1522 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
1523 if p_First_NOAC_Lookup_Code= '170'
1524 and
1525 NOT (
1526 (p_First_Action_NOA_LA_Code1 in
1527 ('ABK','ABL','ABM','ABR','ALM','AQM','BPM','BWM','H2L',
1528 'HAM','J8M','PWM','P3M','P5M','QAK','QBK',
1529 'QCK','UAM','UDM','UFM','VGL','V1P','V8K','V8V','Z2M','Z2U',
1530 'ZJR','ZKM','ZLM','ZNM','ZRM','ZSK','ZSP','ZVB','ZVC','Z6J')
1531 OR
1532 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X'))
1533 OR
1534 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('Y')
1535 and
1536 p_First_Action_NOA_LA_Code1 <> 'YKB' )
1537 )
1538 AND
1539 (p_First_Action_NOA_LA_Code2 in
1540 ('ABK','ABL','ABM','ABR','ALM','AQM','BPM','BWM','H2L',
1541 'HAM','J8M','PWM','P3M','P5M','P7M','QAK','QBK',
1542 'QCK','UAM','UDM','UFM','VGL','V1P','V8K','V8V','Z2M','Z2U',
1543 'ZJR','ZKM','ZLM','ZNM','ZRM','ZSK','ZSP','ZVB','ZVC','Z6J')
1544 OR
1545 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X'))
1546 OR
1547 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('Y')
1548 and
1549 p_First_Action_NOA_LA_Code2 <> 'YKB' )
1550 )
1551 )
1552 THEN
1553 hr_utility.set_message(8301, 'GHR_37199_ALL_PROCEDURE_FAIL');
1554 hr_utility.raise_error;
1555 end if;
1556 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
1557 if p_First_NOAC_Lookup_Code= '170'
1558 and
1559 NOT (
1560 (p_First_Action_NOA_LA_Code1 in
1561 ('ABK','ABL','ABM','ABR','ALM','AQM','BPM','BWM','H2L',
1562 'HAM','J8M','PWM','P3M','P5M','P7M','QAK','QBK',
1563 'QCK','UAM','UFM','VGL','V1P','V8K','V8V','Z2M','Z2U',
1564 'ZJR','ZKM','ZLM','ZNM','ZRM','ZSK','ZSP','ZVB','ZVC','Z6J')
1565 OR
1566 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X'))
1567 OR
1568 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('Y')
1569 and
1570 p_First_Action_NOA_LA_Code1 <> 'YKB' )
1571 )
1572 AND
1573 (p_First_Action_NOA_LA_Code2 in
1574 ('ABK','ABL','ABM','ABR','ALM','AQM','BPM','BWM','H2L',
1575 'HAM','J8M','PWM','P3M','P5M','P7M','QAK','QBK',
1576 'QCK','UAM','UFM','VGL','V1P','V8K','V8V','Z2M','Z2U',
1577 'ZJR','ZKM','ZLM','ZNM','ZRM','ZSK','ZSP','ZVB','ZVC','Z6J')
1578 OR
1579 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X'))
1580 OR
1581 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('Y')
1582 and
1583 p_First_Action_NOA_LA_Code2 <> 'YKB' )
1584 )
1585 )
1586 THEN
1590 else
1587 hr_utility.set_message(8301, 'GHR_37037_ALL_PROCEDURE_FAIL');
1588 hr_utility.raise_error;
1589 end if;
1591 if p_First_NOAC_Lookup_Code= '170'
1592 and
1593 NOT (
1594 (p_First_Action_NOA_LA_Code1 in
1595 ('ABK','ABL','ABM','ABR','ALM','AQM','BPM','BWM','H2L',
1596 'HAM','J8M','PWM','P3M','P5M','QAK','QBK',
1597 'QCK','UAM','UFM','V1P','V8K','V8V','Z2M','Z2U',
1598 'ZJR','ZKM','ZLM','ZNM','ZRM','ZSK','ZSP','ZVB','ZVC','Z6J')
1599 OR
1600 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X'))
1601 OR
1602 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('Y')
1603 and
1604 p_First_Action_NOA_LA_Code1 <> 'YKB' )
1605 )
1606 AND
1607 (p_First_Action_NOA_LA_Code2 in
1608 ('ABK','ABL','ABM','ABR','ALM','AQM','BPM','BWM','H2L',
1609 'HAM','J8M','PWM','P3M','P5M','QAK','QBK',
1610 'QCK','UAM','UFM','V1P','V8K','V8V','Z2M','Z2U',
1611 'ZJR','ZKM','ZLM','ZNM','ZRM','ZSK','ZSP','ZVB','ZVC','Z6J'
1612 )
1613 OR
1614 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X'))
1615 OR
1616 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('Y')
1617 and
1618 p_First_Action_NOA_LA_Code2 <> 'YKB' )
1619 )
1620 )
1621 THEN
1622 hr_utility.set_message(8301, 'GHR_37338_ALL_PROCEDURE_FAIL');
1623 hr_utility.raise_error;
1624 end if;
1625 end if;
1626
1627 --290.04.2
1628 -- added legal authority 'ZTA' on 9-oct-98
1629 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
1630 -- 11/9 12/14/99 vravikan 01-Nov-1999 Add UDM
1631 -- 11/11 12/20/99 vravikan 01-Jan-1999 Change legal authorities "Y--" to "Y-- (except 'YKB')
1632 -- 11/11 21-Sep-00 vravikan From Begining Change legal authorities "Y--" to "Y-- (except 'YKB')
1633 -- 08-Dec-00 vravikan From Begining Delete ZTA
1634 -- upd51 06-Feb-07 Raju From Begining Bug#5745356 add legal authority Z6J
1635
1636 if p_effective_date >= to_date('19'||'99/11/01','yyyy/mm/dd') then
1637 if p_First_NOAC_Lookup_Code= '171'
1638 and
1639 NOT (
1640 (p_First_Action_NOA_LA_Code1 in
1641 ('ABK','ABL','ABM','ABR','ALM','AQM','BPM','BWM','H2L',
1642 'HAM','J8M','P3M','QAK','UAM','UDM','UFM','V1P','VEM','V8V',
1643 'ZKM','ZLM','ZNM','VGL','VPE','V8K','ZWM','ZSK','ZSP','ZVB','Z2M','ZVC','Z6J')
1644 OR
1645 SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X')
1646 OR
1647 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('Y')
1648 AND p_First_Action_NOA_LA_Code1 <> 'YKB' )
1649 )
1650 AND
1651 (p_First_Action_NOA_LA_Code2 in
1652 ('ABK','ABL','ABM','ABR','ALM','AQM','BPM','BWM','H2L',
1653 'HAM','J8M','P3M','QAK','UAM','UDM','UFM','V1P','VEM','V8V',
1654 'ZKM','ZLM','ZNM','VGL','VPE','V8K','ZWM','ZSK','ZSP','ZVB','Z2M','ZVC','Z6J') OR
1655 SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X')
1656 OR
1657 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('Y')
1658 AND p_First_Action_NOA_LA_Code2 <> 'YKB' )
1659 )
1660 )
1661 THEN
1662 hr_utility.set_message(8301, 'GHR_37168_ALL_PROCEDURE_FAIL');
1663 hr_utility.raise_error;
1664 end if;
1665 elsif p_effective_date >= to_date('19'||'99/01/01','yyyy/mm/dd') then
1666 if p_First_NOAC_Lookup_Code= '171'
1667 and
1668 NOT (
1669 (p_First_Action_NOA_LA_Code1 in
1670 ('ABK','ABL','ABM','ABR','ALM','AQM','BPM','BWM','H2L',
1671 'HAM','J8M','P3M','QAK','UAM','UFM','V1P','VEM','V8V',
1672 'ZKM','ZLM','ZNM','VGL','VPE','V8K','ZWM','ZSK','ZSP','ZVB','Z2M','ZVC','Z6J')
1673 OR
1674 SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X')
1675 OR
1676 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('Y')
1677 AND p_First_Action_NOA_LA_Code1 <> 'YKB' )
1678 )
1679 AND
1680 (p_First_Action_NOA_LA_Code2 in
1681 ('ABK','ABL','ABM','ABR','ALM','AQM','BPM','BWM','H2L',
1682 'HAM','J8M','P3M','QAK','UAM','UFM','V1P','VEM','V8V',
1683 'ZKM','ZLM','ZNM','VGL','VPE','V8K','ZWM','ZSK','ZSP','ZVB','Z2M','ZVC','Z6J') OR
1684 SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X')
1685 OR
1686 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('Y')
1687 AND p_First_Action_NOA_LA_Code2 <> 'YKB' )
1688 )
1689 )
1690 THEN
1691 hr_utility.set_message(8301, 'GHR_37094_ALL_PROCEDURE_FAIL');
1692 hr_utility.raise_error;
1693 end if;
1694 else
1695 if p_First_NOAC_Lookup_Code= '171'
1696 and
1697 NOT (
1698 (p_First_Action_NOA_LA_Code1 in
1699 ('ABK','ABL','ABM','ABR','ALM','AQM','BPM','BWM','H2L',
1700 'HAM','J8M','P3M','QAK','UAM','UFM','V1P','VEM','V8V',
1701 'ZKM','ZLM','ZNM','VPE','V8K','ZWM','ZSK','ZSP','ZVB','Z2M','ZVC','Z6J')
1702 OR
1703 SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X')
1704 OR
1708 )
1705 (SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('Y')
1706 AND p_First_Action_NOA_LA_Code1 <> 'YKB'
1707 )
1709 AND
1710 (p_First_Action_NOA_LA_Code2 in
1711 ('ABK','ABL','ABM','ABR','ALM','AQM','BPM','BWM','H2L',
1712 'HAM','J8M','P3M','QAK','UAM','UFM','V1P','VEM','V8V',
1713 'ZKM','ZLM','ZNM','VPE','V8K','ZWM','ZSK','ZSP','ZVB','Z2M','ZVC','Z6J') OR
1714 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X'))
1715 OR
1716 (SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('Y')
1717 and
1718 p_First_Action_NOA_LA_Code2 <> 'YKB' )
1719 )
1720 )
1721 THEN
1722 hr_utility.set_message(8301, 'GHR_37339_ALL_PROCEDURE_FAIL');
1723 hr_utility.raise_error;
1724 end if;
1725 end if;
1726
1727 --290.20.2
1728 -- added 'Z2U' on 22-jul-1998
1729 -- Update Date By Effective Date Comment
1730 -- 8 03/09/99 vravikan 01/31/99 Delete BEA,BMC,BNE,BNW,BRM
1731 -- 10/4 08/13/99 vravikan 01-Jan-99 Add VGL
1732 -- 9/3 09/14/99 vravikan 28-Feb-99 Delete CTM,NEL
1733 -- Dec 2001 Patch vravikan 01-Oct-01 Delete BFS,MYM, and MZM
1734 if p_effective_date >= to_date('2001/10/01','yyyy/mm/dd') then
1735 if p_First_NOAC_Lookup_Code= '190'
1736 and
1737 NOT (
1738 (p_First_Action_NOA_LA_Code1 in
1739 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1740 'BPM','BWA',
1741 'BWM','H2L','HAM','J8M','KLM','MXM',
1742 'M6M','M8M','NAM','NCM',
1743 'NEM','NJM','NUM','SZX','UAM','UFM','VGL',
1744 'VJM','VPE','V1P','V4M','V4P','V8K','V8L',
1745 'V8N','V8V','ZJK','ZKM','V8V','Z2U','ZLM','ZNM',
1746 'ZQM','ZRM','ZSK','ZSP','ZTM') OR
1747 SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y')
1748 )
1749 AND
1750 (p_First_Action_NOA_LA_Code2 in
1751 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1752 'BPM','BWA',
1753 'BWM','H2L','HAM','J8M','KLM','MXM',
1754 'M6M','M8M','NAM','NCM',
1755 'NEM','NJM','NUM','SZX','UAM','UFM','VGL',
1756 'VJM','VPE','V1P','V4M','V4P','V8K','V8L',
1757 'V8N','V8V','ZJK','ZKM','V8V','Z2U','ZLM','ZNM',
1758 'ZQM','ZRM','ZSK','ZSP','ZTM') OR
1759 SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X','Y')
1760 )
1761 )
1762 THEN
1763 hr_utility.set_message(8301, 'GHR_37922_ALL_PROCEDURE_FAIL');
1764 hr_utility.raise_error;
1765 end if;
1766 elsif p_effective_date >= to_date('1999/02/28','yyyy/mm/dd') then
1767 if p_First_NOAC_Lookup_Code= '190'
1768 and
1769 NOT (
1770 (p_First_Action_NOA_LA_Code1 in
1771 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1772 'BPM','BWA',
1773 'BWM','H2L','HAM','J8M','KLM','MXM','MYM',
1774 'MZM','M6M','M8M','NAM','NCM',
1775 'NEM','NJM','NUM','SZX','UAM','UFM','VGL',
1776 'VJM','VPE','V1P','V4M','V4P','V8K','V8L',
1777 'V8N','V8V','ZJK','ZKM','V8V','Z2U','ZLM','ZNM',
1778 'ZQM','ZRM','ZSK','ZSP','ZTM') OR
1779 SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y')
1780 )
1781 AND
1782 (p_First_Action_NOA_LA_Code2 in
1783 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1784 'BPM','BWA',
1785 'BWM','H2L','HAM','J8M','KLM','MXM','MYM',
1786 'MZM','M6M','M8M','NAM','NCM',
1787 'NEM','NJM','NUM','SZX','UAM','UFM','VGL',
1788 'VJM','VPE','V1P','V4M','V4P','V8K','V8L',
1789 'V8N','V8V','ZJK','ZKM','V8V','Z2U','ZLM','ZNM',
1790 'ZQM','ZRM','ZSK','ZSP','ZTM') OR
1791 SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X','Y')
1792 )
1793 )
1794 THEN
1795 hr_utility.set_message(8301, 'GHR_37188_ALL_PROCEDURE_FAIL');
1796 hr_utility.raise_error;
1797 end if;
1798 elsif p_effective_date > to_date('1999/01/31','yyyy/mm/dd') then
1799 if p_First_NOAC_Lookup_Code= '190'
1800 and
1801 NOT (
1802 (p_First_Action_NOA_LA_Code1 in
1803 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1804 'BPM','BWA',
1805 'BWM','CTM','H2L','HAM','J8M','KLM','MXM','MYM',
1806 'MZM','M6M','M8M','NAM','NCM','NEL',
1807 'NEM','NJM','NUM','SZX','UAM','UFM','VGL',
1808 'VJM','VPE','V1P','V4M','V4P','V8K','V8L',
1809 'V8N','V8V','ZJK','ZKM','V8V','Z2U','ZLM','ZNM',
1810 'ZQM','ZRM','ZSK','ZSP','ZTM') OR
1811 SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y')
1812 )
1813 AND
1814 (p_First_Action_NOA_LA_Code2 in
1815 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM',
1816 'BPM','BWA',
1817 'BWM','CTM','H2L','HAM','J8M','KLM','MXM','MYM',
1818 'MZM','M6M','M8M','NAM','NCM','NEL',
1819 'NEM','NJM','NUM','SZX','UAM','UFM','VGL',
1820 'VJM','VPE','V1P','V4M','V4P','V8K','V8L',
1821 'V8N','V8V','ZJK','ZKM','V8V','Z2U','ZLM','ZNM',
1822 'ZQM','ZRM','ZSK','ZSP','ZTM') OR
1826 THEN
1823 SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X','Y')
1824 )
1825 )
1827 hr_utility.set_message(8301, 'GHR_37043_ALL_PROCEDURE_FAIL');
1828 hr_utility.raise_error;
1829 end if;
1830 elsif p_effective_date >= to_date('1999/01/01','yyyy/mm/dd') then
1831 if p_First_NOAC_Lookup_Code= '190'
1832 and
1833 NOT (
1834 (p_First_Action_NOA_LA_Code1 in
1835 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM','BEA',
1836 'BMC','BNE','BNW','BPM','BRM','BWA',
1837 'BWM','CTM','H2L','HAM','J8M','KLM','MXM','MYM',
1838 'MZM','M6M','M8M','NAM','NCM','NEL',
1839 'NEM','NJM','NUM','SZX','UAM','UFM','VGL',
1840 'VJM','VPE','V1P','V4M','V4P','V8K','V8L',
1841 'V8N','V8V','ZJK','ZKM','V8V','Z2U','ZLM','ZNM',
1842 'ZQM','ZRM','ZSK','ZSP','ZTM') OR
1843 SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y')
1844 )
1845 AND
1846 (p_First_Action_NOA_LA_Code2 in
1847 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM','BEA',
1848 'BMC','BNE','BNW','BPM','BRM','BWA',
1849 'BWM','CTM','H2L','HAM','J8M','KLM','MXM','MYM',
1850 'MZM','M6M','M8M','NAM','NCM','NEL',
1851 'NEM','NJM','NUM','SZX','UAM','UFM','VGL',
1852 'VJM','VPE','V1P','V4M','V4P','V8K','V8L',
1853 'V8N','V8V','ZJK','ZKM','V8V','Z2U','ZLM','ZNM',
1854 'ZQM','ZRM','ZSK','ZSP','ZTM') OR
1855 SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X','Y')
1856 )
1857 )
1858 THEN
1859 hr_utility.set_message(8301, 'GHR_37093_ALL_PROCEDURE_FAIL');
1860 hr_utility.raise_error;
1861 end if;
1862 else
1863 if p_First_NOAC_Lookup_Code= '190'
1864 and
1865 NOT (
1866 (p_First_Action_NOA_LA_Code1 in
1867 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM','BEA',
1868 'BMC','BNE','BNW','BPM','BRM','BWA',
1869 'BWM','CTM','H2L','HAM','J8M','KLM','MXM','MYM',
1870 'MZM','M6M','M8M','NAM','NCM','NEL',
1871 'NEM','NJM','NUM','SZX','UAM','UFM',
1872 'VJM','VPE','V1P','V4M','V4P','V8K','V8L',
1873 'V8N','V8V','ZJK','ZKM','V8V','Z2U','ZLM','ZNM',
1874 'ZQM','ZRM','ZSK','ZSP','ZTM') OR
1875 SUBSTR(p_First_Action_NOA_LA_Code1,1,1) IN ('W','X','Y')
1876 )
1877 AND
1878 (p_First_Action_NOA_LA_Code2 in
1879 ('ABK','ABL','ABM','ABR','ABS','ACM','AWM','AYM','BEA',
1880 'BMC','BNE','BNW','BPM','BRM','BWA',
1881 'BWM','CTM','H2L','HAM','J8M','KLM','MXM','MYM',
1882 'MZM','M6M','M8M','NAM','NCM','NEL',
1883 'NEM','NJM','NUM','SZX','UAM','UFM',
1884 'VJM','VPE','V1P','V4M','V4P','V8K','V8L',
1885 'V8N','V8V','ZJK','ZKM','V8V','Z2U','ZLM','ZNM',
1886 'ZQM','ZRM','ZSK','ZSP','ZTM') OR
1887 SUBSTR(p_First_Action_NOA_LA_Code2,1,1) IN ('W','X','Y')
1888 )
1889 )
1890 THEN
1891 hr_utility.set_message(8301, 'GHR_37340_ALL_PROCEDURE_FAIL');
1892 hr_utility.raise_error;
1893 end if;
1894
1895 end if;
1896 --290.30.2
1897 if p_First_NOAC_Lookup_Code= '198'
1898 and
1899 NOT ( p_First_Action_NOA_LA_Code1 in
1900 ('R9R','V1P','ZVB','ZVC') AND
1901 p_First_Action_NOA_LA_Code2 in
1902 ('R9R','V1P','ZVB','ZVC') ) THEN
1903 hr_utility.set_message(8301, 'GHR_37341_ALL_PROCEDURE_FAIL');
1904 hr_utility.raise_error;
1905 end if;
1906
1907 --290.35.2
1908 if p_First_NOAC_Lookup_Code= '199'
1909 and
1910 NOT ( p_First_Action_NOA_LA_Code1 in
1911 ('R9N','V1P','ZVB','ZVC') AND
1912 p_First_Action_NOA_LA_Code2 in
1913 ('R9N','V1P','ZVB','ZVC') ) THEN
1914 hr_utility.set_message(8301, 'GHR_37342_ALL_PROCEDURE_FAIL');
1915 hr_utility.raise_error;
1916 end if;
1917
1918 --295.02.2
1919 --Renumbered from 295.01.2 for the april release
1920 if p_First_NOAC_Lookup_Code= '280'
1921 and
1922 NOT ( p_First_Action_NOA_LA_Code1 in
1923 ('CUL','ZVB','ZVC') AND
1924 p_First_Action_NOA_LA_Code2 in
1925 ('CUL','ZVB','ZVC') ) THEN
1926 hr_utility.set_message(8301, 'GHR_37343_ALL_PROCEDURE_FAIL');
1927 hr_utility.raise_error;
1928 end if;
1929
1930 --295.04.2
1931 -- Update/Change Date By Effective Date Comment
1932 -- 9/5 08/12/99 vravikan 01-Apr-1999 Add ZJV
1933 -- 2038423 10/08/01 vravikan Add ZJW
1934 -- 7556102 25/12/08 Raju Add UAM
1935
1936 if p_effective_date >= to_date('1999/04/01','yyyy/mm/dd') then
1937 if p_First_NOAC_Lookup_Code= '292' and
1938 NOT ( p_First_Action_NOA_LA_Code1 in
1939 ('ALM','AQM','CGM','DAM','NYM','PSM','Q3K',
1940 'R9N','UAM','UFM','V8V','ZJR','ZJT','ZJU','ZJV','ZJW','ZVB','ZVC') AND
1941 p_First_Action_NOA_LA_Code2 in
1942 ('ALM','AQM','CGM','DAM','NYM','PSM','Q3K',
1943 'R9N','UAM','UFM','V8V','ZJR','ZJT','ZJU','ZJV','ZJW','ZVB','ZVC') ) THEN
1944 hr_utility.set_message(8301, 'GHR_37064_ALL_PROCEDURE_FAIL');
1945 hr_utility.raise_error;
1946 end if;
1947 else
1948 if p_First_NOAC_Lookup_Code= '292'
1949 and NOT ( p_First_Action_NOA_LA_Code1 in
1950 ('ALM','AQM','CGM','DAM','NYM','PSM','Q3K',
1951 'R9N','UAM','UFM','V8V','ZJR','ZJT','ZJU','ZJW','ZVB','ZVC') AND
1952 p_First_Action_NOA_LA_Code2 in
1953 ('ALM','AQM','CGM','DAM','NYM','PSM','Q3K',
1954 'R9N','UAM','UFM','V8V','ZJR','ZJT','ZJU','ZJW','ZVB','ZVC') ) THEN
1955 hr_utility.set_message(8301, 'GHR_37344_ALL_PROCEDURE_FAIL');
1956 hr_utility.raise_error;
1957 end if;
1958
1959 end if;
1960
1961 --295.10.2
1962 if p_First_NOAC_Lookup_Code= '293'
1963 and
1964 Not(
1965 p_First_Action_NOA_LA_Code1 in ('R9R','ZVB','ZVC')
1966 and
1967 p_First_Action_NOA_LA_Code2 in ('R9R','ZVB','ZVC')
1968 ) THEN
1969 hr_utility.set_message(8301, 'GHR_37345_ALL_PROCEDURE_FAIL');
1970 hr_utility.raise_error;
1971 end if;
1972
1973 --300.02.2
1974 -- Renumbered from 300.01.2
1975 if p_First_NOAC_Lookup_Code= '300'
1976 and
1977 NOT ( p_First_Action_NOA_LA_Code1 in
1978 ('SWM','UFM','USM','V8V') AND
1979 p_First_Action_NOA_LA_Code2 in
1980 ('SWM','UFM','USM','V8V') ) THEN
1981 hr_utility.set_message(8301, 'GHR_37346_ALL_PROCEDURE_FAIL');
1982 hr_utility.raise_error;
1983 end if;
1984
1985 --300.04.2
1986 if p_First_NOAC_Lookup_Code= '301'
1987 and
1988 NOT ( p_First_Action_NOA_LA_Code1 in
1989 ('SUM','UFM','USM','V8V') AND
1990 p_First_Action_NOA_LA_Code2 in
1991 ('SUM','UFM','USM','V8V') ) THEN
1992 hr_utility.set_message(8301, 'GHR_37347_ALL_PROCEDURE_FAIL');
1993 hr_utility.raise_error;
1994 end if;
1995
1996 GHR_CPDF_CHECK4A.chk_Legal_Authority_a
1997 (p_To_Play_Plan
1998 ,p_Agency_Sub_Element
1999 ,p_First_Action_NOA_LA_Code1
2000 ,p_First_Action_NOA_LA_Code2
2001 ,p_First_NOAC_Lookup_Code
2002 ,p_effective_date
2003 ,p_position_occupied_code
2004 ) ;
2005 end chk_Legal_Authority;
2006
2007 end GHR_CPDF_CHECK4;