eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PAY_IN_PROF_TAX_PKG dependencies on PAY_IN_UTILS

Line 5: g_token_name pay_in_utils.char_tab_type;

1: PACKAGE BODY pay_in_prof_tax_pkg AS
2: /* $Header: pyinptax.pkb 120.8 2006/04/24 04:18:28 statkar noship $ */
3: g_package VARCHAR2(20) ;
4: g_debug BOOLEAN;
5: g_token_name pay_in_utils.char_tab_type;
6: g_token_value pay_in_utils.char_tab_type;
7:
8: --------------------------------------------------------------------------
9: -- --

Line 6: g_token_value pay_in_utils.char_tab_type;

2: /* $Header: pyinptax.pkb 120.8 2006/04/24 04:18:28 statkar noship $ */
3: g_package VARCHAR2(20) ;
4: g_debug BOOLEAN;
5: g_token_name pay_in_utils.char_tab_type;
6: g_token_value pay_in_utils.char_tab_type;
7:
8: --------------------------------------------------------------------------
9: -- --
10: -- Name : GET_STATE --

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

41: BEGIN
42: l_procedure := g_package||'get_state';
43: g_debug := hr_utility.debug_enabled;
44:
45: pay_in_utils.set_location(g_debug,'Entering : '||l_procedure, 10);
46:
47: OPEN csr_state (p_pt_org);
48: FETCH csr_state INTO l_state;
49: pay_in_utils.set_location (g_debug,'l_state = '||l_state,20);

Line 49: pay_in_utils.set_location (g_debug,'l_state = '||l_state,20);

45: pay_in_utils.set_location(g_debug,'Entering : '||l_procedure, 10);
46:
47: OPEN csr_state (p_pt_org);
48: FETCH csr_state INTO l_state;
49: pay_in_utils.set_location (g_debug,'l_state = '||l_state,20);
50: CLOSE csr_state;
51:
52: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
53:

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

48: FETCH csr_state INTO l_state;
49: pay_in_utils.set_location (g_debug,'l_state = '||l_state,20);
50: CLOSE csr_state;
51:
52: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
53:
54: RETURN l_state;
55: EXCEPTION
56: WHEN OTHERS THEN

Line 57: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);

53:
54: RETURN l_state;
55: EXCEPTION
56: WHEN OTHERS THEN
57: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
58: pay_in_utils.set_location(g_debug,' Leaving : '||l_procedure, 40);
59: hr_utility.trace(l_message);
60: RETURN NULL;
61:

Line 58: pay_in_utils.set_location(g_debug,' Leaving : '||l_procedure, 40);

54: RETURN l_state;
55: EXCEPTION
56: WHEN OTHERS THEN
57: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
58: pay_in_utils.set_location(g_debug,' Leaving : '||l_procedure, 40);
59: hr_utility.trace(l_message);
60: RETURN NULL;
61:
62: END get_state;

Line 190: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type

186: ,p_eff_start_date IN VARCHAR2
187: ,p_eff_end_date IN VARCHAR2
188: ,p_calling_procedure IN VARCHAR2
189: ,p_message_name OUT NOCOPY VARCHAR2
190: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
191: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)
192: IS
193:
194: l_procedure VARCHAR2(100);

Line 191: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)

187: ,p_eff_end_date IN VARCHAR2
188: ,p_calling_procedure IN VARCHAR2
189: ,p_message_name OUT NOCOPY VARCHAR2
190: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
191: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)
192: IS
193:
194: l_procedure VARCHAR2(100);
195: l_dummy VARCHAR2(1);

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

208: >= fnd_date.canonical_to_date(org_information3);
209:
210: BEGIN
211: l_procedure := g_package ||'check_pt_exemptions';
212: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
213: p_message_name := 'SUCCESS';
214: pay_in_utils.null_message(p_token_name, p_token_value);
215: --
216: -- Validations are as follows:

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

210: BEGIN
211: l_procedure := g_package ||'check_pt_exemptions';
212: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
213: p_message_name := 'SUCCESS';
214: pay_in_utils.null_message(p_token_name, p_token_value);
215: --
216: -- Validations are as follows:
217: --
218: -- 1. Check for mandatory parameters

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

