DBA Data[Home] [Help]

APPS.PAY_MX_DIM_MAG dependencies on HR_UTILITY

Line 64: Name : HR_UTILITY_TRACE

60:
61: EOL VARCHAR2(5);
62:
63: /****************************************************************************
64: Name : HR_UTILITY_TRACE
65: Description : This procedure prints debug messages.
66: *****************************************************************************/
67: PROCEDURE hr_utility_trace ( P_TRC_DATA VARCHAR2) AS
68: BEGIN

Line 67: PROCEDURE hr_utility_trace ( P_TRC_DATA VARCHAR2) AS

63: /****************************************************************************
64: Name : HR_UTILITY_TRACE
65: Description : This procedure prints debug messages.
66: *****************************************************************************/
67: PROCEDURE hr_utility_trace ( P_TRC_DATA VARCHAR2) AS
68: BEGIN
69: IF g_debug THEN
70: hr_utility.trace(p_trc_data);
71: END IF;

Line 70: hr_utility.trace(p_trc_data);

66: *****************************************************************************/
67: PROCEDURE hr_utility_trace ( P_TRC_DATA VARCHAR2) AS
68: BEGIN
69: IF g_debug THEN
70: hr_utility.trace(p_trc_data);
71: END IF;
72: END hr_utility_trace;
73:
74:

Line 72: END hr_utility_trace;

