DBA Data[Home] [Help]

APPS.PER_IN_PERQUISITE_PKG dependencies on PAY_IN_UTILS

Line 18: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type

14: ,p_effective_start_date IN DATE
15: ,p_effective_end_date IN DATE
16: ,p_calling_procedure IN VARCHAR2
17: ,p_message_name OUT NOCOPY VARCHAR2
18: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
19: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type
20: ) IS
21: /* Cursor to find the element name of the current element entry */
22:

Line 19: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type

15: ,p_effective_end_date IN DATE
16: ,p_calling_procedure IN VARCHAR2
17: ,p_message_name OUT NOCOPY VARCHAR2
18: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
19: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type
20: ) IS
21: /* Cursor to find the element name of the current element entry */
22:
23: CURSOR c_perquisite_name IS

Line 188: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);

184: BEGIN
185:
186: g_debug := hr_utility.debug_enabled ;
187: l_procedure := g_package || 'check_benefit_dates' ;
188: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
189:
190: if g_debug then
191: pay_in_utils.trace('******************************','********************');
192: pay_in_utils.trace('l_element_entry_id : ',l_element_entry_id);

Line 191: pay_in_utils.trace('******************************','********************');

187: l_procedure := g_package || 'check_benefit_dates' ;
188: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
189:
190: if g_debug then
191: pay_in_utils.trace('******************************','********************');
192: pay_in_utils.trace('l_element_entry_id : ',l_element_entry_id);
193: pay_in_utils.trace('******************************','********************');
194: end if;
195:

Line 192: pay_in_utils.trace('l_element_entry_id : ',l_element_entry_id);

188: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
189:
190: if g_debug then
191: pay_in_utils.trace('******************************','********************');
192: pay_in_utils.trace('l_element_entry_id : ',l_element_entry_id);
193: pay_in_utils.trace('******************************','********************');
194: end if;
195:
196: p_message_name := 'SUCCESS';

Line 193: pay_in_utils.trace('******************************','********************');

189:
190: if g_debug then
191: pay_in_utils.trace('******************************','********************');
192: pay_in_utils.trace('l_element_entry_id : ',l_element_entry_id);
193: pay_in_utils.trace('******************************','********************');
194: end if;
195:
196: p_message_name := 'SUCCESS';
197: pay_in_utils.null_message(p_token_name, p_token_value);

Line 197: pay_in_utils.null_message(p_token_name, p_token_value);

193: pay_in_utils.trace('******************************','********************');
194: end if;
195:
196: p_message_name := 'SUCCESS';
197: pay_in_utils.null_message(p_token_name, p_token_value);
198:
199: l_get_migrator_status:=hr_general.g_data_migrator_mode;
200: hr_general.g_data_migrator_mode:='Y';
201: pay_in_utils.set_location(g_debug,l_procedure,20);

Line 201: pay_in_utils.set_location(g_debug,l_procedure,20);

197: pay_in_utils.null_message(p_token_name, p_token_value);
198:
199: l_get_migrator_status:=hr_general.g_data_migrator_mode;
200: hr_general.g_data_migrator_mode:='Y';
201: pay_in_utils.set_location(g_debug,l_procedure,20);
202:
203: /* Default the benefit Start date to element Entry Start Date */
204: OPEN c_curr_entry_value(p_element_entry_id,'Benefit Start Date',l_element_type_id);
205: FETCH c_curr_entry_value into l_benefit_start_date,l_entry_value_id;

Line 207: pay_in_utils.trace('l_benefit_start_date : ',l_benefit_start_date);

203: /* Default the benefit Start date to element Entry Start Date */
204: OPEN c_curr_entry_value(p_element_entry_id,'Benefit Start Date',l_element_type_id);
205: FETCH c_curr_entry_value into l_benefit_start_date,l_entry_value_id;
206: if g_debug then
207: pay_in_utils.trace('l_benefit_start_date : ',l_benefit_start_date);
208: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
209: end if;
210: IF l_benefit_start_date IS NULL THEN
211: pay_in_utils.set_location(g_debug,l_procedure,30);

Line 208: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);

204: OPEN c_curr_entry_value(p_element_entry_id,'Benefit Start Date',l_element_type_id);
205: FETCH c_curr_entry_value into l_benefit_start_date,l_entry_value_id;
206: if g_debug then
207: pay_in_utils.trace('l_benefit_start_date : ',l_benefit_start_date);
208: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
209: end if;
210: IF l_benefit_start_date IS NULL THEN
211: pay_in_utils.set_location(g_debug,l_procedure,30);
212: UPDATE pay_element_entry_values_f

Line 211: pay_in_utils.set_location(g_debug,l_procedure,30);

207: pay_in_utils.trace('l_benefit_start_date : ',l_benefit_start_date);
208: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
209: end if;
210: IF l_benefit_start_date IS NULL THEN
211: pay_in_utils.set_location(g_debug,l_procedure,30);
212: UPDATE pay_element_entry_values_f
213: SET screen_entry_value = to_char(p_effective_start_date,'YYYY/MM/DD HH24:MI:SS')
214: WHERE element_entry_value_id =l_entry_value_id
215: AND effective_start_date =p_effective_start_date;

Line 217: pay_in_utils.set_location(g_debug,l_procedure,40);

213: SET screen_entry_value = to_char(p_effective_start_date,'YYYY/MM/DD HH24:MI:SS')
214: WHERE element_entry_value_id =l_entry_value_id
215: AND effective_start_date =p_effective_start_date;
216: END IF;
217: pay_in_utils.set_location(g_debug,l_procedure,40);
218: hr_general.g_data_migrator_mode:=l_get_migrator_status;
219: CLOSE c_curr_entry_value;
220:
221: pay_in_utils.set_location(g_debug,l_procedure,50);

Line 221: pay_in_utils.set_location(g_debug,l_procedure,50);

217: pay_in_utils.set_location(g_debug,l_procedure,40);
218: hr_general.g_data_migrator_mode:=l_get_migrator_status;
219: CLOSE c_curr_entry_value;
220:
221: pay_in_utils.set_location(g_debug,l_procedure,50);
222:
223: OPEN c_curr_entry_value(p_element_entry_id,'Benefit End Date',l_element_type_id);
224: FETCH c_curr_entry_value INTO l_benefit_end_date,l_entry_value_id;
225: CLOSE c_curr_entry_value;

Line 228: pay_in_utils.trace('******************************','********************');

224: FETCH c_curr_entry_value INTO l_benefit_end_date,l_entry_value_id;
225: CLOSE c_curr_entry_value;
226:
227: if g_debug then
228: pay_in_utils.trace('******************************','********************');
229: pay_in_utils.trace('l_benefit_end_date : ',l_benefit_end_date);
230: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
231: pay_in_utils.trace('******************************','********************');
232: end if;

Line 229: pay_in_utils.trace('l_benefit_end_date : ',l_benefit_end_date);

225: CLOSE c_curr_entry_value;
226:
227: if g_debug then
228: pay_in_utils.trace('******************************','********************');
229: pay_in_utils.trace('l_benefit_end_date : ',l_benefit_end_date);
230: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
231: pay_in_utils.trace('******************************','********************');
232: end if;
233:

Line 230: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);

226:
227: if g_debug then
228: pay_in_utils.trace('******************************','********************');
229: pay_in_utils.trace('l_benefit_end_date : ',l_benefit_end_date);
230: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
231: pay_in_utils.trace('******************************','********************');
232: end if;
233:
234: pay_in_utils.set_location(g_debug,l_procedure,60);

Line 231: pay_in_utils.trace('******************************','********************');

227: if g_debug then
228: pay_in_utils.trace('******************************','********************');
229: pay_in_utils.trace('l_benefit_end_date : ',l_benefit_end_date);
230: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
231: pay_in_utils.trace('******************************','********************');
232: end if;
233:
234: pay_in_utils.set_location(g_debug,l_procedure,60);
235:

Line 234: pay_in_utils.set_location(g_debug,l_procedure,60);