228: p_token_name(2) := 'ARGUMENT';
229: p_token_value(2) := 'P_STATE';
230: RETURN;
231: END IF;
232: pay_in_utils.set_location(g_debug,l_procedure,20);
233:
234: IF p_exemption_catg IS NULL THEN
235: p_message_name := 'HR_7207_API_MANDATORY_ARG';
236: p_token_name(1) := 'API_NAME';

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

238: p_token_name(2) := 'ARGUMENT';
239: p_token_value(2) := 'P_EXEMPTION_CATG';
240: RETURN;
241: END IF;
242: pay_in_utils.set_location(g_debug,l_procedure,30);
243:
244: IF p_eff_start_date IS NULL THEN
245: p_message_name := 'HR_7207_API_MANDATORY_ARG';
246: p_token_name(1) := 'API_NAME';

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

248: p_token_name(2) := 'ARGUMENT';
249: p_token_value(2) := 'P_EFFECTIVE_START_DATE';
250: RETURN;
251: END IF;
252: pay_in_utils.set_location(g_debug,l_procedure,40);
253:
254: IF hr_general.decode_lookup('IN_PT_STATES',p_state) IS NULL THEN
255: IF hr_general.decode_lookup('IN_STATES',p_state) IS NULL THEN
256: p_message_name := 'PER_IN_INVALID_LOOKUP_VALUE';

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

259: p_token_name(2) := 'FIELD';
260: p_token_value(2) := 'P_STATE';
261: END IF;
262: END IF;
263: pay_in_utils.set_location(g_debug,l_procedure,50);
264:
265: IF length(p_exemption_catg) > 80 THEN
266: p_message_name := 'PER_IN_INVALID_LOOKUP_VALUE';
267: p_token_name(1) := 'VALUE';

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

269: p_token_name(2) := 'FIELD';
270: p_token_value(2) := 'P_EXEMPTION_CATEGORY';
271: RETURN;
272: END IF;
273: pay_in_utils.set_location(g_debug,l_procedure,60);
274:
275: OPEN c_dup_state;
276: FETCH c_dup_state
277: INTO l_dummy;

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

278: IF c_dup_state%FOUND THEN
279: p_message_name := 'PER_IN_NON_UNIQUE_COMBINATION';
280: END IF;
281: CLOSE c_dup_state;
282: pay_in_utils.set_location(g_debug,l_procedure,70);
283:
284: IF NOT pay_in_utils.validate_dates
285: (fnd_date.canonical_to_date(p_eff_start_date),
286: fnd_date.canonical_to_date(p_eff_end_date))

Line 284: IF NOT pay_in_utils.validate_dates

280: END IF;
281: CLOSE c_dup_state;
282: pay_in_utils.set_location(g_debug,l_procedure,70);
283:
284: IF NOT pay_in_utils.validate_dates
285: (fnd_date.canonical_to_date(p_eff_start_date),
286: fnd_date.canonical_to_date(p_eff_end_date))
287: THEN
288: p_message_name := 'PER_IN_INCORRECT_DATES';

Line 292: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,80);

288: p_message_name := 'PER_IN_INCORRECT_DATES';
289: RETURN;
290: END IF;
291:
292: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,80);
293:
294: END check_pt_exemptions;
295:
296: --------------------------------------------------------------------------

Line 325: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type

321: ,p_eff_start_date IN VARCHAR2
322: ,p_eff_end_date IN VARCHAR2
323: ,p_calling_procedure IN VARCHAR2
324: ,p_message_name OUT NOCOPY VARCHAR2
325: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
326: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)
327: IS
328:
329: l_procedure VARCHAR2(100);

Line 326: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)

322: ,p_eff_end_date IN VARCHAR2
323: ,p_calling_procedure IN VARCHAR2
324: ,p_message_name OUT NOCOPY VARCHAR2
325: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
326: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)
327: IS
328:
329: l_procedure VARCHAR2(100);
330: l_message VARCHAR2(255);

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

