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 = 'EDUCATION' THEN
433: IF p_effective_start_date >= TO_DATE('01-04-2009','DD-MM-YYYY') THEN
434: IF l_loan_interest_type NOT IN ('EL_BOYS','EL_GIRLS','SBI_EL_BOYS','SBI_EL_GIRLS') THEN
435: pay_in_utils.set_location(g_debug,
436: 'Leaving: ' || l_procedure,
437: 100);
438: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
439: p_token_name(1) := 'TOKEN';

Line 447: pay_in_utils.set_location(g_debug,

443: END IF;
444: ELSIF l_loan_type = 'MORTGAGE' THEN
445: IF p_effective_start_date >= TO_DATE('01-04-2008','DD-MM-YYYY') THEN
446: IF l_loan_interest_type IS NULL THEN
447: pay_in_utils.set_location(g_debug,
448: 'Leaving: ' || l_procedure,
449: 100);
450: p_message_name := 'PER_IN_MISSING_ENTRY_VALUE';
451: p_token_name(1) := 'TOKEN1';

Line 459: pay_in_utils.set_location(g_debug,

455: p_token_name(3) := 'TOKEN3';
456: p_token_value(3) := 'Mortgage Loan';
457: RETURN;
458: ELSIF l_loan_interest_type NOT IN ('MRTAGE_IMMOVABLE', 'MRTAGE_GOLD') THEN
459: pay_in_utils.set_location(g_debug,
460: 'Leaving: ' || l_procedure,
461: 100);
462: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
463: p_token_name(1) := 'TOKEN';

Line 474: pay_in_utils.set_location(g_debug,

470: /*Check for Additional Information Ends*/
471:
472: /* Start - Get entries of loan availed in current tax year */
473: l_tax_year_start := pay_in_tax_utils.get_financial_year_start(p_effective_date);
474: pay_in_utils.set_location(g_debug,
475: 'Tax Year Start: ' || l_tax_year_start,
476: 30);
477:
478: p_cnt := 0;

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

494: p_cnt := p_cnt + 1;
495: END LOOP;
496: /* End - Get entries of loan avialed in current tax year */
497:
498: pay_in_utils.set_location(g_debug, 'Entry Count: ' || p_cnt, 40);
499: l_principal_amt_in_tax_yr := 0;
500:
501: /* Start - Find the sum of Loan Principal Amount*/
502: FOR j IN 0 .. p_cnt - 1 LOOP

Line 503: pay_in_utils.set_location(g_debug,

499: l_principal_amt_in_tax_yr := 0;
500:
501: /* Start - Find the sum of Loan Principal Amount*/
502: FOR j IN 0 .. p_cnt - 1 LOOP
503: pay_in_utils.set_location(g_debug,
504: 'Entry id and Input value id : ' ||
505: l_element_entry_id(j) || l_loan_input_value_id(j),
506: 50);
507:

Line 526: pay_in_utils.set_location(g_debug,

522: FETCH c_global_value
523: INTO l_gbl_value;
524: CLOSE c_global_value;
525:
526: pay_in_utils.set_location(g_debug,
527: 'Total Principal Amount: ' ||
528: l_principal_amt_in_tax_yr,
529: 60);
530: --

Line 542: pay_in_utils.set_location(g_debug,

538: IF l_principal_amt_in_tax_yr > l_gbl_value then
539: /* Update the Taxable Flag to 'Y' when limit is exceeded */
540: FOR j IN 0 .. P_CNT - 1 LOOP
541:
542: pay_in_utils.set_location(g_debug,
543: 'Changing the following entries : ' ||
544: l_element_entry_id(j),
545: 70);
546: UPDATE pay_element_entry_values_f peev

Line 557: pay_in_utils.set_location(g_debug,

553: END LOOP;
554: ELSE
555: FOR j IN 0 .. P_CNT - 1 LOOP
556: /* Update the Taxable Flag to 'N' when the user accidentally enters incorrect values previously */
557: pay_in_utils.set_location(g_debug,
558: 'Changing the following entries : ' ||
559: l_element_entry_id(j),
560: 80);
561: UPDATE pay_element_entry_values_f peev

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

574: -- End - Check if exemption limit is exceeded
575: --
576: /* delete the PL/SQL table */
577: l_element_entry_id.delete;
578: pay_in_utils.set_location(g_debug, 'Leaving: ' || l_procedure, 90);
579: EXCEPTION
580: WHEN OTHERS THEN
581: IF c_entries_start_tax_yr%ISOPEN THEN
582: CLOSE c_entries_start_tax_yr;

Line 594: pay_in_utils.set_location(g_debug,

590: IF c_global_value%ISOPEN THEN
591: CLOSE c_global_value;
592: END IF;
593:
594: pay_in_utils.set_location(g_debug,
595: 'Leaving FROM Exception Block : ' ||
596: l_procedure,
597: 100);
598: p_message_name := 'PER_IN_ORACLE_GENERIC_ERROR';

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

640:
641: BEGIN
642:
643: l_procedure := g_package ||'check_motorcar_entry';
644: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
645:
646: if g_debug then
647: pay_in_utils.trace('******************************','********************');
648: pay_in_utils.trace('l_element_name : ',l_element_name);

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

643: l_procedure := g_package ||'check_motorcar_entry';
644: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
645:
646: if g_debug then
647: pay_in_utils.trace('******************************','********************');
648: pay_in_utils.trace('l_element_name : ',l_element_name);
649: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
650: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
651: pay_in_utils.trace('******************************','********************');

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

644: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
645:
646: if g_debug then
647: pay_in_utils.trace('******************************','********************');
648: pay_in_utils.trace('l_element_name : ',l_element_name);
649: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
650: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
651: pay_in_utils.trace('******************************','********************');
652: end if;

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

645:
646: if g_debug then
647: pay_in_utils.trace('******************************','********************');
648: pay_in_utils.trace('l_element_name : ',l_element_name);
649: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
650: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
651: pay_in_utils.trace('******************************','********************');
652: end if;
653:

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

646: if g_debug then
647: pay_in_utils.trace('******************************','********************');
648: pay_in_utils.trace('l_element_name : ',l_element_name);
649: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
650: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
651: pay_in_utils.trace('******************************','********************');
652: end if;
653:
654: p_message_name := 'SUCCESS';

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

647: pay_in_utils.trace('******************************','********************');
648: pay_in_utils.trace('l_element_name : ',l_element_name);
649: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
650: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
651: pay_in_utils.trace('******************************','********************');
652: end if;
653:
654: p_message_name := 'SUCCESS';
655: pay_in_utils.null_message(p_token_name, p_token_value);

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

651: pay_in_utils.trace('******************************','********************');
652: end if;
653:
654: p_message_name := 'SUCCESS';
655: pay_in_utils.null_message(p_token_name, p_token_value);
656:
657: pay_in_utils.set_location(g_debug,l_procedure,11);
658:
659: OPEN c_input_value_id(l_element_type_id

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

653:
654: p_message_name := 'SUCCESS';
655: pay_in_utils.null_message(p_token_name, p_token_value);
656:
657: pay_in_utils.set_location(g_debug,l_procedure,11);
658:
659: OPEN c_input_value_id(l_element_type_id
660: ,'Type of Automotive');
661: FETCH c_input_value_id INTO p_input_value_id;

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

661: FETCH c_input_value_id INTO p_input_value_id;
662: CLOSE c_input_value_id;
663:
664: if g_debug then
665: pay_in_utils.trace('p_input_value_id : ',p_input_value_id);
666: end if;
667:
668: pay_in_utils.set_location(g_debug,l_procedure,12);
669:

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

664: if g_debug then
665: pay_in_utils.trace('p_input_value_id : ',p_input_value_id);
666: end if;
667:
668: pay_in_utils.set_location(g_debug,l_procedure,12);
669:
670: OPEN c_element_entry_values(p_element_entry_id
671: , p_input_value_id
672: , p_effective_date);

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

673: FETCH c_element_entry_values INTO l_type_automotive;
674: CLOSE c_element_entry_values;
675:
676: if g_debug then
677: pay_in_utils.trace('l_type_automotive : ',l_type_automotive);
678: end if;
679:
680:
681: IF l_type_automotive = 'CAR' THEN -- Bugfix 4049484

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

685: FETCH c_input_value_id INTO p_input_value_id_start;
686: CLOSE c_input_value_id;
687:
688: if g_debug then
689: pay_in_utils.trace('p_input_value_id_start : ',p_input_value_id_start);
690: end if;
691:
692: OPEN c_input_value_id(l_element_type_id
693: ,'Benefit End Date');

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

694: FETCH c_input_value_id INTO p_input_value_id_end;
695: CLOSE c_input_value_id;
696:
697: if g_debug then
698: pay_in_utils.trace('p_input_value_id_end : ',p_input_value_id_end);
699: end if;
700:
701: OPEN c_element_entry_values(p_element_entry_id
702: , p_input_value_id_start

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

704: FETCH c_element_entry_values INTO l_benefit_start;
705: CLOSE c_element_entry_values;
706:
707: if g_debug then
708: pay_in_utils.trace('l_benefit_start : ',l_benefit_start);
709: end if;
710:
711: OPEN c_element_entry_values(p_element_entry_id
712: , p_input_value_id_end

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

714: FETCH c_element_entry_values INTO l_benefit_end;
715: CLOSE c_element_entry_values;
716:
717: if g_debug then
718: pay_in_utils.trace('l_benefit_end : ',l_benefit_end);
719: end if;
720:
721: l_benefit_start_date :=fnd_Date.canonical_to_date(l_benefit_start);
722: l_benefit_end_date :=fnd_Date.canonical_to_date(l_benefit_end);

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

721: l_benefit_start_date :=fnd_Date.canonical_to_date(l_benefit_start);
722: l_benefit_end_date :=fnd_Date.canonical_to_date(l_benefit_end);
723:
724: if g_debug then
725: pay_in_utils.trace('l_benefit_start_date : ',l_benefit_start_date);
726: pay_in_utils.trace('l_benefit_end_date : ',l_benefit_end_date);
727: end if;
728:
729: -- Bugfix 4049484

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

722: l_benefit_end_date :=fnd_Date.canonical_to_date(l_benefit_end);
723:
724: if g_debug then
725: pay_in_utils.trace('l_benefit_start_date : ',l_benefit_start_date);
726: pay_in_utils.trace('l_benefit_end_date : ',l_benefit_end_date);
727: end if;
728:
729: -- Bugfix 4049484
730: i:=1;

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

744: p_cnt := l_element_entry_id.COUNT;
745: /* Start - Perform the following checks when there are more than one entry for Motor Car */
746:
747: IF p_cnt > 1 THEN -- Bugfix 4049484
748: pay_in_utils.set_location(g_debug,' Entry count is : '||p_cnt,40);
749:
750:
751: /* Get the input value id */
752: l_input_value_name(0) := 'Type of Automotive';

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

761: INTO l_input_value_id(i);
762: CLOSE c_input_value_id;
763: END LOOP;
764:
765: pay_in_utils.set_location(g_debug,l_procedure,50);
766:
767: l_first_count :=0;
768:
769: /* LOOP Start */

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

767: l_first_count :=0;
768:
769: /* LOOP Start */
770: FOR i in 0..p_cnt-1 LOOP
771: pay_in_utils.set_location(g_debug,l_procedure,60);
772:
773: IF l_element_entry_value.COUNT>0 THEN
774: l_element_entry_value.delete;
775: END IF;

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

773: IF l_element_entry_value.COUNT>0 THEN
774: l_element_entry_value.delete;
775: END IF;
776:
777: pay_in_utils.set_location(g_debug,l_procedure,70);
778:
779: FOR j IN 0..3 LOOP
780: OPEN c_element_entry_values(l_element_entry_id(i)
781: , l_input_value_id(j)

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

783: FETCH c_element_entry_values INTO l_element_entry_value(j);
784: CLOSE c_element_entry_values;
785: END LOOP;
786:
787: pay_in_utils.set_location(g_debug,l_procedure,80);
788:
789: 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
790: pay_in_utils.set_location(g_debug,l_procedure,90);
791: --

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

786:
787: pay_in_utils.set_location(g_debug,l_procedure,80);
788:
789: 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
790: pay_in_utils.set_location(g_debug,l_procedure,90);
791: --
792: -- Check that no more than one entry with the above values exist
793: --
794: IF l_first_count <> 0 THEN

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

791: --
792: -- Check that no more than one entry with the above values exist
793: --
794: IF l_first_count <> 0 THEN
795: pay_in_utils.set_location(g_debug,'Invalid entry Motor Car More than one entry : '||l_procedure,100);
796: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
797: p_token_name(1) := 'TOKEN';
798: p_token_value(1) := hr_general.decode_lookup('IN_MESSAGE_TOKENS','MOTOR_CAR');
799: RETURN;

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

802: 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
803: NULL;
804: ELSE
805: /* Raise an error for all other combination of values */
806: pay_in_utils.set_location(g_debug,'Invalid entry motor car : '||l_procedure,110);
807: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
808: p_token_name(1) := 'TOKEN';
809: p_token_value(1) := hr_general.decode_lookup('IN_MESSAGE_TOKENS','MOTOR_CAR');
810: RETURN;

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

813: END LOOP;
814: /* Loop End */
815: /* Check that exactly one entry satisfies the conditon*/
816: IF l_first_count <>1 THEN
817: pay_in_utils.set_location(g_debug,'Invalid entry in car entry : '||l_procedure,120);
818: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
819: p_token_name(1) := 'TOKEN';
820: p_token_value(1) := hr_general.decode_lookup('IN_MESSAGE_TOKENS','MOTOR_CAR');
821: RETURN;

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

829: IF l_eff_start_date.COUNT > 0 THEN l_eff_start_date.delete; END IF;
830: IF l_element_entry_value.COUNT > 0 THEN l_element_entry_value.delete; END IF;
831: END IF; /* End - Type of Automotive is Motor Car */
832:
833: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,130);
834: EXCEPTION
835: WHEN OTHERS THEN
836: IF c_input_value_id%ISOPEN THEN CLOSE c_input_value_id ; END IF;
837: IF c_global_value%ISOPEN THEN CLOSE c_global_value ; END IF;

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

834: EXCEPTION
835: WHEN OTHERS THEN
836: IF c_input_value_id%ISOPEN THEN CLOSE c_input_value_id ; END IF;
837: IF c_global_value%ISOPEN THEN CLOSE c_global_value ; END IF;
838: pay_in_utils.set_location(g_debug,'Leaving FROM Exception Block : '||l_procedure,140);
839: p_message_name := 'PER_IN_ORACLE_GENERIC_ERROR';
840: p_token_name(1) := 'FUNCTION';
841: p_token_value(1) := l_procedure;
842: p_token_name(2) := 'SQLERRMC';

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

964:
965:
966: BEGIN
967: l_procedure := g_package ||'check_ltc_entry';
968: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
969:
970: if g_debug then
971: pay_in_utils.trace('******************************','********************');
972: pay_in_utils.trace('l_element_name : ',l_element_name);

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

967: l_procedure := g_package ||'check_ltc_entry';
968: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
969:
970: if g_debug then
971: pay_in_utils.trace('******************************','********************');
972: pay_in_utils.trace('l_element_name : ',l_element_name);
973: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
974: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
975: pay_in_utils.trace('******************************','********************');

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

968: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
969:
970: if g_debug then
971: pay_in_utils.trace('******************************','********************');
972: pay_in_utils.trace('l_element_name : ',l_element_name);
973: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
974: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
975: pay_in_utils.trace('******************************','********************');
976: end if;

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

969:
970: if g_debug then
971: pay_in_utils.trace('******************************','********************');
972: pay_in_utils.trace('l_element_name : ',l_element_name);
973: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
974: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
975: pay_in_utils.trace('******************************','********************');
976: end if;
977:

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

970: if g_debug then
971: pay_in_utils.trace('******************************','********************');
972: pay_in_utils.trace('l_element_name : ',l_element_name);
973: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
974: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
975: pay_in_utils.trace('******************************','********************');
976: end if;
977:
978: p_message_name := 'SUCCESS';

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

971: pay_in_utils.trace('******************************','********************');
972: pay_in_utils.trace('l_element_name : ',l_element_name);
973: pay_in_utils.trace('l_element_Type_id : ',l_element_Type_id);
974: pay_in_utils.trace('l_assignment_id : ',l_assignment_id);
975: pay_in_utils.trace('******************************','********************');
976: end if;
977:
978: p_message_name := 'SUCCESS';
979: pay_in_utils.null_message(p_token_name, p_token_value);

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

975: pay_in_utils.trace('******************************','********************');
976: end if;
977:
978: p_message_name := 'SUCCESS';
979: pay_in_utils.null_message(p_token_name, p_token_value);
980:
981: OPEN c_curr_entry_value(p_element_entry_id,'Carryover from Prev Block',l_element_type_id);
982: FETCH c_curr_entry_value INTO l_entry_value,l_entry_value_id;
983: CLOSE c_curr_entry_value;

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

982: FETCH c_curr_entry_value INTO l_entry_value,l_entry_value_id;
983: CLOSE c_curr_entry_value;
984:
985: if g_debug then
986: pay_in_utils.trace('l_entry_value : ',l_entry_value);
987: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
988: end if;
989: pay_in_utils.set_location(g_debug,l_procedure,15);
990:

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

983: CLOSE c_curr_entry_value;
984:
985: if g_debug then
986: pay_in_utils.trace('l_entry_value : ',l_entry_value);
987: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
988: end if;
989: pay_in_utils.set_location(g_debug,l_procedure,15);
990:
991: --

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

985: if g_debug then
986: pay_in_utils.trace('l_entry_value : ',l_entry_value);
987: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
988: end if;
989: pay_in_utils.set_location(g_debug,l_procedure,15);
990:
991: --
992: -- Find value held in globals before any further Processing
993: -- Fix 3956926

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

997: FETCH c_global_value INTO l_max_ltc;
998: CLOSE c_global_value;
999:
1000: if g_debug then
1001: pay_in_utils.trace('l_max_ltc : ',l_max_ltc);
1002: end if;
1003:
1004: OPEN c_global_value('IN_JOURNEY_CARRY_OVER');
1005: FETCH c_global_value INTO l_max_with_carry_over;

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

1005: FETCH c_global_value INTO l_max_with_carry_over;
1006: CLOSE c_global_value;
1007:
1008: if g_debug then
1009: pay_in_utils.trace('l_max_with_carry_over : ',l_max_with_carry_over);
1010: end if;
1011: --
1012: --Start of Check the value in Carryover from Prev Block
1013: --

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

1018: FETCH c_ltc_block INTO l_curr_block,l_curr_period;
1019: CLOSE c_ltc_block;
1020:
1021: if g_debug then
1022: pay_in_utils.trace('l_curr_block : ',l_curr_block);
1023: pay_in_utils.trace('l_curr_period : ',l_curr_period);
1024: pay_in_utils.trace('p_effective_date : ',p_effective_date);
1025: end if;
1026: pay_in_utils.set_location(g_debug,l_procedure,20);

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

1019: CLOSE c_ltc_block;
1020:
1021: if g_debug then
1022: pay_in_utils.trace('l_curr_block : ',l_curr_block);
1023: pay_in_utils.trace('l_curr_period : ',l_curr_period);
1024: pay_in_utils.trace('p_effective_date : ',p_effective_date);
1025: end if;
1026: pay_in_utils.set_location(g_debug,l_procedure,20);
1027:

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

1020:
1021: if g_debug then
1022: pay_in_utils.trace('l_curr_block : ',l_curr_block);
1023: pay_in_utils.trace('l_curr_period : ',l_curr_period);
1024: pay_in_utils.trace('p_effective_date : ',p_effective_date);
1025: end if;
1026: pay_in_utils.set_location(g_debug,l_procedure,20);
1027:
1028: l_current_year := to_number(to_char(p_effective_date,'YYYY'));

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

1022: pay_in_utils.trace('l_curr_block : ',l_curr_block);
1023: pay_in_utils.trace('l_curr_period : ',l_curr_period);
1024: pay_in_utils.trace('p_effective_date : ',p_effective_date);
1025: end if;
1026: pay_in_utils.set_location(g_debug,l_procedure,20);
1027:
1028: l_current_year := to_number(to_char(p_effective_date,'YYYY'));
1029: l_current_blk_start := to_number(substr(l_curr_block,1,4));
1030: IF l_current_year <> l_current_blk_start THEN

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

1027:
1028: l_current_year := to_number(to_char(p_effective_date,'YYYY'));
1029: l_current_blk_start := to_number(substr(l_curr_block,1,4));
1030: IF l_current_year <> l_current_blk_start THEN
1031: pay_in_utils.set_location(g_debug,'Leaving.. '||l_procedure,30);
1032: p_message_name := 'PER_IN_LTC_CARRY_OVER'; -- Fix 3956926
1033: RETURN;
1034: END IF;
1035:

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

1036: l_curr_start_date := to_date(substr(l_curr_period,1,11),'DD-MM-YYYY');
1037: l_curr_end_date := to_date(substr(l_curr_period,15,11),'DD-MM-YYYY');
1038:
1039: if g_debug then
1040: pay_in_utils.trace('p_effective_start_date : ',p_effective_start_date);
1041: end if;
1042: -- Get the Previous Block start and End Dates
1043: l_prev_blk_date := ADD_MONTHS(p_effective_start_date,-48);
1044: OPEN c_ltc_block(l_prev_blk_date);

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

1045: FETCH c_ltc_block INTO l_prev_block,l_prev_period;
1046: close c_ltc_block;
1047:
1048: if g_debug then
1049: pay_in_utils.trace('l_prev_block : ',l_prev_block);
1050: pay_in_utils.trace('l_prev_period : ',l_prev_period);
1051: end if;
1052: pay_in_utils.set_location(g_debug,l_procedure,40);
1053:

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

1046: close c_ltc_block;
1047:
1048: if g_debug then
1049: pay_in_utils.trace('l_prev_block : ',l_prev_block);
1050: pay_in_utils.trace('l_prev_period : ',l_prev_period);
1051: end if;
1052: pay_in_utils.set_location(g_debug,l_procedure,40);
1053:
1054: l_prev_start_date := to_date(substr(l_prev_period,1,11),'DD-MM-YYYY');

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

1048: if g_debug then
1049: pay_in_utils.trace('l_prev_block : ',l_prev_block);
1050: pay_in_utils.trace('l_prev_period : ',l_prev_period);
1051: end if;
1052: pay_in_utils.set_location(g_debug,l_procedure,40);
1053:
1054: l_prev_start_date := to_date(substr(l_prev_period,1,11),'DD-MM-YYYY');
1055: l_prev_end_date := to_date(substr(l_prev_period,15,11),'DD-MM-YYYY');
1056:

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

1061: FETCH c_input_value_id INTO l_carry_over_id;
1062: CLOSE c_input_value_id;
1063:
1064: if g_debug then
1065: pay_in_utils.trace('l_carry_over_id : ',l_carry_over_id);
1066: end if;
1067:
1068: OPEN c_input_value_id(l_element_Type_id
1069: ,'LTC Journey Block');

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

1070: FETCH c_input_value_id INTO l_journey_block_id;
1071: CLOSE c_input_value_id;
1072:
1073: if g_debug then
1074: pay_in_utils.trace('l_journey_block_id : ',l_journey_block_id);
1075: end if;
1076:
1077: pay_in_utils.set_location(g_debug,l_procedure,50);
1078:

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

1073: if g_debug then
1074: pay_in_utils.trace('l_journey_block_id : ',l_journey_block_id);
1075: end if;
1076:
1077: pay_in_utils.set_location(g_debug,l_procedure,50);
1078:
1079: OPEN c_prev_blk_entry_value(l_element_type_id
1080: ,l_prev_start_date
1081: ,l_prev_end_date

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

1086: FETCH c_prev_blk_entry_value INTO l_cur_emplr_prev_blk;
1087: CLOSE c_prev_blk_entry_value;
1088:
1089: if g_debug then
1090: pay_in_utils.trace('l_cur_emplr_prev_blk : ',l_cur_emplr_prev_blk);
1091: end if;
1092:
1093: OPEN c_prev_employer_ltc_availed(l_prev_start_date
1094: ,l_prev_end_date

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

1097: l_prev_emplr_prev_blk;
1098: CLOSE c_prev_employer_ltc_availed;
1099:
1100: if g_debug then
1101: pay_in_utils.trace('l_prev_emplr_prev_blk : ',l_prev_emplr_prev_blk);
1102: end if;
1103:
1104: pay_in_utils.set_location(g_debug,l_procedure,60);
1105:

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

1100: if g_debug then
1101: pay_in_utils.trace('l_prev_emplr_prev_blk : ',l_prev_emplr_prev_blk);
1102: end if;
1103:
1104: pay_in_utils.set_location(g_debug,l_procedure,60);
1105:
1106:
1107: /* Check if carry over is valid */
1108: IF ( nvl(l_cur_emplr_prev_blk,0) + nvl(l_prev_emplr_prev_blk,0) >=l_max_ltc) THEN

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

1105:
1106:
1107: /* Check if carry over is valid */
1108: IF ( nvl(l_cur_emplr_prev_blk,0) + nvl(l_prev_emplr_prev_blk,0) >=l_max_ltc) THEN
1109: pay_in_utils.set_location(g_debug,'Leaving...'||l_procedure,70);
1110: p_message_name := 'PER_IN_LTC_EXEMPTION_AVAILED';
1111: RETURN;
1112: END IF;
1113:

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

1122: FETCH c_exemption_availed INTO l_exemption;
1123: CLOSE c_exemption_availed;
1124:
1125: if g_debug then
1126: pay_in_utils.trace('l_exemption : ',l_exemption);
1127: end if;
1128:
1129: pay_in_utils.set_location(g_debug,l_procedure,80);
1130:

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

1125: if g_debug then
1126: pay_in_utils.trace('l_exemption : ',l_exemption);
1127: end if;
1128:
1129: pay_in_utils.set_location(g_debug,l_procedure,80);
1130:
1131: /* Check if Carry Over has already been availed */
1132: IF (nvl(l_exemption,0) > (l_max_with_carry_over - l_max_ltc) ) THEN
1133: pay_in_utils.set_location(g_debug,'Leaving... '||l_procedure,90);

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

1129: pay_in_utils.set_location(g_debug,l_procedure,80);
1130:
1131: /* Check if Carry Over has already been availed */
1132: IF (nvl(l_exemption,0) > (l_max_with_carry_over - l_max_ltc) ) THEN
1133: pay_in_utils.set_location(g_debug,'Leaving... '||l_procedure,90);
1134: p_message_name := 'PER_IN_LTC_EXEMPTION_AVAILED';
1135: RETURN;
1136: END IF;
1137: pay_in_utils.set_location(g_debug,l_procedure,100);

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

1133: pay_in_utils.set_location(g_debug,'Leaving... '||l_procedure,90);
1134: p_message_name := 'PER_IN_LTC_EXEMPTION_AVAILED';
1135: RETURN;
1136: END IF;
1137: pay_in_utils.set_location(g_debug,l_procedure,100);
1138:
1139: END IF;
1140:
1141: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,110);

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

1137: pay_in_utils.set_location(g_debug,l_procedure,100);
1138:
1139: END IF;
1140:
1141: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,110);
1142: EXCEPTION
1143: WHEN OTHERS THEN
1144: IF c_curr_entry_value%ISOPEN THEN CLOSE c_curr_entry_value ; END IF;
1145: IF c_ltc_block%ISOPEN THEN CLOSE c_ltc_block ; END IF;

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

1148: IF c_input_value_id%ISOPEN THEN CLOSE c_input_value_id ; END IF;
1149: IF c_prev_employer_ltc_availed%ISOPEN THEN CLOSE c_prev_employer_ltc_availed ; END IF;
1150: IF c_global_value%ISOPEN THEN CLOSE c_global_value ; END IF;
1151:
1152: pay_in_utils.set_location(g_debug,'Leaving FROM Exception Block : '||l_procedure,120);
1153: p_message_name := 'PER_IN_ORACLE_GENERIC_ERROR';
1154: p_token_name(1) := 'FUNCTION';
1155: p_token_value(1) := l_procedure;
1156: p_token_name(1) := 'SQLERRMC';

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

1163: BEGIN
1164:
1165: l_procedure := g_package ||'check_entry_value';
1166: g_debug := hr_utility.debug_enabled;
1167: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1168:
1169: p_message_name := 'SUCCESS';
1170: pay_in_utils.null_message(p_token_name, p_token_value);
1171:

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

1166: g_debug := hr_utility.debug_enabled;
1167: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1168:
1169: p_message_name := 'SUCCESS';
1170: pay_in_utils.null_message(p_token_name, p_token_value);
1171:
1172: l_get_migrator_status:=hr_general.g_data_migrator_mode;
1173: -- Get the Element Name
1174:

Line 1188: l_inputvalue_id := pay_in_utils.get_input_value_id(l_element_start_date

1184: OPEN c_element_entry_details(p_element_entry_id);
1185: FETCH c_element_entry_details INTO l_element_start_date,l_element_type_id,l_assignment_id;
1186: CLOSE c_element_entry_details;
1187:
1188: l_inputvalue_id := pay_in_utils.get_input_value_id(l_element_start_date
1189: ,l_element_type_id
1190: ,'Component Name'
1191: );
1192:

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

1199: RETURN;
1200: END IF;
1201:
1202: END IF;
1203: pay_in_utils.set_location(g_debug,'Element name is: '||l_element_name,20);
1204: pay_in_utils.set_location(g_debug,'Element_Type_id: '||l_element_Type_id,20);
1205: pay_in_utils.set_location(g_debug,'Assignment_id : '||l_assignment_id,20);
1206:
1207:

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

1200: END IF;
1201:
1202: END IF;
1203: pay_in_utils.set_location(g_debug,'Element name is: '||l_element_name,20);
1204: pay_in_utils.set_location(g_debug,'Element_Type_id: '||l_element_Type_id,20);
1205: pay_in_utils.set_location(g_debug,'Assignment_id : '||l_assignment_id,20);
1206:
1207:
1208: IF l_element_name = 'Loan at Concessional Rate' THEN

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

1201:
1202: END IF;
1203: pay_in_utils.set_location(g_debug,'Element name is: '||l_element_name,20);
1204: pay_in_utils.set_location(g_debug,'Element_Type_id: '||l_element_Type_id,20);
1205: pay_in_utils.set_location(g_debug,'Assignment_id : '||l_assignment_id,20);
1206:
1207:
1208: IF l_element_name = 'Loan at Concessional Rate' THEN
1209: check_loan_entry(l_element_name,l_element_Type_id,l_assignment_id);

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

1210:
1211: ELSIF l_element_name = 'Motor Car Perquisite' THEN
1212: check_benefit_dates(l_element_Type_id);
1213: if g_debug then
1214: pay_in_utils.trace('p_message_name : ',p_message_name);
1215: end if;
1216: IF p_message_name <>'SUCCESS' THEN RETURN; END IF;
1217: check_motorcar_entry(l_element_name,l_element_Type_id,l_assignment_id);
1218: --Bugfix 3982447 Start

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

1216: IF p_message_name <>'SUCCESS' THEN RETURN; END IF;
1217: check_motorcar_entry(l_element_name,l_element_Type_id,l_assignment_id);
1218: --Bugfix 3982447 Start
1219: if g_debug then
1220: pay_in_utils.trace('p_message_name : ',p_message_name);
1221: end if;
1222: IF p_message_name <>'SUCCESS' THEN RETURN; END IF;
1223:
1224: if g_debug then

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

1221: end if;
1222: IF p_message_name <>'SUCCESS' THEN RETURN; END IF;
1223:
1224: if g_debug then
1225: pay_in_utils.trace('p_element_entry_id : ',p_element_entry_id);
1226: end if;
1227:
1228: OPEN c_curr_entry_value (p_element_entry_id
1229: ,'Category of Car'

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

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

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_value1 : ',l_dep_value1);
1236: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1237: end if;
1238:
1239: IF l_dep_value1 ='OWN_EMPLOYEE' THEN
1240: OPEN c_curr_entry_value (p_element_entry_id

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

1243: FETCH c_curr_entry_value INTO l_dep_value2,l_entry_value_id;
1244: CLOSE c_curr_entry_value;
1245:
1246: if g_debug then
1247: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);
1248: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1249: end if;
1250:
1251:

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

1244: CLOSE c_curr_entry_value;
1245:
1246: if g_debug then
1247: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);
1248: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1249: end if;
1250:
1251:
1252: IF l_dep_value2 = 'EMPLOYEE' THEN

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

1249: end if;
1250:
1251:
1252: IF l_dep_value2 = 'EMPLOYEE' THEN
1253: pay_in_utils.null_message(p_token_name, p_token_value);
1254: p_message_name := 'PER_IN_INVALID_PERQUISITE';
1255: pay_in_utils.set_location(g_debug,'Invalid perquisite ...'||l_procedure,25);
1256: RETURN;
1257: END IF;

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

1251:
1252: IF l_dep_value2 = 'EMPLOYEE' THEN
1253: pay_in_utils.null_message(p_token_name, p_token_value);
1254: p_message_name := 'PER_IN_INVALID_PERQUISITE';
1255: pay_in_utils.set_location(g_debug,'Invalid perquisite ...'||l_procedure,25);
1256: RETURN;
1257: END IF;
1258: END IF;
1259: --Bugfix 3982447 End

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

1266: --
1267: check_benefit_dates(l_element_Type_id);
1268:
1269: if g_debug then
1270: pay_in_utils.trace('p_message_name : ',p_message_name);
1271: end if;
1272:
1273: IF p_message_name <>'SUCCESS' THEN RETURN; END IF;
1274:

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

1278: FETCH c_curr_entry_value INTO l_dep_value1,l_entry_value_id;
1279: CLOSE c_curr_entry_value;
1280:
1281: if g_debug then
1282: pay_in_utils.trace('l_dep_value1 : ',l_dep_value1);
1283: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1284: end if;
1285: --
1286: -- Check value interdependency Start

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

1279: CLOSE c_curr_entry_value;
1280:
1281: if g_debug then
1282: pay_in_utils.trace('l_dep_value1 : ',l_dep_value1);
1283: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1284: end if;
1285: --
1286: -- Check value interdependency Start
1287: --

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

1292: FETCH c_curr_entry_value INTO l_dep_value2,l_entry_value_id;
1293: CLOSE c_curr_entry_value;
1294:
1295: if g_debug then
1296: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);
1297: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1298: end if;
1299:
1300: IF l_dep_value2 IS NULL or l_dep_value2 = 0 THEN

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

1293: CLOSE c_curr_entry_value;
1294:
1295: if g_debug then
1296: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);
1297: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1298: end if;
1299:
1300: IF l_dep_value2 IS NULL or l_dep_value2 = 0 THEN
1301: pay_in_utils.null_message(p_token_name, p_token_value);

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

1297: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1298: end if;
1299:
1300: IF l_dep_value2 IS NULL or l_dep_value2 = 0 THEN
1301: pay_in_utils.null_message(p_token_name, p_token_value);
1302: p_message_name := 'PER_IN_ENTRY_VALUE_ZERO';
1303: p_token_name(1) := 'TOKEN1';
1304: p_token_value(1) := hr_general.decode_lookup('IN_MESSAGE_TOKENS','RENT_EMPLOLYER');
1305: p_token_name(2) := 'TOKEN2';

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

1306: p_token_value(2) := hr_general.decode_lookup('IN_MESSAGE_TOKENS','PROPERTY');
1307: p_token_name(3) := 'TOKEN3';
1308: p_token_value(3) := hr_general.decode_lookup('IN_MESSAGE_TOKENS','LEASED');
1309:
1310: pay_in_utils.set_location(g_debug,'Company Accommodation '||l_procedure,25);
1311: RETURN;
1312: END IF;
1313: -- Bugfix 3991117 Start
1314: ELSIF l_dep_value1 = 'OWN' THEN

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

1318: FETCH c_curr_entry_value INTO l_dep_value2,l_entry_value_id;
1319: CLOSE c_curr_entry_value;
1320:
1321: if g_debug then
1322: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);
1323: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1324: end if;
1325:
1326: IF l_dep_value2 IS NOT NULL AND l_dep_value2 <> 0 THEN

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

1319: CLOSE c_curr_entry_value;
1320:
1321: if g_debug then
1322: pay_in_utils.trace('l_dep_value2 : ',l_dep_value2);
1323: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1324: end if;
1325:
1326: IF l_dep_value2 IS NOT NULL AND l_dep_value2 <> 0 THEN
1327: pay_in_utils.null_message(p_token_name, p_token_value);

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

1323: pay_in_utils.trace('l_entry_value_id : ',l_entry_value_id);
1324: end if;
1325:
1326: IF l_dep_value2 IS NOT NULL AND l_dep_value2 <> 0 THEN
1327: pay_in_utils.null_message(p_token_name, p_token_value);
1328: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
1329: p_token_name(1) := 'TOKEN';
1330: p_token_value(1):= hr_general.decode_lookup('IN_MESSAGE_TOKENS','COMP_ACC');
1331: pay_in_utils.set_location(g_debug,'Company Accommodation '||l_procedure,28);

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

1327: pay_in_utils.null_message(p_token_name, p_token_value);
1328: p_message_name := 'PER_IN_INVALID_ELEMENT_ENTRY';
1329: p_token_name(1) := 'TOKEN';
1330: p_token_value(1):= hr_general.decode_lookup('IN_MESSAGE_TOKENS','COMP_ACC');
1331: pay_in_utils.set_location(g_debug,'Company Accommodation '||l_procedure,28);
1332: RETURN;
1333: END IF;
1334:
1335:

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

1364: FETCH c_curr_entry_value INTO l_dep_value2,l_entry_value_id;
1365: CLOSE c_curr_entry_value;
1366:
1367: IF l_dep_value2 IS NULL THEN
1368: pay_in_utils.set_location(g_debug,'ltc '||l_procedure,25);
1369: pay_in_utils.null_message(p_token_name, p_token_value);
1370: p_message_name := 'PER_IN_MISSING_ENTRY_VALUE';
1371: p_token_name(1) := 'TOKEN1';
1372: p_token_value(1) := 'Date of Purchase';

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

1365: CLOSE c_curr_entry_value;
1366:
1367: IF l_dep_value2 IS NULL THEN
1368: pay_in_utils.set_location(g_debug,'ltc '||l_procedure,25);
1369: pay_in_utils.null_message(p_token_name, p_token_value);
1370: p_message_name := 'PER_IN_MISSING_ENTRY_VALUE';
1371: p_token_name(1) := 'TOKEN1';
1372: p_token_value(1) := 'Date of Purchase';
1373: p_token_name(2) := 'TOKEN2';

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

1390: ELSIF l_element_name = 'Free Education' THEN
1391: check_benefit_dates(l_element_Type_id);
1392: END IF;
1393:
1394: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
1395: EXCEPTION
1396: WHEN OTHERS THEN
1397: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
1398: p_message_name := 'PER_IN_ORACLE_GENERIC_ERROR';

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

1393:
1394: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
1395: EXCEPTION
1396: WHEN OTHERS THEN
1397: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure,50);
1398: p_message_name := 'PER_IN_ORACLE_GENERIC_ERROR';
1399: p_token_name(1) := 'FUNCTION';
1400: p_token_value(1) := l_procedure;
1401: p_token_name(2) := 'SQLERRMC';