230: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
231: pay_in_utils.trace('******************************','********************');
232: end if;
233:
234: pay_in_utils.set_location(g_debug,l_procedure,60);
235:
236: /* Check that Benefit End is not earlier than Benefit Start */
237: IF (nvl(TRUNC(to_date(l_benefit_start_date,'YYYY/MM/DD HH24:MI:SS')),p_effective_start_date)> TRUNC(to_date(l_benefit_end_date,'YYYY/MM/DD HH24:MI:SS'))) THEN
238: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);

Line 238: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);

234: pay_in_utils.set_location(g_debug,l_procedure,60);
235:
236: /* Check that Benefit End is not earlier than Benefit Start */
237: IF (nvl(TRUNC(to_date(l_benefit_start_date,'YYYY/MM/DD HH24:MI:SS')),p_effective_start_date)> TRUNC(to_date(l_benefit_end_date,'YYYY/MM/DD HH24:MI:SS'))) THEN
238: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,70);
239: p_message_name := 'PER_IN_INCORRECT_DATES';
240: RETURN;
241: END IF;
242: EXCEPTION

Line 245: pay_in_utils.set_location(g_debug,'Leaving FROM Exception Block : '||l_procedure,80);

241: END IF;
242: EXCEPTION
243: WHEN OTHERS THEN
244: IF c_curr_entry_value%ISOPEN THEN CLOSE c_curr_entry_value ; END IF;
245: pay_in_utils.set_location(g_debug,'Leaving FROM Exception Block : '||l_procedure,80);
246: p_message_name := 'PER_IN_ORACLE_GENERIC_ERROR';
247: p_token_name(1) := 'FUNCTION';
248: p_token_value(1) := l_procedure;
249: p_token_name(1) := 'SQLERRMC';

Line 292: pay_in_utils.set_location(g_debug, 'Entering: ' || l_procedure, 10);

288: BEGIN
289:
290: g_debug := hr_utility.debug_enabled;
291: l_procedure := g_package || 'check_loan_entry';
292: pay_in_utils.set_location(g_debug, 'Entering: ' || l_procedure, 10);
293:
294: if g_debug then
295: pay_in_utils.trace('******************************',
296: '********************');