344:
345:
346: BEGIN
347: l_procedure := g_package ||'check_pt_frequency';
348: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
349: p_message_name := 'SUCCESS';
350: pay_in_utils.null_message(p_token_name, p_token_value);
351:
352: --

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

346: BEGIN
347: l_procedure := g_package ||'check_pt_frequency';
348: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
349: p_message_name := 'SUCCESS';
350: pay_in_utils.null_message(p_token_name, p_token_value);
351:
352: --
353: -- Validations are as follows:
354: --

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

365: p_token_name(2) := 'ARGUMENT';
366: p_token_value(2) := 'P_STATE';
367: RETURN;
368: END IF;
369: pay_in_utils.set_location(g_debug,l_procedure,20);
370:
371: IF p_frequency IS NULL THEN
372: p_message_name := 'HR_7207_API_MANDATORY_ARG';
373: p_token_name(1) := 'API_NAME';

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

375: p_token_name(2) := 'ARGUMENT';
376: p_token_value(2) := 'P_FREQUENCY';
377: RETURN;
378: END IF;
379: pay_in_utils.set_location(g_debug,l_procedure,30);
380:
381: IF p_eff_start_date IS NULL THEN
382: p_message_name := 'HR_7207_API_MANDATORY_ARG';
383: p_token_name(1) := 'API_NAME';

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

385: p_token_name(2) := 'ARGUMENT';
386: p_token_value(2) := 'P_EFFECTIVE_START_DATE';
387: RETURN;
388: END IF;
389: pay_in_utils.set_location(g_debug,l_procedure,40);
390:
391: IF hr_general.decode_lookup('IN_PT_STATES',p_state) IS NULL THEN
392: IF hr_general.decode_lookup('IN_STATES',p_state) IS NULL THEN
393: p_message_name := 'PER_IN_INVALID_LOOKUP_VALUE';

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

397: p_token_value(2) := 'P_STATE';
398: RETURN;
399: END IF;
400: END IF;
401: pay_in_utils.set_location(g_debug,l_procedure,50);
402:
403: IF hr_general.decode_lookup('IN_PT_FREQUENCIES',p_frequency) IS NULL THEN
404: p_message_name := 'PER_IN_INVALID_LOOKUP_VALUE';
405: p_token_name(1) := 'VALUE';

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

407: p_token_name(2) := 'FIELD';
408: p_token_value(2) := 'P_FREQUENCY';
409: RETURN;
410: END IF;
411: pay_in_utils.set_location(g_debug,l_procedure,60);
412:
413: OPEN c_dup_state;
414: FETCH c_dup_state
415: INTO l_dummy;

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

416: IF c_dup_state%FOUND THEN
417: p_message_name := 'PER_IN_NON_UNIQUE_COMBINATION';
418: END IF;
419: CLOSE c_dup_state;
420: pay_in_utils.set_location(g_debug,l_procedure,70);
421:
422: IF NOT pay_in_utils.validate_dates
423: (fnd_date.canonical_to_date(p_eff_start_date),
424: fnd_date.canonical_to_date(p_eff_end_date))

Line 422: IF NOT pay_in_utils.validate_dates

418: END IF;
419: CLOSE c_dup_state;
420: pay_in_utils.set_location(g_debug,l_procedure,70);
421:
422: IF NOT pay_in_utils.validate_dates
423: (fnd_date.canonical_to_date(p_eff_start_date),
424: fnd_date.canonical_to_date(p_eff_end_date))
425: THEN
426: p_message_name := 'PER_IN_INCORRECT_DATES';

Line 430: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,80);

426: p_message_name := 'PER_IN_INCORRECT_DATES';
427: RETURN;
428: END IF;
429:
430: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,80);
431:
432: END check_pt_frequency;
433:
434: --------------------------------------------------------------------------

Line 463: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type

459: ,p_payment_year IN VARCHAR2
460: ,p_excess_tax IN VARCHAR2
461: ,p_calling_procedure IN VARCHAR2
462: ,p_message_name OUT NOCOPY VARCHAR2
463: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
464: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)
465: IS
466:
467: l_procedure VARCHAR2(100);

Line 464: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)