68: BEGIN
69: IF g_debug THEN
70: hr_utility.trace(p_trc_data);
71: END IF;
72: END hr_utility_trace;
73:
74:
75: /****************************************************************************
76: Name : PRINT_BLOB

Line 199: hr_utility_trace ('Entering '||l_proc_name);

195: l_xml VARCHAR2(240);
196:
197: BEGIN
198: l_proc_name := g_proc_name || 'LOAD_XML_INTERNAL';
199: hr_utility_trace ('Entering '||l_proc_name);
200:
201: IF p_node_type = 'CS' THEN
202:
203: l_xml := '<'||p_node||'>'||EOL;

Line 223: hr_utility_trace ('Leaving '||l_proc_name);

219: END IF;
220:
221: write_to_magtape_lob (l_xml);
222:
223: hr_utility_trace ('Leaving '||l_proc_name);
224:
225: END load_xml_internal;
226:
227: /****************************************************************************

Line 258: hr_utility.set_location(lv_procedure_name, 10);

254: BEGIN
255:
256: lv_procedure_name := g_proc_name ||'.get_payroll_action_info';
257:
258: hr_utility.set_location(lv_procedure_name, 10);
259:
260: ln_step := 1;
261:
262: OPEN c_payroll_action_info(p_payroll_action_id);

Line 269: hr_utility.set_location(lv_procedure_name, 30);

265: ,ln_legal_er_id;
266: CLOSE c_payroll_action_info;
267:
268: ln_step := 2;
269: hr_utility.set_location(lv_procedure_name, 30);
270:
271: p_end_date := TRUNC(ld_end_date,'Y');
272: p_business_group_id := ln_business_group_id;
273: p_legal_employer_id := ln_legal_er_id;

Line 275: hr_utility.set_location(lv_procedure_name, 50);

271: p_end_date := TRUNC(ld_end_date,'Y');
272: p_business_group_id := ln_business_group_id;
273: p_legal_employer_id := ln_legal_er_id;
274:
275: hr_utility.set_location(lv_procedure_name, 50);
276:
277: EXCEPTION
278: WHEN OTHERS THEN
279: lv_error_message := 'Error at step ' || ln_step || ' IN ' ||

Line 282: hr_utility.trace(lv_error_message || '-' || SQLERRM);

278: WHEN OTHERS THEN
279: lv_error_message := 'Error at step ' || ln_step || ' IN ' ||
280: lv_procedure_name;
281:
282: hr_utility.trace(lv_error_message || '-' || SQLERRM);
283:
284: lv_error_message :=
285: pay_emp_action_arch.set_error_message(lv_error_message);
286:

Line 287: hr_utility.set_message(801,'HR_ELE_ENTRY_FORMULA_HINT');

283:
284: lv_error_message :=
285: pay_emp_action_arch.set_error_message(lv_error_message);
286:
287: hr_utility.set_message(801,'HR_ELE_ENTRY_FORMULA_HINT');
288: hr_utility.set_message_token('FORMULA_TEXT', lv_error_message);
289: hr_utility.raise_error;
290:
291: END get_payroll_action_info;

Line 288: hr_utility.set_message_token('FORMULA_TEXT', lv_error_message);

284: lv_error_message :=
285: pay_emp_action_arch.set_error_message(lv_error_message);
286:
287: hr_utility.set_message(801,'HR_ELE_ENTRY_FORMULA_HINT');
288: hr_utility.set_message_token('FORMULA_TEXT', lv_error_message);
289: hr_utility.raise_error;
290:
291: END get_payroll_action_info;
292:

Line 289: hr_utility.raise_error;

285: pay_emp_action_arch.set_error_message(lv_error_message);
286:
287: hr_utility.set_message(801,'HR_ELE_ENTRY_FORMULA_HINT');
288: hr_utility.set_message_token('FORMULA_TEXT', lv_error_message);
289: hr_utility.raise_error;
290:
291: END get_payroll_action_info;
292:
293: /****************************************************************************

Line 305: hr_utility_trace ('Entering '||l_proc_name);

301:
302: BEGIN
303: l_proc_name := g_proc_name || 'RANGE_CURSOR';
304:
305: hr_utility_trace ('Entering '||l_proc_name);
306:
307: hr_utility_trace ('P_PAYROLL_ACTION_ID = '|| p_payroll_action_id);
308:
309: get_payroll_action_info (p_payroll_action_id

Line 307: hr_utility_trace ('P_PAYROLL_ACTION_ID = '|| p_payroll_action_id);

303: l_proc_name := g_proc_name || 'RANGE_CURSOR';
304:
305: hr_utility_trace ('Entering '||l_proc_name);
306:
307: hr_utility_trace ('P_PAYROLL_ACTION_ID = '|| p_payroll_action_id);
308:
309: get_payroll_action_info (p_payroll_action_id
310: ,gd_effective_date
311: ,gn_business_group_id

Line 314: hr_utility_trace ('gd_effective_date = '|| gd_effective_date);

310: ,gd_effective_date
311: ,gn_business_group_id
312: ,gn_legal_er_id);
313:
314: hr_utility_trace ('gd_effective_date = '|| gd_effective_date);
315: hr_utility_trace ('gn_business_group_id = '|| gn_business_group_id);
316: hr_utility_trace ('gn_legal_er_id = '|| gn_legal_er_id);
317:
318: p_sqlstr := '

Line 315: hr_utility_trace ('gn_business_group_id = '|| gn_business_group_id);

311: ,gn_business_group_id
312: ,gn_legal_er_id);
313:
314: hr_utility_trace ('gd_effective_date = '|| gd_effective_date);
315: hr_utility_trace ('gn_business_group_id = '|| gn_business_group_id);
316: hr_utility_trace ('gn_legal_er_id = '|| gn_legal_er_id);
317:
318: p_sqlstr := '
319: SELECT DISTINCT to_number(paa_arch.serial_number)

Line 316: hr_utility_trace ('gn_legal_er_id = '|| gn_legal_er_id);

312: ,gn_legal_er_id);
313:
314: hr_utility_trace ('gd_effective_date = '|| gd_effective_date);
315: hr_utility_trace ('gn_business_group_id = '|| gn_business_group_id);
316: hr_utility_trace ('gn_legal_er_id = '|| gn_legal_er_id);
317:
318: p_sqlstr := '
319: SELECT DISTINCT to_number(paa_arch.serial_number)
320: FROM pay_assignment_actions paa_arch

Line 336: hr_utility_trace ('Range cursor query : ' || p_sqlstr);

332: AND paa_arch.action_status = ''C''
333: AND :p_payroll_action_id = '||p_payroll_action_id||'
334: ORDER BY 1';
335:
336: hr_utility_trace ('Range cursor query : ' || p_sqlstr);
337: hr_utility_trace ('Leaving '||l_proc_name);
338:
339: END range_cursor;
340:

Line 337: hr_utility_trace ('Leaving '||l_proc_name);

333: AND :p_payroll_action_id = '||p_payroll_action_id||'
334: ORDER BY 1';
335:
336: hr_utility_trace ('Range cursor query : ' || p_sqlstr);
337: hr_utility_trace ('Leaving '||l_proc_name);
338:
339: END range_cursor;
340:
341:

Line 418: hr_utility_trace ('Entering '||l_proc_name);

414: ln_arch_act_id number;
415: ln_asg_count number;
416: BEGIN
417: l_proc_name := g_proc_name || 'ACTION_CREATION';
418: hr_utility_trace ('Entering '||l_proc_name);
419: hr_utility_trace ('Parameters ....');
420: hr_utility_trace ('P_PAYROLL_ACTION_ID = '|| P_PAYROLL_ACTION_ID);
421: hr_utility_trace ('P_START_PERSON_ID = '|| P_START_PERSON_ID);
422: hr_utility_trace ('P_END_PERSON_ID = '|| P_END_PERSON_ID);

Line 419: hr_utility_trace ('Parameters ....');

415: ln_asg_count number;
416: BEGIN
417: l_proc_name := g_proc_name || 'ACTION_CREATION';
418: hr_utility_trace ('Entering '||l_proc_name);
419: hr_utility_trace ('Parameters ....');
420: hr_utility_trace ('P_PAYROLL_ACTION_ID = '|| P_PAYROLL_ACTION_ID);
421: hr_utility_trace ('P_START_PERSON_ID = '|| P_START_PERSON_ID);
422: hr_utility_trace ('P_END_PERSON_ID = '|| P_END_PERSON_ID);
423: hr_utility_trace ('P_CHUNK = '|| P_CHUNK);

Line 420: hr_utility_trace ('P_PAYROLL_ACTION_ID = '|| P_PAYROLL_ACTION_ID);

416: BEGIN
417: l_proc_name := g_proc_name || 'ACTION_CREATION';
418: hr_utility_trace ('Entering '||l_proc_name);
419: hr_utility_trace ('Parameters ....');
420: hr_utility_trace ('P_PAYROLL_ACTION_ID = '|| P_PAYROLL_ACTION_ID);
421: hr_utility_trace ('P_START_PERSON_ID = '|| P_START_PERSON_ID);
422: hr_utility_trace ('P_END_PERSON_ID = '|| P_END_PERSON_ID);
423: hr_utility_trace ('P_CHUNK = '|| P_CHUNK);
424:

Line 421: hr_utility_trace ('P_START_PERSON_ID = '|| P_START_PERSON_ID);

417: l_proc_name := g_proc_name || 'ACTION_CREATION';
418: hr_utility_trace ('Entering '||l_proc_name);
419: hr_utility_trace ('Parameters ....');
420: hr_utility_trace ('P_PAYROLL_ACTION_ID = '|| P_PAYROLL_ACTION_ID);
421: hr_utility_trace ('P_START_PERSON_ID = '|| P_START_PERSON_ID);
422: hr_utility_trace ('P_END_PERSON_ID = '|| P_END_PERSON_ID);
423: hr_utility_trace ('P_CHUNK = '|| P_CHUNK);
424:
425: ln_prev_person_id := -1;

Line 422: hr_utility_trace ('P_END_PERSON_ID = '|| P_END_PERSON_ID);

418: hr_utility_trace ('Entering '||l_proc_name);
419: hr_utility_trace ('Parameters ....');
420: hr_utility_trace ('P_PAYROLL_ACTION_ID = '|| P_PAYROLL_ACTION_ID);
421: hr_utility_trace ('P_START_PERSON_ID = '|| P_START_PERSON_ID);
422: hr_utility_trace ('P_END_PERSON_ID = '|| P_END_PERSON_ID);
423: hr_utility_trace ('P_CHUNK = '|| P_CHUNK);
424:
425: ln_prev_person_id := -1;
426: ln_prev_asg_id := -1;

Line 423: hr_utility_trace ('P_CHUNK = '|| P_CHUNK);

419: hr_utility_trace ('Parameters ....');
420: hr_utility_trace ('P_PAYROLL_ACTION_ID = '|| P_PAYROLL_ACTION_ID);
421: hr_utility_trace ('P_START_PERSON_ID = '|| P_START_PERSON_ID);
422: hr_utility_trace ('P_END_PERSON_ID = '|| P_END_PERSON_ID);
423: hr_utility_trace ('P_CHUNK = '|| P_CHUNK);
424:
425: ln_prev_person_id := -1;
426: ln_prev_asg_id := -1;
427: ln_prev_arch_pact_id := -1;

Line 448: hr_utility_trace ('Person ranges are ON');

444: ,p_report_category => 'RT');
445:
446: IF lb_range_person_on THEN
447:
448: hr_utility_trace ('Person ranges are ON');
449:
450: OPEN c_arch_asg_range( gn_business_group_id
451: ,gn_legal_er_id
452: ,gd_effective_date

Line 458: hr_utility_trace ('Person ranges are OFF');

454: ,p_payroll_action_id);
455:
456: ELSE
457:
458: hr_utility_trace ('Person ranges are OFF');
459:
460: OPEN c_arch_asg( gn_business_group_id
461: ,gn_legal_er_id
462: ,gd_effective_date

Line 485: hr_utility_trace ('-------------');

481: END IF;
482:
483: ln_asg_count := ln_asg_count + 1;
484:
485: hr_utility_trace ('-------------');
486: hr_utility_trace('Current archiver asg action = '||ln_arch_act_id);
487: hr_utility_trace('Current person = '||ln_person_id);
488: hr_utility_trace('Previous person = '||ln_prev_person_id);
489:

Line 486: hr_utility_trace('Current archiver asg action = '||ln_arch_act_id);

482:
483: ln_asg_count := ln_asg_count + 1;
484:
485: hr_utility_trace ('-------------');
486: hr_utility_trace('Current archiver asg action = '||ln_arch_act_id);
487: hr_utility_trace('Current person = '||ln_person_id);
488: hr_utility_trace('Previous person = '||ln_prev_person_id);
489:
490: IF (ln_person_id <> ln_prev_person_id) THEN

Line 487: hr_utility_trace('Current person = '||ln_person_id);

483: ln_asg_count := ln_asg_count + 1;
484:
485: hr_utility_trace ('-------------');
486: hr_utility_trace('Current archiver asg action = '||ln_arch_act_id);
487: hr_utility_trace('Current person = '||ln_person_id);
488: hr_utility_trace('Previous person = '||ln_prev_person_id);
489:
490: IF (ln_person_id <> ln_prev_person_id) THEN
491:

Line 488: hr_utility_trace('Previous person = '||ln_prev_person_id);

484:
485: hr_utility_trace ('-------------');
486: hr_utility_trace('Current archiver asg action = '||ln_arch_act_id);
487: hr_utility_trace('Current person = '||ln_person_id);
488: hr_utility_trace('Previous person = '||ln_prev_person_id);
489:
490: IF (ln_person_id <> ln_prev_person_id) THEN
491:
492: SELECT pay_assignment_actions_s.nextval

Line 496: hr_utility_trace('Creating magtape assignment action '||

492: SELECT pay_assignment_actions_s.nextval
493: INTO ln_mag_asg_act_id
494: FROM dual;
495:
496: hr_utility_trace('Creating magtape assignment action '||
497: ln_mag_asg_act_id);
498:
499: hr_nonrun_asact.insact(ln_mag_asg_act_id
500: ,ln_assignment_id

Line 509: hr_utility.trace('Locking Action in IF = ' || ln_mag_asg_act_id);

505: ,'U'
506: ,null);
507:
508: -- insert an interlock to this action
509: hr_utility.trace('Locking Action in IF = ' || ln_mag_asg_act_id);
510: hr_utility.trace('Locked Action in IF = ' || ln_arch_act_id);
511:
512: hr_nonrun_asact.insint(ln_mag_asg_act_id,
513: ln_arch_act_id);

Line 510: hr_utility.trace('Locked Action in IF = ' || ln_arch_act_id);

506: ,null);
507:
508: -- insert an interlock to this action
509: hr_utility.trace('Locking Action in IF = ' || ln_mag_asg_act_id);
510: hr_utility.trace('Locked Action in IF = ' || ln_arch_act_id);
511:
512: hr_nonrun_asact.insint(ln_mag_asg_act_id,
513: ln_arch_act_id);
514:

Line 518: hr_utility.trace('Locking Action in ELSE = ' || ln_mag_asg_act_id);

514:
515: ELSE
516:
517: -- insert an interlock to this action
518: hr_utility.trace('Locking Action in ELSE = ' || ln_mag_asg_act_id);
519: hr_utility.trace('Locked Action in ELSE = ' || ln_arch_act_id);
520:
521: hr_nonrun_asact.insint(ln_mag_asg_act_id,
522: ln_arch_act_id);

Line 519: hr_utility.trace('Locked Action in ELSE = ' || ln_arch_act_id);

515: ELSE
516:
517: -- insert an interlock to this action
518: hr_utility.trace('Locking Action in ELSE = ' || ln_mag_asg_act_id);
519: hr_utility.trace('Locked Action in ELSE = ' || ln_arch_act_id);
520:
521: hr_nonrun_asact.insint(ln_mag_asg_act_id,
522: ln_arch_act_id);
523:

Line 530: hr_utility_trace(ln_asg_count || ' archiver actions processed in chunk '||

526: ln_prev_person_id := ln_person_id;
527:
528: END LOOP;
529:
530: hr_utility_trace(ln_asg_count || ' archiver actions processed in chunk '||
531: p_chunk);
532:
533: IF lb_range_person_on THEN
534: CLOSE c_arch_asg_range;

Line 539: hr_utility_trace ('Leaving '||l_proc_name);

535: ELSE
536: CLOSE c_arch_asg;
537: END IF;
538:
539: hr_utility_trace ('Leaving '||l_proc_name);
540:
541: END action_creation;
542:
543: /****************************************************************************

Line 749: hr_utility_trace ('Entering '||l_proc_name);

745:
746: BEGIN
747:
748: l_proc_name := g_proc_name || 'GENERATE_XML';
749: hr_utility_trace ('Entering '||l_proc_name);
750:
751: ln_assignment_action_id := pay_magtape_generic.get_parameter_value
752: ('TRANSFER_ACT_ID');
753:

Line 754: hr_utility_trace ('Fetching transactions for magtape asg action '||

750:
751: ln_assignment_action_id := pay_magtape_generic.get_parameter_value
752: ('TRANSFER_ACT_ID');
753:
754: hr_utility_trace ('Fetching transactions for magtape asg action '||
755: ln_assignment_action_id);
756: decimal_char := substr(ltrim(to_char(.3,'0D0')),2,1);
757: p_format := '0'||decimal_char||'9999';
758: hr_utility_trace('decimal_char '||decimal_char);

Line 758: hr_utility_trace('decimal_char '||decimal_char);

754: hr_utility_trace ('Fetching transactions for magtape asg action '||
755: ln_assignment_action_id);
756: decimal_char := substr(ltrim(to_char(.3,'0D0')),2,1);
757: p_format := '0'||decimal_char||'9999';
758: hr_utility_trace('decimal_char '||decimal_char);
759: hr_utility_trace('p_format '||p_format);
760: dim_xml_tbl.DELETE;
761:
762: gn_success_fail := 0;

Line 759: hr_utility_trace('p_format '||p_format);

755: ln_assignment_action_id);
756: decimal_char := substr(ltrim(to_char(.3,'0D0')),2,1);
757: p_format := '0'||decimal_char||'9999';
758: hr_utility_trace('decimal_char '||decimal_char);
759: hr_utility_trace('p_format '||p_format);
760: dim_xml_tbl.DELETE;
761:
762: gn_success_fail := 0;
763: gn_sep_bal := 0;

Line 1439: hr_utility_trace ('Leaving '||l_proc_name);

1435: ELSE
1436: load_xml_internal('CE','FAIL',NULL);
1437: END IF;
1438:
1439: hr_utility_trace ('Leaving '||l_proc_name);
1440: EXCEPTION
1441: WHEN OTHERS THEN
1442: hr_utility_trace (SQLERRM);
1443: RAISE;

Line 1442: hr_utility_trace (SQLERRM);

1438:
1439: hr_utility_trace ('Leaving '||l_proc_name);
1440: EXCEPTION
1441: WHEN OTHERS THEN
1442: hr_utility_trace (SQLERRM);
1443: RAISE;
1444: END GENERATE_XML;
1445:
1446:

Line 1457: hr_utility_trace ('Entering '||l_proc_name);

1453: l_proc_name varchar2(100);
1454: lv_buf varchar2(2000);
1455: BEGIN
1456: l_proc_name := g_proc_name || 'GENERATE_XML_HEADER';
1457: hr_utility_trace ('Entering '||l_proc_name);
1458:
1459: hr_utility_trace ('Root XML tag = '||
1460: pay_magtape_generic.get_parameter_value('ROOT_XML_TAG'));
1461:

Line 1459: hr_utility_trace ('Root XML tag = '||

1455: BEGIN
1456: l_proc_name := g_proc_name || 'GENERATE_XML_HEADER';
1457: hr_utility_trace ('Entering '||l_proc_name);
1458:
1459: hr_utility_trace ('Root XML tag = '||
1460: pay_magtape_generic.get_parameter_value('ROOT_XML_TAG'));
1461:
1462: lv_buf := pay_magtape_generic.get_parameter_value('ROOT_XML_TAG');
1463:

Line 1466: hr_utility_trace ('Leaving '||l_proc_name);

1462: lv_buf := pay_magtape_generic.get_parameter_value('ROOT_XML_TAG');
1463:
1464: write_to_magtape_lob (lv_buf);
1465:
1466: hr_utility_trace ('Leaving '||l_proc_name);
1467: END generate_xml_header;
1468:
1469:
1470: /****************************************************************************

Line 1489: hr_utility_trace ('Entering '||l_proc_name);

1485: lr_xml RAW (32767);
1486: ln_amt number;
1487: BEGIN
1488: l_proc_name := g_proc_name || 'GENERATE_XML_FOOTER';
1489: hr_utility_trace ('Entering '||l_proc_name);
1490:
1491: lv_buf := ' 1492: SUBSTR(pay_magtape_generic.get_parameter_value('ROOT_XML_TAG'),
1493: 2);

Line 1498: hr_utility_trace ('Leaving '||l_proc_name);

1494:
1495: write_to_magtape_lob (lv_buf);
1496:
1497:
1498: hr_utility_trace ('Leaving '||l_proc_name);
1499: END generate_xml_footer;
1500:
1501: BEGIN
1502: --hr_utility.trace_on(null, 'PAYMXDIM');

Line 1502: --hr_utility.trace_on(null, 'PAYMXDIM');

1498: hr_utility_trace ('Leaving '||l_proc_name);
1499: END generate_xml_footer;
1500:
1501: BEGIN
1502: --hr_utility.trace_on(null, 'PAYMXDIM');
1503: g_proc_name := 'PAY_MX_DIM_MAG.';
1504: g_debug := hr_utility.debug_enabled;
1505: g_document_type := 'MX_DIM_MAG';
1506: END PAY_MX_DIM_MAG;

Line 1504: g_debug := hr_utility.debug_enabled;

1500:
1501: BEGIN
1502: --hr_utility.trace_on(null, 'PAYMXDIM');
1503: g_proc_name := 'PAY_MX_DIM_MAG.';
1504: g_debug := hr_utility.debug_enabled;
1505: g_document_type := 'MX_DIM_MAG';
1506: END PAY_MX_DIM_MAG;