57: l_rec_count number := 1;
58: --
59: l_proc varchar2(61) := c_package || 'init';
60: --
61: l_data_record_sort_order hr_lookups.lookup_code%type := pay_jp_mag_utility_pkg.get_parameter('DATA_RECORD_SORT_ORDER');
62: --
63: l_district_code VARCHAR2(255);
64: l_district_name_kana VARCHAR2(255);
65: l_swot_number VARCHAR2(255);
206: select effective_date
207: into g_parameter.effective_date
208: from fnd_sessions
209: where session_id = userenv('sessionid');
210: g_parameter.effective_date_from := fnd_date.canonical_to_date(pay_jp_mag_utility_pkg.get_parameter('EFFECTIVE_DATE_FROM'));
211: g_parameter.effective_date_to := fnd_date.canonical_to_date(pay_jp_mag_utility_pkg.get_parameter('EFFECTIVE_DATE_TO'));
212: g_parameter.organization_id := fnd_number.canonical_to_number(pay_jp_mag_utility_pkg.get_parameter('ORGANIZATION_ID'));
213: --
214: hr_utility.trace('Session Date : ' || fnd_date.date_to_canonical(g_parameter.effective_date));
207: into g_parameter.effective_date
208: from fnd_sessions
209: where session_id = userenv('sessionid');
210: g_parameter.effective_date_from := fnd_date.canonical_to_date(pay_jp_mag_utility_pkg.get_parameter('EFFECTIVE_DATE_FROM'));
211: g_parameter.effective_date_to := fnd_date.canonical_to_date(pay_jp_mag_utility_pkg.get_parameter('EFFECTIVE_DATE_TO'));
212: g_parameter.organization_id := fnd_number.canonical_to_number(pay_jp_mag_utility_pkg.get_parameter('ORGANIZATION_ID'));
213: --
214: hr_utility.trace('Session Date : ' || fnd_date.date_to_canonical(g_parameter.effective_date));
215: hr_utility.trace('EFFECTIVE_DATE_FROM : ' || fnd_date.date_to_canonical(g_parameter.effective_date_from));
208: from fnd_sessions
209: where session_id = userenv('sessionid');
210: g_parameter.effective_date_from := fnd_date.canonical_to_date(pay_jp_mag_utility_pkg.get_parameter('EFFECTIVE_DATE_FROM'));
211: g_parameter.effective_date_to := fnd_date.canonical_to_date(pay_jp_mag_utility_pkg.get_parameter('EFFECTIVE_DATE_TO'));
212: g_parameter.organization_id := fnd_number.canonical_to_number(pay_jp_mag_utility_pkg.get_parameter('ORGANIZATION_ID'));
213: --
214: hr_utility.trace('Session Date : ' || fnd_date.date_to_canonical(g_parameter.effective_date));
215: hr_utility.trace('EFFECTIVE_DATE_FROM : ' || fnd_date.date_to_canonical(g_parameter.effective_date_from));
216: hr_utility.trace('EFFECTIVE_DATE_TO : ' || fnd_date.date_to_canonical(g_parameter.effective_date_to));
214: hr_utility.trace('Session Date : ' || fnd_date.date_to_canonical(g_parameter.effective_date));
215: hr_utility.trace('EFFECTIVE_DATE_FROM : ' || fnd_date.date_to_canonical(g_parameter.effective_date_from));
216: hr_utility.trace('EFFECTIVE_DATE_TO : ' || fnd_date.date_to_canonical(g_parameter.effective_date_to));
217: hr_utility.trace('ORGANIZATION_ID : ' || to_char(g_parameter.organization_id));
218: hr_utility.trace('CHARACTER_SET : ' || pay_jp_mag_utility_pkg.get_parameter('CHARACTER_SET'));
219: hr_utility.set_location(l_proc, 20);
220: --
221: -- Derive 6 formulas to be executed by PYUMAG
222: --
401: -- Dequeue the formula to be executed from the formula queue.
402: -- If not exists, setup the formula into the formula queue
403: -- and dequeue the first formula from the formula queue.
404: --
405: l_formula_id := pay_jp_mag_utility_pkg.dequeue_formula;
406: if l_formula_id is null then
407: g_data.current_index := g_data.current_index + 1;
408: --
409: if g_data.district_code_tbl.exists(g_data.current_index) then
407: g_data.current_index := g_data.current_index + 1;
408: --
409: if g_data.district_code_tbl.exists(g_data.current_index) then
410: if g_data.current_index = 1 then
411: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.header_record_formatter);
412: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_init);
413: else
414: if g_data.district_code_tbl(g_data.current_index) <> g_data.district_code_tbl(g_data.current_index - 1) then
415: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_init);
408: --
409: if g_data.district_code_tbl.exists(g_data.current_index) then
410: if g_data.current_index = 1 then
411: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.header_record_formatter);
412: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_init);
413: else
414: if g_data.district_code_tbl(g_data.current_index) <> g_data.district_code_tbl(g_data.current_index - 1) then
415: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_init);
416: end if;
411: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.header_record_formatter);
412: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_init);
413: else
414: if g_data.district_code_tbl(g_data.current_index) <> g_data.district_code_tbl(g_data.current_index - 1) then
415: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_init);
416: end if;
417: end if;
418: --
419: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_detail);
415: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_init);
416: end if;
417: end if;
418: --
419: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_detail);
420: --
421: if g_data.current_index = g_data.district_code_tbl.count then
422: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_formatter);
423: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.trailer_record_formatter);
418: --
419: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_detail);
420: --
421: if g_data.current_index = g_data.district_code_tbl.count then
422: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_formatter);
423: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.trailer_record_formatter);
424: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.end_record_formatter);
425: else
426: if g_data.district_code_tbl(g_data.current_index) <> g_data.district_code_tbl(g_data.current_index + 1) then
419: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_detail);
420: --
421: if g_data.current_index = g_data.district_code_tbl.count then
422: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_formatter);
423: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.trailer_record_formatter);
424: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.end_record_formatter);
425: else
426: if g_data.district_code_tbl(g_data.current_index) <> g_data.district_code_tbl(g_data.current_index + 1) then
427: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_formatter);
420: --
421: if g_data.current_index = g_data.district_code_tbl.count then
422: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_formatter);
423: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.trailer_record_formatter);
424: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.end_record_formatter);
425: else
426: if g_data.district_code_tbl(g_data.current_index) <> g_data.district_code_tbl(g_data.current_index + 1) then
427: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_formatter);
428: end if;
423: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.trailer_record_formatter);
424: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.end_record_formatter);
425: else
426: if g_data.district_code_tbl(g_data.current_index) <> g_data.district_code_tbl(g_data.current_index + 1) then
427: pay_jp_mag_utility_pkg.enqueue_formula(g_formula.data_record_formatter);
428: end if;
429: end if;
430: --
431: -- Dequeue the latest formula
429: end if;
430: --
431: -- Dequeue the latest formula
432: --
433: l_formula_id := pay_jp_mag_utility_pkg.dequeue_formula;
434: --
435: -- The following NO_DATA_FOUND will finishes process successfully
436: -- in the following conditions.
437: -- 1) TRANSFER_END_OF_FILE is not passed to PYUMAG in the last formula.
448: -- which is going to be executed by PYUMAG.
449: -- Note that all parameter values are inherited to the subsequent formulas,
450: -- but contexts available depends on each formula.
451: --
452: pay_jp_mag_utility_pkg.set_parameter('NEW_FORMULA_ID', l_formula_id, null);
453: pay_jp_mag_utility_pkg.clear_contexts;
454: --
455: -- HEADER_RECORD_FORMATTER
456: --
449: -- Note that all parameter values are inherited to the subsequent formulas,
450: -- but contexts available depends on each formula.
451: --
452: pay_jp_mag_utility_pkg.set_parameter('NEW_FORMULA_ID', l_formula_id, null);
453: pay_jp_mag_utility_pkg.clear_contexts;
454: --
455: -- HEADER_RECORD_FORMATTER
456: --
457: if l_formula_id = g_formula.header_record_formatter then
456: --
457: if l_formula_id = g_formula.header_record_formatter then
458: hr_utility.trace('HEADER_RECORD_FORMATTER');
459: --
460: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
461: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
462: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
463: --
464: -- DATA_RECORD_INIT
457: if l_formula_id = g_formula.header_record_formatter then
458: hr_utility.trace('HEADER_RECORD_FORMATTER');
459: --
460: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
461: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
462: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
463: --
464: -- DATA_RECORD_INIT
465: --
458: hr_utility.trace('HEADER_RECORD_FORMATTER');
459: --
460: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
461: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
462: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
463: --
464: -- DATA_RECORD_INIT
465: --
466: elsif l_formula_id = g_formula.data_record_init then
465: --
466: elsif l_formula_id = g_formula.data_record_init then
467: hr_utility.trace('DATA_RECORD_INIT');
468: --
469: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
470: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
471: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
472: --
473: pay_jp_mag_utility_pkg.set_parameter('DISTRICT_CODE', g_data.district_code_tbl(g_data.current_index));
466: elsif l_formula_id = g_formula.data_record_init then
467: hr_utility.trace('DATA_RECORD_INIT');
468: --
469: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
470: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
471: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
472: --
473: pay_jp_mag_utility_pkg.set_parameter('DISTRICT_CODE', g_data.district_code_tbl(g_data.current_index));
474: pay_jp_mag_utility_pkg.set_parameter('DISTRICT_NAME_KANA', g_data.district_name_kana_tbl(g_data.current_index));
467: hr_utility.trace('DATA_RECORD_INIT');
468: --
469: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
470: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
471: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
472: --
473: pay_jp_mag_utility_pkg.set_parameter('DISTRICT_CODE', g_data.district_code_tbl(g_data.current_index));
474: pay_jp_mag_utility_pkg.set_parameter('DISTRICT_NAME_KANA', g_data.district_name_kana_tbl(g_data.current_index));
475: pay_jp_mag_utility_pkg.set_parameter('SWOT_NUMBER', g_data.swot_number_tbl(g_data.current_index));
469: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
470: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
471: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
472: --
473: pay_jp_mag_utility_pkg.set_parameter('DISTRICT_CODE', g_data.district_code_tbl(g_data.current_index));
474: pay_jp_mag_utility_pkg.set_parameter('DISTRICT_NAME_KANA', g_data.district_name_kana_tbl(g_data.current_index));
475: pay_jp_mag_utility_pkg.set_parameter('SWOT_NUMBER', g_data.swot_number_tbl(g_data.current_index));
476: --
477: -- DATA_RECORD_DETAIL
470: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
471: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
472: --
473: pay_jp_mag_utility_pkg.set_parameter('DISTRICT_CODE', g_data.district_code_tbl(g_data.current_index));
474: pay_jp_mag_utility_pkg.set_parameter('DISTRICT_NAME_KANA', g_data.district_name_kana_tbl(g_data.current_index));
475: pay_jp_mag_utility_pkg.set_parameter('SWOT_NUMBER', g_data.swot_number_tbl(g_data.current_index));
476: --
477: -- DATA_RECORD_DETAIL
478: --
471: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
472: --
473: pay_jp_mag_utility_pkg.set_parameter('DISTRICT_CODE', g_data.district_code_tbl(g_data.current_index));
474: pay_jp_mag_utility_pkg.set_parameter('DISTRICT_NAME_KANA', g_data.district_name_kana_tbl(g_data.current_index));
475: pay_jp_mag_utility_pkg.set_parameter('SWOT_NUMBER', g_data.swot_number_tbl(g_data.current_index));
476: --
477: -- DATA_RECORD_DETAIL
478: --
479: elsif l_formula_id = g_formula.data_record_detail then
478: --
479: elsif l_formula_id = g_formula.data_record_detail then
480: hr_utility.trace('DATA_RECORD_DETAIL');
481: --
482: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
483: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
484: pay_jp_mag_utility_pkg.set_context('ASSIGNMENT_ID', g_data.assignment_id_tbl(g_data.current_index));
485: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_data.date_earned_tbl(g_data.current_index));
486: --
479: elsif l_formula_id = g_formula.data_record_detail then
480: hr_utility.trace('DATA_RECORD_DETAIL');
481: --
482: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
483: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
484: pay_jp_mag_utility_pkg.set_context('ASSIGNMENT_ID', g_data.assignment_id_tbl(g_data.current_index));
485: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_data.date_earned_tbl(g_data.current_index));
486: --
487: pay_jp_mag_utility_pkg.set_parameter('TAX', g_data.tax_tbl(g_data.current_index));
480: hr_utility.trace('DATA_RECORD_DETAIL');
481: --
482: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
483: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
484: pay_jp_mag_utility_pkg.set_context('ASSIGNMENT_ID', g_data.assignment_id_tbl(g_data.current_index));
485: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_data.date_earned_tbl(g_data.current_index));
486: --
487: pay_jp_mag_utility_pkg.set_parameter('TAX', g_data.tax_tbl(g_data.current_index));
488: pay_jp_mag_utility_pkg.set_parameter('LUMPSUM_TAX', g_data.lumpsum_tax_tbl(g_data.current_index));
481: --
482: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
483: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
484: pay_jp_mag_utility_pkg.set_context('ASSIGNMENT_ID', g_data.assignment_id_tbl(g_data.current_index));
485: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_data.date_earned_tbl(g_data.current_index));
486: --
487: pay_jp_mag_utility_pkg.set_parameter('TAX', g_data.tax_tbl(g_data.current_index));
488: pay_jp_mag_utility_pkg.set_parameter('LUMPSUM_TAX', g_data.lumpsum_tax_tbl(g_data.current_index));
489: pay_jp_mag_utility_pkg.set_parameter('TERM_TAX', g_data.term_tax_tbl(g_data.current_index));
483: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
484: pay_jp_mag_utility_pkg.set_context('ASSIGNMENT_ID', g_data.assignment_id_tbl(g_data.current_index));
485: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_data.date_earned_tbl(g_data.current_index));
486: --
487: pay_jp_mag_utility_pkg.set_parameter('TAX', g_data.tax_tbl(g_data.current_index));
488: pay_jp_mag_utility_pkg.set_parameter('LUMPSUM_TAX', g_data.lumpsum_tax_tbl(g_data.current_index));
489: pay_jp_mag_utility_pkg.set_parameter('TERM_TAX', g_data.term_tax_tbl(g_data.current_index));
490: pay_jp_mag_utility_pkg.set_parameter('TERM_INCOME', g_data.term_income_tbl(g_data.current_index));
491: pay_jp_mag_utility_pkg.set_parameter('TERM_DISTRICT_TAX', g_data.term_district_tax_tbl(g_data.current_index));
484: pay_jp_mag_utility_pkg.set_context('ASSIGNMENT_ID', g_data.assignment_id_tbl(g_data.current_index));
485: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_data.date_earned_tbl(g_data.current_index));
486: --
487: pay_jp_mag_utility_pkg.set_parameter('TAX', g_data.tax_tbl(g_data.current_index));
488: pay_jp_mag_utility_pkg.set_parameter('LUMPSUM_TAX', g_data.lumpsum_tax_tbl(g_data.current_index));
489: pay_jp_mag_utility_pkg.set_parameter('TERM_TAX', g_data.term_tax_tbl(g_data.current_index));
490: pay_jp_mag_utility_pkg.set_parameter('TERM_INCOME', g_data.term_income_tbl(g_data.current_index));
491: pay_jp_mag_utility_pkg.set_parameter('TERM_DISTRICT_TAX', g_data.term_district_tax_tbl(g_data.current_index));
492: pay_jp_mag_utility_pkg.set_parameter('TERM_PREFECTURAL_TAX', g_data.term_prefectural_tax_tbl(g_data.current_index));
485: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_data.date_earned_tbl(g_data.current_index));
486: --
487: pay_jp_mag_utility_pkg.set_parameter('TAX', g_data.tax_tbl(g_data.current_index));
488: pay_jp_mag_utility_pkg.set_parameter('LUMPSUM_TAX', g_data.lumpsum_tax_tbl(g_data.current_index));
489: pay_jp_mag_utility_pkg.set_parameter('TERM_TAX', g_data.term_tax_tbl(g_data.current_index));
490: pay_jp_mag_utility_pkg.set_parameter('TERM_INCOME', g_data.term_income_tbl(g_data.current_index));
491: pay_jp_mag_utility_pkg.set_parameter('TERM_DISTRICT_TAX', g_data.term_district_tax_tbl(g_data.current_index));
492: pay_jp_mag_utility_pkg.set_parameter('TERM_PREFECTURAL_TAX', g_data.term_prefectural_tax_tbl(g_data.current_index));
493: --
486: --
487: pay_jp_mag_utility_pkg.set_parameter('TAX', g_data.tax_tbl(g_data.current_index));
488: pay_jp_mag_utility_pkg.set_parameter('LUMPSUM_TAX', g_data.lumpsum_tax_tbl(g_data.current_index));
489: pay_jp_mag_utility_pkg.set_parameter('TERM_TAX', g_data.term_tax_tbl(g_data.current_index));
490: pay_jp_mag_utility_pkg.set_parameter('TERM_INCOME', g_data.term_income_tbl(g_data.current_index));
491: pay_jp_mag_utility_pkg.set_parameter('TERM_DISTRICT_TAX', g_data.term_district_tax_tbl(g_data.current_index));
492: pay_jp_mag_utility_pkg.set_parameter('TERM_PREFECTURAL_TAX', g_data.term_prefectural_tax_tbl(g_data.current_index));
493: --
494: -- DATA_RECORD_FORMATTER
487: pay_jp_mag_utility_pkg.set_parameter('TAX', g_data.tax_tbl(g_data.current_index));
488: pay_jp_mag_utility_pkg.set_parameter('LUMPSUM_TAX', g_data.lumpsum_tax_tbl(g_data.current_index));
489: pay_jp_mag_utility_pkg.set_parameter('TERM_TAX', g_data.term_tax_tbl(g_data.current_index));
490: pay_jp_mag_utility_pkg.set_parameter('TERM_INCOME', g_data.term_income_tbl(g_data.current_index));
491: pay_jp_mag_utility_pkg.set_parameter('TERM_DISTRICT_TAX', g_data.term_district_tax_tbl(g_data.current_index));
492: pay_jp_mag_utility_pkg.set_parameter('TERM_PREFECTURAL_TAX', g_data.term_prefectural_tax_tbl(g_data.current_index));
493: --
494: -- DATA_RECORD_FORMATTER
495: --
488: pay_jp_mag_utility_pkg.set_parameter('LUMPSUM_TAX', g_data.lumpsum_tax_tbl(g_data.current_index));
489: pay_jp_mag_utility_pkg.set_parameter('TERM_TAX', g_data.term_tax_tbl(g_data.current_index));
490: pay_jp_mag_utility_pkg.set_parameter('TERM_INCOME', g_data.term_income_tbl(g_data.current_index));
491: pay_jp_mag_utility_pkg.set_parameter('TERM_DISTRICT_TAX', g_data.term_district_tax_tbl(g_data.current_index));
492: pay_jp_mag_utility_pkg.set_parameter('TERM_PREFECTURAL_TAX', g_data.term_prefectural_tax_tbl(g_data.current_index));
493: --
494: -- DATA_RECORD_FORMATTER
495: --
496: elsif l_formula_id = g_formula.data_record_formatter then
495: --
496: elsif l_formula_id = g_formula.data_record_formatter then
497: hr_utility.trace('DATA_RECORD_FORMATTER');
498: --
499: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
500: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
501: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
502: --
503: -- TRAILER_RECORD_FORMATTER
496: elsif l_formula_id = g_formula.data_record_formatter then
497: hr_utility.trace('DATA_RECORD_FORMATTER');
498: --
499: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
500: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
501: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
502: --
503: -- TRAILER_RECORD_FORMATTER
504: --
497: hr_utility.trace('DATA_RECORD_FORMATTER');
498: --
499: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
500: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
501: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
502: --
503: -- TRAILER_RECORD_FORMATTER
504: --
505: elsif l_formula_id = g_formula.trailer_record_formatter then
504: --
505: elsif l_formula_id = g_formula.trailer_record_formatter then
506: hr_utility.trace('TRAILER_RECORD_FORMATTER');
507: --
508: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
509: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
510: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
511: --
512: -- END_RECORD_FORMATTER
505: elsif l_formula_id = g_formula.trailer_record_formatter then
506: hr_utility.trace('TRAILER_RECORD_FORMATTER');
507: --
508: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
509: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
510: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
511: --
512: -- END_RECORD_FORMATTER
513: --
506: hr_utility.trace('TRAILER_RECORD_FORMATTER');
507: --
508: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
509: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
510: pay_jp_mag_utility_pkg.set_context('ORGANIZATION_ID', g_parameter.organization_id);
511: --
512: -- END_RECORD_FORMATTER
513: --
514: elsif l_formula_id = g_formula.end_record_formatter then
513: --
514: elsif l_formula_id = g_formula.end_record_formatter then
515: hr_utility.trace('END_RECORD_FORMATTER');
516: --
517: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
518: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
519: else
520: hr_utility.trace('Unknown formula : ' || to_char(l_formula_id));
521: end if;
514: elsif l_formula_id = g_formula.end_record_formatter then
515: hr_utility.trace('END_RECORD_FORMATTER');
516: --
517: pay_jp_mag_utility_pkg.set_context('BUSINESS_GROUP_ID', g_parameter.business_group_id);
518: pay_jp_mag_utility_pkg.set_context('DATE_EARNED', g_parameter.effective_date);
519: else
520: hr_utility.trace('Unknown formula : ' || to_char(l_formula_id));
521: end if;
522: --