460: ,p_excess_tax IN VARCHAR2
461: ,p_calling_procedure IN VARCHAR2
462: ,p_message_name OUT NOCOPY VARCHAR2
463: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
464: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)
465: IS
466:
467: l_procedure VARCHAR2(100);
468: l_message VARCHAR2(255);

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

476: AND ppt.category <> 'MT';
477:
478: BEGIN
479: l_procedure := g_package ||'check_pt_challan_info';
480: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
481: p_message_name := 'SUCCESS';
482: pay_in_utils.null_message(p_token_name, p_token_value);
483:
484: --

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

478: BEGIN
479: l_procedure := g_package ||'check_pt_challan_info';
480: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
481: p_message_name := 'SUCCESS';
482: pay_in_utils.null_message(p_token_name, p_token_value);
483:
484: --
485: -- Validations are as follows:
486: --

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

495: p_token_name(2) := 'ARGUMENT';
496: p_token_value(2) := 'P_PAYMENT_MONTH';
497: RETURN;
498: END IF;
499: pay_in_utils.set_location(g_debug,l_procedure,20);
500:
501: IF p_payment_date IS NULL THEN
502: p_message_name := 'HR_7207_API_MANDATORY_ARG';
503: p_token_name(1) := 'API_NAME';

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

505: p_token_name(2) := 'ARGUMENT';
506: p_token_value(2) := 'P_PAYMENT_DATE';
507: RETURN;
508: END IF;
509: pay_in_utils.set_location(g_debug,l_procedure,30);
510:
511: IF p_payment_mode IS NULL THEN
512: p_message_name := 'HR_7207_API_MANDATORY_ARG';
513: p_token_name(1) := 'API_NAME';

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

515: p_token_name(2) := 'ARGUMENT';
516: p_token_value(2) := 'P_PAYMENT_MODE';
517: RETURN;
518: END IF;
519: pay_in_utils.set_location(g_debug,l_procedure,40);
520:
521: IF p_voucher_number IS NULL THEN
522: p_message_name := 'HR_7207_API_MANDATORY_ARG';
523: p_token_name(1) := 'API_NAME';

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

525: p_token_name(2) := 'ARGUMENT';
526: p_token_value(2) := 'P_VOUCHER_NUMBER';
527: RETURN;
528: END IF;
529: pay_in_utils.set_location(g_debug,l_procedure,50);
530:
531: IF p_amount IS NULL THEN
532: p_message_name := 'HR_7207_API_MANDATORY_ARG';
533: p_token_name(1) := 'API_NAME';

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

535: p_token_name(2) := 'ARGUMENT';
536: p_token_value(2) := 'P_AMOUNT';
537: RETURN;
538: END IF;
539: pay_in_utils.set_location(g_debug,l_procedure,60);
540:
541: IF p_payment_year IS NULL THEN
542: p_message_name := 'HR_7207_API_MANDATORY_ARG';
543: p_token_name(1) := 'API_NAME';

Line 549: pay_in_utils.set_location(g_debug,l_procedure,65);

545: p_token_name(2) := 'ARGUMENT';
546: p_token_value(2) := 'P_PAYMENT_YEAR';
547: RETURN;
548: END IF;
549: pay_in_utils.set_location(g_debug,l_procedure,65);
550:
551: IF hr_general.decode_lookup('IN_CALENDAR_MONTH',p_payment_month) IS NULL THEN
552: p_message_name := 'PER_IN_INVALID_LOOKUP_VALUE';
553: p_token_name(1) := 'VALUE';

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

556: p_token_value(2) := 'P_PAYMENT_MONTH';
557: RETURN;
558: END IF;
559:
560: pay_in_utils.set_location(g_debug,l_procedure,70);
561: OPEN csr_ppt_id;
562: FETCH csr_ppt_id
563: INTO l_dummy;
564: CLOSE csr_ppt_id;

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

562: FETCH csr_ppt_id
563: INTO l_dummy;
564: CLOSE csr_ppt_id;
565:
566: pay_in_utils.set_location(g_debug,l_procedure,80);
567: IF l_dummy IS NULL THEN
568: p_message_name := 'PER_IN_INVALID_LOOKUP_VALUE';
569: p_token_name(1) := 'VALUE';
570: p_token_value(1) := p_payment_mode;

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