Line 295: pay_in_utils.trace('******************************',

291: l_procedure := g_package || 'check_loan_entry';
292: pay_in_utils.set_location(g_debug, 'Entering: ' || l_procedure, 10);
293:
294: if g_debug then
295: pay_in_utils.trace('******************************',
296: '********************');
297: pay_in_utils.trace('l_element_name : ',
298: l_element_name);
299: pay_in_utils.trace('l_element_Type_id : ',

Line 297: pay_in_utils.trace('l_element_name : ',

293:
294: if g_debug then
295: pay_in_utils.trace('******************************',
296: '********************');
297: pay_in_utils.trace('l_element_name : ',
298: l_element_name);
299: pay_in_utils.trace('l_element_Type_id : ',
300: l_element_Type_id);
301: pay_in_utils.trace('l_assignment_id : ',

Line 299: pay_in_utils.trace('l_element_Type_id : ',

295: pay_in_utils.trace('******************************',
296: '********************');
297: pay_in_utils.trace('l_element_name : ',
298: l_element_name);
299: pay_in_utils.trace('l_element_Type_id : ',
300: l_element_Type_id);
301: pay_in_utils.trace('l_assignment_id : ',
302: l_assignment_id);
303: pay_in_utils.trace('******************************',

Line 301: pay_in_utils.trace('l_assignment_id : ',

297: pay_in_utils.trace('l_element_name : ',
298: l_element_name);
299: pay_in_utils.trace('l_element_Type_id : ',
300: l_element_Type_id);
301: pay_in_utils.trace('l_assignment_id : ',
302: l_assignment_id);
303: pay_in_utils.trace('******************************',
304: '********************');
305: end if;

Line 303: pay_in_utils.trace('******************************',

299: pay_in_utils.trace('l_element_Type_id : ',
300: l_element_Type_id);
301: pay_in_utils.trace('l_assignment_id : ',
302: l_assignment_id);
303: pay_in_utils.trace('******************************',
304: '********************');
305: end if;
306:
307: p_message_name := 'SUCCESS';

Line 308: pay_in_utils.null_message(p_token_name, p_token_value);

304: '********************');
305: end if;
306:
307: p_message_name := 'SUCCESS';
308: pay_in_utils.null_message(p_token_name, p_token_value);
309:
310: pay_in_utils.set_location(g_debug,
311: 'Effective Date: ' || p_effective_date,
312: 20);

Line 310: pay_in_utils.set_location(g_debug,

306:
307: p_message_name := 'SUCCESS';
308: pay_in_utils.null_message(p_token_name, p_token_value);
309:
310: pay_in_utils.set_location(g_debug,
311: 'Effective Date: ' || p_effective_date,
312: 20);
313:
314: /*Check for Additional Information Begins*/

Line 322: pay_in_utils.trace('p_input_value_id : ',

318: INTO p_input_value_id;
319: CLOSE c_input_value_id;
320:
321: if g_debug then
322: pay_in_utils.trace('p_input_value_id : ',
323: p_input_value_id);
324: end if;
325:
326: pay_in_utils.set_location(g_debug, l_procedure, 12);

Line 326: pay_in_utils.set_location(g_debug, l_procedure, 12);

322: pay_in_utils.trace('p_input_value_id : ',
323: p_input_value_id);
324: end if;
325:
326: pay_in_utils.set_location(g_debug, l_procedure, 12);
327: IF p_input_value_id IS NOT NULL THEN
328: /*Check made so that previous created elements without input value 'Additional Information' works.*/
329: OPEN c_element_entry_values(p_element_entry_id,
330: p_input_value_id,

Line 337: pay_in_utils.trace('l_loan_interest_type : ',

333: INTO l_loan_interest_type;
334: CLOSE c_element_entry_values;
335:
336: if g_debug then
337: pay_in_utils.trace('l_loan_interest_type : ',
338: l_loan_interest_type);
339: end if;
340:
341: OPEN c_input_value_id(l_element_type_id, 'Loan Type');

Line 347: pay_in_utils.trace('p_input_value_id : ',

343: INTO p_input_value_id;
344: CLOSE c_input_value_id;
345:
346: if g_debug then
347: pay_in_utils.trace('p_input_value_id : ',
348: p_input_value_id);
349: end if;
350:
351: pay_in_utils.set_location(g_debug, l_procedure, 12);

Line 351: pay_in_utils.set_location(g_debug, l_procedure, 12);

347: pay_in_utils.trace('p_input_value_id : ',
348: p_input_value_id);
349: end if;
350:
351: pay_in_utils.set_location(g_debug, l_procedure, 12);
352:
353: OPEN c_element_entry_values(p_element_entry_id,
354: p_input_value_id,
355: p_effective_date);

Line 361: pay_in_utils.trace('l_loan_type : ', l_loan_type);

357: INTO l_loan_type;
358: CLOSE c_element_entry_values;
359:
360: IF g_debug THEN
361: pay_in_utils.trace('l_loan_type : ', l_loan_type);
362: END IF;
363:
364: IF l_loan_type = 'HOUSING' THEN
365: IF l_loan_interest_type IS NULL THEN

Line 366: pay_in_utils.set_location(g_debug,

362: END IF;
363:
364: IF l_loan_type = 'HOUSING' THEN
365: IF l_loan_interest_type IS NULL THEN
366: pay_in_utils.set_location(g_debug,
367: 'Leaving: ' || l_procedure,
368: 100);
369: p_message_name := 'PER_IN_MISSING_ENTRY_VALUE';
370: p_token_name(1) := 'TOKEN1';

Line 380: pay_in_utils.set_location(g_debug,

376: RETURN;
377: ELSIF l_loan_interest_type NOT IN
378: ('HL_FIXED_RURAL', 'HL_FIXED_URBAN', 'HL_FLOATING_RURAL',
379: 'HL_FLOATING_URBAN') THEN
380: pay_in_utils.set_location(g_debug,
381: 'Leaving: ' || l_procedure,
382: 100);
383: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
384: p_token_name(1) := 'TOKEN';

Line 390: pay_in_utils.set_location(g_debug,

386: RETURN;
387: END IF;
388: ELSIF l_loan_type = 'CAR' THEN
389: IF l_loan_interest_type IS NULL THEN
390: pay_in_utils.set_location(g_debug,
391: 'Leaving: ' || l_procedure,
392: 100);
393: p_message_name := 'PER_IN_MISSING_ENTRY_VALUE';
394: p_token_name(1) := 'TOKEN1';

Line 402: pay_in_utils.set_location(g_debug,

398: p_token_name(3) := 'TOKEN3';
399: p_token_value(3) := 'Car Loan';
400: RETURN;
401: ELSIF l_loan_interest_type NOT IN ('CAR_NEW', 'CAR_USED') THEN
402: pay_in_utils.set_location(g_debug,
403: 'Leaving: ' || l_procedure,
404: 100);
405: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
406: p_token_name(1) := 'TOKEN';

Line 412: pay_in_utils.set_location(g_debug,

408: RETURN;
409: END IF;
410: ELSIF l_loan_type = 'TWOWHEELER' THEN
411: IF l_loan_interest_type IS NULL THEN
412: pay_in_utils.set_location(g_debug,
413: 'Leaving: ' || l_procedure,
414: 100);
415: p_message_name := 'PER_IN_MISSING_ENTRY_VALUE';
416: p_token_name(1) := 'TOKEN1';

Line 424: pay_in_utils.set_location(g_debug,

420: p_token_name(3) := 'TOKEN3';
421: p_token_value(3) := 'Two Wheeler Loan';
422: RETURN;
423: ELSIF l_loan_interest_type NOT IN ('TWL_FIXED', 'TWL_FLOATING') THEN
424: pay_in_utils.set_location(g_debug,
425: 'Leaving: ' || l_procedure,
426: 100);
427: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
428: p_token_name(1) := 'TOKEN';

Line 435: pay_in_utils.set_location(g_debug,

431: END IF;
432: ELSIF l_loan_type = 'MORTGAGE' THEN
433: IF p_effective_start_date >= TO_DATE('01-04-2008','DD-MM-YYYY') THEN
434: IF l_loan_interest_type IS NULL THEN
435: pay_in_utils.set_location(g_debug,
436: 'Leaving: ' || l_procedure,
437: 100);
438: p_message_name := 'PER_IN_MISSING_ENTRY_VALUE';
439: p_token_name(1) := 'TOKEN1';

Line 447: pay_in_utils.set_location(g_debug,

443: p_token_name(3) := 'TOKEN3';
444: p_token_value(3) := 'Mortgage Loan';
445: RETURN;
446: ELSIF l_loan_interest_type NOT IN ('MRTAGE_IMMOVABLE', 'MRTAGE_GOLD') THEN
447: pay_in_utils.set_location(g_debug,
448: 'Leaving: ' || l_procedure,
449: 100);
450: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
451: p_token_name(1) := 'TOKEN';

Line 462: pay_in_utils.set_location(g_debug,

458: /*Check for Additional Information Ends*/
459:
460: /* Start - Get entries of loan availed in current tax year */
461: l_tax_year_start := pay_in_tax_utils.get_financial_year_start(p_effective_date);
462: pay_in_utils.set_location(g_debug,
463: 'Tax Year Start: ' || l_tax_year_start,
464: 30);
465:
466: p_cnt := 0;

Line 486: pay_in_utils.set_location(g_debug, 'Entry Count: ' || p_cnt, 40);

482: p_cnt := p_cnt + 1;
483: END LOOP;
484: /* End - Get entries of loan avialed in current tax year */
485:
486: pay_in_utils.set_location(g_debug, 'Entry Count: ' || p_cnt, 40);
487: l_principal_amt_in_tax_yr := 0;
488:
489: /* Start - Find the sum of Loan Principal Amount*/
490: FOR j IN 0 .. p_cnt - 1 LOOP

Line 491: pay_in_utils.set_location(g_debug,

487: l_principal_amt_in_tax_yr := 0;
488:
489: /* Start - Find the sum of Loan Principal Amount*/
490: FOR j IN 0 .. p_cnt - 1 LOOP
491: pay_in_utils.set_location(g_debug,
492: 'Entry id and Input value id : ' ||
493: l_element_entry_id(j) || l_loan_input_value_id(j),
494: 50);
495:

Line 514: pay_in_utils.set_location(g_debug,

510: FETCH c_global_value
511: INTO l_gbl_value;
512: CLOSE c_global_value;
513:
514: pay_in_utils.set_location(g_debug,
515: 'Total Principal Amount: ' ||
516: l_principal_amt_in_tax_yr,
517: 60);
518: --

Line 530: pay_in_utils.set_location(g_debug,

526: IF l_principal_amt_in_tax_yr > l_gbl_value then
527: /* Update the Taxable Flag to 'Y' when limit is exceeded */
528: FOR j IN 0 .. P_CNT - 1 LOOP
529:
530: pay_in_utils.set_location(g_debug,
531: 'Changing the following entries : ' ||
532: l_element_entry_id(j),
533: 70);
534: UPDATE pay_element_entry_values_f peev

Line 545: pay_in_utils.set_location(g_debug,

541: END LOOP;
542: ELSE
543: FOR j IN 0 .. P_CNT - 1 LOOP
544: /* Update the Taxable Flag to 'N' when the user accidentally enters incorrect values previously */
545: pay_in_utils.set_location(g_debug,
546: 'Changing the following entries : ' ||
547: l_element_entry_id(j),
548: 80);
549: UPDATE pay_element_entry_values_f peev

Line 566: pay_in_utils.set_location(g_debug, 'Leaving: ' || l_procedure, 90);

562: -- End - Check if exemption limit is exceeded
563: --
564: /* delete the PL/SQL table */
565: l_element_entry_id.delete;
566: pay_in_utils.set_location(g_debug, 'Leaving: ' || l_procedure, 90);
567: EXCEPTION
568: WHEN OTHERS THEN
569: IF c_entries_start_tax_yr%ISOPEN THEN
570: CLOSE c_entries_start_tax_yr;

Line 582: pay_in_utils.set_location(g_debug,

578: IF c_global_value%ISOPEN THEN
579: CLOSE c_global_value;
580: END IF;
581:
582: pay_in_utils.set_location(g_debug,
583: 'Leaving FROM Exception Block : ' ||
584: l_procedure,
585: 100);
586: p_message_name := 'PER_IN_ORACLE_GENERIC_ERROR';

Line 632: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);

628:
629: BEGIN
630:
631: l_procedure := g_package ||'check_motorcar_entry';
632: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
633:
634: if g_debug then
635: pay_in_utils.trace('******************************','********************');
636: pay_in_utils.trace('l_element_name : ',l_element_name);

Line 635: pay_in_utils.trace('******************************','********************');

631: l_procedure := g_package ||'check_motorcar_entry';
632: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
633:
634: if g_debug then
635: pay_in_utils.trace('******************************','********************');
636: pay_in_utils.trace('l_element_name : ',l_element_name);
637: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
638: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
639: pay_in_utils.trace('******************************','********************');

Line 636: pay_in_utils.trace('l_element_name : ',l_element_name);

632: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
633:
634: if g_debug then
635: pay_in_utils.trace('******************************','********************');
636: pay_in_utils.trace('l_element_name : ',l_element_name);
637: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
638: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
639: pay_in_utils.trace('******************************','********************');
640: end if;

Line 637: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);

633:
634: if g_debug then
635: pay_in_utils.trace('******************************','********************');
636: pay_in_utils.trace('l_element_name : ',l_element_name);
637: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
638: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
639: pay_in_utils.trace('******************************','********************');
640: end if;
641:

Line 638: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);

634: if g_debug then
635: pay_in_utils.trace('******************************','********************');
636: pay_in_utils.trace('l_element_name : ',l_element_name);
637: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
638: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
639: pay_in_utils.trace('******************************','********************');
640: end if;
641:
642: p_message_name := 'SUCCESS';

Line 639: pay_in_utils.trace('******************************','********************');

635: pay_in_utils.trace('******************************','********************');
636: pay_in_utils.trace('l_element_name : ',l_element_name);
637: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
638: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
639: pay_in_utils.trace('******************************','********************');
640: end if;
641:
642: p_message_name := 'SUCCESS';
643: pay_in_utils.null_message(p_token_name, p_token_value);

Line 643: pay_in_utils.null_message(p_token_name, p_token_value);

639: pay_in_utils.trace('******************************','********************');
640: end if;
641:
642: p_message_name := 'SUCCESS';
643: pay_in_utils.null_message(p_token_name, p_token_value);
644:
645: pay_in_utils.set_location(g_debug,l_procedure,11);
646:
647: OPEN c_input_value_id(l_element_type_id

Line 645: pay_in_utils.set_location(g_debug,l_procedure,11);

641:
642: p_message_name := 'SUCCESS';
643: pay_in_utils.null_message(p_token_name, p_token_value);
644:
645: pay_in_utils.set_location(g_debug,l_procedure,11);
646:
647: OPEN c_input_value_id(l_element_type_id
648: ,'Type of Automotive');
649: FETCH c_input_value_id INTO p_input_value_id;

Line 653: pay_in_utils.trace('p_input_value_id : ',p_input_value_id);

649: FETCH c_input_value_id INTO p_input_value_id;
650: CLOSE c_input_value_id;
651:
652: if g_debug then
653: pay_in_utils.trace('p_input_value_id : ',p_input_value_id);
654: end if;
655:
656: pay_in_utils.set_location(g_debug,l_procedure,12);
657:

Line 656: pay_in_utils.set_location(g_debug,l_procedure,12);

652: if g_debug then
653: pay_in_utils.trace('p_input_value_id : ',p_input_value_id);
654: end if;
655:
656: pay_in_utils.set_location(g_debug,l_procedure,12);
657:
658: OPEN c_element_entry_values(p_element_entry_id
659: , p_input_value_id
660: , p_effective_date);

Line 665: pay_in_utils.trace('l_type_automotive : ',l_type_automotive);

661: FETCH c_element_entry_values INTO l_type_automotive;
662: CLOSE c_element_entry_values;
663:
664: if g_debug then
665: pay_in_utils.trace('l_type_automotive : ',l_type_automotive);
666: end if;
667:
668:
669: IF l_type_automotive = 'CAR' THEN -- Bugfix 4049484

Line 677: pay_in_utils.trace('p_input_value_id_start : ',p_input_value_id_start);

673: FETCH c_input_value_id INTO p_input_value_id_start;
674: CLOSE c_input_value_id;
675:
676: if g_debug then
677: pay_in_utils.trace('p_input_value_id_start : ',p_input_value_id_start);
678: end if;
679:
680: OPEN c_input_value_id(l_element_type_id
681: ,'Benefit End Date');

Line 686: pay_in_utils.trace('p_input_value_id_end : ',p_input_value_id_end);

682: FETCH c_input_value_id INTO p_input_value_id_end;
683: CLOSE c_input_value_id;
684:
685: if g_debug then
686: pay_in_utils.trace('p_input_value_id_end : ',p_input_value_id_end);
687: end if;
688:
689: OPEN c_element_entry_values(p_element_entry_id
690: , p_input_value_id_start

Line 696: pay_in_utils.trace('l_benefit_start : ',l_benefit_start);

692: FETCH c_element_entry_values INTO l_benefit_start;
693: CLOSE c_element_entry_values;
694:
695: if g_debug then
696: pay_in_utils.trace('l_benefit_start : ',l_benefit_start);
697: end if;
698:
699: OPEN c_element_entry_values(p_element_entry_id
700: , p_input_value_id_end

Line 706: pay_in_utils.trace('l_benefit_end : ',l_benefit_end);

702: FETCH c_element_entry_values INTO l_benefit_end;
703: CLOSE c_element_entry_values;
704:
705: if g_debug then
706: pay_in_utils.trace('l_benefit_end : ',l_benefit_end);
707: end if;
708:
709: l_benefit_start_date :=fnd_Date.canonical_to_date(l_benefit_start);
710: l_benefit_end_date :=fnd_Date.canonical_to_date(l_benefit_end);

Line 713: pay_in_utils.trace('l_benefit_start_date : ',l_benefit_start_date);

709: l_benefit_start_date :=fnd_Date.canonical_to_date(l_benefit_start);
710: l_benefit_end_date :=fnd_Date.canonical_to_date(l_benefit_end);
711:
712: if g_debug then
713: pay_in_utils.trace('l_benefit_start_date : ',l_benefit_start_date);
714: pay_in_utils.trace('l_benefit_end_date : ',l_benefit_end_date);
715: end if;
716:
717: -- Bugfix 4049484

Line 714: pay_in_utils.trace('l_benefit_end_date : ',l_benefit_end_date);

710: l_benefit_end_date :=fnd_Date.canonical_to_date(l_benefit_end);
711:
712: if g_debug then
713: pay_in_utils.trace('l_benefit_start_date : ',l_benefit_start_date);
714: pay_in_utils.trace('l_benefit_end_date : ',l_benefit_end_date);
715: end if;
716:
717: -- Bugfix 4049484
718: i:=1;

Line 736: pay_in_utils.set_location(g_debug,' Entry count is : '||p_cnt,40);

732: p_cnt := l_element_entry_id.COUNT;
733: /* Start - Perform the following checks when there are more than one entry for Motor Car */
734:
735: IF p_cnt > 1 THEN -- Bugfix 4049484
736: pay_in_utils.set_location(g_debug,' Entry count is : '||p_cnt,40);
737:
738:
739: /* Get the input value id */
740: l_input_value_name(0) := 'Type of Automotive';

Line 753: pay_in_utils.set_location(g_debug,l_procedure,50);

749: INTO l_input_value_id(i);
750: CLOSE c_input_value_id;
751: END LOOP;
752:
753: pay_in_utils.set_location(g_debug,l_procedure,50);
754:
755: l_first_count :=0;
756:
757: /* LOOP Start */

Line 759: pay_in_utils.set_location(g_debug,l_procedure,60);

755: l_first_count :=0;
756:
757: /* LOOP Start */
758: FOR i in 0..p_cnt-1 LOOP
759: pay_in_utils.set_location(g_debug,l_procedure,60);
760:
761: IF l_element_entry_value.COUNT>0 THEN
762: l_element_entry_value.delete;
763: END IF;

Line 765: pay_in_utils.set_location(g_debug,l_procedure,70);

761: IF l_element_entry_value.COUNT>0 THEN
762: l_element_entry_value.delete;
763: END IF;
764:
765: pay_in_utils.set_location(g_debug,l_procedure,70);
766:
767: FOR j IN 0..3 LOOP
768: OPEN c_element_entry_values(l_element_entry_id(i)
769: , l_input_value_id(j)

Line 775: pay_in_utils.set_location(g_debug,l_procedure,80);

771: FETCH c_element_entry_values INTO l_element_entry_value(j);
772: CLOSE c_element_entry_values;
773: END LOOP;
774:
775: pay_in_utils.set_location(g_debug,l_procedure,80);
776:
777: IF (l_element_entry_value(0) = 'CAR' AND l_element_entry_value(1) = 'OWN_EMPLOYER' AND l_element_entry_value(2) = 'EMPLOYEE' AND l_element_entry_value(3) = 'PARTIAL' )THEN
778: pay_in_utils.set_location(g_debug,l_procedure,90);
779: --

Line 778: pay_in_utils.set_location(g_debug,l_procedure,90);

774:
775: pay_in_utils.set_location(g_debug,l_procedure,80);
776:
777: IF (l_element_entry_value(0) = 'CAR' AND l_element_entry_value(1) = 'OWN_EMPLOYER' AND l_element_entry_value(2) = 'EMPLOYEE' AND l_element_entry_value(3) = 'PARTIAL' )THEN
778: pay_in_utils.set_location(g_debug,l_procedure,90);
779: --
780: -- Check that no more than one entry with the above values exist
781: --
782: IF l_first_count <> 0 THEN

Line 783: pay_in_utils.set_location(g_debug,'Invalid entry Motor Car More than one entry : '||l_procedure,100);

779: --
780: -- Check that no more than one entry with the above values exist
781: --
782: IF l_first_count <> 0 THEN
783: pay_in_utils.set_location(g_debug,'Invalid entry Motor Car More than one entry : '||l_procedure,100);
784: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
785: p_token_name(1) := 'TOKEN';
786: p_token_value(1) := hr_general.decode_lookup('IN_MESSAGE_TOKENS','MOTOR_CAR');
787: RETURN;

Line 794: pay_in_utils.set_location(g_debug,'Invalid entry motor car : '||l_procedure,110);

790: ELSIF (l_element_entry_value(0) = 'CAR' and l_element_entry_value(1) = 'OWN_EMPLOYER' AND l_element_entry_value(2) = 'EMPLOYER' AND l_element_entry_value(3) ='PRIVATE') THEN
791: NULL;
792: ELSE
793: /* Raise an error for all other combination of values */
794: pay_in_utils.set_location(g_debug,'Invalid entry motor car : '||l_procedure,110);
795: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
796: p_token_name(1) := 'TOKEN';
797: p_token_value(1) := hr_general.decode_lookup('IN_MESSAGE_TOKENS','MOTOR_CAR');
798: RETURN;

Line 805: pay_in_utils.set_location(g_debug,'Invalid entry in car entry : '||l_procedure,120);

801: END LOOP;
802: /* Loop End */
803: /* Check that exactly one entry satisfies the conditon*/
804: IF l_first_count <>1 THEN
805: pay_in_utils.set_location(g_debug,'Invalid entry in car entry : '||l_procedure,120);
806: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
807: p_token_name(1) := 'TOKEN';
808: p_token_value(1) := hr_general.decode_lookup('IN_MESSAGE_TOKENS','MOTOR_CAR');
809: RETURN;

Line 821: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,130);

817: IF l_eff_start_date.COUNT > 0 THEN l_eff_start_date.delete; END IF;
818: IF l_element_entry_value.COUNT > 0 THEN l_element_entry_value.delete; END IF;
819: END IF; /* End - Type of Automotive is Motor Car */
820:
821: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,130);
822: EXCEPTION
823: WHEN OTHERS THEN
824: IF c_input_value_id%ISOPEN THEN CLOSE c_input_value_id ; END IF;
825: IF c_global_value%ISOPEN THEN CLOSE c_global_value ; END IF;

Line 826: pay_in_utils.set_location(g_debug,'Leaving FROM Exception Block : '||l_procedure,140);

822: EXCEPTION
823: WHEN OTHERS THEN
824: IF c_input_value_id%ISOPEN THEN CLOSE c_input_value_id ; END IF;
825: IF c_global_value%ISOPEN THEN CLOSE c_global_value ; END IF;
826: pay_in_utils.set_location(g_debug,'Leaving FROM Exception Block : '||l_procedure,140);
827: p_message_name := 'PER_IN_ORACLE_GENERIC_ERROR';
828: p_token_name(1) := 'FUNCTION';
829: p_token_value(1) := l_procedure;
830: p_token_name(2) := 'SQLERRMC';

Line 956: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);

952:
953:
954: BEGIN
955: l_procedure := g_package ||'check_ltc_entry';
956: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
957:
958: if g_debug then
959: pay_in_utils.trace('******************************','********************');
960: pay_in_utils.trace('l_element_name : ',l_element_name);

Line 959: pay_in_utils.trace('******************************','********************');

955: l_procedure := g_package ||'check_ltc_entry';
956: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
957:
958: if g_debug then
959: pay_in_utils.trace('******************************','********************');
960: pay_in_utils.trace('l_element_name : ',l_element_name);
961: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
962: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
963: pay_in_utils.trace('******************************','********************');

Line 960: pay_in_utils.trace('l_element_name : ',l_element_name);

956: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
957:
958: if g_debug then
959: pay_in_utils.trace('******************************','********************');
960: pay_in_utils.trace('l_element_name : ',l_element_name);
961: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
962: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
963: pay_in_utils.trace('******************************','********************');
964: end if;

Line 961: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);

957:
958: if g_debug then
959: pay_in_utils.trace('******************************','********************');
960: pay_in_utils.trace('l_element_name : ',l_element_name);
961: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
962: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
963: pay_in_utils.trace('******************************','********************');
964: end if;
965:

Line 962: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);

958: if g_debug then
959: pay_in_utils.trace('******************************','********************');
960: pay_in_utils.trace('l_element_name : ',l_element_name);
961: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
962: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
963: pay_in_utils.trace('******************************','********************');
964: end if;
965:
966: p_message_name := 'SUCCESS';

Line 963: pay_in_utils.trace('******************************','********************');

959: pay_in_utils.trace('******************************','********************');
960: pay_in_utils.trace('l_element_name : ',l_element_name);
961: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
962: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
963: pay_in_utils.trace('******************************','********************');
964: end if;
965:
966: p_message_name := 'SUCCESS';
967: pay_in_utils.null_message(p_token_name, p_token_value);

Line 967: pay_in_utils.null_message(p_token_name, p_token_value);

963: pay_in_utils.trace('******************************','********************');
964: end if;
965:
966: p_message_name := 'SUCCESS';
967: pay_in_utils.null_message(p_token_name, p_token_value);
968:
969: OPEN c_curr_entry_value(p_element_entry_id,'Carryover from Prev Block',l_element_type_id);
970: FETCH c_curr_entry_value INTO l_entry_value,l_entry_value_id;
971: CLOSE c_curr_entry_value;

Line 974: pay_in_utils.trace('l_entry_value : ',l_entry_value);

970: FETCH c_curr_entry_value INTO l_entry_value,l_entry_value_id;
971: CLOSE c_curr_entry_value;
972:
973: if g_debug then
974: pay_in_utils.trace('l_entry_value : ',l_entry_value);
975: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
976: end if;
977: pay_in_utils.set_location(g_debug,l_procedure,15);
978:

Line 975: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);

971: CLOSE c_curr_entry_value;
972:
973: if g_debug then
974: pay_in_utils.trace('l_entry_value : ',l_entry_value);
975: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
976: end if;
977: pay_in_utils.set_location(g_debug,l_procedure,15);
978:
979: --

Line 977: pay_in_utils.set_location(g_debug,l_procedure,15);

973: if g_debug then
974: pay_in_utils.trace('l_entry_value : ',l_entry_value);
975: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
976: end if;
977: pay_in_utils.set_location(g_debug,l_procedure,15);
978:
979: --
980: -- Find value held in globals before any further Processing
981: -- Fix 3956926

Line 989: pay_in_utils.trace('l_max_ltc : ',l_max_ltc);

985: FETCH c_global_value INTO l_max_ltc;
986: CLOSE c_global_value;
987:
988: if g_debug then
989: pay_in_utils.trace('l_max_ltc : ',l_max_ltc);
990: end if;
991:
992: OPEN c_global_value('IN_JOURNEY_CARRY_OVER');
993: FETCH c_global_value INTO l_max_with_carry_over;

Line 997: pay_in_utils.trace('l_max_with_carry_over : ',l_max_with_carry_over);

993: FETCH c_global_value INTO l_max_with_carry_over;
994: CLOSE c_global_value;
995:
996: if g_debug then
997: pay_in_utils.trace('l_max_with_carry_over : ',l_max_with_carry_over);
998: end if;
999: --
1000: --Start of Check the value in Carryover from Prev Block
1001: --

Line 1010: pay_in_utils.trace('l_curr_block : ',l_curr_block);

1006: FETCH c_ltc_block INTO l_curr_block,l_curr_period;
1007: CLOSE c_ltc_block;
1008:
1009: if g_debug then
1010: pay_in_utils.trace('l_curr_block : ',l_curr_block);
1011: pay_in_utils.trace('l_curr_period : ',l_curr_period);
1012: pay_in_utils.trace('p_effective_date : ',p_effective_date);
1013: end if;
1014: pay_in_utils.set_location(g_debug,l_procedure,20);

Line 1011: pay_in_utils.trace('l_curr_period : ',l_curr_period);

1007: CLOSE c_ltc_block;
1008:
1009: if g_debug then
1010: pay_in_utils.trace('l_curr_block : ',l_curr_block);
1011: pay_in_utils.trace('l_curr_period : ',l_curr_period);
1012: pay_in_utils.trace('p_effective_date : ',p_effective_date);
1013: end if;
1014: pay_in_utils.set_location(g_debug,l_procedure,20);
1015:

Line 1012: pay_in_utils.trace('p_effective_date : ',p_effective_date);

1008:
1009: if g_debug then
1010: pay_in_utils.trace('l_curr_block : ',l_curr_block);
1011: pay_in_utils.trace('l_curr_period : ',l_curr_period);
1012: pay_in_utils.trace('p_effective_date : ',p_effective_date);
1013: end if;
1014: pay_in_utils.set_location(g_debug,l_procedure,20);
1015:
1016: l_current_year := to_number(to_char(p_effective_date,'YYYY'));

Line 1014: pay_in_utils.set_location(g_debug,l_procedure,20);

1010: pay_in_utils.trace('l_curr_block : ',l_curr_block);
1011: pay_in_utils.trace('l_curr_period : ',l_curr_period);
1012: pay_in_utils.trace('p_effective_date : ',p_effective_date);
1013: end if;
1014: pay_in_utils.set_location(g_debug,l_procedure,20);
1015:
1016: l_current_year := to_number(to_char(p_effective_date,'YYYY'));
1017: l_current_blk_start := to_number(substr(l_curr_block,1,4));
1018: IF l_current_year <> l_current_blk_start THEN

Line 1019: pay_in_utils.set_location(g_debug,'Leaving.. '||l_procedure,30);

1015:
1016: l_current_year := to_number(to_char(p_effective_date,'YYYY'));
1017: l_current_blk_start := to_number(substr(l_curr_block,1,4));
1018: IF l_current_year <> l_current_blk_start THEN
1019: pay_in_utils.set_location(g_debug,'Leaving.. '||l_procedure,30);
1020: p_message_name := 'PER_IN_LTC_CARRY_OVER'; -- Fix 3956926
1021: RETURN;
1022: END IF;
1023:

Line 1028: pay_in_utils.trace('p_effective_start_date : ',p_effective_start_date);

1024: l_curr_start_date := to_date(substr(l_curr_period,1,11),'DD-MM-YYYY');
1025: l_curr_end_date := to_date(substr(l_curr_period,15,11),'DD-MM-YYYY');
1026:
1027: if g_debug then
1028: pay_in_utils.trace('p_effective_start_date : ',p_effective_start_date);
1029: end if;
1030: -- Get the Previous Block start and End Dates
1031: l_prev_blk_date := ADD_MONTHS(p_effective_start_date,-48);
1032: OPEN c_ltc_block(l_prev_blk_date);

Line 1037: pay_in_utils.trace('l_prev_block : ',l_prev_block);

1033: FETCH c_ltc_block INTO l_prev_block,l_prev_period;
1034: close c_ltc_block;
1035:
1036: if g_debug then
1037: pay_in_utils.trace('l_prev_block : ',l_prev_block);
1038: pay_in_utils.trace('l_prev_period : ',l_prev_period);
1039: end if;
1040: pay_in_utils.set_location(g_debug,l_procedure,40);
1041:

Line 1038: pay_in_utils.trace('l_prev_period : ',l_prev_period);

1034: close c_ltc_block;
1035:
1036: if g_debug then
1037: pay_in_utils.trace('l_prev_block : ',l_prev_block);
1038: pay_in_utils.trace('l_prev_period : ',l_prev_period);
1039: end if;
1040: pay_in_utils.set_location(g_debug,l_procedure,40);
1041:
1042: l_prev_start_date := to_date(substr(l_prev_period,1,11),'DD-MM-YYYY');

Line 1040: pay_in_utils.set_location(g_debug,l_procedure,40);

1036: if g_debug then
1037: pay_in_utils.trace('l_prev_block : ',l_prev_block);
1038: pay_in_utils.trace('l_prev_period : ',l_prev_period);
1039: end if;
1040: pay_in_utils.set_location(g_debug,l_procedure,40);
1041:
1042: l_prev_start_date := to_date(substr(l_prev_period,1,11),'DD-MM-YYYY');
1043: l_prev_end_date := to_date(substr(l_prev_period,15,11),'DD-MM-YYYY');
1044:

Line 1053: pay_in_utils.trace('l_carry_over_id : ',l_carry_over_id);

1049: FETCH c_input_value_id INTO l_carry_over_id;
1050: CLOSE c_input_value_id;
1051:
1052: if g_debug then
1053: pay_in_utils.trace('l_carry_over_id : ',l_carry_over_id);
1054: end if;
1055:
1056: OPEN c_input_value_id(l_element_Type_id
1057: ,'LTC Journey Block');

Line 1062: pay_in_utils.trace('l_journey_block_id : ',l_journey_block_id);

1058: FETCH c_input_value_id INTO l_journey_block_id;
1059: CLOSE c_input_value_id;
1060:
1061: if g_debug then
1062: pay_in_utils.trace('l_journey_block_id : ',l_journey_block_id);
1063: end if;
1064:
1065: pay_in_utils.set_location(g_debug,l_procedure,50);
1066:

Line 1065: pay_in_utils.set_location(g_debug,l_procedure,50);

1061: if g_debug then
1062: pay_in_utils.trace('l_journey_block_id : ',l_journey_block_id);
1063: end if;
1064:
1065: pay_in_utils.set_location(g_debug,l_procedure,50);
1066:
1067: OPEN c_prev_blk_entry_value(l_element_type_id
1068: ,l_prev_start_date
1069: ,l_prev_end_date

Line 1078: pay_in_utils.trace('l_cur_emplr_prev_blk : ',l_cur_emplr_prev_blk);

1074: FETCH c_prev_blk_entry_value INTO l_cur_emplr_prev_blk;
1075: CLOSE c_prev_blk_entry_value;
1076:
1077: if g_debug then
1078: pay_in_utils.trace('l_cur_emplr_prev_blk : ',l_cur_emplr_prev_blk);
1079: end if;
1080:
1081: OPEN c_prev_employer_ltc_availed(l_prev_start_date
1082: ,l_prev_end_date

Line 1089: pay_in_utils.trace('l_prev_emplr_prev_blk : ',l_prev_emplr_prev_blk);

1085: l_prev_emplr_prev_blk;
1086: CLOSE c_prev_employer_ltc_availed;
1087:
1088: if g_debug then
1089: pay_in_utils.trace('l_prev_emplr_prev_blk : ',l_prev_emplr_prev_blk);
1090: end if;
1091:
1092: pay_in_utils.set_location(g_debug,l_procedure,60);
1093:

Line 1092: pay_in_utils.set_location(g_debug,l_procedure,60);

1088: if g_debug then
1089: pay_in_utils.trace('l_prev_emplr_prev_blk : ',l_prev_emplr_prev_blk);
1090: end if;
1091:
1092: pay_in_utils.set_location(g_debug,l_procedure,60);
1093:
1094:
1095: /* Check if carry over is valid */
1096: IF ( nvl(l_cur_emplr_prev_blk,0) + nvl(l_prev_emplr_prev_blk,0) >=l_max_ltc) THEN

Line 1097: pay_in_utils.set_location(g_debug,'Leaving...'||l_procedure,70);

1093:
1094:
1095: /* Check if carry over is valid */
1096: IF ( nvl(l_cur_emplr_prev_blk,0) + nvl(l_prev_emplr_prev_blk,0) >=l_max_ltc) THEN
1097: pay_in_utils.set_location(g_debug,'Leaving...'||l_procedure,70);
1098: p_message_name := 'PER_IN_LTC_EXEMPTION_AVAILED';
1099: RETURN;
1100: END IF;
1101:

Line 1114: pay_in_utils.trace('l_exemption : ',l_exemption);

1110: FETCH c_exemption_availed INTO l_exemption;
1111: CLOSE c_exemption_availed;
1112:
1113: if g_debug then
1114: pay_in_utils.trace('l_exemption : ',l_exemption);
1115: end if;
1116:
1117: pay_in_utils.set_location(g_debug,l_procedure,80);
1118:

Line 1117: pay_in_utils.set_location(g_debug,l_procedure,80);

1113: if g_debug then
1114: pay_in_utils.trace('l_exemption : ',l_exemption);
1115: end if;
1116:
1117: pay_in_utils.set_location(g_debug,l_procedure,80);
1118:
1119: /* Check if Carry Over has already been availed */
1120: IF (nvl(l_exemption,0) > (l_max_with_carry_over - l_max_ltc) ) THEN
1121: pay_in_utils.set_location(g_debug,'Leaving... '||l_procedure,90);

Line 1121: pay_in_utils.set_location(g_debug,'Leaving... '||l_procedure,90);

1117: pay_in_utils.set_location(g_debug,l_procedure,80);
1118:
1119: /* Check if Carry Over has already been availed */
1120: IF (nvl(l_exemption,0) > (l_max_with_carry_over - l_max_ltc) ) THEN
1121: pay_in_utils.set_location(g_debug,'Leaving... '||l_procedure,90);
1122: p_message_name := 'PER_IN_LTC_EXEMPTION_AVAILED';
1123: RETURN;
1124: END IF;
1125: pay_in_utils.set_location(g_debug,l_procedure,100);

Line 1125: pay_in_utils.set_location(g_debug,l_procedure,100);

1121: pay_in_utils.set_location(g_debug,'Leaving... '||l_procedure,90);
1122: p_message_name := 'PER_IN_LTC_EXEMPTION_AVAILED';
1123: RETURN;
1124: END IF;
1125: pay_in_utils.set_location(g_debug,l_procedure,100);
1126:
1127: END IF;
1128:
1129: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,110);

Line 1129: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,110);

1125: pay_in_utils.set_location(g_debug,l_procedure,100);
1126:
1127: END IF;
1128:
1129: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,110);
1130: EXCEPTION
1131: WHEN OTHERS THEN
1132: IF c_curr_entry_value%ISOPEN THEN CLOSE c_curr_entry_value ; END IF;
1133: IF c_ltc_block%ISOPEN THEN CLOSE c_ltc_block ; END IF;

Line 1140: pay_in_utils.set_location(g_debug,'Leaving FROM Exception Block : '||l_procedure,120);

1136: IF c_input_value_id%ISOPEN THEN CLOSE c_input_value_id ; END IF;
1137: IF c_prev_employer_ltc_availed%ISOPEN THEN CLOSE c_prev_employer_ltc_availed ; END IF;
1138: IF c_global_value%ISOPEN THEN CLOSE c_global_value ; END IF;
1139:
1140: pay_in_utils.set_location(g_debug,'Leaving FROM Exception Block : '||l_procedure,120);
1141: p_message_name := 'PER_IN_ORACLE_GENERIC_ERROR';
1142: p_token_name(1) := 'FUNCTION';
1143: p_token_value(1) := l_procedure;
1144: p_token_name(1) := 'SQLERRMC';

Line 1155: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);

1151: BEGIN
1152:
1153: l_procedure := g_package ||'check_entry_value';
1154: g_debug := hr_utility.debug_enabled;
1155: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1156:
1157: p_message_name := 'SUCCESS';
1158: pay_in_utils.null_message(p_token_name, p_token_value);
1159:

Line 1158: pay_in_utils.null_message(p_token_name, p_token_value);

1154: g_debug := hr_utility.debug_enabled;
1155: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1156:
1157: p_message_name := 'SUCCESS';
1158: pay_in_utils.null_message(p_token_name, p_token_value);
1159:
1160: l_get_migrator_status:=hr_general.g_data_migrator_mode;
1161: -- Get the Element Name
1162:

Line 1176: l_inputvalue_id := pay_in_utils.get_input_value_id(l_element_start_date

1172: OPEN c_element_entry_details(p_element_entry_id);
1173: FETCH c_element_entry_details INTO l_element_start_date,l_element_type_id,l_assignment_id;
1174: CLOSE c_element_entry_details;
1175:
1176: l_inputvalue_id := pay_in_utils.get_input_value_id(l_element_start_date
1177: ,l_element_type_id
1178: ,'Component Name'
1179: );
1180:

Line 1191: pay_in_utils.set_location(g_debug,'Element name is: '||l_element_name,20);

1187: RETURN;
1188: END IF;
1189:
1190: END IF;
1191: pay_in_utils.set_location(g_debug,'Element name is: '||l_element_name,20);
1192: pay_in_utils.set_location(g_debug,'Element_Type_id: '||l_element_Type_id,20);
1193: pay_in_utils.set_location(g_debug,'Assignment_id : '||l_assignment_id,20);
1194:
1195:

Line 1192: pay_in_utils.set_location(g_debug,'Element_Type_id: '||l_element_Type_id,20);

1188: END IF;
1189:
1190: END IF;
1191: pay_in_utils.set_location(g_debug,'Element name is: '||l_element_name,20);
1192: pay_in_utils.set_location(g_debug,'Element_Type_id: '||l_element_Type_id,20);
1193: pay_in_utils.set_location(g_debug,'Assignment_id : '||l_assignment_id,20);
1194:
1195:
1196: IF l_element_name = 'Loan at Concessional Rate' THEN

Line 1193: pay_in_utils.set_location(g_debug,'Assignment_id : '||l_assignment_id,20);

1189:
1190: END IF;
1191: pay_in_utils.set_location(g_debug,'Element name is: '||l_element_name,20);
1192: pay_in_utils.set_location(g_debug,'Element_Type_id: '||l_element_Type_id,20);
1193: pay_in_utils.set_location(g_debug,'Assignment_id : '||l_assignment_id,20);
1194:
1195:
1196: IF l_element_name = 'Loan at Concessional Rate' THEN
1197: check_loan_entry(l_element_name,l_element_Type_id,l_assignment_id);

Line 1202: pay_in_utils.trace('p_message_name : ',p_message_name);

1198:
1199: ELSIF l_element_name = 'Motor Car Perquisite' THEN
1200: check_benefit_dates(l_element_Type_id);
1201: if g_debug then
1202: pay_in_utils.trace('p_message_name : ',p_message_name);
1203: end if;
1204: IF p_message_name <>'SUCCESS' THEN RETURN; END IF;
1205: check_motorcar_entry(l_element_name,l_element_Type_id,l_assignment_id);
1206: --Bugfix 3982447 Start

Line 1208: pay_in_utils.trace('p_message_name : ',p_message_name);

1204: IF p_message_name <>'SUCCESS' THEN RETURN; END IF;
1205: check_motorcar_entry(l_element_name,l_element_Type_id,l_assignment_id);
1206: --Bugfix 3982447 Start
1207: if g_debug then
1208: pay_in_utils.trace('p_message_name : ',p_message_name);
1209: end if;
1210: IF p_message_name <>'SUCCESS' THEN RETURN; END IF;
1211:
1212: if g_debug then

Line 1213: pay_in_utils.trace('p_element_entry_id : ',p_element_entry_id);

1209: end if;
1210: IF p_message_name <>'SUCCESS' THEN RETURN; END IF;
1211:
1212: if g_debug then
1213: pay_in_utils.trace('p_element_entry_id : ',p_element_entry_id);
1214: end if;
1215:
1216: OPEN c_curr_entry_value (p_element_entry_id
1217: ,'Category of Car'

Line 1223: pay_in_utils.trace('l_dep_value1 : ',l_dep_value1);

1219: FETCH c_curr_entry_value INTO l_dep_value1,l_entry_value_id;
1220: CLOSE c_curr_entry_value;
1221:
1222: if g_debug then
1223: pay_in_utils.trace('l_dep_value1 : ',l_dep_value1);
1224: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1225: end if;
1226:
1227: IF l_dep_value1 ='OWN_EMPLOYEE' THEN

Line 1224: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);

1220: CLOSE c_curr_entry_value;
1221:
1222: if g_debug then
1223: pay_in_utils.trace('l_dep_value1 : ',l_dep_value1);
1224: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1225: end if;
1226:
1227: IF l_dep_value1 ='OWN_EMPLOYEE' THEN
1228: OPEN c_curr_entry_value (p_element_entry_id

Line 1235: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);

1231: FETCH c_curr_entry_value INTO l_dep_value2,l_entry_value_id;
1232: CLOSE c_curr_entry_value;
1233:
1234: if g_debug then
1235: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);
1236: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1237: end if;
1238:
1239:

Line 1236: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);

1232: CLOSE c_curr_entry_value;
1233:
1234: if g_debug then
1235: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);
1236: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1237: end if;
1238:
1239:
1240: IF l_dep_value2 = 'EMPLOYEE' THEN

Line 1241: pay_in_utils.null_message(p_token_name, p_token_value);

1237: end if;
1238:
1239:
1240: IF l_dep_value2 = 'EMPLOYEE' THEN
1241: pay_in_utils.null_message(p_token_name, p_token_value);
1242: p_message_name := 'PER_IN_INVALID_PERQUISITE';
1243: pay_in_utils.set_location(g_debug,'Invalid perquisite ...'||l_procedure,25);
1244: RETURN;
1245: END IF;

Line 1243: pay_in_utils.set_location(g_debug,'Invalid perquisite ...'||l_procedure,25);

1239:
1240: IF l_dep_value2 = 'EMPLOYEE' THEN
1241: pay_in_utils.null_message(p_token_name, p_token_value);
1242: p_message_name := 'PER_IN_INVALID_PERQUISITE';
1243: pay_in_utils.set_location(g_debug,'Invalid perquisite ...'||l_procedure,25);
1244: RETURN;
1245: END IF;
1246: END IF;
1247: --Bugfix 3982447 End

Line 1258: pay_in_utils.trace('p_message_name : ',p_message_name);

1254: --
1255: check_benefit_dates(l_element_Type_id);
1256:
1257: if g_debug then
1258: pay_in_utils.trace('p_message_name : ',p_message_name);
1259: end if;
1260:
1261: IF p_message_name <>'SUCCESS' THEN RETURN; END IF;
1262:

Line 1270: pay_in_utils.trace('l_dep_value1 : ',l_dep_value1);

1266: FETCH c_curr_entry_value INTO l_dep_value1,l_entry_value_id;
1267: CLOSE c_curr_entry_value;
1268:
1269: if g_debug then
1270: pay_in_utils.trace('l_dep_value1 : ',l_dep_value1);
1271: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1272: end if;
1273: --
1274: -- Check value interdependency Start

Line 1271: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);

1267: CLOSE c_curr_entry_value;
1268:
1269: if g_debug then
1270: pay_in_utils.trace('l_dep_value1 : ',l_dep_value1);
1271: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1272: end if;
1273: --
1274: -- Check value interdependency Start
1275: --

Line 1284: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);

1280: FETCH c_curr_entry_value INTO l_dep_value2,l_entry_value_id;
1281: CLOSE c_curr_entry_value;
1282:
1283: if g_debug then
1284: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);
1285: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1286: end if;
1287:
1288: IF l_dep_value2 IS NULL or l_dep_value2 = 0 THEN

Line 1285: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);

1281: CLOSE c_curr_entry_value;
1282:
1283: if g_debug then
1284: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);
1285: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1286: end if;
1287:
1288: IF l_dep_value2 IS NULL or l_dep_value2 = 0 THEN
1289: pay_in_utils.null_message(p_token_name, p_token_value);

Line 1289: pay_in_utils.null_message(p_token_name, p_token_value);

1285: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1286: end if;
1287:
1288: IF l_dep_value2 IS NULL or l_dep_value2 = 0 THEN
1289: pay_in_utils.null_message(p_token_name, p_token_value);
1290: p_message_name := 'PER_IN_ENTRY_VALUE_ZERO';
1291: p_token_name(1) := 'TOKEN1';
1292: p_token_value(1) := hr_general.decode_lookup('IN_MESSAGE_TOKENS','RENT_EMPLOLYER');
1293: p_token_name(2) := 'TOKEN2';

Line 1298: pay_in_utils.set_location(g_debug,'Company Accommodation '||l_procedure,25);

1294: p_token_value(2) := hr_general.decode_lookup('IN_MESSAGE_TOKENS','PROPERTY');
1295: p_token_name(3) := 'TOKEN3';
1296: p_token_value(3) := hr_general.decode_lookup('IN_MESSAGE_TOKENS','LEASED');
1297:
1298: pay_in_utils.set_location(g_debug,'Company Accommodation '||l_procedure,25);
1299: RETURN;
1300: END IF;
1301: -- Bugfix 3991117 Start
1302: ELSIF l_dep_value1 = 'OWN' THEN

Line 1310: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);

1306: FETCH c_curr_entry_value INTO l_dep_value2,l_entry_value_id;
1307: CLOSE c_curr_entry_value;
1308:
1309: if g_debug then
1310: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);
1311: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1312: end if;
1313:
1314: IF l_dep_value2 IS NOT NULL AND l_dep_value2 <> 0 THEN

Line 1311: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);

1307: CLOSE c_curr_entry_value;
1308:
1309: if g_debug then
1310: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);
1311: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1312: end if;
1313:
1314: IF l_dep_value2 IS NOT NULL AND l_dep_value2 <> 0 THEN
1315: pay_in_utils.null_message(p_token_name, p_token_value);

Line 1315: pay_in_utils.null_message(p_token_name, p_token_value);

1311: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1312: end if;
1313:
1314: IF l_dep_value2 IS NOT NULL AND l_dep_value2 <> 0 THEN
1315: pay_in_utils.null_message(p_token_name, p_token_value);
1316: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
1317: p_token_name(1) := 'TOKEN';
1318: p_token_value(1):= hr_general.decode_lookup('IN_MESSAGE_TOKENS','COMP_ACC');
1319: pay_in_utils.set_location(g_debug,'Company Accommodation '||l_procedure,28);

Line 1319: pay_in_utils.set_location(g_debug,'Company Accommodation '||l_procedure,28);

1315: pay_in_utils.null_message(p_token_name, p_token_value);
1316: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
1317: p_token_name(1) := 'TOKEN';
1318: p_token_value(1):= hr_general.decode_lookup('IN_MESSAGE_TOKENS','COMP_ACC');
1319: pay_in_utils.set_location(g_debug,'Company Accommodation '||l_procedure,28);
1320: RETURN;
1321: END IF;
1322:
1323:

Line 1356: pay_in_utils.set_location(g_debug,'ltc '||l_procedure,25);

1352: FETCH c_curr_entry_value INTO l_dep_value2,l_entry_value_id;
1353: CLOSE c_curr_entry_value;
1354:
1355: IF l_dep_value2 IS NULL THEN
1356: pay_in_utils.set_location(g_debug,'ltc '||l_procedure,25);
1357: pay_in_utils.null_message(p_token_name, p_token_value);
1358: p_message_name := 'PER_IN_MISSING_ENTRY_VALUE';
1359: p_token_name(1) := 'TOKEN1';
1360: p_token_value(1) := 'Date of Purchase';

Line 1357: pay_in_utils.null_message(p_token_name, p_token_value);

1353: CLOSE c_curr_entry_value;
1354:
1355: IF l_dep_value2 IS NULL THEN
1356: pay_in_utils.set_location(g_debug,'ltc '||l_procedure,25);
1357: pay_in_utils.null_message(p_token_name, p_token_value);
1358: p_message_name := 'PER_IN_MISSING_ENTRY_VALUE';
1359: p_token_name(1) := 'TOKEN1';
1360: p_token_value(1) := 'Date of Purchase';
1361: p_token_name(2) := 'TOKEN2';

Line 1382: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);

1378: ELSIF l_element_name = 'Free Education' THEN
1379: check_benefit_dates(l_element_Type_id);
1380: END IF;
1381:
1382: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
1383: EXCEPTION
1384: WHEN OTHERS THEN
1385: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
1386: p_message_name := 'PER_IN_ORACLE_GENERIC_ERROR';

Line 1385: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);

1381:
1382: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
1383: EXCEPTION
1384: WHEN OTHERS THEN
1385: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
1386: p_message_name := 'PER_IN_ORACLE_GENERIC_ERROR';
1387: p_token_name(1) := 'FUNCTION';
1388: p_token_value(1) := l_procedure;
1389: p_token_name(2) := 'SQLERRMC';