571: p_token_name(2) := 'FIELD';
572: p_token_value(2) := 'P_PAYMENT_MODE';
573: RETURN;
574: END IF;
575: pay_in_utils.set_location(g_debug,l_procedure,90);
576:
577: IF length(p_voucher_number) > 20
578: THEN
579: p_message_name := 'PER_IN_INVALID_LOOKUP_VALUE';

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

582: p_token_name(2) := 'FIELD';
583: p_token_value(2) := 'P_VOUCHER_NUMBER';
584: RETURN;
585: END IF;
586: pay_in_utils.set_location(g_debug,l_procedure,100);
587:
588: IF length(p_amount) > 12
589: THEN
590: p_message_name := 'PER_IN_INVALID_LOOKUP_VALUE';

Line 597: pay_in_utils.set_location(g_debug,l_procedure,110);

593: p_token_name(2) := 'FIELD';
594: p_token_value(2) := 'P_AMOUNT';
595: RETURN;
596: END IF;
597: pay_in_utils.set_location(g_debug,l_procedure,110);
598:
599: IF p_interest IS NOT NULL AND length(p_interest) > 12
600: THEN
601: p_message_name := 'PER_IN_INVALID_LOOKUP_VALUE';

Line 608: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,120);

604: p_token_name(2) := 'FIELD';
605: p_token_value(2) := 'P_INTEREST';
606: RETURN;
607: END IF;
608: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,120);
609:
610: IF p_excess_tax IS NOT NULL AND length(p_excess_tax) > 12
611: THEN
612: p_message_name := 'PER_IN_INVALID_LOOKUP_VALUE';

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

615: p_token_name(2) := 'FIELD';
616: p_token_value(2) := 'P_EXCESS_TAX';
617: RETURN;
618: END IF;
619: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,130);
620:
621: END check_pt_challan_info;
622:
623: --------------------------------------------------------------------------

Line 644: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type

640: ,p_state_level_bal IN VARCHAR2
641: ,p_gratuity_coverage IN VARCHAR2
642: ,p_calling_procedure IN VARCHAR2
643: ,p_message_name OUT NOCOPY VARCHAR2
644: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
645: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)
646: IS
647: l_procedure VARCHAR2(100);
648: l_message VARCHAR2(255);

Line 645: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)

641: ,p_gratuity_coverage IN VARCHAR2
642: ,p_calling_procedure IN VARCHAR2
643: ,p_message_name OUT NOCOPY VARCHAR2
644: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
645: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)
646: IS
647: l_procedure VARCHAR2(100);
648: l_message VARCHAR2(255);
649:

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

658:
659: BEGIN
660: g_debug:= hr_utility.debug_enabled;
661: l_procedure := g_package ||'check_stat_setup_df';
662: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
663: p_message_name := 'SUCCESS';
664: pay_in_utils.null_message(p_token_name, p_token_value);
665:
666: pay_in_utils.set_location(g_debug,l_procedure,20);

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

660: g_debug:= hr_utility.debug_enabled;
661: l_procedure := g_package ||'check_stat_setup_df';
662: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
663: p_message_name := 'SUCCESS';
664: pay_in_utils.null_message(p_token_name, p_token_value);
665:
666: pay_in_utils.set_location(g_debug,l_procedure,20);
667:
668: OPEN c_org_info;

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

662: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
663: p_message_name := 'SUCCESS';
664: pay_in_utils.null_message(p_token_name, p_token_value);
665:
666: pay_in_utils.set_location(g_debug,l_procedure,20);
667:
668: OPEN c_org_info;
669: FETCH c_org_info
670: INTO l_org_information1, l_org_information2;

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

670: INTO l_org_information1, l_org_information2;
671: CLOSE c_org_info;
672:
673: IF l_org_information1 <> p_state_level_bal THEN
674: pay_in_utils.set_location(g_debug,l_procedure,30);
675: p_message_name := 'PER_IN_PT_DEF_BAL_FLAG_CHANGE';
676: RETURN;
677: END IF;
678:

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

676: RETURN;
677: END IF;
678:
679: IF l_org_information2 <> p_gratuity_coverage THEN
680: pay_in_utils.set_location(g_debug,l_procedure,30);
681: p_message_name := 'PER_IN_GRAT_DEF_CHANGE';
682: RETURN;
683: END IF;
684:

Line 685: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);

681: p_message_name := 'PER_IN_GRAT_DEF_CHANGE';
682: RETURN;
683: END IF;
684:
685: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);
686:
687: END check_stat_setup_df;
688:
689: --------------------------------------------------------------------------

Line 708: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type

704: (p_organization_id IN NUMBER
705: ,p_location_id IN NUMBER
706: ,p_calling_procedure IN VARCHAR2
707: ,p_message_name OUT NOCOPY VARCHAR2
708: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
709: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)
710: IS/*
711: l_procedure VARCHAR2(100);
712:

Line 709: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)

705: ,p_location_id IN NUMBER
706: ,p_calling_procedure IN VARCHAR2
707: ,p_message_name OUT NOCOPY VARCHAR2
708: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
709: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)
710: IS/*
711: l_procedure VARCHAR2(100);
712:
713: CURSOR csr_state IS

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

719: l_state hr_locations.loc_information16%TYPE;
720: */
721: BEGIN/*
722: l_procedure := g_package ||'check_pt_loc';
723: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
724: p_message_name := 'SUCCESS';
725: pay_in_utils.null_message(p_token_name, p_token_value);
726:
727: IF p_location_id IS NULL THEN

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

721: BEGIN/*
722: l_procedure := g_package ||'check_pt_loc';
723: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
724: p_message_name := 'SUCCESS';
725: pay_in_utils.null_message(p_token_name, p_token_value);
726:
727: IF p_location_id IS NULL THEN
728: p_message_name :='PER_IN_NO_STATE_ENTERED';
729: RETURN;

Line 752: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,20);

748: END IF;
749: END IF;
750:
751: END IF;
752: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,20);
753:
754: EXCEPTION
755: WHEN OTHERS THEN
756: p_message_name := 'PER_IN_ORACLE_GENERIC_ERROR';

Line 782: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type

778: PROCEDURE check_pt_org_class
779: (p_organization_id IN NUMBER
780: ,p_calling_procedure IN VARCHAR2
781: ,p_message_name OUT NOCOPY VARCHAR2
782: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
783: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)
784: IS/*
785: l_procedure VARCHAR2(100);
786:

Line 783: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)

779: (p_organization_id IN NUMBER
780: ,p_calling_procedure IN VARCHAR2
781: ,p_message_name OUT NOCOPY VARCHAR2
782: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
783: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)
784: IS/*
785: l_procedure VARCHAR2(100);
786:
787: CURSOR csr_loc IS

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

792: l_location_id hr_all_organization_units.location_id%TYPE;
793: */
794: BEGIN/*
795: l_procedure := g_package ||'check_pt_loc';
796: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
797: p_message_name := 'SUCCESS';
798: pay_in_utils.null_message(p_token_name, p_token_value);
799:
800: OPEN csr_loc ;

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

794: BEGIN/*
795: l_procedure := g_package ||'check_pt_loc';
796: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
797: p_message_name := 'SUCCESS';
798: pay_in_utils.null_message(p_token_name, p_token_value);
799:
800: OPEN csr_loc ;
801: FETCH csr_loc
802: INTO l_location_id;

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

799:
800: OPEN csr_loc ;
801: FETCH csr_loc
802: INTO l_location_id;
803: pay_in_utils.set_location(g_debug,l_procedure,20);
804:
805: IF csr_loc%NOTFOUND THEN
806: CLOSE csr_loc;
807: pay_in_utils.set_location(g_debug,l_procedure,30);

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

803: pay_in_utils.set_location(g_debug,l_procedure,20);
804:
805: IF csr_loc%NOTFOUND THEN
806: CLOSE csr_loc;
807: pay_in_utils.set_location(g_debug,l_procedure,30);
808: p_message_name := 'PER_IN_NO_STATE_ENTERED';
809: RETURN;
810: END IF;
811: CLOSE csr_loc;

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

809: RETURN;
810: END IF;
811: CLOSE csr_loc;
812:
813: pay_in_utils.set_location(g_debug,l_procedure,40);
814: pay_in_prof_tax_pkg.check_pt_loc
815: (p_organization_id => p_organization_id
816: ,p_location_id => l_location_id
817: ,p_calling_procedure => p_calling_procedure

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

818: ,p_message_name => p_message_name
819: ,p_token_name => p_token_name
820: ,p_token_value => p_token_value);
821:
822: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,50);
823: RETURN;
824:
825: EXCEPTION
826: WHEN OTHERS THEN

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

878: l_procedure VARCHAR2(100);
879:
880: BEGIN
881: l_procedure := g_package ||'check_pt_input';
882: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
883:
884: OPEN csr_element_input_value(p_assignment_id
885: ,p_prorate_end_date
886: ,p_period_end_date

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

894: p_pt_salary := p_pt_salary + gPTTable(i).PT_Salary;
895: END IF;
896: END LOOP;
897:
898: pay_in_utils.set_location(g_debug,l_procedure,20);
899:
900: IF p_prorate_end_date = p_period_end_date THEN
901: pay_in_utils.set_location(g_debug,l_procedure,30);
902: g_count := 0;

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

897:
898: pay_in_utils.set_location(g_debug,l_procedure,20);
899:
900: IF p_prorate_end_date = p_period_end_date THEN
901: pay_in_utils.set_location(g_debug,l_procedure,30);
902: g_count := 0;
903: END IF;
904: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,35);
905: RETURN 'N';

Line 904: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,35);

900: IF p_prorate_end_date = p_period_end_date THEN
901: pay_in_utils.set_location(g_debug,l_procedure,30);
902: g_count := 0;
903: END IF;
904: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,35);
905: RETURN 'N';
906: ELSE
907: pay_in_utils.set_location(g_debug,l_procedure,40);
908: CLOSE csr_element_input_value;

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

903: END IF;
904: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,35);
905: RETURN 'N';
906: ELSE
907: pay_in_utils.set_location(g_debug,l_procedure,40);
908: CLOSE csr_element_input_value;
909: g_count := g_count + 1;
910: gPTTable(g_count).State := p_state;
911: gPTTable(g_count).PT_Salary := p_pt_salary;

Line 915: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,45);

911: gPTTable(g_count).PT_Salary := p_pt_salary;
912: IF p_prorate_end_date = p_period_end_date THEN
913: g_count := 0;
914: END IF;
915: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,45);
916: RETURN 'Y';
917: END IF;
918:
919: END check_pt_input;

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

955: l_procedure VARCHAR2(100);
956:
957: BEGIN
958: l_procedure := g_package ||'check_pt_state_end_date';
959: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
960: l_record_end_flag := 0;
961:
962: OPEN cur_element_end_date(p_assignment_id
963: ,p_date

Line 967: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,10);

963: ,p_date
964: ,p_state);
965: FETCH cur_element_end_date INTO l_record_end_flag;
966: CLOSE cur_element_end_date;
967: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,10);
968:
969: RETURN l_record_end_flag;
970:
971: END check_pt_state_end_date;

Line 986: -- p_token_name OUT pay_in_utils.char_tab_type --

982: -- p_org_info_type_code IN VARCHAR2 --
983: -- p_srtc IN VARCHAR2 --
984: -- p_calling_procedure IN VARCHAR2 --
985: -- p_message_name OUT VARCHAR2 --
986: -- p_token_name OUT pay_in_utils.char_tab_type --
987: -- p_token_value OUT pay_in_utils.char_tab_type --
988: -- Change History : --
989: --------------------------------------------------------------------------
990: -- Rev# Date Userid Description --

Line 987: -- p_token_value OUT pay_in_utils.char_tab_type --

983: -- p_srtc IN VARCHAR2 --
984: -- p_calling_procedure IN VARCHAR2 --
985: -- p_message_name OUT VARCHAR2 --
986: -- p_token_name OUT pay_in_utils.char_tab_type --
987: -- p_token_value OUT pay_in_utils.char_tab_type --
988: -- Change History : --
989: --------------------------------------------------------------------------
990: -- Rev# Date Userid Description --
991: --------------------------------------------------------------------------

Line 1001: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type

997: ,p_org_info_type_code IN VARCHAR2
998: ,p_srtc IN VARCHAR2
999: ,p_calling_procedure IN VARCHAR2
1000: ,p_message_name OUT NOCOPY VARCHAR2
1001: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
1002: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)
1003: IS
1004:
1005: l_procedure VARCHAR2(100);

Line 1002: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)

998: ,p_srtc IN VARCHAR2
999: ,p_calling_procedure IN VARCHAR2
1000: ,p_message_name OUT NOCOPY VARCHAR2
1001: ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
1002: ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type)
1003: IS
1004:
1005: l_procedure VARCHAR2(100);
1006: l_dummy VARCHAR2(1);

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

1006: l_dummy VARCHAR2(1);
1007:
1008: BEGIN
1009: l_procedure := g_package ||'check_srtc_state';
1010: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1011: p_message_name := 'SUCCESS';
1012: pay_in_utils.null_message(p_token_name, p_token_value);
1013: --
1014: -- Validations are as follows:

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

1008: BEGIN
1009: l_procedure := g_package ||'check_srtc_state';
1010: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1011: p_message_name := 'SUCCESS';
1012: pay_in_utils.null_message(p_token_name, p_token_value);
1013: --
1014: -- Validations are as follows:
1015: --
1016: -- 1. Check for mandatory parameters

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

1020: p_srtc IS NULL THEN
1021: p_message_name := 'PER_IN_BSRTC_NO';
1022: RETURN;
1023: END IF;
1024: pay_in_utils.set_location(g_debug,l_procedure,20);
1025:
1026: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,80);
1027:
1028: END check_srtc_state;

Line 1026: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,80);

1022: RETURN;
1023: END IF;
1024: pay_in_utils.set_location(g_debug,l_procedure,20);
1025:
1026: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,80);
1027:
1028: END check_srtc_state;
1029:
1030:

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

1059: l_procedure VARCHAR2(100);
1060:
1061: BEGIN
1062: l_procedure := g_package ||'get_projected_pt';
1063: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1064:
1065: l_pt_projected := 0;
1066:
1067: l_pt_projected := p_pt_dedn_ptd * (p_lrpp); -- Projection till the remaining pay periods

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

1067: l_pt_projected := p_pt_dedn_ptd * (p_lrpp); -- Projection till the remaining pay periods
1068:
1069: -- For MH state, if the PT deducted in Feb is 300 then the projected value should be 200
1070: IF p_state = 'MH' and p_period_num = 11 and p_pt_dedn_ptd = 300 THEN
1071: pay_in_utils.set_location(g_debug,l_procedure,20);
1072: l_pt_projected := 200 * p_lrpp;
1073: END IF;
1074:
1075: -- For TN state, in Jan remaining entire PT is deducted, so no need of projection

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

1073: END IF;
1074:
1075: -- For TN state, in Jan remaining entire PT is deducted, so no need of projection
1076: IF SUBSTR(p_state,1,2) = 'TN' and p_period_num > 9 THEN
1077: pay_in_utils.set_location(g_debug,l_procedure,30);
1078: l_pt_projected := 0;
1079: END IF;
1080:
1081: -- For TN state, in Aug remaining entire PT for the half year is deducted, so need to project accordingly

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

1079: END IF;
1080:
1081: -- For TN state, in Aug remaining entire PT for the half year is deducted, so need to project accordingly
1082: IF SUBSTR(p_state,1,2) = 'TN' and (p_period_num = 5 OR p_period_num = 6) THEN
1083: pay_in_utils.set_location(g_debug,l_procedure,40);
1084: l_pt_projected := p_std_ptax;
1085: END IF;
1086:
1087: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);

Line 1087: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);

1083: pay_in_utils.set_location(g_debug,l_procedure,40);
1084: l_pt_projected := p_std_ptax;
1085: END IF;
1086:
1087: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,40);
1088: RETURN l_pt_projected;
1089:
1090: END get_projected_pt;
1091: