DBA Data[Home] [Help]

PACKAGE BODY: APPS.PAY_JP_DATA_MIGRATION_PKG

Source


1 PACKAGE BODY pay_jp_data_migration_pkg AS
2 /* $Header: pyjpdatamig.pkb 120.17 2012/01/19 10:08:36 rpahune ship $ */
3 --
4 -- Global Utils
5 g_pkg    VARCHAR2(30) := 'pay_jp_data_migration_pkg';
6 g_traces BOOLEAN := hr_utility.debug_enabled; --See if hr_utility.traces should be output
7 g_dbg    BOOLEAN := FALSE; --Used for diagnosing issues by dev, more outputs
8 --
9 -- |-------------------------------------------------------------------|
10 -- |---------------------< migrate_input_values >----------------------|
11 -- |-------------------------------------------------------------------|
12 --
13 procedure migrate_input_values is
14 --
15   type t_jp_input_names_tab is table of VARCHAR2(200) index by binary_integer;
16 
17   type t_input_names_tab is table of pay_input_values_f.name%TYPE index by binary_integer;
18 
19   l_jp_input_names_tab  t_jp_input_names_tab;
20   l_input_names_tab     t_input_names_tab;
21 
22   l_proc                VARCHAR2(50) := g_pkg||'.migrate_input_values';
23 
24 BEGIN
25 
26   l_jp_input_names_tab.DELETE;
27   l_input_names_tab.DELETE;
28 
29   hr_utility.set_location(l_proc, 10);
30 
31   l_jp_input_names_tab(1) := '32E59B9EE79BAEE4BBA5E9998DE381AEE7A88EE9A18D';
32   l_input_names_tab(1) := 'SUBSEQUENT_TAX';
33 
34   l_jp_input_names_tab(2) := 'E38395E382A1E382A4E383ABE794A8EFBCBFE4B88AE69BB8E3818D';
35   l_input_names_tab(2) := 'OVERRIDE_FOR_FILE_FLAG';
36 
37   l_jp_input_names_tab(3) := 'E38395E382A1E382A4E383ABE794A8EFBCBFE69198E8A681E6AC84';
38   l_input_names_tab(3) := 'DESC_FIELD_FOR_FILE';
39 
40   l_jp_input_names_tab(4) := 'E38395E382A1E382A4E383ABE794A8EFBCBFE69198E8A681E6AC8432';
41   l_input_names_tab(4) := 'DESC_FIELD2_FOR_FILE';
42 
43   l_jp_input_names_tab(5) := 'E38395E382A1E382A4E383ABE794A8EFBCBFE69198E8A681E6AC8433';
44   l_input_names_tab(5) := 'DESC_FIELD3_FOR_FILE';
45 
46   l_jp_input_names_tab(6) := 'E38395E382A1E382A4E383ABE794A8EFBCBFE69198E8A681E6AC8434';
47   l_input_names_tab(6) := 'DESC_FIELD4_FOR_FILE';
48 
49   l_jp_input_names_tab(7) := 'E38395E382A1E382A4E383ABE794A8EFBCBFE69198E8A681E6AC8435';
50   l_input_names_tab(7) := 'DESC_FIELD5_FOR_FILE';
51 
52   l_jp_input_names_tab(8) := 'E4B880E68BACE5BEB4E58F8EE58CBAE58886';
53   l_input_names_tab(8) := 'LUMP_SUM_WITHHOLD_METHOD';
54 
55   l_jp_input_names_tab(9) := 'E4B880E888ACE381AEE7949FE591BDE4BF9DE999BAE69699';
56   l_input_names_tab(9) := 'GEN_LIFE_INS_PREM';
57 
58   l_jp_input_names_tab(10) := 'E4B880E888ACE68EA7E999A4E5AFBEE8B1A1E9858DE581B6E88085E68EA7E999A4E9A18D';
59   l_input_names_tab(10) := 'GEN_SPOUSE_EXM';
60 
61   l_jp_input_names_tab(11) := 'E4B880E888ACE99A9CE5AEB3E88085';
62   l_input_names_tab(11) := 'NUM_OF_GEN_DISABLED';
63 
64   l_jp_input_names_tab(12) := 'E4B880E888ACE99A9CE5AEB3E88085E68EA7E999A4E9A18D';
65   l_input_names_tab(12) := 'GEN_DISABLED_EXM';
66 
67   l_jp_input_names_tab(13) := 'E4B880E888ACE689B6E9A48AE68EA7E999A4E9A18D';
68   l_input_names_tab(13) := 'GEN_DEP_EXM';
69 
70   l_jp_input_names_tab(14) := 'E9818BE8B383E79BB8E5BD93E9A18D';
71   l_input_names_tab(14) := 'FARE_EQUIVALENT_AMT';
72 
73   l_jp_input_names_tab(15) := 'E5AFA1E5A9A6E58CBAE58886';
74   l_input_names_tab(15) := 'WIDOW_TYPE';
75 
76   l_jp_input_names_tab(16) := 'E5AFA1E5A9A6E68EA7E999A4E9A18D';
77   l_input_names_tab(16) := 'WIDOW_EXM';
78 
79   l_jp_input_names_tab(17) := 'E8AAB2E7A88EE5AFBEE8B1A1E9A18D';
80   l_input_names_tab(17) := 'TXBL_ERN';
81 
82   l_jp_input_names_tab(18) := 'E9818EE4B88DE8B6B3E7A88EE9A18D';
83   l_input_names_tab(18) := 'YEA_ITX';
84 
85   l_jp_input_names_tab(19) := 'E4BB8BE4BF9DE4BA8BE6A5ADE4B8BBE98080E881B7E69C88E58886E4BF9DE999BAE69699';
86   l_input_names_tab(19) := 'CI_PREM_ER_TRM';
87 
88   l_jp_input_names_tab(20) := 'E4BB8BE4BF9DE4BA8BE6A5ADE4B8BBE58886E4BF9DE999BAE69699';
89   l_input_names_tab(20) := 'CI_PREM_ER';
90 
91   l_jp_input_names_tab(21) := 'E4BB8BE4BF9DE789B9E5AE9AE8A2ABE4BF9DE999BAE88085';
92   l_input_names_tab(21) := 'CI_SPECIFIC_INSURED_FLAG';
93 
94   l_jp_input_names_tab(22) := 'E4BB8BE4BF9DE8A2ABE4BF9DE999BAE88085E98080E881B7E69C88E58886E4BF9DE999BAE69699';
95   l_input_names_tab(22) := 'CI_PREM_EE_TRM';
96 
97   l_jp_input_names_tab(23) := 'E4BB8BE4BF9DE8A2ABE4BF9DE999BAE88085E58886E4BF9DE999BAE69699';
98   l_input_names_tab(23) := 'CI_PREM_EE';
99 
100   l_jp_input_names_tab(24) := 'E694B9E5AE9AE6A899E6BA96E5A0B1E985ACE69C88E9A18D';
101   l_input_names_tab(24) := 'REVISED_SMR';
102 
103   l_jp_input_names_tab(25) := 'E694B9E5AE9AE5A0B1E985AC';
104   l_input_names_tab(25) := 'REVISED_MR';
105 
106   l_jp_input_names_tab(26) := 'E9968BE5A78BE697A5';
107   l_input_names_tab(26) := 'START_DATE';
108 
109   l_jp_input_names_tab(27) := 'E5A496E59BBDE4BABA';
110   l_input_names_tab(27) := 'FOREIGNER_FLAG';
111 
112   l_jp_input_names_tab(28) := 'E59FBAE98791E58AA0E585A5E593A1E795AAE58FB7';
113   l_input_names_tab(28) := 'WPF_MEMBERS_NUM';
114 
115   l_jp_input_names_tab(29) := 'E59FBAE98791E4BA8BE6A5ADE4B8BBE98080E881B7E69C88E58886E4BF9DE999BAE69699';
116   l_input_names_tab(29) := 'WPF_PREM_ER_TRM';
117 
118   l_jp_input_names_tab(30) := 'E59FBAE98791E4BA8BE6A5ADE4B8BBE58886E4BF9DE999BAE69699';
119   l_input_names_tab(30) := 'WPF_PREM_ER';
120 
121   l_jp_input_names_tab(31) := 'E59FBAE98791E4BA8BE6A5ADE68980';
122   l_input_names_tab(31) := 'WPF_LOCATION';
123 
124   l_jp_input_names_tab(32) := 'E59FBAE98791E587A6E79086';
125   l_input_names_tab(32) := 'WPF_PROC_FLAG';
126 
127   l_jp_input_names_tab(33) := 'E59FBAE98791E8A2ABE4BF9DE999BAE88085E98080E881B7E69C88E58886E4BF9DE999BAE69699';
128   l_input_names_tab(33) := 'WPF_PREM_EE_TRM';
129 
130   l_jp_input_names_tab(34) := 'E59FBAE98791E8A2ABE4BF9DE999BAE88085E58886E4BF9DE999BAE69699';
131   l_input_names_tab(34) := 'WPF_PREM_EE';
132 
133   l_jp_input_names_tab(35) := 'E59FBAE7A48EE68EA7E999A4E9A18D';
134   l_input_names_tab(35) := 'BASIC_EXM';
135 
136   l_jp_input_names_tab(36) := 'E59FBAE7A48EE5B9B4E98791E795AAE58FB7';
137   l_input_names_tab(36) := 'BASIC_PENSION_NUM';
138 
139   l_jp_input_names_tab(37) := 'E69C9FE99693';
140   l_input_names_tab(37) := 'PERIOD';
141 
142   l_jp_input_names_tab(38) := 'E7B5A6E4B88EE9968BE5A78BE69C88';
143   l_input_names_tab(38) := 'PAYROLL_START_MTH';
144 
145   l_jp_input_names_tab(39) := 'E7B5A6E4B88EE68EA7E999A4E5808BE4BABAE5B9B4E98791E4BF9DE999BAE69699';
146   l_input_names_tab(39) := 'SAL_DCT_INDIVIDUAL_PENSION_PREM';
147 
148   l_jp_input_names_tab(40) := 'E7B5A6E4B88EE68EA7E999A4E7A4BEE4BC9AE4BF9DE999BAE69699';
149   l_input_names_tab(40) := 'SAL_DCT_SI_PREM';
150 
151   l_jp_input_names_tab(41) := 'E7B5A6E4B88EE68EA7E999A4E5B08FE8A68FE6A8A1E4BC81E6A5ADE585B1E6B888E7AD89E68E9BE98791';
152   l_input_names_tab(41) := 'SAL_DCT_SMALL_COMPANY_MUTUAL_AID_PREM';
153 
154   l_jp_input_names_tab(42) := 'E7B5A6E4B88EE68EA7E999A4E7949FE591BDE4BF9DE999BAE69699';
155   l_input_names_tab(42) := 'SAL_DCT_LIFE_INS_PREM';
156 
157   l_jp_input_names_tab(43) := 'E7B5A6E4B88EE68EA7E999A4E79FADE69C9FE6908DE5AEB3E4BF9DE999BAE69699';
158   l_input_names_tab(43) := 'SAL_DCT_SHORT_TERM_NONLIFE_INS_PREM';
159 
160   l_jp_input_names_tab(44) := 'E7B5A6E4B88EE68EA7E999A4E995B7E69C9FE6908DE5AEB3E4BF9DE999BAE69699';
161   l_input_names_tab(44) := 'SAL_DCT_LONG_TERM_NONLIFE_INS_PREM';
162 
163   l_jp_input_names_tab(45) := 'E7B5A6E4B88EE7B582E4BA86E69C88';
164   l_input_names_tab(45) := 'PAYROLL_END_MTH';
165 
166   l_jp_input_names_tab(46) := 'E7B5A6E4B88EE68980E5BE97';
167   l_input_names_tab(46) := 'EMP_INCOME';
168 
169   l_jp_input_names_tab(47) := 'E7B5A6E4B88EE68980E5BE97E68EA7E999A4E5BE8CE381AEE98791E9A18D';
170   l_input_names_tab(47) := 'AMT_AFTER_EMP_INCOME_DCT';
171 
172   l_jp_input_names_tab(48) := 'E7B5A6E4B88EE4BD93E7B3BBE5A489E69BB4';
173   l_input_names_tab(48) := 'SAL_STRUCTURE_CHANGE';
174 
175   l_jp_input_names_tab(49) := 'E5B185E4BD8FE9968BE5A78BE697A5';
176   l_input_names_tab(49) := 'RES_START_DATE';
177 
178   l_jp_input_names_tab(50) := 'E5B185E4BD8FE88085E381ABE381AAE3828BE697A5';
179   l_input_names_tab(50) := 'PROJECTED_RES_DATE';
180 
181   l_jp_input_names_tab(51) := 'E8B79DE99BA2';
182   l_input_names_tab(51) := 'DISTANCE';
183 
184   l_jp_input_names_tab(52) := 'E58BA4E7B69AE5B9B4E695B0';
185   l_input_names_tab(52) := 'SERVICE_YEARS';
186 
187   l_jp_input_names_tab(53) := 'E58BA4E58AB4E5ADA6E7949FE58CBAE58886';
188   l_input_names_tab(53) := 'WORKING_STUDENT_TYPE';
189 
190   l_jp_input_names_tab(54) := 'E58BA4E58AB4E5ADA6E7949FE68EA7E999A4E9A18D';
191   l_input_names_tab(54) := 'WORKING_STUDENT_EXM';
192 
193   l_jp_input_names_tab(55) := 'E98791E9A18D';
194   l_input_names_tab(55) := 'CMA_AMT';
195 
196   l_jp_input_names_tab(56) := 'E98791E98AAD';
197   l_input_names_tab(56) := 'ERN_MONEY';
198 
199   l_jp_input_names_tab(57) := 'E98791E98AAD31E69C88E5898D';
200   l_input_names_tab(57) := 'ERN_MONEY_1MTH_AGO';
201 
202   l_jp_input_names_tab(58) := 'E98791E98AAD32E69C88E5898D';
203   l_input_names_tab(58) := 'ERN_MONEY_2MTH_AGO';
204 
205   l_jp_input_names_tab(59) := 'E98791E98AAD33E69C88E5898D';
206   l_input_names_tab(59) := 'ERN_MONEY_3MTH_AGO';
207 
208   l_jp_input_names_tab(60) := 'E98791E98AAD34E69C88';
209   l_input_names_tab(60) := 'ERN_MONEY_APR';
210 
211   l_jp_input_names_tab(61) := 'E98791E98AAD35E69C88';
212   l_input_names_tab(61) := 'ERN_MONEY_MAY';
213 
214   l_jp_input_names_tab(62) := 'E98791E98AAD36E69C88';
215   l_input_names_tab(62) := 'ERN_MONEY_JUN';
216 
217   l_jp_input_names_tab(63) := 'E98791E98AAD37E69C88';
218   l_input_names_tab(63) := 'ERN_MONEY_JUL';
219 
220   l_jp_input_names_tab(64) := 'E7B58CE794B1';
221   l_input_names_tab(64) := 'VIA';
222 
223   l_jp_input_names_tab(65) := 'E69C88EFBCBFE59BBAE5AE9AE79A84E8B383E98791';
224   l_input_names_tab(65) := 'GEP_FIXED_WAGE';
225 
226   l_jp_input_names_tab(66) := 'E69C88EFBCBFE5A0B1E985ACE69C88E9A18D';
227   l_input_names_tab(66) := 'GEP_MR';
228 
229   l_jp_input_names_tab(67) := 'E69C88E5A489EFBCBFE7B590E69E9CEFBCBFE59BBAE5AE9AE79A84E8B383E9879133E69C88E5898D';
230   l_input_names_tab(67) := 'GEP_RSLT_FIXED_WAGE_3MTH_AGO';
231 
232   l_jp_input_names_tab(68) := 'E69C88E5A489EFBCBFE7B590E69E9CEFBCBFE59BBAE5AE9AE79A84E8B383E9879134E69C88E5898D';
233   l_input_names_tab(68) := 'GEP_RSLT_FIXED_WAGE_4MTH_AGO';
234 
235   l_jp_input_names_tab(69) := 'E69C88E5A489EFBCBFE59BBAE5AE9AE79A84E8B383E9879131E69C88E5898D';
236   l_input_names_tab(69) := 'GEP_FIXED_WAGE_1MTH_AGO';
237 
238   l_jp_input_names_tab(70) := 'E69C88E5A489EFBCBFE59BBAE5AE9AE79A84E8B383E9879132E69C88E5898D';
239   l_input_names_tab(70) := 'GEP_FIXED_WAGE_2MTH_AGO';
240 
241   l_jp_input_names_tab(71) := 'E69C88E5A489EFBCBFE59BBAE5AE9AE79A84E8B383E9879133E69C88E5898D';
242   l_input_names_tab(71) := 'GEP_FIXED_WAGE_3MTH_AGO';
243 
244   l_jp_input_names_tab(72) := 'E69C88E5A489E4BA88E5AE9AE69C88';
245   l_input_names_tab(72) := 'GEP_MTH';
246 
247   l_jp_input_names_tab(73) := 'E581A5E5BAB7E4BF9DE999BAE69699';
248   l_input_names_tab(73) := 'HI_PREM';
249 
250   l_jp_input_names_tab(74) := 'E581A5E5BAB7E4BF9DE999BAE69699EFBCBFE4BA8BE6A5ADE4B8BB';
251   l_input_names_tab(74) := 'HI_PREM_ER';
252 
253   l_jp_input_names_tab(75) := 'E581A5E4BF9D';
254   l_input_names_tab(75) := 'HI';
255 
256   l_jp_input_names_tab(76) := 'E581A5E4BF9DE59088E7AE97E5AFBEE8B1A1E98791E98AAD';
257   l_input_names_tab(76) := 'HI_ERN_MONEY_SUBJ_SI_ACMLT';
258 
259   l_jp_input_names_tab(77) := 'E581A5E4BF9DE59088E7AE97E5AFBEE8B1A1E78FBEE789A9';
260   l_input_names_tab(77) := 'HI_ERN_KIND_SUBJ_SI_ACMLT';
261 
262   l_jp_input_names_tab(78) := 'E581A5E4BF9DE4BA8BE6A5ADE4B8BBE58886E4BF9DE999BAE69699';
263   l_input_names_tab(78) := 'HI_PREM_ER';
264 
265   l_jp_input_names_tab(79) := 'E581A5E4BF9DE4BA8BE6A5ADE68980';
266   l_input_names_tab(79) := 'HI_LOCATION';
267 
268   l_jp_input_names_tab(80) := 'E581A5E4BF9DE8A2ABE4BF9DE999BAE88085E8A8BCE795AAE58FB7';
269   l_input_names_tab(80) := 'HI_CARD_NUM';
270 
271   l_jp_input_names_tab(81) := 'E581A5E4BF9DE8A2ABE4BF9DE999BAE88085E58886E4BF9DE999BAE69699';
272   l_input_names_tab(81) := 'HI_PREM_EE';
273 
274   l_jp_input_names_tab(82) := 'E6BA90E6B389E5BEB4E58F8EE7A88EE9A18D';
275   l_input_names_tab(82) := 'WITHHOLD_TAX';
276 
277   l_jp_input_names_tab(83) := 'E78FBEE789A9';
278   l_input_names_tab(83) := 'ERN_KIND';
279 
280   l_jp_input_names_tab(84) := 'E78FBEE789A931E69C88E5898D';
281   l_input_names_tab(84) := 'ERN_KIND_1MTH_AGO';
282 
283   l_jp_input_names_tab(85) := 'E78FBEE789A932E69C88E5898D';
284   l_input_names_tab(85) := 'ERN_KIND_2MTH_AGO';
285 
286   l_jp_input_names_tab(86) := 'E78FBEE789A933E69C88E5898D';
287   l_input_names_tab(86) := 'ERN_KIND_3MTH_AGO';
288 
289   l_jp_input_names_tab(87) := 'E78FBEE789A934E69C88';
290   l_input_names_tab(87) := 'ERN_KIND_APR';
291 
292   l_jp_input_names_tab(88) := 'E78FBEE789A935E69C88';
293   l_input_names_tab(88) := 'ERN_KIND_MAY';
294 
295   l_jp_input_names_tab(89) := 'E78FBEE789A936E69C88';
296   l_input_names_tab(89) := 'ERN_KIND_JUN';
297 
298   l_jp_input_names_tab(90) := 'E78FBEE789A937E69C88';
299   l_input_names_tab(90) := 'ERN_KIND_JUL';
300 
301   l_jp_input_names_tab(91) := 'E78FBEE789A9E8AAB2E7A88EE9A18D';
302   l_input_names_tab(91) := 'TXBL_ERN_KIND';
303 
304   l_jp_input_names_tab(92) := 'E78FBEE789A9E58886E8AAB2E7A88EE5AFBEE8B1A1E9A18D';
305   l_input_names_tab(92) := 'TXBL_ERN_KIND';
306 
307   l_jp_input_names_tab(93) := 'E78FBEE789A9E58886E99D9EE8AAB2E7A88EE5AFBEE8B1A1E9A18D';
308   l_input_names_tab(93) := 'NTXBL_ERN_KIND';
309 
310   l_jp_input_names_tab(94) := 'E5808BE4BABAE5B9B4E98791E4BF9DE999BAE69699';
311   l_input_names_tab(94) := 'INDIVIDUAL_PENSION_PREM';
312 
313   l_jp_input_names_tab(95) := 'E5808BE4BABAE795AAE58FB7';
314   l_input_names_tab(95) := 'PERSONAL_NUM';
315 
316   l_jp_input_names_tab(96) := 'E59BBAE5AE9AE79A84E8B383E9879133E69C88E5898D';
317   l_input_names_tab(96) := 'FIXED_WAGE_3MTH_AGO';
318 
319   l_jp_input_names_tab(97) := 'E59BBAE5AE9AE79A84E8B383E9879134E69C88E5898D';
320   l_input_names_tab(97) := 'FIXED_WAGE_4MTH_AGO';
321 
322   l_jp_input_names_tab(98) := 'E99B87E4BF9DE58AA0E585A5E58CBAE58886';
323   l_input_names_tab(98) := 'EI_TYPE';
324 
325   l_jp_input_names_tab(99) := 'E99B87E4BF9DE4BA8BE6A5ADE4B8BB';
326   l_input_names_tab(99) := 'EI_LOCATION';
327 
328   l_jp_input_names_tab(100) := 'E99B87E4BF9DE5AFBEE8B1A1E9A18DE69C88E589B2E8AABFE695B4';
329   l_input_names_tab(100) := 'MTHLY_ERN_SUBJ_EI_ADJ';
330 
331   l_jp_input_names_tab(101) := 'E99B87E4BF9DE8A2ABE4BF9DE999BAE88085E795AAE58FB7';
332   l_input_names_tab(101) := 'EI_NUM';
333 
334   l_jp_input_names_tab(102) := 'E99B87E794A8E4BF9DE999BAE5AFBEE8B1A1E8B383E98791';
335   l_input_names_tab(102) := 'ERN_SUBJ_EI';
336 
337   l_jp_input_names_tab(103) := 'E99B87E794A8E4BF9DE999BAE69699';
338   l_input_names_tab(103) := 'EI_PREM';
339 
340   l_jp_input_names_tab(104) := 'E58E9AE7949FE5B9B4E98791E59FBAE98791E4BF9DE999BAE69699';
341   l_input_names_tab(104) := 'WPF_PREM';
342 
343   l_jp_input_names_tab(105) := 'E58E9AE7949FE5B9B4E98791E59FBAE98791E4BF9DE999BAE69699EFBCBFE4BA8BE6A5ADE4B8BB';
344   l_input_names_tab(105) := 'WPF_PREM_ER';
345 
346   l_jp_input_names_tab(106) := 'E58E9AE7949FE5B9B4E98791E4BF9DE999BAE69699';
347   l_input_names_tab(106) := 'WP_PREM';
348 
349   l_jp_input_names_tab(107) := 'E58E9AE7949FE5B9B4E98791E4BF9DE999BAE69699EFBCBFE4BA8BE6A5ADE4B8BB';
350   l_input_names_tab(107) := 'WP_PREM_ER';
351 
352   l_jp_input_names_tab(108) := 'E58E9AE5B9B4';
353   l_input_names_tab(108) := 'WP';
354 
355   l_jp_input_names_tab(109) := 'E58E9AE5B9B4E59088E7AE97E5AFBEE8B1A1E98791E98AAD';
356   l_input_names_tab(109) := 'WP_ERN_MONEY_SUBJ_SI_ACMLT';
357 
358   l_jp_input_names_tab(110) := 'E58E9AE5B9B4E59088E7AE97E5AFBEE8B1A1E78FBEE789A9';
359   l_input_names_tab(110) := 'WP_ERN_KIND_SUBJ_SI_ACMLT';
360 
361   l_jp_input_names_tab(111) := 'E58E9AE5B9B4E4BA8BE6A5ADE4B8BBE98080E881B7E69C88E58886E4BF9DE999BAE69699';
362   l_input_names_tab(111) := 'WP_PREM_ER_TRM';
363 
364   l_jp_input_names_tab(112) := 'E58E9AE5B9B4E4BA8BE6A5ADE4B8BBE58886E4BF9DE999BAE69699';
365   l_input_names_tab(112) := 'WP_PREM_ER';
366 
367   l_jp_input_names_tab(113) := 'E58E9AE5B9B4E4BA8BE6A5ADE68980';
368   l_input_names_tab(113) := 'WP_LOCATION';
369 
370   l_jp_input_names_tab(114) := 'E58E9AE5B9B4E6898BE5B8B3E8AAB2E68980E7ACA6E58FB7';
371   l_input_names_tab(114) := 'WP_BOOK_OFFICE_NUM';
372 
373   l_jp_input_names_tab(115) := 'E58E9AE5B9B4E6898BE5B8B3E8A2ABE4BF9DE999BAE88085E795AAE58FB7';
374   l_input_names_tab(115) := 'WP_BOOK_NUM';
375 
376   l_jp_input_names_tab(116) := 'E58E9AE5B9B4E587A6E79086';
377   l_input_names_tab(116) := 'WP_PROC_FLAG';
378 
379   l_jp_input_names_tab(117) := 'E58E9AE5B9B4E695B4E79086E795AAE58FB7';
380   l_input_names_tab(117) := 'WP_SERIAL_NUM';
381 
382   l_jp_input_names_tab(118) := 'E58E9AE5B9B4E8A2ABE4BF9DE999BAE88085E98080E881B7E69C88E58886E4BF9DE999BAE69699';
383   l_input_names_tab(118) := 'WP_PREM_EE_TRM';
384 
385   l_jp_input_names_tab(119) := 'E58E9AE5B9B4E8A2ABE4BF9DE999BAE88085E58886E4BF9DE999BAE69699';
386   l_input_names_tab(119) := 'WP_PREM_EE';
387 
388   l_jp_input_names_tab(120) := 'E68EA7E999A4E9A18D';
389   l_input_names_tab(120) := 'DCT';
390 
391   l_jp_input_names_tab(121) := 'E59088E7AE97E5AFBEE8B1A1E4BB8BE4BF9DE4BA8BE6A5ADE4B8BBE58886E4BF9DE999BAE69699';
392   l_input_names_tab(121) := 'CI_PREM_ER_ACMLT';
393 
394   l_jp_input_names_tab(122) := 'E59088E7AE97E5AFBEE8B1A1E4BB8BE4BF9DE8A2ABE4BF9DE999BAE88085E58886E4BF9DE999BAE69699';
395   l_input_names_tab(122) := 'CI_PREM_EE_ACMLT';
396 
397   l_jp_input_names_tab(123) := 'E59088E7AE97E5AFBEE8B1A1E59FBAE98791E4BA8BE6A5ADE4B8BBE58886E4BF9DE999BAE69699';
398   l_input_names_tab(123) := 'WPF_PREM_ER_ACMLT';
399 
400   l_jp_input_names_tab(124) := 'E59088E7AE97E5AFBEE8B1A1E59FBAE98791E8A2ABE4BF9DE999BAE88085E58886E4BF9DE999BAE69699';
401   l_input_names_tab(124) := 'WPF_PREM_EE_ACMLT';
402 
403   l_jp_input_names_tab(125) := 'E59088E7AE97E5AFBEE8B1A1E581A5E4BF9DE4BA8BE6A5ADE4B8BBE58886E4BF9DE999BAE69699';
404   l_input_names_tab(125) := 'HI_PREM_ER_ACMLT';
405 
406   l_jp_input_names_tab(126) := 'E59088E7AE97E5AFBEE8B1A1E581A5E4BF9DE8A2ABE4BF9DE999BAE88085E58886E4BF9DE999BAE69699';
407   l_input_names_tab(126) := 'HI_PREM_EE_ACMLT';
408 
409   l_jp_input_names_tab(127) := 'E59088E7AE97E5AFBEE8B1A1E58E9AE5B9B4E4BA8BE6A5ADE4B8BBE58886E4BF9DE999BAE69699';
410   l_input_names_tab(127) := 'WP_PREM_ER_ACMLT';
411 
412   l_jp_input_names_tab(128) := 'E59088E7AE97E5AFBEE8B1A1E58E9AE5B9B4E8A2ABE4BF9DE999BAE88085E58886E4BF9DE999BAE69699';
413   l_input_names_tab(128) := 'WP_PREM_EE_ACMLT';
414 
415   l_jp_input_names_tab(129) := 'E59BBDE5A496E4BD8FE68980';
416   l_input_names_tab(129) := 'FOREIGN_ADDRESS';
417 
418   l_jp_input_names_tab(130) := 'E59BBDE5B9B4E6898BE5B8B3E8AAB2E68980E7ACA6E58FB7';
419   l_input_names_tab(130) := 'NP_BOOK_OFFICE_NUM';
420 
421   l_jp_input_names_tab(131) := 'E59BBDE5B9B4E6898BE5B8B3E8A2ABE4BF9DE999BAE88085E795AAE58FB7';
422   l_input_names_tab(131) := 'NP_BOOK_NUM';
423 
424   l_jp_input_names_tab(132) := 'E59BBDE6B091E5B9B4E98791E4BF9DE999BAE69699';
425   l_input_names_tab(132) := 'NATIONAL_PENSION_PREM';
426 
427   l_jp_input_names_tab(133) := 'E5B7AEE5BC95E8AAB2E7A88EE7B5A6E4B88EE68980E5BE97E98791E9A18D';
428   l_input_names_tab(133) := 'NET_TXBL_INCOME';
429 
430   l_jp_input_names_tab(134) := 'E5B7AEE5BC95E694AFE7B5A6E9A18D';
431   l_input_names_tab(134) := 'NET_ERN';
432 
433   l_jp_input_names_tab(135) := 'E5B7AEE5BC95E5B9B4E7A88EE9A18D';
434   l_input_names_tab(135) := 'NET_ANNUAL_TAX';
435 
436   l_jp_input_names_tab(136) := 'E69C80E7B582E59B9EE381AEE694AFE68995E69C88';
437   l_input_names_tab(136) := 'LAST_PAY_MTH';
438 
439   l_jp_input_names_tab(137) := 'E7AE97EFBCBFE5A0B1E985ACE69C88E9A18D';
440   l_input_names_tab(137) := 'SAN_MR';
441 
442   l_jp_input_names_tab(138) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE7B5A6E4B88EE98791E98AAD';
443   l_input_names_tab(138) := 'SAN_GEP_SAL_ERN_MONEY';
444 
445   l_jp_input_names_tab(139) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE7B5A6E4B88EE78FBEE789A9';
446   l_input_names_tab(139) := 'SAN_GEP_SAL_ERN_KIND';
447 
448   l_jp_input_names_tab(140) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE98791E98AAD31E69C88E5898D';
449   l_input_names_tab(140) := 'SAN_GEP_ERN_MONEY_1MTH_AGO';
450 
451   l_jp_input_names_tab(141) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE98791E98AAD32E69C88E5898D';
452   l_input_names_tab(141) := 'SAN_GEP_ERN_MONEY_2MTH_AGO';
453 
454   l_jp_input_names_tab(142) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE98791E98AAD33E69C88E5898D';
455   l_input_names_tab(142) := 'SAN_GEP_ERN_MONEY_3MTH_AGO';
456 
457   l_jp_input_names_tab(143) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE7B590E69E9CEFBCBFE4BFAEE6ADA3E5B9B3E59D87';
458   l_input_names_tab(143) := 'SAN_GEP_RSLT_CORRECT_AVG';
459 
460   l_jp_input_names_tab(144) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE7B590E69E9CEFBCBFE58D98E7B494E5B9B3E59D87';
461   l_input_names_tab(144) := 'SAN_GEP_RSLT_SIMPLE_AVG';
462 
463   l_jp_input_names_tab(145) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE7B590E69E9CEFBCBFE697A5E695B031E69C88E5898D';
464   l_input_names_tab(145) := 'SAN_GEP_RSLT_DAYS_1MTH_AGO';
465 
466   l_jp_input_names_tab(146) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE7B590E69E9CEFBCBFE697A5E695B032E69C88E5898D';
467  	l_input_names_tab(146) := 'SAN_GEP_RSLT_DAYS_2MTH_AGO';
468 
469   l_jp_input_names_tab(147) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE7B590E69E9CEFBCBFE697A5E695B033E69C88E5898D';
470   l_input_names_tab(147) := 'SAN_GEP_RSLT_DAYS_3MTH_AGO';
471 
472   l_jp_input_names_tab(148) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE78FBEE789A931E69C88E5898D';
473   l_input_names_tab(148) := 'SAN_GEP_ERN_KIND_1MTH_AGO';
474 
475   l_jp_input_names_tab(149) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE78FBEE789A932E69C88E5898D';
476   l_input_names_tab(149) := 'SAN_GEP_ERN_KIND_2MTH_AGO';
477 
478   l_jp_input_names_tab(150) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE78FBEE789A933E69C88E5898D';
479   l_input_names_tab(150) := 'SAN_GEP_ERN_KIND_3MTH_AGO';
480 
481   l_jp_input_names_tab(151) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE694AFE68995E59FBAE7A48EE697A5E695B0';
482   l_input_names_tab(151) := 'SAN_GEP_PAY_BASE_DAYS';
483 
484   l_jp_input_names_tab(152) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE694AFE68995E59FBAE7A48EE697A5E695B031E69C88E5898D';
485   l_input_names_tab(152) := 'SAN_GEP_PAY_BASE_DAYS_1MTH_AGO';
486 
487   l_jp_input_names_tab(153) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE694AFE68995E59FBAE7A48EE697A5E695B032E69C88E5898D';
488   l_input_names_tab(153) := 'SAN_GEP_PAY_BASE_DAYS_2MTH_AGO';
489 
490   l_jp_input_names_tab(154) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE694AFE68995E59FBAE7A48EE697A5E695B033E69C88E5898D';
491   l_input_names_tab(154) := 'SAN_GEP_PAY_BASE_DAYS_3MTH_AGO';
492 
493   l_jp_input_names_tab(155) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE4BFAEE6ADA3E5B9B3E59D87E588A4E588A5';
494   l_input_names_tab(155) := 'SAN_GEP_CORRECT_AVG_FLAG';
495 
496   l_jp_input_names_tab(156) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE789B9E588A5E8B39EE4B88EE98791E98AAD';
497   l_input_names_tab(156) := 'SAN_GEP_SPB_ERN_MONEY';
498 
499   l_jp_input_names_tab(157) := 'E7AE97E5AE9AE69C88E5A489EFBCBFE789B9E588A5E8B39EE4B88EE78FBEE789A9';
500   l_input_names_tab(157) := 'SAN_GEP_SPB_ERN_KIND';
501 
502   l_jp_input_names_tab(158) := 'E5B882E58CBAE794BAE69D91E382B3E383BCE38389';
503   l_input_names_tab(158) := 'MUNICIPAL_CODE';
504 
505   l_jp_input_names_tab(159) := 'E5B882E58CBAE794BAE69D91E7A88EE9A18D';
506   l_input_names_tab(159) := 'MUNICIPAL_TAX';
507 
508   l_jp_input_names_tab(160) := 'E694AFE7B5A6E8AAB2E7A88EE9A18D';
509   l_input_names_tab(160) := 'TXBL_ERN';
510 
511   l_jp_input_names_tab(161) := 'E694AFE7B5A6E9A18D';
512   l_input_names_tab(161) := 'ERN';
513 
514   l_jp_input_names_tab(162) := 'E694AFE7B5A6E9A18DE59088E8A888';
515   l_input_names_tab(162) := 'ERN_SUM';
516 
517   l_jp_input_names_tab(163) := 'E694AFE68995E59FBAE7A48EE697A5E695B031E69C88E5898D';
518   l_input_names_tab(163) := 'PAY_BASE_DAYS_1MTH_AGO';
519 
520   l_jp_input_names_tab(164) := 'E694AFE68995E59FBAE7A48EE697A5E695B032E69C88E5898D';
521   l_input_names_tab(164) := 'PAY_BASE_DAYS_2MTH_AGO';
522 
523   l_jp_input_names_tab(165) := 'E694AFE68995E59FBAE7A48EE697A5E695B033E69C88E5898D';
524   l_input_names_tab(165) := 'PAY_BASE_DAYS_3MTH_AGO';
525 
526   l_jp_input_names_tab(166) := 'E694AFE68995E59FBAE7A48EE697A5E695B034E69C88';
527   l_input_names_tab(166) := 'PAY_BASE_DAYS_APR';
528 
529   l_jp_input_names_tab(167) := 'E694AFE68995E59FBAE7A48EE697A5E695B035E69C88';
530   l_input_names_tab(167) := 'PAY_BASE_DAYS_MAY';
531 
532   l_jp_input_names_tab(168) := 'E694AFE68995E59FBAE7A48EE697A5E695B036E69C88';
533   l_input_names_tab(168) := 'PAY_BASE_DAYS_JUN';
534 
535   l_jp_input_names_tab(169) := 'E694AFE68995E59FBAE7A48EE697A5E695B037E69C88';
536   l_input_names_tab(169) := 'PAY_BASE_DAYS_JUL';
537 
538   l_jp_input_names_tab(170) := 'E694AFE68995E98791E9A18D';
539   l_input_names_tab(170) := 'PAY_AMT';
540 
541   l_jp_input_names_tab(171) := 'E694AFE68995E696B9E6B395';
542   l_input_names_tab(171) := 'PAY_METHOD';
543 
544   l_jp_input_names_tab(172) := 'E4BA8BE6A5ADE4B8BBE98080E881B7E69C88E58886E4BF9DE999BAE69699';
545   l_input_names_tab(172) := 'INS_PREM_ER_TRM';
546 
547   l_jp_input_names_tab(173) := 'E4BA8BE6A5ADE4B8BBE58886E4BF9DE999BAE69699';
548   l_input_names_tab(173) := 'WP_PREM_ER';
549 
550   l_jp_input_names_tab(174) := 'E4BA8BE794B1';
551   l_input_names_tab(174) := 'REASON';
552 
553   l_jp_input_names_tab(175) := 'E7A4BEE4BC9AE4BF9DE999BAE5AFBEE8B1A1E8B383E98791EFBCBFE98791E98AAD';
554   l_input_names_tab(175) := 'ERN_MONEY_SUBJ_SI';
555 
556   l_jp_input_names_tab(176) := 'E7A4BEE4BC9AE4BF9DE999BAE5AFBEE8B1A1E8B383E98791EFBCBFE78FBEE789A9';
557   l_input_names_tab(176) := 'ERN_KIND_SUBJ_SI';
558 
559   l_jp_input_names_tab(177) := 'E7A4BEE4BC9AE4BF9DE999BAE69699';
560   l_input_names_tab(177) := 'SI_PREM';
561 
562   l_jp_input_names_tab(178) := 'E7A4BEE4BC9AE4BF9DE999BAE69699E68EA7E999A4E5BE8CE381AEE98791E9A18D';
563   l_input_names_tab(178) := 'AMT_AFTER_SI_PREM_DCT';
564 
565   l_jp_input_names_tab(179) := 'E7A4BEE4BC9AE4BF9DE999BAE69699E7AD89E68EA7E999A4E9A18D';
566   l_input_names_tab(179) := 'SI_PREM_DCT';
567 
568   l_jp_input_names_tab(180) := 'E7A4BEE4BF9DE9968BE5A78BE69C88';
569   l_input_names_tab(180) := 'SI_START_MTH';
570 
571   l_jp_input_names_tab(181) := 'E7A4BEE4BF9DE78FBEE789A9E58886E5AFBEE8B1A1E9A18D';
572   l_input_names_tab(181) := 'ERN_KIND_SUBJ_SI';
573 
574   l_jp_input_names_tab(182) := 'E7A4BEE4BF9DE78FBEE789A9E58886E5AFBEE8B1A1E9A18DE3839EE382A4E3838AE382B9E8AABFE695B4';
575   l_input_names_tab(182) := 'ERN_KIND_SUBJ_SI_NEGATIVE_ADJ';
576 
577   l_jp_input_names_tab(183) := 'E7A4BEE4BF9DE59BBAE5AE9AE79A84E8B383E98791';
578   l_input_names_tab(183) := 'SI_FIXED_WAGE';
579 
580   l_jp_input_names_tab(184) := 'E7A4BEE4BF9DE5AFBEE8B1A1E9A18D';
581   l_input_names_tab(184) := 'ERN_SUBJ_SI';
582 
583   l_jp_input_names_tab(185) := 'E7A4BEE4BF9DE5AFBEE8B1A1E9A18DE3839EE382A4E3838AE382B9E8AABFE695B4';
584   l_input_names_tab(185) := 'ERN_SUBJ_SI_NEGATIVE_ADJ';
585 
586   l_jp_input_names_tab(186) := 'E8BB8AE4B8A1E68385E5A0B1';
587   l_input_names_tab(186) := 'VEHICLE_INFO';
588 
589   l_jp_input_names_tab(187) := 'E58F96E5BE97E58CBAE58886';
590   l_input_names_tab(187) := 'QUALIFY_TYPE';
591 
592   l_jp_input_names_tab(188) := 'E58F96E5BE97E4BA8BE794B1';
593   l_input_names_tab(188) := 'QUALIFY_REASON';
594 
595   l_jp_input_names_tab(189) := 'E58F96E5BE97E697A5';
596   l_input_names_tab(189) := 'QUALIFY_DATE';
597 
598   l_jp_input_names_tab(190) := 'E58F96E5BE97E5A489E69BB4E58CBAE58886';
599   l_input_names_tab(190) := 'QUALIFY_CHANGE_TYPE';
600 
601   l_jp_input_names_tab(191) := 'E7A8AEE588A5';
602   l_input_names_tab(191) := 'SI_SEX';
603 
604   l_jp_input_names_tab(192) := 'E4BFAEE6ADA3E5B9B3E59D87';
605   l_input_names_tab(192) := 'CORRECT_AVG';
606 
607   l_jp_input_names_tab(193) := 'E4BFAEE6ADA3E5B9B3E59D87E794A8E8AABFE695B4E9A18D';
608   l_input_names_tab(193) := 'CORRECT_AVG_ADJ';
609 
610   l_jp_input_names_tab(194) := 'E7B582E4BA86E697A5';
611   l_input_names_tab(194) := 'END_DATE';
612 
613   l_jp_input_names_tab(195) := 'E4BD8FE5AE85E68EA7E999A4E9A18D';
614   l_input_names_tab(195) := 'HOUSING_LOAN_TAX_CREDIT';
615 
616   l_jp_input_names_tab(196) := 'E4BD8FE5AE85E68EA7E999A4E5AE9FE68EA7E999A4E9A18D';
617   l_input_names_tab(196) := 'ACTUAL_HOUSING_LOAN_TAX_CREDIT';
618 
619   l_jp_input_names_tab(197) := 'E4BD8FE6B091E7A88EE9A18D';
620   l_input_names_tab(197) := 'LTX';
621 
622   l_jp_input_names_tab(198) := 'E4BD8FE6B091E7A88EE9A18DEFBCBFE4B880E68BACE5BEB4E58F8E';
623   l_input_names_tab(198) := 'LTX_LUMP_SUM_WITHHOLD';
624 
625   l_jp_input_names_tab(199) := 'E4BD8FE6B091E7A88EE9A18DEFBCBFE789B9E588A5E5BEB4E58F8EEFBCBFE5B882E58CBAE794BAE69D91';
626   l_input_names_tab(199) := 'LTX_SP_WITHHOLD_MUNICIPALITY';
627 
628   l_jp_input_names_tab(200) := 'E4BD8FE6B091E7A88EE9A18DEFBCBFE789B9E588A5E5BEB4E58F8EEFBCBFE7A88EE9A18D';
629   l_input_names_tab(200) := 'LTX_SP_WITHHOLD_TAX';
630 
631   l_jp_input_names_tab(201) := 'E4BD8FE6B091E7A88EE9A18DEFBCBFE789B9E588A5E5BEB4E58F8EEFBCBFE98080E881B7E68980E5BE97';
632   l_input_names_tab(201) := 'LTX_SP_WITHHOLD_TRM_INCOME';
633 
634   l_jp_input_names_tab(202) := 'E4BD8FE6B091E7A88EE9A18DEFBCBFE789B9E588A5E5BEB4E58F8EEFBCBFE983BDE98193E5BA9CE79C8C';
635   l_input_names_tab(202) := 'LTX_SP_WITHHOLD_PREFECTURE';
636 
637   l_jp_input_names_tab(203) := 'E5BE93E5898DE6A899E6BA96E5A0B1E985ACE69C88E9A18D';
638   l_input_names_tab(203) := 'PRIOR_SMR';
639 
640   l_jp_input_names_tab(204) := 'E5BE93E5898DE5A0B1E985AC';
641   l_input_names_tab(204) := 'PRIOR_MR';
642 
643   l_jp_input_names_tab(205) := 'E587BAE799BAE59CB0';
644   l_input_names_tab(205) := 'DEPARTURE_PLACE';
645 
646   l_jp_input_names_tab(206) := 'E587A6E79086';
647   l_input_names_tab(206) := 'PROCESS_FLAG';
648 
649   l_jp_input_names_tab(207) := 'E5889DE59B9EE381AEE694AFE68995E69C88';
650   l_input_names_tab(207) := 'FIRST_PAY_MTH';
651 
652   l_jp_input_names_tab(208) := 'E5889DE59B9EE381AEE7A88EE9A18D';
653   l_input_names_tab(208) := 'FIRST_TAX';
654 
655   l_jp_input_names_tab(209) := 'E68980E59CA8E59CB0';
656   l_input_names_tab(209) := 'LOCATED_PLACE';
657 
658   l_jp_input_names_tab(210) := 'E68980E59CA8E59CB0EFBCBFE382ABE3838A';
659   l_input_names_tab(210) := 'LOCATED_PLACE_KANA';
660 
661   l_jp_input_names_tab(211) := 'E68980E5BE97E68EA7E999A4E9A18D';
662   l_input_names_tab(211) := 'INCOME_EXM';
663 
664   l_jp_input_names_tab(212) := 'E68980E5BE97E7A88E';
665   l_input_names_tab(212) := 'ITX';
666 
667   l_jp_input_names_tab(213) := 'E68980E5BE97E7A88EE9A18D';
668   l_input_names_tab(213) := 'ITX';
669 
670   l_jp_input_names_tab(214) := 'E68980E5BE97E7A88EE794A8E8A888E7AE97E59FBAE7A48EE697A5E695B0';
671   l_input_names_tab(214) := 'ITX_CALC_BASE_DAYS';
672 
673   l_jp_input_names_tab(215) := 'E5B08FE8A68FE6A8A1E4BC81E6A5ADE585B1E6B888E7AD89E68E9BE98791';
674   l_input_names_tab(215) := 'SMALL_COMPANY_MUTUAL_AID_PREM';
675 
676   l_jp_input_names_tab(216) := 'E69887E7B5A6E69C88';
677   l_input_names_tab(216) := 'SAL_RAISE_MTH';
678 
679   l_jp_input_names_tab(217) := 'E69887E7B5A6E5B7AEE69C88E9A18D';
680   l_input_names_tab(217) := 'MTHLY_SAL_RAISE_DIFF';
681 
682   l_jp_input_names_tab(218) := 'E4B88AE69BB8E3818D';
683   l_input_names_tab(218) := 'OVERRIDE_FLAG';
684 
685   l_jp_input_names_tab(219) := 'E794B3E5918AE69BB8E68F90E587BA';
686   l_input_names_tab(219) := 'SUBMIT_FLAG';
687 
688   l_jp_input_names_tab(220) := 'E794B3E5918AE58886E7A4BEE4BC9AE4BF9DE999BAE69699';
689   l_input_names_tab(220) := 'DECLARE_SI_PREM';
690 
691   l_jp_input_names_tab(221) := 'E794B3E5918AE58886E5B08FE8A68FE6A8A1E4BC81E6A5ADE585B1E6B888E7AD89E68E9BE98791';
692   l_input_names_tab(221) := 'DECLARE_SMALL_COMPANY_MUTUAL_AID_PREM';
693 
694   l_jp_input_names_tab(222) := 'E7949FE591BDE4BF9DE999BAE69699E68EA7E999A4E9A18D';
695   l_input_names_tab(222) := 'LIFE_INS_PREM_EXM';
696 
697   l_jp_input_names_tab(223) := 'E7A88EE9A18DE8A1A8E58CBAE58886';
698   l_input_names_tab(223) := 'ITX_TYPE';
699 
700   l_jp_input_names_tab(224) := 'E7A88EE78CB6E4BA88E589B2E59088';
701   l_input_names_tab(224) := 'ITX_GRACE_RATE';
702 
703   l_jp_input_names_tab(225) := 'E7A88EE78E87E7AD89';
704   l_input_names_tab(225) := 'ITX_RATE';
705 
706   l_jp_input_names_tab(226) := 'E888B9E4BF9DE6898BE5B8B3E8AAB2E68980E7ACA6E58FB7';
707   l_input_names_tab(226) := 'SAILOR_INS_BOOK_OFFICE_NUM';
708 
709   l_jp_input_names_tab(227) := 'E888B9E4BF9DE6898BE5B8B3E8A2ABE4BF9DE999BAE88085E795AAE58FB7';
710   l_input_names_tab(227) := 'SAILOR_INS_BOOK_NUM';
711 
712   l_jp_input_names_tab(228) := 'E5898DE881B7E68385E5A0B1EFBCBFE7B5A6E4B88EE68980E5BE97E9A18D';
713   l_input_names_tab(228) := 'PREV_EMP_INCOME';
714 
715   l_jp_input_names_tab(229) := 'E5898DE881B7E68385E5A0B1EFBCBFE7A4BEE4BC9AE4BF9DE999BAE69699';
716   l_input_names_tab(229) := 'PREV_EMP_SI_PREM';
717 
718   l_jp_input_names_tab(230) := 'E5898DE881B7E68385E5A0B1EFBCBFE68980E5BE97E7A88EE9A18D';
719   l_input_names_tab(230) := 'PREV_EMP_ITX';
720 
721   l_jp_input_names_tab(231) := 'E5898DE881B7E68385E5A0B1EFBCBFE5B08FE8A68FE6A8A1E4BC81E6A5ADE585B1E6B888E7AD89E68E9BE98791';
722   l_input_names_tab(231) := 'PREV_EMP_SMALL_COMPANY_MUTUAL_AID_PREM';
723 
724   l_jp_input_names_tab(232) := 'E5898DE881B7E58886E7B5A6E4B88EE68980E5BE97';
725   l_input_names_tab(232) := 'PREV_EMP_INCOME';
726 
727   l_jp_input_names_tab(233) := 'E5898DE881B7E58886E7A4BEE4BC9AE4BF9DE999BAE69699';
728   l_input_names_tab(233) := 'PREV_EMP_SI_PREM';
729 
730   l_jp_input_names_tab(234) := 'E5898DE881B7E58886E68980E5BE97E7A88E';
731   l_input_names_tab(234) := 'PREV_EMP_ITX';
732 
733   l_jp_input_names_tab(235) := 'E5898DE881B7E58886E5B08FE8A68FE6A8A1E4BC81E6A5ADE585B1E6B888E7AD89E68E9BE98791';
734   l_input_names_tab(235) := 'PREV_EMP_SMALL_COMPANY_MUTUAL_AID_PREM';
735 
736   l_jp_input_names_tab(236) := 'E585A8E4BD93E58886E4BF9DE999BAE69699';
737   l_input_names_tab(236) := 'INS_PREM';
738 
739   l_jp_input_names_tab(237) := 'E981A1E58F8AE694AFE68995E9A18D';
740   l_input_names_tab(237) := 'RETRO_PAY';
741 
742   l_jp_input_names_tab(238) := 'E981A1E58F8AE694AFE68995E9A18DE4B88AE69BB8E3818D';
743   l_input_names_tab(238) := 'RETRO_PAY_OVERRIDE_FLAG';
744 
745   l_jp_input_names_tab(239) := 'E981A1E58F8AE694AFE68995E9A18DE8AABFE695B4';
746   l_input_names_tab(239) := 'RETRO_PAY_ADJ';
747 
748   l_jp_input_names_tab(240) := 'E596AAE5A4B1E58E9FE59BA0';
749   l_input_names_tab(240) := 'DISQUALIFY_CAUSE';
750 
751   l_jp_input_names_tab(241) := 'E596AAE5A4B1E4BA8BE794B1';
752   l_input_names_tab(241) := 'DISQUALIFY_REASON';
753 
754   l_jp_input_names_tab(242) := 'E596AAE5A4B1E697A5';
755   l_input_names_tab(242) := 'DISQUALIFY_DATE';
756 
757   l_jp_input_names_tab(243) := 'E7B78FE8A888';
758   l_input_names_tab(243) := 'TOTAL';
759 
760   l_jp_input_names_tab(244) := 'E6908DE5AEB3E4BF9DE999BAE69699E68EA7E999A4E9A18D';
761   l_input_names_tab(244) := 'NONLIFE_INS_PREM_EXM';
762 
763   l_jp_input_names_tab(245) := 'E5AFBEE8B1A1E58CBAE58886';
764   l_input_names_tab(245) := 'INCLUDE_FLAG';
765 
766   l_jp_input_names_tab(246) := 'E5AFBEE8B1A1E58CBAE5888631E69C88E5898D';
767   l_input_names_tab(246) := 'INCLUDE_FLAG_1MTH_AGO';
768 
769   l_jp_input_names_tab(247) := 'E5AFBEE8B1A1E58CBAE5888632E69C88E5898D';
770   l_input_names_tab(247) := 'INCLUDE_FLAG_2MTH_AGO';
771 
772   l_jp_input_names_tab(248) := 'E5AFBEE8B1A1E58CBAE5888633E69C88E5898D';
773   l_input_names_tab(248) := 'INCLUDE_FLAG_3MTH_AGO';
774 
775   l_jp_input_names_tab(249) := 'E5AFBEE8B1A1E58CBAE5888634E69C88';
776   l_input_names_tab(249) := 'INCLUDE_FLAG_APR';
777 
778   l_jp_input_names_tab(250) := 'E5AFBEE8B1A1E58CBAE5888635E69C88';
779   l_input_names_tab(250) := 'INCLUDE_FLAG_MAY';
780 
781   l_jp_input_names_tab(251) := 'E5AFBEE8B1A1E58CBAE5888636E69C88';
782   l_input_names_tab(251) := 'INCLUDE_FLAG_JUN';
783 
784   l_jp_input_names_tab(252) := 'E5AFBEE8B1A1E58CBAE5888637E69C88';
785   l_input_names_tab(252) := 'INCLUDE_FLAG_JUL';
786 
787   l_jp_input_names_tab(253) := 'E5AFBEE8B1A1E88085E58CBAE58886';
788   l_input_names_tab(253) := 'INCLUDE_FLAG';
789 
790   l_jp_input_names_tab(254) := 'E5AFBEE8B1A1E88085E588A4E588A5';
791   l_input_names_tab(254) := 'INCLUDE_FLAG';
792 
793   l_jp_input_names_tab(255) := 'E98080E881B7E68980E5BE97';
794   l_input_names_tab(255) := 'TRM_INCOME';
795 
796   l_jp_input_names_tab(256) := 'E98080E881B7E697A5';
797   l_input_names_tab(256) := 'TRM_DATE';
798 
799   l_jp_input_names_tab(257) := 'E58D98E7B494E5B9B3E59D87';
800   l_input_names_tab(257) := 'SIMPLE_AVG';
801 
802   l_jp_input_names_tab(258) := 'E79FADE69C9FE6908DE5AEB3E4BF9DE999BAE69699';
803   l_input_names_tab(258) := 'SHORT_TERM_NONLIFE_INS_PREM';
804 
805   l_jp_input_names_tab(259) := 'E79FADE69982E99693E58AB4E5838DE88085';
806   l_input_names_tab(259) := 'SHORT_TIME_WORKER_FLAG';
807 
808   l_jp_input_names_tab(260) := 'E9A790E8BB8AE5A0B4E4BBA3E7AD89';
809   l_input_names_tab(260) := 'PARKING_FEE';
810 
811   l_jp_input_names_tab(261) := 'E5BEB4E58F8EE7BEA9E58B99E88085';
812   l_input_names_tab(261) := 'WITHHOLD_AGENT';
813 
814   l_jp_input_names_tab(262) := 'E5BEB4E58F8EE6B888E68980E5BE97E7A88E';
815   l_input_names_tab(262) := 'WITHHOLD_ITX';
816 
817   l_jp_input_names_tab(263) := 'E5BEB4E58F8EE7A88EE9A18D';
818   l_input_names_tab(263) := 'ITX';
819 
820   l_jp_input_names_tab(264) := 'E5BEB4E58F8EE78CB6E4BA88E7A88EE9A18D';
821   l_input_names_tab(264) := 'GRACE_ITX';
822 
823   l_jp_input_names_tab(265) := 'E8AABFE695B4E58886E7B5A6E4B88EE68980E5BE97';
824   l_input_names_tab(265) := 'ADJ_EMP_INCOME';
825 
826   l_jp_input_names_tab(266) := 'E8AABFE695B4E58886E7A4BEE4BC9AE4BF9DE999BAE69699';
827   l_input_names_tab(266) := 'ADJ_SI_PREM';
828 
829   l_jp_input_names_tab(267) := 'E8AABFE695B4E58886E68980E5BE97E7A88E';
830   l_input_names_tab(267) := 'ADJ_ITX';
831 
832   l_jp_input_names_tab(268) := 'E8AABFE695B4E58886E5B08FE8A68FE6A8A1E4BC81E6A5ADE585B1E6B888E7AD89E68E9BE98791';
833   l_input_names_tab(268) := 'ADJ_SMALL_COMPANY_MUTUAL_AID_PREM';
834 
835   l_jp_input_names_tab(269) := 'E995B7E69C9FE6908DE5AEB3E4BF9DE999BAE69699';
836   l_input_names_tab(269) := 'LONG_TERM_NONLIFE_INS_PREM';
837 
838   l_jp_input_names_tab(270) := 'E9809AE58BA4E6898BE6AEB5';
839   l_input_names_tab(270) := 'COMMUTING_METHOD';
840 
841   l_jp_input_names_tab(271) := 'E69198E8A681E6AC84';
842   l_input_names_tab(271) := 'DESC_FIELD';
843 
844   l_jp_input_names_tab(272) := 'E69198E8A681E6AC8432';
845   l_input_names_tab(272) := 'DESC_FIELD2';
846 
847   l_jp_input_names_tab(273) := 'E69198E8A681E6AC8433';
848   l_input_names_tab(273) := 'DESC_FIELD3';
849 
850   l_jp_input_names_tab(274) := 'E69198E8A681E6AC8434';
851   l_input_names_tab(274) := 'DESC_FIELD4';
852 
853   l_jp_input_names_tab(275) := 'E69198E8A681E6AC8435';
854   l_input_names_tab(275) := 'DESC_FIELD5';
855 
856   l_jp_input_names_tab(276) := 'E981A9E794A8E58CBAE58886';
857   l_input_names_tab(276) := 'APPLY_TYPE';
858 
859   l_jp_input_names_tab(277) := 'E981A9E794A8E69C88';
860   l_input_names_tab(277) := 'APPLY_MTH';
861 
862   l_jp_input_names_tab(278) := 'E981A9E794A8E999A4E5A496';
863   l_input_names_tab(278) := 'EXCLUDE_FLAG';
864 
865   l_jp_input_names_tab(279) := 'E983BDE98193E5BA9CE79C8CE7A88EE9A18D';
866   l_input_names_tab(279) := 'PREFECTURAL_TAX';
867 
868   l_jp_input_names_tab(280) := 'E588B0E79D80E59CB0';
869   l_input_names_tab(280) := 'ARRIVAL_PLACE';
870 
871   l_jp_input_names_tab(281) := 'E5908CE5B185E789B9E588A5E99A9CE5AEB3E88085';
872   l_input_names_tab(281) := 'NUM_OF_SEV_DISABLED_LT';
873 
874   l_jp_input_names_tab(282) := 'E5908CE5B185E789B9E588A5E99A9CE5AEB3E88085E68EA7E999A4E9A18D';
875   l_input_names_tab(282) := 'SEV_DISABLED_LT_EXM';
876 
877   l_jp_input_names_tab(283) := 'E5908CE5B185E88081E8A6AAE7AD89';
878   l_input_names_tab(283) := 'NUM_OF_ELDER_PARENT_LT';
879 
880   l_jp_input_names_tab(284) := 'E5908CE5B185E88081E8A6AAE7AD89E68EA7E999A4E9A18D';
881   l_input_names_tab(284) := 'ELDER_PARENT_LT_EXM';
882 
883   l_jp_input_names_tab(285) := 'E789B9E5AE9AE689B6E9A48AE68EA7E999A4E9A18D';
884   l_input_names_tab(285) := 'SPECIFIC_DEP_EXM';
885 
886   l_jp_input_names_tab(286) := 'E789B9E5AE9AE689B6E9A48AE8A6AAE6978F';
887   l_input_names_tab(286) := 'NUM_OF_SPECIFIC_DEP';
888 
889   l_jp_input_names_tab(287) := 'E789B9E588A5E381AEE5AFA1E5A9A6E68EA7E999A4E9A18D';
890   l_input_names_tab(287) := 'SP_WIDOW_EXM';
891 
892   l_jp_input_names_tab(288) := 'E789B9E588A5E99A9CE5AEB3E88085';
893   l_input_names_tab(288) := 'NUM_OF_SEV_DISABLED';
894 
895   l_jp_input_names_tab(289) := 'E789B9E588A5E99A9CE5AEB3E88085E68EA7E999A4E9A18D';
896   l_input_names_tab(289) := 'SEV_DISABLED_EXM';
897 
898   l_jp_input_names_tab(290) := 'E789B9E588A5E5BEB4E58F8EE58CBAE58886';
899   l_input_names_tab(290) := 'SP_WITHHOLD_TYPE';
900 
901   l_jp_input_names_tab(291) := 'E789B9E588A5E4BF9DE999BAE69699E5AFBEE8B1A1E9A18D';
902   l_input_names_tab(291) := 'AMT_SUBJ_SPECIAL_INS_PREM';
903 
904   l_jp_input_names_tab(292) := 'E5B9B4E5B091E689B6E9A48AE68EA7E999A4E9A18D';
905   l_input_names_tab(292) := 'JUNIOR_DEP_EXM';
906 
907   l_jp_input_names_tab(293) := 'E5B9B4E5B091E689B6E9A48AE8A6AAE6978F';
908   l_input_names_tab(293) := 'NUM_OF_JUNIOR_DEP';
909 
910   l_jp_input_names_tab(294) := 'E5B9B4E7A88EE9A18D';
911   l_input_names_tab(294) := 'ANNUAL_TAX';
912 
913   l_jp_input_names_tab(295) := 'E5B9B4E8AABFE5AFBEE8B1A1E58CBAE58886';
914   l_input_names_tab(295) := 'YEA_TYPE';
915 
916   l_jp_input_names_tab(296) := 'E5B9B4E8AABFE5AE9AE78E87E68EA7E999A4E9A18D';
917   l_input_names_tab(296) := 'YEA_PROPORTIONAL_DCT';
918 
919   l_jp_input_names_tab(297) := 'E5B9B4E8AABFE5B9B4E7A88EE9A18D';
920   l_input_names_tab(297) := 'YEA_ANNUAL_TAX';
921 
922   l_jp_input_names_tab(298) := 'E78783E8B2BB';
923   l_input_names_tab(298) := 'FUEL_COST';
924 
925   l_jp_input_names_tab(299) := 'E9858DE581B6E88085E381AEE59088E8A888E68980E5BE97';
926   l_input_names_tab(299) := 'SPOUSE_INCOME';
927 
928   l_jp_input_names_tab(300) := 'E9858DE581B6E88085E381AEE5B9B4E99693E58F8EE585A5';
929   l_input_names_tab(300) := 'SPOUSE_ANNUAL_INCOME';
930 
931   l_jp_input_names_tab(301) := 'E9858DE581B6E88085E58CBAE58886';
932   l_input_names_tab(301) := 'SPOUSE_TYPE';
933 
934   l_jp_input_names_tab(302) := 'E9858DE581B6E88085E99A9CE5AEB3E58CBAE58886';
935   l_input_names_tab(302) := 'SPOUSE_DISABLE_TYPE';
936 
937   l_jp_input_names_tab(303) := 'E9858DE581B6E88085E789B9E588A5E68EA7E999A4E9A18D';
938   l_input_names_tab(303) := 'SPOUSE_SP_EXM';
939 
940   l_jp_input_names_tab(304) := 'E9858DE581B6E88085E789B9E588A5E68EA7E999A4E5AFBEE8B1A1E5A496';
941   l_input_names_tab(304) := 'SPOUSE_SP_EXM_EXCLUDE_FLAG';
942 
943   l_jp_input_names_tab(305) := 'E8A2ABE689B6E9A48AE88085E69C89';
944   l_input_names_tab(305) := 'DEP_EXIST_FLAG';
945 
946   l_jp_input_names_tab(306) := 'E8A2ABE4BF9DE999BAE88085E381AEE5B9B4E99693E58F8EE585A5';
947   l_input_names_tab(306) := 'ANNUAL_INCOME';
948 
949   l_jp_input_names_tab(307) := 'E8A2ABE4BF9DE999BAE88085E98080E881B7E69C88E58886E4BF9DE999BAE69699';
950   l_input_names_tab(307) := 'INS_PREM_EE_TRM';
951 
952   l_jp_input_names_tab(308) := 'E8A2ABE4BF9DE999BAE88085E58886E4BF9DE999BAE69699';
953   l_input_names_tab(308) := 'WP_PREM_EE';
954 
955   l_jp_input_names_tab(309) := 'E99D9EE8AAB2E7A88EE5AFBEE8B1A1E9A18D';
956   l_input_names_tab(309) := 'NTXBL_ERN';
957 
958   l_jp_input_names_tab(310) := 'E99D9EE5B185E4BD8FE88085';
959   l_input_names_tab(310) := 'NRES_FLAG';
960 
961   l_jp_input_names_tab(311) := 'E99D9EE5B185E4BD8FE88085EFBCBFE78FBEE789A9E8AAB2E7A88EE9A18D';
962   l_input_names_tab(311) := 'TXBL_ERN_KIND_NRES';
963 
964   l_jp_input_names_tab(312) := 'E99D9EE5B185E4BD8FE88085EFBCBFE694AFE7B5A6E8AAB2E7A88EE9A18D';
965   l_input_names_tab(312) := 'TXBL_ERN_MONEY_NRES';
966 
967   l_jp_input_names_tab(313) := 'E99D9EE5B185E4BD8FE88085E381A8E381AAE381A3E3819FE697A5';
968   l_input_names_tab(313) := 'NRES_START_DATE';
969 
970   l_jp_input_names_tab(314) := 'E99D9EE5B185E4BD8FE88085E8AAB2E7A88EE5AFBEE8B1A1E9A18D';
971   l_input_names_tab(314) := 'TXBL_ERN_MONEY_NRES';
972 
973   l_jp_input_names_tab(315) := 'E99D9EE5B185E4BD8FE88085E78FBEE789A9E58886E8AAB2E7A88EE5AFBEE8B1A1E9A18D';
974   l_input_names_tab(315) := 'TXBL_ERN_KIND_NRES';
975 
976   l_jp_input_names_tab(316) := 'E58299E88083';
977   l_input_names_tab(316) := 'RMKS';
978 
979   l_jp_input_names_tab(317) := 'E6A899E6BA96E8B39EE4B88EE9A18D';
980   l_input_names_tab(317) := 'STD_BON';
981 
982   l_jp_input_names_tab(318) := 'E689B6E9A48AE8A6AAE6978F';
983   l_input_names_tab(318) := 'NUM_OF_DEP';
984 
985   l_jp_input_names_tab(319) := 'E588A5E587BAE58A9B';
986   l_input_names_tab(319) := 'OUTPUT_FLAG';
987 
988   l_jp_input_names_tab(320) := 'E5A489E69BB4E4BA8BE794B1';
989   l_input_names_tab(320) := 'CHANGE_REASON';
990 
991   l_jp_input_names_tab(321) := 'E5A489E69BB4E5B9B4E69C88E697A5';
992   l_input_names_tab(321) := 'CHANGE_DATE';
993 
994   l_jp_input_names_tab(322) := 'E4BF9DE999BAE69699';
995   l_input_names_tab(322) := 'INS_PREM';
996 
997   l_jp_input_names_tab(323) := 'E4BF9DE999BAE69699E5AFBEE8B1A1E9A18D';
998   l_input_names_tab(323) := 'ERN_SUBJ_SI';
999 
1000   l_jp_input_names_tab(324) := 'E69CACE4BABAE99A9CE5AEB3E58CBAE58886';
1001   l_input_names_tab(324) := 'DISABLE_TYPE';
1002 
1003   l_jp_input_names_tab(325) := 'E5908DE7A7B0';
1004   l_input_names_tab(325) := 'NAME';
1005 
1006   l_jp_input_names_tab(326) := 'E5908DE7A7B0EFBCBFE382ABE3838A';
1007   l_input_names_tab(326) := 'NAME_KANA';
1008 
1009   l_jp_input_names_tab(327) := 'E99BA2E881B7E7A5A8E4BAA4E4BB98E5B88CE69C9B';
1010   l_input_names_tab(327) := 'TRM_REPORT_OUTPUT_FLAG';
1011 
1012   l_jp_input_names_tab(328) := 'E58AB4E781BDE58AA0E585A5E58CBAE58886';
1013   l_input_names_tab(328) := 'WAI_TYPE';
1014 
1015   l_jp_input_names_tab(329) := 'E58AB4E781BDE4BA8BE6A5ADE4B8BB';
1016   l_input_names_tab(329) := 'WAI_LOCATION';
1017 
1018   l_jp_input_names_tab(330) := 'E58AB4E781BDE4BF9DE999BAE5AFBEE8B1A1E8B383E98791';
1019   l_input_names_tab(330) := 'ERN_SUBJ_WAI';
1020 
1021   l_jp_input_names_tab(331) := 'E88081E4BABAE68EA7E999A4E5AFBEE8B1A1E9858DE581B6E88085E68EA7E999A4E9A18D';
1022   l_input_names_tab(331) := 'ELDER_SPOUSE_EXM';
1023 
1024   l_jp_input_names_tab(332) := 'E88081E4BABAE689B6E9A48AE68EA7E999A4E9A18D';
1025   l_input_names_tab(332) := 'ELDER_DEP_EXM';
1026 
1027   l_jp_input_names_tab(333) := 'E88081E4BABAE689B6E9A48AE8A6AAE6978F';
1028   l_input_names_tab(333) := 'NUM_OF_ELDER_DEP';
1029 
1030   l_jp_input_names_tab(334) := 'E88081E5B9B4E88085E58CBAE58886';
1031   l_input_names_tab(334) := 'ELDER_TYPE';
1032 
1033   l_jp_input_names_tab(335) := 'E88081E5B9B4E88085E68EA7E999A4E9A18D';
1034   l_input_names_tab(335) := 'ELDER_EXM';
1035 
1036 
1037   l_jp_input_names_tab(336) := '47656E6572616C204C69666520496E73205072656D';
1038   l_input_names_tab(336) := 'GEN_LIFE_INS_PREM';
1039 
1040   l_jp_input_names_tab(337) := '496E646976696475616C2050656E73205072656D';
1041   l_input_names_tab(337) := 'INDIVIDUAL_PENSION_PREM';
1042 
1043   l_jp_input_names_tab(338) := '4C6F6E67205465726D204E6F6E6C69666520496E73205072656D';
1044   l_input_names_tab(338) := 'LONG_TERM_NONLIFE_INS_PREM';
1045 
1046   l_jp_input_names_tab(339) := '53686F7274205465726D204E6F6E6C69666520496E73205072656D';
1047   l_input_names_tab(339) := 'SHORT_TERM_NONLIFE_INS_PREM';
1048 
1049   -- bug.5914738. Earthquake Insurance Premium input values
1050   l_jp_input_names_tab(340) := 'E59CB0E99C87E4BF9DE999BAE69699';
1051   l_input_names_tab(340) := 'EARTHQUAKE_INS_PREM';
1052 
1053   l_jp_input_names_tab(341) := '45617274687175616B6520496E73205072656D';
1054   l_input_names_tab(341) := 'EARTHQUAKE_INS_PREM';
1055 
1056   l_jp_input_names_tab(342) := 'E7B5A6E4B88EE68EA7E999A4E59CB0E99C87E4BF9DE999BAE69699';
1057   l_input_names_tab(342) := 'SAL_DCT_EARTHQUAKE_INS_PREM';
1058 
1059   l_jp_input_names_tab(343) := 'E8AABFE695B4E6A899E6BA96E8B39EE4B88EE9A18D';
1060   l_input_names_tab(343) := 'STD_BON_ADJ';
1061 
1062   l_jp_input_names_tab(344) := 'E5B9B4E99693E6A899E6BA96E8B39EE4B88EE9A18D';
1063   l_input_names_tab(344) := 'ANNUAL_STD_BON';
1064 
1065   l_jp_input_names_tab(345) := 'E4B880E888ACE7949FE591BDE4BF9DE999BAE69699EFBCBF32303132E5B9B4E4BBA5E9998D';
1066   l_input_names_tab(345) := 'GEN_LIFE_INS_PREM_2012';
1067 
1068   l_jp_input_names_tab(346) := 'E4BB8BE8ADB7E58CBBE79982E4BF9DE999BAE69699EFBCBF32303132E5B9B4E4BBA5E9998D';
1069   l_input_names_tab(346) := 'CARE_MED_INS_PREM_2012';
1070 
1071   l_jp_input_names_tab(347) := 'E5808BE4BABAE5B9B4E98791E4BF9DE999BAE69699EFBCBF32303132E5B9B4E4BBA5E9998D';
1072   l_input_names_tab(347) := 'INDIVIDUAL_PENSION_PREM_2012';
1073 
1074   l_jp_input_names_tab(348) := 'E7B5A6E4B88EE68EA7E999A4E7949FE591BDE4BF9DE999BAEFBCBF32303132E5B9B4E4BBA5E9998D';
1075   l_input_names_tab(348) := 'SAL_DCT_GEN_LIFE_INS_PREM_2012';
1076 
1077   l_jp_input_names_tab(349) := 'E7B5A6E4B88EE68EA7E999A4E4BB8BE8ADB7E4BF9DE999BAEFBCBF32303132E5B9B4E4BBA5E9998D';
1078   l_input_names_tab(349) := 'SAL_DCT_CARE_MED_INS_PREM_2012';
1079 
1080   l_jp_input_names_tab(350) := 'E7B5A6E4B88EE68EA7E999A4E5808BE4BABAE5B9B4E98791EFBCBF32303132E5B9B4E4BBA5E9998D';
1081   l_input_names_tab(350) := 'SAL_DCT_IND_PENSION_PREM_PREM_2012';
1082 
1083   hr_utility.set_location(l_proc, 20);
1084 
1085   if (g_dbg) then
1086     hr_utility.trace('| Input Value Count = ' || l_jp_input_names_tab.COUNT);
1087     hr_utility.trace('+--------------------------------------------+ ');
1088   end if;
1089 --
1090   -- update COM_LTX_LUMP_SUM_WITHHOLD_PROC elm from ITX to LTX for l_jp_input_names_tab(263) update
1091   UPDATE pay_input_values_f
1092   SET    name = 'LTX'
1093   WHERE  name LIKE hr_jp_standard_pkg.hextochar('E5BEB4E58F8EE7A88EE9A18D','AL32UTF8')
1094   AND    legislation_code = 'JP'
1095   AND    element_type_id IN (
1096            SELECT element_type_id
1097            FROM   pay_element_types_f
1098            WHERE  element_name LIKE hr_jp_standard_pkg.hextochar('E585B1EFBCBFE59FBAE69CACEFBCBFE4BD8FE6B091E7A88EEFBCBFE4B880E68BACE5BEB4E58F8E','AL32UTF8')
1099            AND    legislation_code = 'JP' );
1100 
1101   -- update BON_WP_PREM_PROC (, SAL_HI_PREM_PROC, BON_HI_PREM_PROC) elm from WP_PREM_ER to INS_PREM_ER for l_jp_input_names_tab(173) update
1102   -- however looks this is not required if l_jp_input_names_tab(173) update to INS_PREM_ER from first..but keep this for safe
1103   UPDATE pay_input_values_f
1104   SET    name = 'INS_PREM_ER'
1105   WHERE  name LIKE hr_jp_standard_pkg.hextochar('E4BA8BE6A5ADE4B8BBE58886E4BF9DE999BAE69699','AL32UTF8')
1106   AND    legislation_code = 'JP'
1107   AND    element_type_id IN (
1108            SELECT element_type_id
1109            FROM   pay_element_types_f
1110            WHERE  element_name IN
1111                     (hr_jp_standard_pkg.hextochar('E7B5A6EFBCBFE59FBAE69CACEFBCBFE581A5E4BF9DEFBCBFE4BF9DE999BAE69699','AL32UTF8'),
1112                     hr_jp_standard_pkg.hextochar('E8B39EEFBCBFE59FBAE69CACEFBCBFE581A5E4BF9DEFBCBFE4BF9DE999BAE69699','AL32UTF8'),
1113                     hr_jp_standard_pkg.hextochar('E8B39EEFBCBFE59FBAE69CACEFBCBFE58E9AE5B9B4EFBCBFE4BF9DE999BAE69699','AL32UTF8'))
1114            AND    legislation_code = 'JP' );
1115 
1116   -- update BON_WP_PREM_PROC (, SAL_HI_PREM_PROC, BON_HI_PREM_PROC) elm from WP_PREM_EE to INS_PREM_EE for l_jp_input_names_tab(308) update
1117   -- however looks this is not required if l_jp_input_names_tab(308) update to INS_PREM_EE from first..but keep this for safe
1118   UPDATE pay_input_values_f
1119   SET    name = 'INS_PREM_EE'
1120   WHERE  name LIKE hr_jp_standard_pkg.hextochar('E8A2ABE4BF9DE999BAE88085E58886E4BF9DE999BAE69699','AL32UTF8')
1121   AND    legislation_code = 'JP'
1122   AND    element_type_id IN (
1123            SELECT element_type_id
1124            FROM   pay_element_types_f
1125            WHERE  element_name IN
1126                     (hr_jp_standard_pkg.hextochar('E7B5A6EFBCBFE59FBAE69CACEFBCBFE581A5E4BF9DEFBCBFE4BF9DE999BAE69699','AL32UTF8'),
1127                     hr_jp_standard_pkg.hextochar('E8B39EEFBCBFE59FBAE69CACEFBCBFE581A5E4BF9DEFBCBFE4BF9DE999BAE69699','AL32UTF8'),
1128                     hr_jp_standard_pkg.hextochar('E8B39EEFBCBFE59FBAE69CACEFBCBFE58E9AE5B9B4EFBCBFE4BF9DE999BAE69699','AL32UTF8'))
1129            AND    legislation_code = 'JP' );
1130 
1131 
1132   FORALL l_tab_cnt IN 1..l_jp_input_names_tab.COUNT
1133 
1134     UPDATE pay_input_values_f
1135     SET    name = l_input_names_tab(l_tab_cnt)
1136     WHERE  name LIKE hr_jp_standard_pkg.hextochar(l_jp_input_names_tab(l_tab_cnt),'AL32UTF8')
1137     AND    legislation_code = 'JP';
1138 
1139 
1140   hr_utility.set_location(l_proc, 30);
1141 
1142   if (g_dbg) then
1143     hr_utility.trace('| Total Input Values Updated = ' || SQL%ROWCOUNT);
1144     hr_utility.trace('+-------------------------------+ ');
1145   end if;
1146 --
1147 EXCEPTION
1148 
1149   WHEN OTHERS THEN
1150 
1151     hr_utility.set_location(l_proc, 40);
1152 
1153     raise;
1154 
1155 END migrate_input_values;
1156 --
1157 -- |-------------------------------------------------------------------|
1158 -- |---------------------< migrate_element_types >---------------------|
1159 -- |-------------------------------------------------------------------|
1160 --
1161 procedure migrate_element_types is
1162 --
1163   type t_jp_element_names_tab is table of VARCHAR2(200) index by binary_integer;
1164 
1165   type t_element_names_tab is table of pay_element_types_f.element_name%TYPE index by binary_integer;
1166 
1167   type t_element_desc_tab is table of pay_element_types_f.description%TYPE index by binary_integer;
1168 
1169   type t_element_rep_tab is table of pay_element_types_f.reporting_name%TYPE index by binary_integer;
1170 
1171   l_jp_element_names_tab  t_jp_element_names_tab;
1172   l_element_names_tab     t_element_names_tab;
1173   l_element_desc_tab      t_element_desc_tab;
1174   l_element_rep_tab       t_element_rep_tab;
1175 
1176   l_proc            VARCHAR2(50) := g_pkg||'.migrate_element_types';
1177 
1178 BEGIN
1179 
1180   l_jp_element_names_tab.DELETE;
1181   l_element_names_tab.DELETE;
1182   l_element_desc_tab.DELETE;
1183   l_element_rep_tab.DELETE;
1184 
1185   hr_utility.set_location(l_proc, 10);
1186 
1187   l_jp_element_names_tab(1) := 'E7B5A6EFBCBFE59FBAE69CACEFBCBFE581A5E4BF9DEFBCBFE4BF9DE999BAE69699';
1188   l_element_names_tab(1) := 'SAL_HI_PREM_PROC';
1189   l_element_desc_tab(1) := 'Calculation of Health Insurance Premium on Salary';
1190   l_element_rep_tab(1) := 'Health Insurance Premium';
1191 
1192   l_jp_element_names_tab(2) := 'E7B5A6EFBCBFE59FBAE69CACEFBCBFE99B87E4BF9DEFBCBFE4BF9DE999BAE69699';
1193   l_element_names_tab(2) := 'SAL_EI_PREM_PROC';
1194   l_element_desc_tab(2) := 'Calculation of Employment Insurance Premium on Salary';
1195   l_element_rep_tab(2) := 'Employment Insurance Premium';
1196 
1197   l_jp_element_names_tab(3) := 'E7B5A6EFBCBFE59FBAE69CACEFBCBFE58E9AE5B9B4EFBCBFE4BF9DE999BAE69699';
1198   l_element_names_tab(3) := 'SAL_WP_PREM_PROC';
1199   l_element_desc_tab(3) := 'Calculation of Welfare Pension Insurance Premium on Salary';
1200   l_element_rep_tab(3) := 'Welfare Pension Insurance Premium';
1201 
1202   l_jp_element_names_tab(4) := 'E7B5A6EFBCBFE59FBAE69CACEFBCBFE68980E5BE97E7A88E';
1203   l_element_names_tab(4) := 'SAL_ITX_PROC';
1204   l_element_desc_tab(4) := 'Calculation of Income Tax on Salary';
1205   l_element_rep_tab(4) := 'Income Tax';
1206 
1207   l_jp_element_names_tab(5) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE4BB8BE4BF9DEFBCBFE4BA8BE6A5ADE4B8BB';
1208   l_element_names_tab(5) := 'SAL_CI_PREM_ER';
1209   l_element_desc_tab(5) := 'Care Insurance Premium on Salary (Employer Burden)';
1210   l_element_rep_tab(5) := 'Care Insurance Premium (Employer)';
1211 
1212   l_jp_element_names_tab(6) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE4BB8BE4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085';
1213   l_element_names_tab(6) := 'SAL_CI_PREM_EE';
1214   l_element_desc_tab(6) := 'Care Insurance Premium on Salary (Insured Burden)';
1215   l_element_rep_tab(6) := 'Care Insurance Premium';
1216 
1217   l_jp_element_names_tab(7) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE4BB8BE4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085';
1218   l_element_names_tab(7) := 'SAL_CI_PREM_EE_NRES';
1219   l_element_desc_tab(7) := 'Care Insurance Premium on Salary not subject to Year End Adjustment (Non Resident)';
1220   l_element_rep_tab(7) := 'Care Insurance Premium (Non Resident)';
1221 
1222   l_jp_element_names_tab(8) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE59FBAE98791EFBCBFE4BA8BE6A5ADE4B8BB';
1223   l_element_names_tab(8) := 'SAL_WPF_PREM_ER';
1224   l_element_desc_tab(8) := 'Welfare Pension Fund Insurance Premium on Salary (Employer Burden)';
1225   l_element_rep_tab(8) := 'Welfare Pension Fund Insurance Premium (Employer)';
1226 
1227   l_jp_element_names_tab(9) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE59FBAE98791EFBCBFE8A2ABE4BF9DE999BAE88085';
1228   l_element_names_tab(9) := 'SAL_WPF_PREM_EE';
1229   l_element_desc_tab(9) := 'Welfare Pension Fund Insurance Premium on Salary (Insured Burden)';
1230   l_element_rep_tab(9) := 'Welfare Pension Fund Insurance Premium';
1231 
1232   l_jp_element_names_tab(10) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE59FBAE98791EFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085';
1233   l_element_names_tab(10) := 'SAL_WPF_PREM_EE_NRES';
1234   l_element_desc_tab(10) := 'Welfare Pension Fund Insurance Premium on Salary not subject to Year End Adjustment (Non Resident)';
1235   l_element_rep_tab(10) := 'Welfare Pension Fund Insurance Premium (Non Resident)';
1236 
1237   l_jp_element_names_tab(11) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE581A5E4BF9DEFBCBFE4BA8BE6A5ADE4B8BB';
1238   l_element_names_tab(11) := 'SAL_HI_PREM_ER';
1239   l_element_desc_tab(11) := 'Health Insurance Premium on Salary (Employer Burden)';
1240   l_element_rep_tab(11) := 'Health Insurance Premium (Employer)';
1241 
1242   l_jp_element_names_tab(12) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE581A5E4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085';
1243   l_element_names_tab(12) := 'SAL_HI_PREM_EE';
1244   l_element_desc_tab(12) := 'Health Insurance Premium on Salary (Insured Burden)';
1245   l_element_rep_tab(12) := 'Health Insurance Premium';
1246 
1247   l_jp_element_names_tab(13) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE581A5E4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085';
1248   l_element_names_tab(13) := 'SAL_HI_PREM_EE_NRES';
1249   l_element_desc_tab(13) := 'Health Insurance Premium not subject to Year End Adjustment on Salary (Non Resident)';
1250   l_element_rep_tab(13) := 'Health Insurance Premium (Non Resident)';
1251 
1252   l_jp_element_names_tab(14) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE99B87E4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085';
1253   l_element_names_tab(14) := 'SAL_EI_PREM_EE';
1254   l_element_desc_tab(14) := 'Employment Insurance Premium on Salary (Insured Burden)';
1255   l_element_rep_tab(14) := 'Employment Insurance Premium';
1256 
1257   l_jp_element_names_tab(15) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE99B87E4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085';
1258   l_element_names_tab(15) := 'SAL_EI_PREM_EE_NRES';
1259   l_element_desc_tab(15) := 'Employment Insurance Premium on Salary not subject to Year End Adjustment (Non Resident)';
1260   l_element_rep_tab(15) := 'Employment Insurance Premium (Non Resident)';
1261 
1262   l_jp_element_names_tab(16) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE58E9AE5B9B4EFBCBFE4BA8BE6A5ADE4B8BB';
1263   l_element_names_tab(16) := 'SAL_WP_PREM_ER';
1264   l_element_desc_tab(16) := 'Welfare Pension Insurance Premium on Salary (Employer Burden)';
1265   l_element_rep_tab(16) := 'Welfare Pension Insurance Premium (Employer)';
1266 
1267   l_jp_element_names_tab(17) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE58E9AE5B9B4EFBCBFE8A2ABE4BF9DE999BAE88085';
1268   l_element_names_tab(17) := 'SAL_WP_PREM_EE';
1269   l_element_desc_tab(17) := 'Welfare Pension Insurance Premium on Salary (Insured Burden)';
1270   l_element_rep_tab(17) := 'Welfare Pension Insurance Premium';
1271 
1272   l_jp_element_names_tab(18) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE58E9AE5B9B4EFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085';
1273   l_element_names_tab(18) := 'SAL_WP_PREM_EE_NRES';
1274   l_element_desc_tab(18) := 'Welfare Pension Insurance Premium on Salary not subject to Year End Adjustment (Non Resident)';
1275   l_element_rep_tab(18) := 'Welfare Pension Insurance Premium (Non Resident)';
1276 
1277   l_jp_element_names_tab(19) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE4BD8FE6B091E7A88EEFBCBFE4B880E68BACE5BEB4E58F8E';
1278   l_element_names_tab(19) := 'SAL_LTX_LUMP_SUM_WITHHOLD';
1279   l_element_desc_tab(19) := 'Lump Sum Collecting Local Tax on Salary';
1280   l_element_rep_tab(19) := 'Local Tax (Lump Sum Collection)';
1281 
1282   l_jp_element_names_tab(20) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE68980E5BE97E7A88E';
1283   l_element_names_tab(20) := 'SAL_ITX';
1284   l_element_desc_tab(20) := 'Income Tax on Salary';
1285   l_element_rep_tab(20) := 'Income Tax';
1286 
1287   l_jp_element_names_tab(21) := 'E7B5A6EFBCBFE4BD8FE6B091E7A88E';
1288   l_element_names_tab(21) := 'SAL_LTX';
1289   l_element_desc_tab(21) := 'Local Tax on Salary';
1290   l_element_rep_tab(21) := 'Local Tax';
1291 
1292   l_jp_element_names_tab(22) := 'E7B5A6EFBCBFE68980E5BE97E7A88EEFBCBF31393939E5B9B4E7B5A6E4B88EE789B9E588A5E8AABFE695B4E68EA7E999A4';
1293   l_element_names_tab(22) := 'SAL_ITX_1999_SAL_SP_DCT';
1294   l_element_desc_tab(22) := 'Income Tax Special Adjustment Deduction in 1999 on Salary';
1295   l_element_rep_tab(22) := 'Income Tax Special Adjustment Deduction';
1296 
1297   l_jp_element_names_tab(23) := 'E7B5A6EFBCBFE68980E5BE97E7A88EEFBCBFE99D9EE5B185E4BD8FE88085';
1298   l_element_names_tab(23) := 'SAL_ITX_NRES';
1299   l_element_desc_tab(23) := 'Income Tax on Salary (Non Resident)';
1300   l_element_rep_tab(23) := 'Income Tax (Non Resident)';
1301 
1302   l_jp_element_names_tab(24) := 'E585B1EFBCBFE4BB8BE4BF9DEFBCBFE981A9E794A8E999A4E5A496E68385E5A0B1';
1303   l_element_names_tab(24) := 'COM_CI_EXCLUDE_INFO';
1304   l_element_desc_tab(24) := 'Determination Information for Calculation of Care Insurance';
1305   l_element_rep_tab(24) := 'Care Insurance Information of Exclusion from Application';
1306 
1307   l_jp_element_names_tab(25) := 'E585B1EFBCBFE59FBAE98791EFBCBFE8B387E6A0BCE68385E5A0B1';
1308   l_element_names_tab(25) := 'COM_WPF_QUALIFY_INFO';
1309   l_element_desc_tab(25) := 'Qualification Information of Welfare Pension Fund';
1310   l_element_rep_tab(25) := 'Qualification Information (Welfare Pension Fund)';
1311 
1312   l_jp_element_names_tab(26) := 'E585B1EFBCBFE59FBAE69CACEFBCBFE4BD8FE6B091E7A88EEFBCBFE4B880E68BACE5BEB4E58F8E';
1313   l_element_names_tab(26) := 'COM_LTX_LUMP_SUM_WITHHOLD_PROC';
1314   l_element_desc_tab(26) := 'Calculation of Lump Sum Collection Local Tax';
1315   l_element_rep_tab(26) := 'Local Tax (Lump Sum Collection)';
1316 
1317   l_jp_element_names_tab(27) := 'E585B1EFBCBFE59FBAE69CACEFBCBFE689B6E9A48AE68EA7E999A4E7AD89';
1318   l_element_names_tab(27) := 'YEA_DEP_EXM_PROC';
1319   l_element_desc_tab(27) := 'Calculation of Basic Exemption, Spouse Exemption, Dependent Exemption on Year End Adjustment';
1320   l_element_rep_tab(27) := 'Dependent Exemption etc Information';
1321 
1322   l_jp_element_names_tab(28) := 'E585B1EFBCBFE581A5E4BF9DEFBCBFE8B387E6A0BCE68385E5A0B1';
1323   l_element_names_tab(28) := 'COM_HI_QUALIFY_INFO';
1324   l_element_desc_tab(28) := 'Qualification Information of Health Insurance';
1325   l_element_rep_tab(28) := 'Qualification Information (Health Insurance)';
1326 
1327   l_jp_element_names_tab(29) := 'E585B1EFBCBFE581A5E4BF9DEFBCBFE6A899E6BA96E5A0B1E985ACE69C88E9A18D';
1328   l_element_names_tab(29) := 'COM_HI_SMR_INFO';
1329   l_element_desc_tab(29) := 'Monthly Remuneration Information of Health Insurance';
1330   l_element_rep_tab(29) := 'Standard Monthly Remuneration (Health Insurance)';
1331 
1332   l_jp_element_names_tab(30) := 'E585B1EFBCBFE99B87E4BF9DEFBCBFE8B387E6A0BCE68385E5A0B1';
1333   l_element_names_tab(30) := 'COM_EI_QUALIFY_INFO';
1334   l_element_desc_tab(30) := 'Qualification Information of Employment Insurance';
1335   l_element_rep_tab(30) := 'Qualification Information (Employment Insurance)';
1336 
1337   l_jp_element_names_tab(31) := 'E585B1EFBCBFE58E9AE5B9B4EFBCBFE8B387E6A0BCE68385E5A0B1';
1338   l_element_names_tab(31) := 'COM_WP_QUALIFY_INFO';
1339   l_element_desc_tab(31) := 'Qualification Information of Welfare Pension Insurance';
1340   l_element_rep_tab(31) := 'Qualification Information (Welfare Pension Insurance)';
1341 
1342   l_jp_element_names_tab(32) := 'E585B1EFBCBFE58E9AE5B9B4EFBCBFE6A899E6BA96E5A0B1E985ACE69C88E9A18D';
1343   l_element_names_tab(32) := 'COM_WP_SMR_INFO';
1344   l_element_desc_tab(32) := 'Monthly Remuneration Information of Welfare Pension Insurance';
1345   l_element_rep_tab(32) := 'Standard Monthly Remuneration (Welfare Pension Insurance)';
1346 
1347   l_jp_element_names_tab(33) := 'E585B1EFBCBFE7A4BEE4BF9DEFBCBFE8B387E6A0BCE58F96E5BE97E69982EFBCBFE5A0B1E985AC';
1348   l_element_names_tab(33) := 'COM_SI_MR_AT_QUALIFY_INFO';
1349   l_element_desc_tab(33) := 'Monthly Remuneration Information of Social Insurance at Qualified';
1350   l_element_rep_tab(33) := 'Monthly Remuneration (Qualified)';
1351 
1352   l_jp_element_names_tab(34) := 'E585B1EFBCBFE7A4BEE4BF9DEFBCBFE68385E5A0B1';
1353   l_element_names_tab(34) := 'COM_SI_INFO';
1354   l_element_desc_tab(34) := 'Location Information of Social Insurance';
1355   l_element_rep_tab(34) := 'Social Insurance Information';
1356 
1357   l_jp_element_names_tab(35) := 'E585B1EFBCBFE7A4BEE4BF9DEFBCBFE5B8B3E7A5A8';
1358   l_element_names_tab(35) := 'COM_SI_REPORT_INFO';
1359   l_element_desc_tab(35) := 'Information of Reporting Form Output of Social Insurance';
1360   l_element_rep_tab(35) := 'Social Insurance Reporting Form Information';
1361 
1362   l_jp_element_names_tab(36) := 'E585B1EFBCBFE7A4BEE4BF9DEFBCBFE5B9B4E98791E6898BE5B8B3E8A898E58FB7E795AAE58FB7E7AD89';
1363   l_element_names_tab(36) := 'COM_SI_PENSION_BOOK_NUM_INFO';
1364   l_element_desc_tab(36) := 'Information of Pension Book of Social Insurance';
1365   l_element_rep_tab(36) := 'Pension Book Symbol Number';
1366 
1367   l_jp_element_names_tab(37) := 'E585B1EFBCBFE4BD8FE6B091E7A88EEFBCBFE68385E5A0B1';
1368   l_element_names_tab(37) := 'COM_LTX_INFO';
1369   l_element_desc_tab(37) := 'Collection Information of Local Tax';
1370   l_element_rep_tab(37) := 'Local Tax Information';
1371 
1372   l_jp_element_names_tab(38) := 'E585B1EFBCBFE68980E5BE97E7A88EEFBCBF31393939E5B9B4E7B5A6E4B88EE789B9E588A5E8AABFE695B4E68EA7E999A4EFBCBFE68385E5A0B1';
1373   l_element_names_tab(38) := 'COM_ITX_1999_SAL_SP_DCT_INFO';
1374   l_element_desc_tab(38) := 'Information for Income Tax Special Adjustment Deduction in 1999';
1375   l_element_rep_tab(38) := 'Income Tax Adjustment Amount Information';
1376 
1377   l_jp_element_names_tab(39) := 'E585B1EFBCBFE68980E5BE97E7A88EEFBCBFE68385E5A0B1';
1378   l_element_names_tab(39) := 'COM_ITX_INFO';
1379   l_element_desc_tab(39) := 'Information of Tax Table, Year End Adjustment Subject Class etc on Income Tax';
1380   l_element_rep_tab(39) := 'Income Tax Information';
1381 
1382   l_jp_element_names_tab(40) := 'E585B1EFBCBFE98080E881B7E68385E5A0B1';
1383   l_element_names_tab(40) := 'COM_TRM_INFO';
1384   l_element_desc_tab(40) := 'File of Declaration about Receipt of Termination Income, Information about Lump Sum Collection of Local Tax';
1385   l_element_rep_tab(40) := 'Termination Information';
1386 
1387   l_jp_element_names_tab(41) := 'E585B1EFBCBFE58AB4E4BF9DEFBCBFE68385E5A0B1';
1388   l_element_names_tab(41) := 'COM_LI_INFO';
1389   l_element_desc_tab(41) := 'Location Information of Labor Insurance';
1390   l_element_rep_tab(41) := 'Labor Insurance Information';
1391 
1392   l_jp_element_names_tab(42) := 'E69C88EFBCBFE59FBAE69CACEFBCBFE5A0B1E985ACE69C88E9A18D';
1393   l_element_names_tab(42) := 'GEP_MR_PROC';
1394   l_element_desc_tab(42) := 'Calculation of Standard Monthly Remuneration on Unscheduled Revision';
1395   l_element_rep_tab(42) := 'Monthly Remuneration (Geppen)';
1396 
1397   l_jp_element_names_tab(43) := 'E69C88EFBCBFE7B590E69E9C';
1398   l_element_names_tab(43) := 'GEP_RSLT';
1399   l_element_desc_tab(43) := 'Monthly Remuneration etc on Unscheduled Revision';
1400   l_element_rep_tab(43) := 'Standard Monthly Remuneration (Geppen)';
1401 
1402   l_jp_element_names_tab(44) := 'E69C88EFBCBFE7B590E69E9CEFBCBFE59BBAE5AE9AE79A84E8B383E98791';
1403   l_element_names_tab(44) := 'GEP_FIXED_WAGE_RSLT';
1404   l_element_desc_tab(44) := 'Fixed Wage Result on Unscheduled Revision';
1405   l_element_rep_tab(44) := 'Fixed Wage (Geppen)';
1406 
1407   l_jp_element_names_tab(45) := 'E69C88EFBCBFE8AABFE695B4E68385E5A0B1';
1408   l_element_names_tab(45) := 'GEP_ADJ_INFO';
1409   l_element_desc_tab(45) := 'Adjustment Information of Remuneration Amount on Unscheduled Revision';
1410   l_element_rep_tab(45) := 'Adjustment Information (Geppen)';
1411 
1412   l_jp_element_names_tab(46) := 'E5868DE5B9B4EFBCBFE7B2BEE7AE97E9A18D';
1413   l_element_names_tab(46) := 'REY_ITX';
1414   l_element_desc_tab(46) := 'Liquidation Amount on Re-year End Adjustment';
1415   l_element_rep_tab(46) := 'Liquidation Amount';
1416 
1417   l_jp_element_names_tab(47) := 'E7AE97EFBCBFE59FBAE69CACEFBCBFE5A0B1E985ACE69C88E9A18D';
1418   l_element_names_tab(47) := 'SAN_MR_PROC';
1419   l_element_desc_tab(47) := 'Calculation of Standard Monthly Remuneration on Scheduled Revision';
1420   l_element_rep_tab(47) := 'Monthly Remuneration (Santei)';
1421 
1422   l_jp_element_names_tab(48) := 'E7AE97EFBCBFE7B590E69E9CEFBCBF32303033E5B9B433E69C883331E697A5E4BBA5E5898D';
1423   l_element_names_tab(48) := 'SAN_BEFORE_20030331_RSLT';
1424   l_element_desc_tab(48) := 'Scheduled Revision Result before 31 Mar 2003';
1425   l_element_rep_tab(48) := 'Standard Monthly Remuneration (Santei)';
1426 
1427   l_jp_element_names_tab(49) := 'E7AE97EFBCBFE7B590E69E9CEFBCBFE69C88E5A489E4BA88E5AE9AE69C88';
1428   l_element_names_tab(49) := 'SAN_GEP_MTH_RSLT';
1429   l_element_desc_tab(49) := 'Unscheduled Revision Projected Month Result on Scheduled Revision';
1430   l_element_rep_tab(49) := 'Geppen Projected Month';
1431 
1432   l_jp_element_names_tab(50) := 'E7AE97EFBCBFE7B590E69E9CEFBCBFE58299E88083E6AC84';
1433   l_element_names_tab(50) := 'SAN_REPORT_RMKS_RSLT';
1434   l_element_desc_tab(50) := 'Remarks Column Result for Notification of Santei';
1435   l_element_rep_tab(50) := 'Remarks Column (Santei)';
1436 
1437   l_jp_element_names_tab(51) := 'E7AE97EFBCBFE8AABFE695B4E68385E5A0B1EFBCBF32303033E5B9B433E69C883331E697A5E4BBA5E5898D';
1438   l_element_names_tab(51) := 'SAN_ADJ_BEFORE_20030331_INFO';
1439   l_element_desc_tab(51) := 'Adjustment Information of Remuneration Amount on Scheduled Revision before 31 Mar 2003';
1440   l_element_rep_tab(51) := 'Adjustment Information (Santei)';
1441 
1442   l_jp_element_names_tab(52) := 'E5889DE69C9FEFBCBFE7B5A6E4B88E31';
1443   l_element_names_tab(52) := 'INI_SAL1';
1444   l_element_desc_tab(52) := 'Salary 1 on Balance Initialization';
1445   l_element_rep_tab(52) := 'Salary 1 (Initial)';
1446 
1447   l_jp_element_names_tab(53) := 'E5889DE69C9FEFBCBFE7B5A6E4B88E32';
1448   l_element_names_tab(53) := 'INI_SAL2';
1449   l_element_desc_tab(53) := 'Salary 2 on Balance Initialization';
1450   l_element_rep_tab(53) := 'Salary 2 (Initial)';
1451 
1452   l_jp_element_names_tab(54) := 'E5889DE69C9FEFBCBFE585B1E9809A31';
1453   l_element_names_tab(54) := 'INI_COM1';
1454   l_element_desc_tab(54) := 'Common 1 on Balance Initialization';
1455   l_element_rep_tab(54) := 'Common 1 (Initial)';
1456 
1457   l_jp_element_names_tab(55) := 'E5889DE69C9FEFBCBFE585B1E9809A32';
1458   l_element_names_tab(55) := 'INI_COM2';
1459   l_element_desc_tab(55) := 'Common 2 on Balance Initialization';
1460   l_element_rep_tab(55) := 'Common 2 (Initial)';
1461 
1462   l_jp_element_names_tab(56) := 'E5889DE69C9FEFBCBFE585B1E9809A33';
1463   l_element_names_tab(56) := 'INI_COM3';
1464   l_element_desc_tab(56) := 'Common 3 on Balance Initialization';
1465   l_element_rep_tab(56) := 'Common 3 (Initial)';
1466 
1467   l_jp_element_names_tab(57) := 'E5889DE69C9FEFBCBFE7AE97E5AE9AE69C88E5A48931';
1468   l_element_names_tab(57) := 'INI_SAN_GEP1';
1469   l_element_desc_tab(57) := 'Santei Geppen 1 on Balance Initialization';
1470   l_element_rep_tab(57) := 'Santei Geppen 1 (Initial)';
1471 
1472   l_jp_element_names_tab(58) := 'E5889DE69C9FEFBCBFE694AFE6899531';
1473   l_element_names_tab(58) := 'INI_PAY1';
1474   l_element_desc_tab(58) := 'Payment 1 on Balance Initialization';
1475   l_element_rep_tab(58) := 'Payment 1 (Initial)';
1476 
1477   l_jp_element_names_tab(59) := 'E5889DE69C9FEFBCBFE8B39EE4B88E31';
1478   l_element_names_tab(59) := 'INI_BON1';
1479   l_element_desc_tab(59) := 'Bonus 1 on Balance Initialization';
1480   l_element_rep_tab(59) := 'Bonus 1 (Initial)';
1481 
1482   l_jp_element_names_tab(60) := 'E5889DE69C9FEFBCBFE8B39EE4B88E32';
1483   l_element_names_tab(60) := 'INI_BON2';
1484   l_element_desc_tab(60) := 'Bonus 2 on Balance Initialization';
1485   l_element_rep_tab(60) := 'Bonus 2 (Initial)';
1486 
1487   l_jp_element_names_tab(61) := 'E5889DE69C9FEFBCBFE98080E881B731';
1488   l_element_names_tab(61) := 'INI_TRM1';
1489   l_element_desc_tab(61) := 'Termination 1 on Balance Initialization';
1490   l_element_rep_tab(61) := 'Termination (Initial)';
1491 
1492   l_jp_element_names_tab(62) := 'E5889DE69C9FEFBCBFE789B9E8B39E31';
1493   l_element_names_tab(62) := 'INI_SPB1';
1494   l_element_desc_tab(62) := 'Special bonus 1 on Balance Initialization';
1495   l_element_rep_tab(62) := 'Special Bonus 1 (Initial)';
1496 
1497   l_jp_element_names_tab(63) := 'E5889DE69C9FEFBCBFE5B9B4E8AABF31';
1498   l_element_names_tab(63) := 'INI_YEA1';
1499   l_element_desc_tab(63) := 'Year end adjustment 1 on Balance Initialization';
1500   l_element_rep_tab(63) := 'Year End Adjustment 1 (Initial)';
1501 
1502   l_jp_element_names_tab(64) := 'E5889DE69C9FEFBCBFE5B9B4E8AABF32';
1503   l_element_names_tab(64) := 'INI_YEA2';
1504   l_element_desc_tab(64) := 'Year end adjustment 2 on Balance Initialization';
1505   l_element_rep_tab(64) := 'Year End Adjustment 2 (Initial)';
1506 
1507   l_jp_element_names_tab(65) := 'E8B39EEFBCBFE59FBAE69CACEFBCBFE99B87E4BF9DEFBCBFE4BF9DE999BAE69699';
1508   l_element_names_tab(65) := 'BON_EI_PREM_PROC';
1509   l_element_desc_tab(65) := 'Calculation of Employment Insurance Premium on Bonus';
1510   l_element_rep_tab(65) := 'Employment Insurance Premium';
1511 
1512   l_jp_element_names_tab(66) := 'E8B39EEFBCBFE59FBAE69CACEFBCBFE68980E5BE97E7A88E';
1513   l_element_names_tab(66) := 'BON_ITX_PROC';
1514   l_element_desc_tab(66) := 'Income Tax on Bonus';
1515   l_element_rep_tab(66) := 'Income Tax';
1516 
1517   l_jp_element_names_tab(67) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE99B87E4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085';
1518   l_element_names_tab(67) := 'BON_EI_PREM_EE';
1519   l_element_desc_tab(67) := 'Employment Insurance Premium on Bonus (Insured Burden)';
1520   l_element_rep_tab(67) := 'Employment Insurance Premium';
1521 
1522   l_jp_element_names_tab(68) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE99B87E4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085';
1523   l_element_names_tab(68) := 'BON_EI_PREM_EE_NRES';
1524   l_element_desc_tab(68) := 'Employment Insurance Premium on Bonus not subject to Year End Adjustment (Non Resident)';
1525   l_element_rep_tab(68) := 'Employment Insurance Premium (Non Resident)';
1526 
1527   l_jp_element_names_tab(69) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE4BD8FE6B091E7A88EEFBCBFE4B880E68BACE5BEB4E58F8E';
1528   l_element_names_tab(69) := 'BON_LTX_LUMP_SUM_WITHHOLD';
1529   l_element_desc_tab(69) := 'Lump Sum Collecting Local Tax on Bonus';
1530   l_element_rep_tab(69) := 'Local Tax (Lump Sum Collection)';
1531 
1532   l_jp_element_names_tab(70) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE68980E5BE97E7A88E';
1533   l_element_names_tab(70) := 'BON_ITX';
1534   l_element_desc_tab(70) := 'Income Tax on Bonus';
1535   l_element_rep_tab(70) := 'Income Tax';
1536 
1537   l_jp_element_names_tab(71) := 'E8B39EEFBCBFE68980E5BE97E7A88EEFBCBF31393939E5B9B4E7B5A6E4B88EE789B9E588A5E8AABFE695B4E68EA7E999A4';
1538   l_element_names_tab(71) := 'BON_ITX_1999_SAL_SP_DCT';
1539   l_element_desc_tab(71) := 'Income Tax Special Adjustment Deduction in 1999 on Bonus';
1540   l_element_rep_tab(71) := 'Income Tax Special Adjustment Deduction';
1541 
1542   l_jp_element_names_tab(72) := 'E8B39EEFBCBFE68980E5BE97E7A88EEFBCBFE99D9EE5B185E4BD8FE88085';
1543   l_element_names_tab(72) := 'BON_ITX_NRES';
1544   l_element_desc_tab(72) := 'Income Tax on Bonus (Non Resident)';
1545   l_element_rep_tab(72) := 'Income Tax (Non Resident)';
1546 
1547   l_jp_element_names_tab(73) := 'E98080EFBCBFE59FBAE69CACEFBCBFE4BD8FE6B091E7A88EEFBCBFE789B9E588A5E5BEB4E58F8E';
1548   l_element_names_tab(73) := 'TRM_LTX_SP_WITHHOLD_PROC';
1549   l_element_desc_tab(73) := 'Calculation of Special Collecting Local Tax on Termination Payment';
1550   l_element_rep_tab(73) := 'Local Tax (Special Collection)';
1551 
1552   l_jp_element_names_tab(74) := 'E98080EFBCBFE59FBAE69CACEFBCBFE68980E5BE97E68EA7E999A4E9A18D';
1553   l_element_names_tab(74) := 'TRM_INCOME_DCT_PROC';
1554   l_element_desc_tab(74) := 'Calculation of Lump Sum Collecting Local Tax on Termination Payment';
1555   l_element_rep_tab(74) := 'Income Deduction Amount';
1556 
1557   l_jp_element_names_tab(75) := 'E98080EFBCBFE7B590E69E9CEFBCBFE4BD8FE6B091E7A88EEFBCBFE4B880E68BACE5BEB4E58F8E';
1558   l_element_names_tab(75) := 'TRM_LTX_LUMP_SUM_WITHHOLD';
1559   l_element_desc_tab(75) := 'Lump Sum Collecting Local Tax on Termination Payment';
1560   l_element_rep_tab(75) := 'Local Tax (Lump Sum Collection)';
1561 
1562   l_jp_element_names_tab(76) := 'E98080EFBCBFE7B590E69E9CEFBCBFE4BD8FE6B091E7A88EEFBCBFE789B9E588A5E5BEB4E58F8E';
1563   l_element_names_tab(76) := 'TRM_LTX_SP_WITHHOLD';
1564   l_element_desc_tab(76) := 'Special Collecting Local Tax on Termination Payment';
1565   l_element_rep_tab(76) := 'Local Tax (Special Collection)';
1566 
1567   l_jp_element_names_tab(77) := 'E98080EFBCBFE7B590E69E9CEFBCBFE68980E5BE97E68EA7E999A4E9A18D';
1568   l_element_names_tab(77) := 'TRM_INCOME_DCT';
1569   l_element_desc_tab(77) := 'Income Deduction on Termination Payment';
1570   l_element_rep_tab(77) := 'Income Deduction Amount';
1571 
1572   l_jp_element_names_tab(78) := 'E98080EFBCBFE68980E5BE97E7A88E';
1573   l_element_names_tab(78) := 'TRM_ITX';
1574   l_element_desc_tab(78) := 'Income Tax on Termination Payment';
1575   l_element_rep_tab(78) := 'Income Tax';
1576 
1577   l_jp_element_names_tab(79) := 'E789B9E8B39EEFBCBFE59FBAE69CACEFBCBFE99B87E4BF9DEFBCBFE4BF9DE999BAE69699';
1578   l_element_names_tab(79) := 'SPB_EI_PREM_PROC';
1579   l_element_desc_tab(79) := 'Calculation of Employment Insurance Premium on Special Bonus';
1580   l_element_rep_tab(79) := 'Employment Insurance Premium';
1581 
1582   l_jp_element_names_tab(80) := 'E789B9E8B39EEFBCBFE59FBAE69CACEFBCBFE68980E5BE97E7A88E';
1583   l_element_names_tab(80) := 'SPB_ITX_PROC';
1584   l_element_desc_tab(80) := 'Calculation of Income Tax on Special Bonus';
1585   l_element_rep_tab(80) := 'Income Tax';
1586 
1587   l_jp_element_names_tab(81) := 'E789B9E8B39EEFBCBFE7B590E69E9CEFBCBFE99B87E4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085';
1588   l_element_names_tab(81) := 'SPB_EI_PREM_EE';
1589   l_element_desc_tab(81) := 'Employment Insurance Premium on Special Bonus (Insured Burden)';
1590   l_element_rep_tab(81) := 'Employment Insurance Premium';
1591 
1592   l_jp_element_names_tab(82) := 'E789B9E8B39EEFBCBFE7B590E69E9CEFBCBFE99B87E4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085';
1593   l_element_names_tab(82) := 'SPB_EI_PREM_EE_NRES';
1594   l_element_desc_tab(82) := 'Employment Insurance Premium on Special Bonus not subject to Year End Adjustment (Non Resident)';
1595   l_element_rep_tab(82) := 'Employment Insurance Premium (Non Resident)';
1596 
1597   l_jp_element_names_tab(83) := 'E789B9E8B39EEFBCBFE7B590E69E9CEFBCBFE68980E5BE97E7A88E';
1598   l_element_names_tab(83) := 'SPB_ITX';
1599   l_element_desc_tab(83) := 'Income Tax on Special Bonus';
1600   l_element_rep_tab(83) := 'Income Tax';
1601 
1602   l_jp_element_names_tab(84) := 'E789B9E8B39EEFBCBFE68980E5BE97E7A88EEFBCBF31393939E5B9B4E7B5A6E4B88EE789B9E588A5E8AABFE695B4E68EA7E999A4';
1603   l_element_names_tab(84) := 'SPB_ITX_1999_SAL_SP_DCT';
1604   l_element_desc_tab(84) := 'Income Tax Special Adjustment Deduction in 1999 on Special Bonus';
1605   l_element_rep_tab(84) := 'Income Tax Special Adjustment Deduction';
1606 
1607   l_jp_element_names_tab(85) := 'E789B9E8B39EEFBCBFE68980E5BE97E7A88EEFBCBFE99D9EE5B185E4BD8FE88085';
1608   l_element_names_tab(85) := 'SPB_ITX_NRES';
1609   l_element_desc_tab(85) := 'Income Tax on Special Bonus (Non Resident)';
1610   l_element_rep_tab(85) := 'Income Tax (Non Resident)';
1611 
1612   l_jp_element_names_tab(86) := 'E5B9B4EFBCBFE9818EE4B88DE8B6B3E7A88EE9A18D';
1613   l_element_names_tab(86) := 'YEA_ITX';
1614   l_element_desc_tab(86) := 'Over and Short Tax Amount on Year End Adjustment';
1615   l_element_rep_tab(86) := 'Over and Short Tax Amount';
1616 
1617   l_jp_element_names_tab(87) := 'E5B9B4EFBCBFE59FBAE69CACEFBCBFE7B5A6E4B88EE68980E5BE97E68EA7E999A4E5BE8CE381AEE98791E9A18D';
1618   l_element_names_tab(87) := 'YEA_AMT_AFTER_EMP_INCOME_DCT_PROC';
1619   l_element_desc_tab(87) := 'Calculation of Amount after Salary Income Deduction on Year End Adjustment';
1620   l_element_rep_tab(87) := 'Amount after Salary Income Deduction';
1621 
1622   l_jp_element_names_tab(88) := 'E5B9B4EFBCBFE59FBAE69CACEFBCBFE5B7AEE5BC95E5B9B4E7A88EE9A18D';
1623   l_element_names_tab(88) := 'YEA_NET_ANNUAL_TAX_PROC';
1624   l_element_desc_tab(88) := 'Calculation of Net Annual Tax Amount on Year End Adjustment';
1625   l_element_rep_tab(88) := 'Net Annual Tax Amount';
1626 
1627   l_jp_element_names_tab(89) := 'E5B9B4EFBCBFE59FBAE69CACEFBCBFE4BF9DE999BAE69699E585BCE9858DE789B9E68EA7E999A4';
1628   l_element_names_tab(89) := 'YEA_INS_PREM_SPOUSE_SP_EXM_PROC';
1629   l_element_desc_tab(89) := 'Calculation of Insurance Premium and Spouse Special Exemption Amount on Year End Adjustment';
1630   l_element_rep_tab(89) := 'Insurance Premium and Spouse Special Exemption Amount';
1631 
1632   l_jp_element_names_tab(90) := 'E5B9B4EFBCBFE7B590E69E9CEFBCBFE7B5A6E4B88EE68980E5BE97E68EA7E999A4E5BE8CE381AEE98791E9A18D';
1633   l_element_names_tab(90) := 'YEA_AMT_AFTER_EMP_INCOME_DCT_RSLT';
1634   l_element_desc_tab(90) := 'Amount after Salary Income Deduction on Year End Adjustment';
1635   l_element_rep_tab(90) := 'Amount after Salary Income Deduction';
1636 
1637   l_jp_element_names_tab(91) := 'E5B9B4EFBCBFE7B590E69E9CEFBCBFE5B7AEE5BC95E5B9B4E7A88EE9A18D';
1638   l_element_names_tab(91) := 'YEA_NET_ANNUAL_TAX';
1639   l_element_desc_tab(91) := 'Net Annual Tax Amount on Year End Adjustment';
1640   l_element_rep_tab(91) := 'Net Annual Tax Amount';
1641 
1642   l_jp_element_names_tab(92) := 'E5B9B4EFBCBFE7B590E69E9CEFBCBFE689B6E9A48AE68EA7E999A4E58CBAE58886E7AD89';
1643   l_element_names_tab(92) := 'YEA_DEP_EXM_TYPE_RSLT';
1644   l_element_desc_tab(92) := 'Dependent Exemption Class etc Information on Year End Adjustment';
1645   l_element_rep_tab(92) := 'Dependent Exemption Type Information';
1646 
1647   l_jp_element_names_tab(93) := 'E5B9B4EFBCBFE7B590E69E9CEFBCBFE689B6E9A48AE68EA7E999A4E7AD89';
1648   l_element_names_tab(93) := 'YEA_DEP_EXM_RSLT';
1649   l_element_desc_tab(93) := 'Dependent Exemption etc on Year End Adjustment';
1650   l_element_rep_tab(93) := 'Dependent Exemption etc Information';
1651 
1652   l_jp_element_names_tab(94) := 'E5B9B4EFBCBFE7B590E69E9CEFBCBFE4BF9DE999BAE69699E585BCE9858DE789B9E68EA7E999A4';
1653   l_element_names_tab(94) := 'YEA_INS_PREM_SPOUSE_SP_EXM_RSLT';
1654   l_element_desc_tab(94) := 'Insurance Premium and Spouse Special Exemption on Year End Adjustment';
1655   l_element_rep_tab(94) := 'Insurance Premium and Spouse Special Exemption Amount';
1656 
1657   l_jp_element_names_tab(95) := 'E5B9B4EFBCBFE6BA90E6B389E5BEB4E58F8EE7A5A8';
1658   l_element_names_tab(95) := 'YEA_WITHHOLD_TAX_REPORT_INFO';
1659   l_element_desc_tab(95) := 'Withholding Tax Report Information on Year End Adjustment';
1660   l_element_rep_tab(95) := 'Withholding Tax Report Information';
1661 
1662   l_jp_element_names_tab(96) := 'E5B9B4EFBCBFE4BD8FE5AE85E58F96E5BE97E7AD89E789B9E588A5E68EA7E999A4';
1663   l_element_names_tab(96) := 'YEA_HOUSING_LOAN_TAX_CREDIT';
1664   l_element_desc_tab(96) := 'Housing Debt Loan etc Special Exemption on Year End Adjustment';
1665   l_element_rep_tab(96) := 'Housing debt loan etc Special Exemption Amount';
1666 
1667   l_jp_element_names_tab(97) := 'E5B9B4EFBCBFE5898DE881B7E68385E5A0B1';
1668   l_element_names_tab(97) := 'YEA_PREV_EMP_INFO';
1669   l_element_desc_tab(97) := 'Previous Employment Information on Year End Adjustment';
1670   l_element_rep_tab(97) := 'Previous Employment Information';
1671 
1672   l_jp_element_names_tab(98) := 'E5B9B4EFBCBFE8AABFE695B4E68385E5A0B1';
1673   l_element_names_tab(98) := 'YEA_ADJ_INFO';
1674   l_element_desc_tab(98) := 'Adjustment Information of Income Tax on Year End Adjustment';
1675   l_element_rep_tab(98) := 'Adjustment Information (Year End Adjustment)';
1676 
1677   l_jp_element_names_tab(99) := 'E5B9B4EFBCBFE5B9B4E7A88EE9A18D';
1678   l_element_names_tab(99) := 'YEA_ANNUAL_TAX';
1679   l_element_desc_tab(99) := 'Annual Tax Amount on Year End Adjustment';
1680   l_element_rep_tab(99) := 'Annual Tax Amount';
1681 
1682   l_jp_element_names_tab(100) := 'E5B9B4EFBCBFE4BF9DE999BAE69699E585BCE9858DE789B9E68EA7E999A4';
1683   l_element_names_tab(100) := 'YEA_INS_PREM_SPOUSE_SP_EXM_INFO';
1684   l_element_desc_tab(100) := 'Adjustment Information of Insurance Premium and Spouse Special Exemption Amount on Year End Adjustment';
1685   l_element_rep_tab(100) := 'Insurance Premium and Spouse Special Exemption Amount';
1686 
1687   l_jp_element_names_tab(101) := 'E585B1EFBCBFE7A4BEE4BF9DEFBCBFE8A2ABE689B6E9A48AE88085E795B0E58B95E5B18A';
1688   l_element_names_tab(101) := 'COM_SI_DEP_REPORT_INFO';
1689   l_element_desc_tab(101) := 'Information for Health Insurance Notification of Nonworking Dependent';
1690   l_element_rep_tab(101) := 'Health Insurance Notification of Nonworking Dependent Info';
1691 
1692   l_jp_element_names_tab(102) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE4BB8BE4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085';
1693   l_element_names_tab(102) := 'BON_CI_PREM_EE_NRES';
1694   l_element_desc_tab(102) := 'Care Insurance Premium not subject to Year End Adjustment on Bonus (Non Resident)';
1695   l_element_rep_tab(102) := 'Care Insurance Premium (Non Resident)';
1696 
1697   l_jp_element_names_tab(103) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE4BB8BE4BF9DEFBCBFE4BA8BE6A5ADE4B8BB';
1698   l_element_names_tab(103) := 'BON_CI_PREM_ER';
1699   l_element_desc_tab(103) := 'Care Insurance Premium on Bonus (Employer Burden)';
1700   l_element_rep_tab(103) := 'Care Insurance Premium (Employer)';
1701 
1702   l_jp_element_names_tab(104) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE59FBAE98791EFBCBFE8A2ABE4BF9DE999BAE88085';
1703   l_element_names_tab(104) := 'BON_WPF_PREM_EE';
1704   l_element_desc_tab(104) := 'Welfare Pension Fund Insurance Premium on Bonus (Insured Burden)';
1705   l_element_rep_tab(104) := 'Welfare Pension Fund Insurance Premium';
1706 
1707   l_jp_element_names_tab(105) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE59FBAE98791EFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085';
1708   l_element_names_tab(105) := 'BON_WPF_PREM_EE_NRES';
1709   l_element_desc_tab(105) := 'Welfare Pension Fund Insurance Premium not subject to Year End Adjustment on Bonus (Non Resident)';
1710   l_element_rep_tab(105) := 'Welfare Pension Fund Insurance Premium (Non Resident)';
1711 
1712   l_jp_element_names_tab(106) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE59FBAE98791EFBCBFE4BA8BE6A5ADE4B8BB';
1713   l_element_names_tab(106) := 'BON_WPF_PREM_ER';
1714   l_element_desc_tab(106) := 'Welfare Pension Fund Insurance Premium on Bonus (Employer Burden)';
1715   l_element_rep_tab(106) := 'Welfare Pension Fund Insurance Premium (Employer)';
1716 
1717   l_jp_element_names_tab(107) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE581A5E4BF9DEFBCBFE6A899E6BA96E8B39EE4B88EE9A18D';
1718   l_element_names_tab(107) := 'BON_HI_STD_BON';
1719   l_element_desc_tab(107) := 'Standard Bonus Amount on Bonus subject to Health Insurance';
1720   l_element_rep_tab(107) := 'Standard Bonus (Health Insurance)';
1721 
1722   l_jp_element_names_tab(108) := 'E7AE97EFBCBFE8AABFE695B4E68385E5A0B1';
1723   l_element_names_tab(108) := 'SAN_ADJ_INFO';
1724   l_element_desc_tab(108) := 'Adjustment Information of Remuneration Amount on Scheduled Revision';
1725   l_element_rep_tab(108) := 'Adjustment Information (Santei)';
1726 
1727   l_jp_element_names_tab(109) := 'E7AE97EFBCBFE7AE97E5AE9AE59FBAE7A48EE5B18AEFBCBFE58299E88083E6AC84';
1728   l_element_names_tab(109) := 'SAN_REPORT_RMKS_ADJ_INFO';
1729   l_element_desc_tab(109) := 'Remarks Column Information for Notification of Santei';
1730   l_element_rep_tab(109) := 'Remarks Column (Santei)';
1731 
1732   l_jp_element_names_tab(110) := 'E69C88EFBCBFE69C88E9A18DE5A489E69BB4E5B18AEFBCBFE58299E88083E6AC84';
1733   l_element_names_tab(110) := 'GEP_REPORT_RMKS_ADJ_INFO';
1734   l_element_desc_tab(110) := 'Remarks Column Information for Notification of Geppen';
1735   l_element_rep_tab(110) := 'Remarks Column (Geppen)';
1736 
1737   l_jp_element_names_tab(111) := 'E7AE97EFBCBFE7B590E69E9C';
1738   l_element_names_tab(111) := 'SAN_RSLT';
1739   l_element_desc_tab(111) := 'Monthly renumeration etc on Scheduled Revision';
1740   l_element_rep_tab(111) := 'Standard Monthly Remuneration (Santei)';
1741 
1742   l_jp_element_names_tab(112) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE58E9AE5B9B4EFBCBFE6A899E6BA96E8B39EE4B88EE9A18D';
1743   l_element_names_tab(112) := 'BON_WP_STD_BON';
1744   l_element_desc_tab(112) := 'Standard Bonus Amount on Bonus subject to Welfare Pension Insurance';
1745   l_element_rep_tab(112) := 'Standard Bonus (Welfare Pension Insurancee)';
1746 
1747   l_jp_element_names_tab(113) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE4BB8BE4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085';
1748   l_element_names_tab(113) := 'BON_CI_PREM_EE';
1749   l_element_desc_tab(113) := 'Care Insurance Premium on Bonus (Insured Burden)';
1750   l_element_rep_tab(113) := 'Care Insurance Premium';
1751 
1752   l_jp_element_names_tab(114) := 'E8B39EEFBCBFE59FBAE69CACEFBCBFE581A5E4BF9DEFBCBFE4BF9DE999BAE69699';
1753   l_element_names_tab(114) := 'BON_HI_PREM_PROC';
1754   l_element_desc_tab(114) := 'Calculation of Health Insurance Premium on Bonus';
1755   l_element_rep_tab(114) := 'Health Insurance Premium';
1756 
1757   l_jp_element_names_tab(115) := 'E8B39EEFBCBFE59FBAE69CACEFBCBFE58E9AE5B9B4EFBCBFE4BF9DE999BAE69699';
1758   l_element_names_tab(115) := 'BON_WP_PREM_PROC';
1759   l_element_desc_tab(115) := 'Calculation of Welfare Pension Insurance Premium on Bonus';
1760   l_element_rep_tab(115) := 'Welfare Pension Insurance Premium';
1761 
1762   l_jp_element_names_tab(116) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE581A5E4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085';
1763   l_element_names_tab(116) := 'BON_HI_PREM_EE';
1764   l_element_desc_tab(116) := 'Health Insurance Premium on Bonus (Insured Burden)';
1765   l_element_rep_tab(116) := 'Health Insurance Premium';
1766 
1767   l_jp_element_names_tab(117) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE58E9AE5B9B4EFBCBFE8A2ABE4BF9DE999BAE88085';
1768   l_element_names_tab(117) := 'BON_WP_PREM_EE';
1769   l_element_desc_tab(117) := 'Welfare Pension Insurance Premium on Bonus (Insured Burden)';
1770   l_element_rep_tab(117) := 'Welfare Pension Insurance Premium';
1771 
1772   l_jp_element_names_tab(118) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE581A5E4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085';
1773   l_element_names_tab(118) := 'BON_HI_PREM_EE_NRES';
1774   l_element_desc_tab(118) := 'Health Insurance Premium not subject to Year End Adjustment on Bonus (Non Resident)';
1775   l_element_rep_tab(118) := 'Health Insurance Premium (Non Resident)';
1776 
1777   l_jp_element_names_tab(119) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE58E9AE5B9B4EFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085';
1778   l_element_names_tab(119) := 'BON_WP_PREM_EE_NRES';
1779   l_element_desc_tab(119) := 'Welfare Pension Insurance Premium on Bonus not subject to Year End Adjustment (Non Resident)';
1780   l_element_rep_tab(119) := 'Welfare Pension Insurance Premium (Non Resident)';
1781 
1782   l_jp_element_names_tab(120) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE581A5E4BF9DEFBCBFE4BA8BE6A5ADE4B8BB';
1783   l_element_names_tab(120) := 'BON_HI_PREM_ER';
1784   l_element_desc_tab(120) := 'Health Insurance Premium on Bonus (Employer Burden)';
1785   l_element_rep_tab(120) := 'Health Insurance Premium (Employer)';
1786 
1787   l_jp_element_names_tab(121) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE58E9AE5B9B4EFBCBFE4BA8BE6A5ADE4B8BB';
1788   l_element_names_tab(121) := 'BON_WP_PREM_ER';
1789   l_element_desc_tab(121) := 'Welfare Pension Insurance Premium on Bonus (Employer Burden)';
1790   l_element_rep_tab(121) := 'Welfare Pension Insurance Premium (Employer)';
1791 
1792   l_jp_element_names_tab(122) := 'E5889DE69C9FEFBCBFE8B39EE4B88E33';
1793   l_element_names_tab(122) := 'INI_BON3';
1794   l_element_desc_tab(122) := 'Bonus 3 on Balance Initialization';
1795   l_element_rep_tab(122) := 'Bonus 3 (Initial)';
1796 
1797   l_jp_element_names_tab(123) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE581A5E4BF9DEFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE98791E98AAD';
1798   l_element_names_tab(123) := 'BON_HI_ERN_MONEY_SUBJ_SI_ACMLT';
1799   l_element_desc_tab(123) := 'Health Insurance Premium Accumulation on Bonus';
1800   l_element_rep_tab(123) := 'Amount subject to Health Insurance (Add Up)';
1801 
1802   l_jp_element_names_tab(124) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE581A5E4BF9DEFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE78FBEE789A9';
1803   l_element_names_tab(124) := 'BON_HI_ERN_KIND_SUBJ_SI_ACMLT';
1804   l_element_desc_tab(124) := 'Health Insurance Premium of Earning in Kind Accumulation on Bonus';
1805   l_element_rep_tab(124) := 'Amount subject to Health Insurance (Add Up) (Kind)';
1806 
1807   l_jp_element_names_tab(125) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE58E9AE5B9B4EFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE98791E98AAD';
1808   l_element_names_tab(125) := 'BON_WP_ERN_MONEY_SUBJ_SI_ACMLT';
1809   l_element_desc_tab(125) := 'Welfare Pension Insurance Premium Accumulation on Bonus';
1810   l_element_rep_tab(125) := 'Amount Subject to Welfare Pension Ins (Add Up)';
1811 
1812   l_jp_element_names_tab(126) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE58E9AE5B9B4EFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE78FBEE789A9';
1813   l_element_names_tab(126) := 'BON_WP_ERN_KIND_SUBJ_SI_ACMLT';
1814   l_element_desc_tab(126) := 'Welfare Pension Insurance Premium of Earning in Kind on Bonus';
1815   l_element_rep_tab(126) := 'Amount Subject to Welfare Pension Ins (Add Up) (Kind)';
1816 
1817   l_jp_element_names_tab(127) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE581A5E4BF9DEFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE4BF9DE999BAE69699EFBCBFE8A2ABE4BF9DE999BAE88085';
1818   l_element_names_tab(127) := 'BON_HI_PREM_EE_ACMLT';
1819   l_element_desc_tab(127) := 'Health Insurance Premium Accumulation on Bonus (Insured Burden)';
1820   l_element_rep_tab(127) := 'Health Insurance Premium (Add Up)';
1821 
1822   l_jp_element_names_tab(128) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE581A5E4BF9DEFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE4BF9DE999BAE69699EFBCBFE4BA8BE6A5ADE4B8BB';
1823   l_element_names_tab(128) := 'BON_HI_PREM_ER_ACMLT';
1824   l_element_desc_tab(128) := 'Health Insurance Premium Accumulation on Bonus (Employer Burden)';
1825   l_element_rep_tab(128) := 'Health Insurance Premium (Add Up) (Employer)';
1826 
1827   l_jp_element_names_tab(129) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE4BB8BE4BF9DEFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE4BF9DE999BAE69699EFBCBFE8A2ABE4BF9DE999BAE88085';
1828   l_element_names_tab(129) := 'BON_CI_PREM_EE_ACMLT';
1829   l_element_desc_tab(129) := 'Care Insurance Premium Accumulation on Bonus (Insured Burden)';
1830   l_element_rep_tab(129) := 'Care Insurance Premium (Add Up)';
1831 
1832   l_jp_element_names_tab(130) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE4BB8BE4BF9DEFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE4BF9DE999BAE69699EFBCBFE4BA8BE6A5ADE4B8BB';
1833   l_element_names_tab(130) := 'BON_CI_PREM_ER_ACMLT';
1834   l_element_desc_tab(130) := 'Care Insurance Premium Accumulation on Bonus (Employer Burden)';
1835   l_element_rep_tab(130) := 'Care Insurance Premium (Add Up) (Employer)';
1836 
1837   l_jp_element_names_tab(131) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE58E9AE5B9B4EFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE4BF9DE999BAE69699EFBCBFE8A2ABE4BF9DE999BAE88085';
1838   l_element_names_tab(131) := 'BON_WP_PREM_EE_ACMLT';
1839   l_element_desc_tab(131) := 'Welfare Pension Insurance Premium Accumulation on Bonus (Insured Burden)';
1840   l_element_rep_tab(131) := 'Welfare Pension Ins Premium (Add Up)';
1841 
1842   l_jp_element_names_tab(132) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE58E9AE5B9B4EFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE4BF9DE999BAE69699EFBCBFE4BA8BE6A5ADE4B8BB';
1843   l_element_names_tab(132) := 'BON_WP_PREM_ER_ACMLT';
1844   l_element_desc_tab(132) := 'Welfare Pension Insurance Premium Accumulation on Bonus (Employer Burden)';
1845   l_element_rep_tab(132) := 'Welfare Pension Ins Premium (Add Up) (Employer)';
1846 
1847   l_jp_element_names_tab(133) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE59FBAE98791EFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE4BF9DE999BAE69699EFBCBFE8A2ABE4BF9DE999BAE88085';
1848   l_element_names_tab(133) := 'BON_WPF_PREM_EE_ACMLT';
1849   l_element_desc_tab(133) := 'Welfare Pension Fund Insurance Premium Accumulation on Bonus (Insured Burden)';
1850   l_element_rep_tab(133) := 'Welfare Pension Fund Insurance Premium (Add Up)';
1851 
1852   l_jp_element_names_tab(134) := 'E8B39EEFBCBFE7B590E69E9CEFBCBFE59FBAE98791EFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE4BF9DE999BAE69699EFBCBFE4BA8BE6A5ADE4B8BB';
1853   l_element_names_tab(134) := 'BON_WPF_PREM_ER_ACMLT';
1854   l_element_desc_tab(134) := 'Welfare Pension Fund Insurance Premium Accumulation on Bonus (Employer Burden)';
1855   l_element_rep_tab(134) := 'Welfare Pension Fund Insurance Premium (Add Up) (Employer)';
1856 
1857   l_jp_element_names_tab(135) := 'E8B39EEFBCBFE581A5E4BF9DEFBCBFE8AABFE695B4E68385E5A0B1';
1858   l_element_names_tab(135) := 'BON_HI_ADJ_INFO';
1859   l_element_desc_tab(135) := 'Adjustment Information of Health Insurance Premium on Bonus';
1860   l_element_rep_tab(135) := 'Adjustment Information (Bonus) (Health Insurance)';
1861 
1862   l_jp_element_names_tab(136) := 'E8B39EEFBCBFE58E9AE5B9B4EFBCBFE8AABFE695B4E68385E5A0B1';
1863   l_element_names_tab(136) := 'BON_WP_ADJ_INFO';
1864   l_element_desc_tab(136) := 'Adjustment Information of Welfare Pension Insurance Premium on Bonus';
1865   l_element_rep_tab(136) := 'Adjustment Information (Bonus) (Welfare Pension Ins)';
1866 
1867   l_jp_element_names_tab(137) := 'E7B5A6EFBCBFE9809AE58BA4E68385E5A0B1EFBCBFE4BAA4E9809AE794A8E585B7';
1868   l_element_names_tab(137) := 'SAL_CMA_PRIVATE_TRANSPORT_INFO';
1869   l_element_desc_tab(137) := 'Commutation Information about Usage of Public Private Transportation (Auto Car etc)';
1870   l_element_rep_tab(137) := 'Commutation Information (Private Transportation)';
1871 
1872   l_jp_element_names_tab(138) := 'E7B5A6EFBCBFE9809AE58BA4E68385E5A0B1EFBCBFE4BAA4E9809AE6A99FE996A2';
1873   l_element_names_tab(138) := 'SAL_CMA_PUBLIC_TRANSPORT_INFO';
1874   l_element_desc_tab(138) := 'Commutation Information about Utilization of Public Transportation (Train etc)';
1875   l_element_rep_tab(138) := 'Commutation Information (Public Transportation)';
1876 
1877   l_jp_element_names_tab(139) := 'E7B5A6EFBCBFE59FBAE69CACEFBCBFE9809AE58BA4E6898BE5BD93';
1878   l_element_names_tab(139) := 'SAL_CMA_PROC';
1879   l_element_desc_tab(139) := 'Calculation of Commutation Allowance on Salary';
1880   l_element_rep_tab(139) := 'Commutation Allowance';
1881 
1882   l_jp_element_names_tab(140) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE9809AE58BA4E6898BE5BD93EFBCBFE99D9EE8AAB2E7A88EE5AFBEE8B1A1E9A18D';
1883   l_element_names_tab(140) := 'SAL_CMA_NTXBL_ERN';
1884   l_element_desc_tab(140) := 'Non Assessable Commutation Allowance on Salary';
1885   l_element_rep_tab(140) := 'Commutation Allowance (Non Assessable)';
1886 
1887   l_jp_element_names_tab(141) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE9809AE58BA4E6898BE5BD93EFBCBFE78FBEE789A9E58886E99D9EE8AAB2E7A88EE5AFBEE8B1A1E9A18D';
1888   l_element_names_tab(141) := 'SAL_CMA_NTXBL_ERN_KIND';
1889   l_element_desc_tab(141) := 'Non Assessable Commutation Allowance of Earning in Kind on Salary';
1890   l_element_rep_tab(141) := 'Commutation Allowance (Non Assessable) (In Kind)';
1891 
1892   l_jp_element_names_tab(142) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE9809AE58BA4E6898BE5BD93EFBCBFE8AAB2E7A88EE5AFBEE8B1A1E9A18D';
1893   l_element_names_tab(142) := 'SAL_CMA_TXBL_ERN';
1894   l_element_desc_tab(142) := 'Assessable Commutation Allowance on Salary';
1895   l_element_rep_tab(142) := 'Commutation Allowance (Assessable)';
1896 
1897   l_jp_element_names_tab(143) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE9809AE58BA4E6898BE5BD93EFBCBFE78FBEE789A9E58886E8AAB2E7A88EE5AFBEE8B1A1E9A18D';
1898   l_element_names_tab(143) := 'SAL_CMA_TXBL_ERN_KIND';
1899   l_element_desc_tab(143) := 'Assessable Commutation Allowance of Earning in Kind on Salary';
1900   l_element_rep_tab(143) := 'Commutation Allowance (Assessable) (In Kind)';
1901 
1902   l_jp_element_names_tab(144) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE9809AE58BA4E6898BE5BD93EFBCBFE99D9EE5B185E4BD8FE88085E8AAB2E7A88EE5AFBEE8B1A1E9A18D';
1903   l_element_names_tab(144) := 'SAL_CMA_TXBL_ERN_NRES';
1904   l_element_desc_tab(144) := 'Assessable Commutation Allowance on Salary (Non Resident)';
1905   l_element_rep_tab(144) := 'Commutation Allowance (Assessable) (Non Resident)';
1906 
1907   l_jp_element_names_tab(145) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE9809AE58BA4E6898BE5BD93EFBCBFE99D9EE5B185E4BD8FE88085E78FBEE789A9E58886E8AAB2E7A88EE5AFBEE8B1A1E9A18D';
1908   l_element_names_tab(145) := 'SAL_CMA_TXBL_ERN_KIND_NRES';
1909   l_element_desc_tab(145) := 'Assessable Commutation Allowance of Earning in Kind on Salary (Non Resident)';
1910   l_element_rep_tab(145) := 'Commutation Allowance (Assessable) (Non Resident) (In Kind)';
1911 
1912   l_jp_element_names_tab(146) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE9809AE58BA4E6898BE5BD93EFBCBFE7A4BEE4BF9DE5AFBEE8B1A1E9A18DEFBCBFE98791E98AAD';
1913   l_element_names_tab(146) := 'SAL_CMA_ERN_MONEY_SUBJ_SI';
1914   l_element_desc_tab(146) := 'Commutation Allowance on Salary subject to Social Insurance';
1915   l_element_rep_tab(146) := 'Commutation Allowance (Amount subject to Social Insurance)';
1916 
1917   l_jp_element_names_tab(147) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE9809AE58BA4E6898BE5BD93EFBCBFE7A4BEE4BF9DE5AFBEE8B1A1E9A18DEFBCBFE78FBEE789A9';
1918   l_element_names_tab(147) := 'SAL_CMA_ERN_KIND_SUBJ_SI';
1919   l_element_desc_tab(147) := 'Commutation Allowance of Earning in Kind on Salary subject to Social Insurance';
1920   l_element_rep_tab(147) := 'Commutation Allowance (Amount subj to Social Ins) (In Kind)';
1921 
1922   l_jp_element_names_tab(148) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE9809AE58BA4E6898BE5BD93EFBCBFE7A4BEE4BF9DE5AFBEE8B1A1E9A18DEFBCBFE98791E98AADEFBCBFE3839EE382A4E3838AE382B9E8AABFE695B4';
1923   l_element_names_tab(148) := 'SAL_CMA_ERN_MONEY_SUBJ_SI_NEGATIVE_ADJ';
1924   l_element_desc_tab(148) := 'Subtract Adjustment of Commutation Allowance on Salary subject to Social Insurance';
1925   l_element_rep_tab(148) := 'Commutation Allowance (Amount subj to Social Ins Adjustment)';
1926 
1927   l_jp_element_names_tab(149) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE9809AE58BA4E6898BE5BD93EFBCBFE7A4BEE4BF9DE5AFBEE8B1A1E9A18DEFBCBFE78FBEE789A9EFBCBFE3839EE382A4E3838AE382B9E8AABFE695B4';
1928   l_element_names_tab(149) := 'SAL_CMA_ERN_KIND_SUBJ_SI_NEGATIVE_ADJ';
1929   l_element_desc_tab(149) := 'Subtract Adjustment of Commutation Allowance of Earning in Kind on Salary subject to Social Insurance';
1930   l_element_rep_tab(149) := 'Commutation Allowance (Amt subj to Social Ins Adj) (In Kind)';
1931 
1932   l_jp_element_names_tab(150) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE9809AE58BA4E6898BE5BD93EFBCBFE7A4BEE4BF9DE59BBAE5AE9AE79A84E8B383E98791';
1933   l_element_names_tab(150) := 'SAL_CMA_SUBJ_SI_FIXED_WAGE';
1934   l_element_desc_tab(150) := 'Commutation Allowance on Salary (Social Insurance Fixed Wage)';
1935   l_element_rep_tab(150) := 'Commutation Allowance (Social Insurance Fixed Wage)';
1936 
1937   l_jp_element_names_tab(151) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE9809AE58BA4E6898BE5BD93EFBCBFE99B87E4BF9DE5AFBEE8B1A1E9A18DE69C88E589B2E8AABFE695B4';
1938   l_element_names_tab(151) := 'SAL_CMA_MTHLY_ERN_SUBJ_EI_ADJ';
1939   l_element_desc_tab(151) := 'Commutation Allowance on Salary (Amount subject to Employment Insurance by Month)';
1940   l_element_rep_tab(151) := 'Commutation Allowance (Amt subj to Employment Ins by Month)';
1941 
1942   l_jp_element_names_tab(152) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE4BB8BE4BF9DEFBCBFE4BA8BE6A5ADE4B8BBEFBCBFE98080E881B7E69C88';
1943   l_element_names_tab(152) := 'SAL_CI_PREM_ER_TRM';
1944   l_element_desc_tab(152) := 'Termination Month Care Insurance Premium on Salary (Employer Burden)';
1945   l_element_rep_tab(152) := 'Care Insurance Premium (Employer) (Termination Month)';
1946 
1947   l_jp_element_names_tab(153) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE4BB8BE4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE98080E881B7E69C88';
1948   l_element_names_tab(153) := 'SAL_CI_PREM_EE_TRM';
1949   l_element_desc_tab(153) := 'Termination Month Care Insurance Premium on Salary (Insured Burden)';
1950   l_element_rep_tab(153) := 'Care Insurance Premium (Termination Month)';
1951 
1952   l_jp_element_names_tab(154) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE4BB8BE4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE98080E881B7E69C88';
1953   l_element_names_tab(154) := 'SAL_CI_PREM_EE_NRES_TRM';
1954   l_element_desc_tab(154) := 'Termination Month Care Insurance Premium on Salary not subject to Year End Adjustment (Non Resident)';
1955   l_element_rep_tab(154) := 'Care Insurance Premium (Non Resident) (Termination Month)';
1956 
1957   l_jp_element_names_tab(155) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE59FBAE98791EFBCBFE4BA8BE6A5ADE4B8BBEFBCBFE98080E881B7E69C88';
1958   l_element_names_tab(155) := 'SAL_WPF_PREM_ER_TRM';
1959   l_element_desc_tab(155) := 'Termination Month Welfare Pension Fund Insurance Premium on Salary (Employer Burden)';
1960   l_element_rep_tab(155) := 'Welfare Pension Fund Ins Prem (Employer) (Termination Month)';
1961 
1962   l_jp_element_names_tab(156) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE59FBAE98791EFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE98080E881B7E69C88';
1963   l_element_names_tab(156) := 'SAL_WPF_PREM_EE_TRM';
1964   l_element_desc_tab(156) := 'Termination Month Welfare Pension Fund Insurance Premium on Salary (Insured Burden)';
1965   l_element_rep_tab(156) := 'Welfare Pension Fund Insurance Premium (Termination Month)';
1966 
1967   l_jp_element_names_tab(157) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE59FBAE98791EFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE98080E881B7E69C88';
1968   l_element_names_tab(157) := 'SAL_WPF_PREM_EE_NRES_TRM';
1969   l_element_desc_tab(157) := 'Termination Month Welfare Pension Fund Insurance Premium on Salary not subject to Year End Adjustment (Non Resident)';
1970   l_element_rep_tab(157) := 'Welfare Pension Fund Ins Prem (Non Resident) (Term Month)';
1971 
1972   l_jp_element_names_tab(158) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE581A5E4BF9DEFBCBFE4BA8BE6A5ADE4B8BBEFBCBFE98080E881B7E69C88';
1973   l_element_names_tab(158) := 'SAL_HI_PREM_ER_TRM';
1974   l_element_desc_tab(158) := 'Termination Month Health Insurance Premium on Salary (Employer Burden)';
1975   l_element_rep_tab(158) := 'Health Insurance Premium (Employer) (Termination Month)';
1976 
1977   l_jp_element_names_tab(159) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE581A5E4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE98080E881B7E69C88';
1978   l_element_names_tab(159) := 'SAL_HI_PREM_EE_TRM';
1979   l_element_desc_tab(159) := 'Termination Month Health Insurance Premium on Salary (Insured Burden)';
1980   l_element_rep_tab(159) := 'Health Insurance Premium (Termination Month)';
1981 
1982   l_jp_element_names_tab(160) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE581A5E4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE98080E881B7E69C88';
1983   l_element_names_tab(160) := 'SAL_HI_PREM_EE_NRES_TRM';
1984   l_element_desc_tab(160) := 'Termination Month Health Insurance Premium on Salary not subject to Year End Adjustment (Non Resident)';
1985   l_element_rep_tab(160) := 'Health Insurance Premium (Non Resident) (Termination Month)';
1986 
1987   l_jp_element_names_tab(161) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE58E9AE5B9B4EFBCBFE4BA8BE6A5ADE4B8BBEFBCBFE98080E881B7E69C88';
1988   l_element_names_tab(161) := 'SAL_WP_PREM_ER_TRM';
1989   l_element_desc_tab(161) := 'Termination Month Welfare Pension Insurance Premium on Salary (Employer Burden)';
1990   l_element_rep_tab(161) := 'Welfare Pension Insurance Prem (Employer) (Termination Month)';
1991 
1992   l_jp_element_names_tab(162) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE58E9AE5B9B4EFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE98080E881B7E69C88';
1993   l_element_names_tab(162) := 'SAL_WP_PREM_EE_TRM';
1994   l_element_desc_tab(162) := 'Termination Month Welfare Pension Insurance Premium on Salary (Insured Burden)';
1995   l_element_rep_tab(162) := 'Welfare Pension Insurance Premium (Termination Month)';
1996 
1997   l_jp_element_names_tab(163) := 'E7B5A6EFBCBFE7B590E69E9CEFBCBFE58E9AE5B9B4EFBCBFE8A2ABE4BF9DE999BAE88085EFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE98080E881B7E69C88';
1998   l_element_names_tab(163) := 'SAL_WP_PREM_EE_NRES_TRM';
1999   l_element_desc_tab(163) := 'Termination Month Welfare Pension Insurance Premium on Salary not subject to  Year End Adjustment (Non Resident)';
2000   l_element_rep_tab(163) := 'Welfare Pension Ins Prem (Non Resident) (Termination Month)';
2001 
2002   l_jp_element_names_tab(164) := 'E585B1EFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE68385E5A0B1';
2003   l_element_names_tab(164) := 'COM_NRES_INFO';
2004   l_element_desc_tab(164) := 'Information for Non Resident';
2005   l_element_rep_tab(164) := 'Non Resident Information';
2006 
2007   l_jp_element_names_tab(165) := 'E882B2E694B9EFBCBFE59FBAE69CACEFBCBFE5A0B1E985ACE69C88E9A18D';
2008   l_element_names_tab(165) := 'IKU_MR_PROC';
2009   l_element_desc_tab(165) := 'Calculation of Standard Monthly Remuneration on Unscheduled Revision after Child-Care Leave';
2010   l_element_rep_tab(165) := 'Monthly Remuneration (Ikukai)';
2011 
2012   l_jp_element_names_tab(166) := 'E882B2E694B9EFBCBFE7B590E69E9C';
2013   l_element_names_tab(166) := 'IKU_RSLT';
2014   l_element_desc_tab(166) := 'Monthly Remuneration etc on Unscheduled Revision after Child-Care Leave';
2015   l_element_rep_tab(166) := 'Standard Monthly Remuneration (Ikukai)';
2016 
2017   l_jp_element_names_tab(167) := 'E882B2E694B9EFBCBFE8AABFE695B4E68385E5A0B1';
2018   l_element_names_tab(167) := 'IKU_ADJ_INFO';
2019   l_element_desc_tab(167) := 'Adjustment Information of Remuneration Amount for Unscheduled Revision after Child-Care Leave';
2020   l_element_rep_tab(167) := 'Adjustment Information (Ikukai)';
2021 
2022   l_jp_element_names_tab(168) := 'E882B2E694B9EFBCBFE69C88E9A18DE5A489E69BB4E5B18AEFBCBFE58299E88083E6AC84';
2023   l_element_names_tab(168) := 'IKU_REPORT_RMKS_ADJ_INFO';
2024   l_element_desc_tab(168) := 'Remarks Column Information for Notification of Geppen at the end of Child-Care Leave';
2025   l_element_rep_tab(168) := 'Remarks Column (Ikukai)';
2026 
2027 
2028 
2029   l_jp_element_names_tab(169) := '59656120496E737572616E636520446564756374696F6E20466F726D';
2030   l_element_names_tab(169) := 'YEA_INS_PREM_EXM_DECLARE_INFO';
2031   l_element_desc_tab(169) := 'Declaration Finalized Content Information of Insurance Premium Exemtion Declaration and Spouse Special Exemption Declaration';
2032   l_element_rep_tab(169) := 'Insurance Premium and Spouse Special Exemption';
2033 
2034   hr_utility.set_location(l_proc, 20);
2035 
2036   if (g_dbg) then
2037     hr_utility.trace('| Element Type Count = ' || l_jp_element_names_tab.COUNT);
2038     hr_utility.trace('+-------------------------------+ ');
2039   end if;
2040 --
2041 
2042   FORALL l_tab_cnt IN 1..l_jp_element_names_tab.COUNT
2043 
2044     UPDATE pay_element_types_f
2045     SET    element_name = l_element_names_tab(l_tab_cnt),
2046            description = l_element_desc_tab(l_tab_cnt),
2047            reporting_name = l_element_rep_tab(l_tab_cnt)
2048     WHERE  element_name LIKE hr_jp_standard_pkg.hextochar(l_jp_element_names_tab(l_tab_cnt),'AL32UTF8')
2049     AND    legislation_code = 'JP';
2050 
2051   UPDATE pay_element_types_f
2052   SET    description = description || 'Obsoleted'
2053   WHERE  ASCII(description) > 127
2054   AND    legislation_code = 'JP';
2055 
2056   hr_utility.set_location(l_proc, 30);
2057 
2058   if (g_dbg) then
2059     hr_utility.trace('| Total Elements Updated = ' || SQL%ROWCOUNT);
2060     hr_utility.trace('+-------------------------------+ ');
2061   end if;
2062 --
2063 EXCEPTION
2064 
2065   WHEN OTHERS THEN
2066 
2067     hr_utility.set_location(l_proc, 40);
2068 
2069     raise;
2070 
2071 END migrate_element_types;
2072 --
2073 -- |-------------------------------------------------------------------|
2074 -- |---------------------< migrate_element_class >---------------------|
2075 -- |-------------------------------------------------------------------|
2076 --
2077 procedure migrate_element_class is
2078 --
2079   type t_jp_class_name is table of VARCHAR2(200) index by binary_integer;
2080 
2081   type t_class_names_tab is table of pay_element_classifications.classification_name%TYPE index by binary_integer;
2082 
2083   type t_class_desc_tab is table of pay_element_classifications.description%TYPE index by binary_integer;
2084 
2085   l_jp_class_name      t_jp_class_name;
2086   l_class_names_tab    t_class_names_tab;
2087   l_class_desc_tab     t_class_desc_tab;
2088 
2089   l_proc              VARCHAR2(50) := g_pkg||'.migrate_element_class';
2090 
2091 BEGIN
2092 
2093   l_jp_class_name.DELETE;
2094   l_class_names_tab.DELETE;
2095   l_class_desc_tab.DELETE;
2096 
2097   hr_utility.set_location(l_proc, 10);
2098 
2099   l_jp_class_name(1) := 'C%2401%';
2100   l_class_names_tab(1) := 'TRM_ERN_KIND_TXBL';
2101   l_class_desc_tab(1) := 'Taxable Earning in Kind for Termination Payment (Resident)';
2102 
2103   l_jp_class_name(2) := 'C%2402%';
2104   l_class_names_tab(2) := 'TRM_ERN_KIND_NRES_TXBL';
2105   l_class_desc_tab(2) := 'Taxable Earning in Kind for Term Payment (Non Resident)';
2106 
2107   l_jp_class_name(3) := 'C%1103%';
2108   l_class_names_tab(3) := 'BON_SI_EI_PREM';
2109   l_class_desc_tab(3) := 'Employment Insurance Premium for Bonus (Resident)';
2110 
2111   l_jp_class_name(4) := 'C%1102%';
2112   l_class_names_tab(4) := 'BON_SI_WP_PREM';
2113   l_class_desc_tab(4) := 'Welfare Pension Insurance Premium for Bonus (Resident)';
2114 
2115   l_jp_class_name(5) := 'C%1101%';
2116   l_class_names_tab(5) := 'BON_SI_HI_PREM';
2117   l_class_desc_tab(5) := 'Health Insurance Premium for Bonus (Resident)';
2118 
2119   l_jp_class_name(6) := 'C%1752%';
2120   l_class_names_tab(6) := 'SPB_SI_NRES_SMALL_COMPANY_MUTUAL_AID_PREM';
2121   l_class_desc_tab(6) := 'Small Company Mutual Aid Prem for Spcl Bonus (Non Resident)';
2122 
2123   l_jp_class_name(7) := 'C%1751%';
2124   l_class_names_tab(7) := 'SPB_SI_NRES_EI_PREM';
2125   l_class_desc_tab(7) := 'Employment Insurance Premium for Special Bonus (Non Resident)';
2126 
2127   l_jp_class_name(8) := 'C%1702%';
2128   l_class_names_tab(8) := 'SPB_SI_SMALL_COMPANY_MUTUAL_AID_PREM';
2129   l_class_desc_tab(8) := 'Small Company Mutual Aid Premium for Special Bonus (Resident)';
2130 
2131   l_jp_class_name(9) := 'C%1701%';
2132   l_class_names_tab(9) := 'SPB_SI_EI_PREM';
2133   l_class_desc_tab(9) := 'Employment Insurance Premium for Special Bonus (Resident)';
2134 
2135   l_jp_class_name(10) := 'C%1501%';
2136   l_class_names_tab(10) := 'SPB_ERN_MONEY_TXBL';
2137   l_class_desc_tab(10) := 'Taxable Earning in Money for Special Bonus (Resident)';
2138 
2139   l_jp_class_name(11) := 'C%1504%';
2140   l_class_names_tab(11) := 'SPB_ERN_MONEY_SUBJ_EI';
2141   l_class_desc_tab(11) := 'Earning in Money subject to Employment Ins for Special Bonus';
2142 
2143   l_jp_class_name(12) := 'C%1505%';
2144   l_class_names_tab(12) := 'SPB_ERN_MONEY_TXBL_NRES';
2145   l_class_desc_tab(12) := 'Taxable Earning in Money for Special Bonus (Non Resident)';
2146 
2147   l_jp_class_name(13) := 'C%1503%';
2148   l_class_names_tab(13) := 'SPB_ERN_MONEY_SUBJ_LI';
2149   l_class_desc_tab(13) := 'Earning in Money subj to Work Accident Ins for Special Bonus';
2150 
2151   l_jp_class_name(14) := 'C%1502%';
2152   l_class_names_tab(14) := 'SPB_ERN_MONEY_SUBJ_SI';
2153   l_class_desc_tab(14) := 'Earning in Money subject to Social Ins for Special Bonus';
2154 
2155   l_jp_class_name(15) := 'C%1602%';
2156   l_class_names_tab(15) := 'SPB_ERN_KIND_SUBJ_SI';
2157   l_class_desc_tab(15) := 'Earning in Kind subject to Social Insurance for Special Bonus';
2158 
2159   l_jp_class_name(16) := 'C%1605%';
2160   l_class_names_tab(16) := 'SPB_ERN_KIND_TXBL_NRES';
2161   l_class_desc_tab(16) := 'Taxable Earning in Kind for Special Bonus (Non Resident)';
2162 
2163   l_jp_class_name(17) := 'C%1603%';
2164   l_class_names_tab(17) := 'SPB_ERN_KIND_SUBJ_LI';
2165   l_class_desc_tab(17) := 'Earning in Kind subj to Work Accident Ins for Special Bonus';
2166 
2167   l_jp_class_name(18) := 'C%1601%';
2168   l_class_names_tab(18) := 'SPB_ERN_KIND_TXBL';
2169   l_class_desc_tab(18) := 'Taxable Earning in Kind for Special Bonus (Resident)';
2170 
2171   l_jp_class_name(19) := 'C%1604%';
2172   l_class_names_tab(19) := 'SPB_ERN_KIND_SUBJ_EI';
2173   l_class_desc_tab(19) := 'Earning in Kind subject to Employment Ins for Special Bonus';
2174 
2175   l_jp_class_name(20) := 'C%2301%';
2176   l_class_names_tab(20) := 'TRM_ERN_MONEY_TXBL';
2177   l_class_desc_tab(20) := 'Taxable Earning in Money for Termination Payment (Resident)';
2178 
2179   l_jp_class_name(21) := 'C%2302%';
2180   l_class_names_tab(21) := 'TRM_ERN_MONEY_TXBL_NRES';
2181   l_class_desc_tab(21) := 'Taxable Earning in Money for Term Payment (Non Resident)';
2182 
2183   l_jp_class_name(22) := 'C%0402%';
2184   l_class_names_tab(22) := 'SAL_ERN_KIND_SUBJ_SI';
2185   l_class_desc_tab(22) := 'Earning in Kind subject to Social Insurance for Salary';
2186 
2187   l_jp_class_name(23) := 'C%0404%';
2188   l_class_names_tab(23) := 'SAL_ERN_KIND_SUBJ_EI';
2189   l_class_desc_tab(23) := 'Earning in Kind subject to Employment Insurance for Salary';
2190 
2191   l_jp_class_name(24) := 'C%0405%';
2192   l_class_names_tab(24) := 'SAL_ERN_KIND_TXBL_NRES';
2193   l_class_desc_tab(24) := 'Taxable Earning in Kind for Salary (Non Resident)';
2194 
2195   l_jp_class_name(25) := 'C%0503%';
2196   l_class_names_tab(25) := 'SAL_SI_WPF_PREM';
2197   l_class_desc_tab(25) := 'Welfare Pension Fund Insurance Premium for Salary (Resident)';
2198 
2199   l_jp_class_name(26) := 'C%0502%';
2200   l_class_names_tab(26) := 'SAL_SI_WP_PREM';
2201   l_class_desc_tab(26) := 'Welfare Pension Insurance Premium for Salary (Resident)';
2202 
2203   l_jp_class_name(27) := 'C%0501%';
2204   l_class_names_tab(27) := 'SAL_SI_HI_PREM';
2205   l_class_desc_tab(27) := 'Health Insurance Premium for Salary (Resident)';
2206 
2207   l_jp_class_name(28) := 'C%2101%';
2208   l_class_names_tab(28) := 'YEA_ITX';
2209   l_class_desc_tab(28) := 'Over and Short Tax Amount for Year End Adjustment';
2210 
2211   l_jp_class_name(29) := 'C%0301%';
2212   l_class_names_tab(29) := 'SAL_ERN_MONEY_TXBL';
2213   l_class_desc_tab(29) := 'Taxable Earning in Money for Salary (Resident)';
2214 
2215   l_jp_class_name(30) := 'C%0304%';
2216   l_class_names_tab(30) := 'SAL_ERN_MONEY_SUBJ_EI';
2217   l_class_desc_tab(30) := 'Earning in Money subject to Employment Insurance for Salary';
2218 
2219   l_jp_class_name(31) := 'C%0303%';
2220   l_class_names_tab(31) := 'SAL_ERN_MONEY_SUBJ_LI';
2221   l_class_desc_tab(31) := 'Earning in Money subject to Work Accident Ins for Salary';
2222 
2223   l_jp_class_name(32) := 'C%0305%';
2224   l_class_names_tab(32) := 'SAL_ERN_MONEY_TXBL_NRES';
2225   l_class_desc_tab(32) := 'Taxable Earning in Money for Salary (Non Resident)';
2226 
2227   l_jp_class_name(33) := 'C%0302%';
2228   l_class_names_tab(33) := 'SAL_ERN_MONEY_SUBJ_SI';
2229   l_class_desc_tab(33) := 'Earning in Money subject to Social Insurance for Salary';
2230 
2231   l_jp_class_name(34) := 'C%1003%';
2232   l_class_names_tab(34) := 'BON_ERN_KIND_SUBJ_WAI';
2233   l_class_desc_tab(34) := 'Earning in Kind subject to Work Accident Insurance for Bonus';
2234 
2235   l_jp_class_name(35) := 'C%1005%';
2236   l_class_names_tab(35) := 'BON_ERN_KIND_TXBL_NRES';
2237   l_class_desc_tab(35) := 'Taxable Earning in Kind for Bonus (Non Resident)';
2238 
2239   l_jp_class_name(36) := 'C%1004%';
2240   l_class_names_tab(36) := 'BON_ERN_KIND_SUBJ_EI';
2241   l_class_desc_tab(36) := 'Earning in Kind subject to Employment Insurance for Bonus';
2242 
2243   l_jp_class_name(37) := 'C%1001%';
2244   l_class_names_tab(37) := 'BON_ERN_KIND_TXBL';
2245   l_class_desc_tab(37) := 'Taxable Earning in Kind for Bonus (Resident)';
2246 
2247   l_jp_class_name(38) := 'C%1002%';
2248   l_class_names_tab(38) := 'BON_ERN_KIND_SUBJ_SI';
2249   l_class_desc_tab(38) := 'Earning in Kind subject to Social Insurance for Bonus';
2250 
2251   l_jp_class_name(39) := 'C%0401%';
2252   l_class_names_tab(39) := 'SAL_ERN_KIND_TXBL';
2253   l_class_desc_tab(39) := 'Taxable Earning in Kind for Salary (Resident)';
2254 
2255   l_jp_class_name(40) := 'C%0403%';
2256   l_class_names_tab(40) := 'SAL_ERN_KIND_SUBJ_WAI';
2257   l_class_desc_tab(40) := 'Earning in Kind subject to Work Accident Insurance for Salary';
2258 
2259   l_jp_class_name(41) := 'C%0500%';
2260   l_class_names_tab(41) := 'SAL_SI';
2261   l_class_desc_tab(41) := 'Pre Tax Deduction of Social Ins etc for Salary (Resident)';
2262 
2263   l_jp_class_name(42) := 'C%0400%';
2264   l_class_names_tab(42) := 'SAL_ERN_KIND';
2265   l_class_desc_tab(42) := 'Earning in Kind for Salary';
2266 
2267   l_jp_class_name(43) := 'C%1000%';
2268   l_class_names_tab(43) := 'BON_ERN_KIND';
2269   l_class_desc_tab(43) := 'Earning in Kind for Bonus';
2270 
2271   l_jp_class_name(44) := 'C%0300%';
2272   l_class_names_tab(44) := 'SAL_ERN_MONEY';
2273   l_class_desc_tab(44) := 'Earning in Money for Salary';
2274 
2275   l_jp_class_name(45) := 'C%2100%';
2276   l_class_names_tab(45) := 'YEA';
2277   l_class_desc_tab(45) := 'Item for Year End Adjustment';
2278 
2279   l_jp_class_name(46) := 'C%1300%';
2280   l_class_names_tab(46) := 'BON_DCT';
2281   l_class_desc_tab(46) := 'Deduction for Bonus';
2282 
2283   l_jp_class_name(47) := 'C%2800%';
2284   l_class_names_tab(47) := 'SAN';
2285   l_class_desc_tab(47) := 'Item for Santei';
2286 
2287   l_jp_class_name(48) := 'C%0505%';
2288   l_class_names_tab(48) := 'SAL_SI_SMALL_COMPANY_MUTUAL_AID_PREM';
2289   l_class_desc_tab(48) := 'Small Company Mutual Aid Premium for Salary (Resident)';
2290 
2291   l_jp_class_name(49) := 'C%0504%';
2292   l_class_names_tab(49) := 'SAL_SI_EI_PREM';
2293   l_class_desc_tab(49) := 'Employment Insurance Premium for Salary (Resident)';
2294 
2295   l_jp_class_name(50) := 'C%1153%';
2296   l_class_names_tab(50) := 'BON_SI_NRES_EI_PREM';
2297   l_class_desc_tab(50) := 'Employment Insurance Premium for Bonus (Non Resident)';
2298 
2299   l_jp_class_name(51) := 'C%0700%';
2300   l_class_names_tab(51) := 'SAL_DCT';
2301   l_class_desc_tab(51) := 'Deduction for Salary';
2302 
2303   l_jp_class_name(52) := 'C%1150%';
2304   l_class_names_tab(52) := 'BON_SI_NRES';
2305   l_class_desc_tab(52) := 'Pre Tax Deduction of Social Ins etc for Bonus (Non Resident)';
2306 
2307   l_jp_class_name(53) := 'C%0550%';
2308   l_class_names_tab(53) := 'SAL_SI_NRES';
2309   l_class_desc_tab(53) := 'Pre Tax Deduction of Social Ins etc for Salary (Non Resident)';
2310 
2311   l_jp_class_name(54) := 'C%0900%';
2312   l_class_names_tab(54) := 'BON_ERN_MONEY';
2313   l_class_desc_tab(54) := 'Earning in Money for Bonus';
2314 
2315   l_jp_class_name(55) := 'C%1100%';
2316   l_class_names_tab(55) := 'BON_SI';
2317   l_class_desc_tab(55) := 'Pre Tax Deduction of Social Ins etc for Bonus (Resident)';
2318 
2319   l_jp_class_name(56) := 'C%2900%';
2320   l_class_names_tab(56) := 'GEP';	l_class_desc_tab(56) := 'Item for Geppen';
2321 
2322   l_jp_class_name(57) := 'C%2400%';
2323   l_class_names_tab(57) := 'TRM_ERN_KIND';
2324   l_class_desc_tab(57) := 'Earning in Kind Item for Termination Payment';
2325 
2326   l_jp_class_name(58) := 'C%2200%';
2327   l_class_names_tab(58) := 'TRM_INFO';
2328   l_class_desc_tab(58) := 'Information for Termination Payment';
2329 
2330   l_jp_class_name(59) := 'C%2700%';
2331   l_class_names_tab(59) := 'TRM_DCT';
2332   l_class_desc_tab(59) := 'Deduction for Termination Payment';
2333 
2334   l_jp_class_name(60) := 'C%2600%';
2335   l_class_names_tab(60) := 'TRM_PROC_INFO';
2336   l_class_desc_tab(60) := 'Middle Process Information for Termination Payment';
2337 
2338   l_jp_class_name(61) := 'C%0600%';
2339   l_class_names_tab(61) := 'SAL_PROC_INFO';
2340   l_class_desc_tab(61) := 'Middle Process Information for Salary';
2341 
2342   l_jp_class_name(62) := 'C%0800%';
2343   l_class_names_tab(62) := 'BON_INFO';
2344   l_class_desc_tab(62) := 'Information for Bonus';
2345 
2346   l_jp_class_name(63) := 'C%1200%';
2347   l_class_names_tab(63) := 'BON_PROC_INFO';
2348   l_class_desc_tab(63) := 'Middle Process Information for Bonus';
2349 
2350   l_jp_class_name(64) := 'C%2000%';
2351   l_class_names_tab(64) := 'YEA_INFO';
2352   l_class_desc_tab(64) := 'Information for Year End Adjustment';
2353 
2354   l_jp_class_name(65) := 'C%3000%';
2355   l_class_names_tab(65) := 'ER_CHARGE';
2356   l_class_desc_tab(65) := 'Employer Burden Item';
2357 
2358   l_jp_class_name(66) := 'C%0200%';
2359   l_class_names_tab(66) := 'SAL_INFO';
2360   l_class_desc_tab(66) := 'Information for Salary';
2361 
2362   l_jp_class_name(67) := 'C%2300%';
2363   l_class_names_tab(67) := 'TRM_ERN_MONEY';
2364   l_class_desc_tab(67) := 'Earning in Money for Termination Payment';
2365 
2366   l_jp_class_name(68) := 'C%2500%';
2367   l_class_names_tab(68) := 'TRM_PRE_TAX_DCT';
2368   l_class_desc_tab(68) := 'Pre Tax Deduction for Termination Payment';
2369 
2370   l_jp_class_name(69) := 'C%1600%';
2371   l_class_names_tab(69) := 'SPB_ERN_KIND';
2372   l_class_desc_tab(69) := 'Earning in Kind for Special Bonus';
2373 
2374   l_jp_class_name(70) := 'C%1400%';
2375   l_class_names_tab(70) := 'SPB_INFO';
2376   l_class_desc_tab(70) := 'Information for Special Bonus';
2377 
2378   l_jp_class_name(71) := 'C%1900%';
2379   l_class_names_tab(71) := 'SPB_DCT';
2380   l_class_desc_tab(71) := 'Deduction for Special Bonus';
2381 
2382   l_jp_class_name(72) := 'C%1700%';
2383   l_class_names_tab(72) := 'SPB_SI';
2384   l_class_desc_tab(72) := 'Pre Tax Ded of Social Ins etc for Spcl Bonus (Resident)';
2385 
2386   l_jp_class_name(73) := 'C%1750%';
2387   l_class_names_tab(73) := 'SPB_SI_NRES';
2388   l_class_desc_tab(73) := 'Pre Tax Ded of Social Ins etc for Spcl Bonus (Non Resident)';
2389 
2390   l_jp_class_name(74) := 'C%1800%';
2391   l_class_names_tab(74) := 'SPB_PROC_INFO';
2392   l_class_desc_tab(74) := 'Middle Process Information for Special Bonus';
2393 
2394   l_jp_class_name(75) := 'C%1500%';
2395   l_class_names_tab(75) := 'SPB_ERN_MONEY';
2396   l_class_desc_tab(75) := 'Earning in Money for Special Bonus';
2397 
2398   l_jp_class_name(76) := 'C%1104%';
2399   l_class_names_tab(76) := 'BON_SI_SMALL_COMPANY_MUTUAL_AID_PREM';
2400   l_class_desc_tab(76) := 'Small Company Mutual Aid Premium for Bonus (Resident)';
2401 
2402   l_jp_class_name(77) := 'C%1105%';
2403   l_class_names_tab(77) := 'BON_SI_WPF_PREM';
2404   l_class_desc_tab(77) := 'Welfare Pension Fund Insurance Premium for Bonus (Resident)';
2405 
2406   l_jp_class_name(78) := 'C%0902%';
2407   l_class_names_tab(78) := 'BON_ERN_MONEY_SUBJ_SI';
2408   l_class_desc_tab(78) := 'Earning in Money subject to Social Insurance for Bonus';
2409 
2410   l_jp_class_name(79) := 'C%0904%';
2411   l_class_names_tab(79) := 'BON_ERN_MONEY_SUBJ_EI';
2412   l_class_desc_tab(79) := 'Earning in Money subject to Employment Insurance for Bonus';
2413 
2414   l_jp_class_name(80) := 'C%0903%';
2415   l_class_names_tab(80) := 'BON_ERN_MONEY_SUBJ_WAI';
2416   l_class_desc_tab(80) := 'Earning in Money subject to Work Accident Insurance for Bonus';
2417 
2418   l_jp_class_name(81) := 'C%0905%';
2419   l_class_names_tab(81) := 'BON_ERN_MONEY_TXBL_NRES';
2420   l_class_desc_tab(81) := 'Assessable Earning in Money for Bonus (Non Resident)';
2421 
2422   l_jp_class_name(82) := 'C%0901%';
2423   l_class_names_tab(82) := 'BON_ERN_MONEY_TXBL';
2424   l_class_desc_tab(82) := 'Taxable Earning in Money for Bonus (Resident)';
2425 
2426   l_jp_class_name(83) := 'C%0555%';
2427   l_class_names_tab(83) := 'SAL_SI_NRES_SMALL_COMPANY_MUTUAL_AID_PREM';
2428   l_class_desc_tab(83) := 'Small Company Mutual Aid Premium for Salary (Non Resident)';
2429 
2430   l_jp_class_name(84) := 'C%0553%';
2431   l_class_names_tab(84) := 'SAL_SI_NRES_WPF_PREM';
2432   l_class_desc_tab(84) := 'Welfare Pension Fund Ins Premium for Salary (Non Resident)';
2433 
2434   l_jp_class_name(85) := 'C%0554%';
2435   l_class_names_tab(85) := 'SAL_SI_NRES_EI_PREM';
2436   l_class_desc_tab(85) := 'Employment Insurance Premium for Salary (Non Resident)';
2437 
2438   l_jp_class_name(86) := 'C%0552%';
2439   l_class_names_tab(86) := 'SAL_SI_NRES_WP_PREM';
2440   l_class_desc_tab(86) := 'Welfare Pension Insurance Premium for Salary (Non Resident)';
2441 
2442   l_jp_class_name(87) := 'C%0551%';
2443   l_class_names_tab(87) := 'SAL_SI_NRES_HI_PREM';
2444   l_class_desc_tab(87) := 'Health Insurance Premium for Salary (Non Resident)';
2445 
2446   l_jp_class_name(88) := 'C%1155%';
2447   l_class_names_tab(88) := 'BON_SI_NRES_WPF_PREM';
2448   l_class_desc_tab(88) := 'Welfare Pension Fund Ins Premium for Bonus (Non Resident)';
2449 
2450   l_jp_class_name(89) := 'C%1154%';
2451   l_class_names_tab(89) := 'BON_SI_NRES_SMALL_COMPANY_MUTUAL_AID_PREM';
2452   l_class_desc_tab(89) := 'Small Company Mutual Aid Premium for Bonus (Non Resident)';
2453 
2454   l_jp_class_name(90) := 'C%1151%';
2455   l_class_names_tab(90) := 'BON_SI_NRES_HI_PREM';
2456   l_class_desc_tab(90) := 'Health Insurance Premium for Bonus (Non Resident)';
2457 
2458   l_jp_class_name(91) := 'C%1152%';
2459   l_class_names_tab(91) := 'BON_SI_NRES_WP_PREM';
2460   l_class_desc_tab(91) := 'Welfare Pension Insurance Premium for Bonus (Non Resident)';
2461 
2462   l_jp_class_name(92) := 'C%0100%';
2463   l_class_names_tab(92) := 'BASIC_INFO';
2464   l_class_desc_tab(92) := 'Basic Information';
2465 
2466   hr_utility.set_location(l_proc, 20);
2467 
2468   if (g_dbg) then
2469     hr_utility.trace('| Element Classification Count = ' || l_jp_class_name.COUNT);
2470     hr_utility.trace('+--------------------------------------------+ ');
2471   end if;
2472 --
2473 
2474   FORALL l_tab_cnt IN 1..l_jp_class_name.COUNT
2475 
2476     UPDATE pay_element_classifications
2477     SET    classification_name = l_class_names_tab(l_tab_cnt),
2478            description = l_class_desc_tab(l_tab_cnt)
2479     WHERE  classification_name LIKE l_jp_class_name(l_tab_cnt)
2480     AND    legislation_code = 'JP';
2481 
2482   hr_utility.set_location(l_proc, 30);
2483 
2484   if (g_dbg) then
2485     hr_utility.trace('| Total Classifications Updated = ' || SQL%ROWCOUNT);
2486     hr_utility.trace('+-------------------------------+ ');
2487   end if;
2488 --
2489 EXCEPTION
2490 
2491   WHEN OTHERS THEN
2492 
2493     hr_utility.set_location(l_proc, 40);
2494 
2495     raise;
2496 
2497 END migrate_element_class;
2498 --
2499 -- |-------------------------------------------------------------------|
2500 -- |--------------------< migrate_balance_types >----------------------|
2501 -- |-------------------------------------------------------------------|
2502 --
2503 procedure migrate_balance_types is
2504 --
2505   type t_jp_bal_names_tab is table of VARCHAR2(200) index by binary_integer;
2506 
2507   type t_bal_names_tab is table of pay_balance_types.balance_name%TYPE index by binary_integer;
2508 
2509   type t_bal_rep_tab is table of pay_balance_types.reporting_name%TYPE index by binary_integer;
2510 
2511   l_jp_bal_names_tab  t_jp_bal_names_tab;
2512   l_bal_names_tab     t_bal_names_tab;
2513   l_bal_rep_tab       t_bal_rep_tab;
2514 
2515   l_proc              VARCHAR2(50) := g_pkg||'.migrate_balance_types';
2516 
2517 BEGIN
2518 
2519   l_jp_bal_names_tab.DELETE;
2520   l_bal_names_tab.DELETE;
2521   l_bal_rep_tab.DELETE;
2522 
2523   hr_utility.set_location(l_proc, 10);
2524 
2525   l_jp_bal_names_tab(1) := '42EFBCBFE585B1EFBCBFE58E9AE7949FE5B9B4E98791E4BF9DE999BAE69699E59088E8A888';
2526   l_bal_names_tab(1) := 'B_COM_WP_PREM';
2527   l_bal_rep_tab(1) := 'Welfare Pension Insurance Premium';
2528 
2529   l_jp_bal_names_tab(2) := '42EFBCBFE69C88EFBCBFE59BBAE5AE9AE79A84E8B383E98791';
2530   l_bal_names_tab(2) := 'B_GEP_FIXED_WAGE';
2531   l_bal_rep_tab(2) := 'Fixed Wage';
2532 
2533   l_jp_bal_names_tab(3) := '42EFBCBFE585B1EFBCBFE7AE97E5AE9AE69C88E5A489EFBCBFE789B9E588A5E8B39EE4B88EE78FBEE789A9';
2534   l_bal_names_tab(3) := 'B_COM_SAN_GEP_SP_BON_ERN_KIND';
2535   l_bal_rep_tab(3) := 'Special Bonus in Kind';
2536 
2537   l_jp_bal_names_tab(4) := '42EFBCBFE98080EFBCBFE78FBEE789A9E58886E8AAB2E7A88EE9A18DE59088E8A888';
2538   l_bal_names_tab(4) := 'B_TRM_TXBL_ERN_KIND';
2539   l_bal_rep_tab(4) := 'Total Assessable Amount (in Kind)';
2540 
2541   l_jp_bal_names_tab(5) := '42EFBCBFE5B9B4EFBCBFE5B9B4E7A88EE9A18D';
2542   l_bal_names_tab(5) := 'B_YEA_ANNUAL_TAX';
2543   l_bal_rep_tab(5) := 'Annual Tax Amount';
2544 
2545   l_jp_bal_names_tab(6) := '42EFBCBFE98080EFBCBFE4BD8FE6B091E7A88EE9A18DEFBCBFE789B9E588A5E5BEB4E58F8EEFBCBFE7A88EE9A18D';
2546   l_bal_names_tab(6) := 'B_TRM_LTX_SP_WITHHOLD_TAX';
2547   l_bal_rep_tab(6) := 'Special Collecting Local Tax';
2548 
2549   l_jp_bal_names_tab(7) := '42EFBCBFE789B9E8B39EEFBCBFE7A4BEE4BC9AE4BF9DE999BAE69699E68EA7E999A4E5BE8CE381AEE98791E9A18D';
2550   l_bal_names_tab(7) := 'B_SPB_AMT_AFTER_SI_PREM_DCT';
2551   l_bal_rep_tab(7) := 'Amount after Deduction of Social Insurance Premium';
2552 
2553   l_jp_bal_names_tab(8) := '42EFBCBFE5B9B4EFBCBFE9818EE4B88DE8B6B3E7A88EE9A18D';
2554   l_bal_names_tab(8) := 'B_YEA_TAX_PAY';
2555   l_bal_rep_tab(8) := 'Over and Short Tax Amount';
2556 
2557   l_jp_bal_names_tab(9) := '42EFBCBFE7B5A6EFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE78FBEE789A9E58886E8AAB2E7A88EE9A18DE59088E8A888';
2558   l_bal_names_tab(9) := 'B_SAL_TXBL_ERN_KIND_NRES';
2559   l_bal_rep_tab(9) := 'Total Assessable Amount (Non Resident) (In Kind)';
2560 
2561   l_jp_bal_names_tab(10) := '42EFBCBFE7B5A6EFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE694AFE7B5A6E58886E8AAB2E7A88EE9A18DE59088E8A888';
2562   l_bal_names_tab(10) := 'B_SAL_TXBL_ERN_MONEY_NRES';
2563   l_bal_rep_tab(10) := 'Total Assessable Amount (Non Resident)';
2564 
2565   l_jp_bal_names_tab(11) := '42EFBCBFE8B39EEFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE78FBEE789A9E58886E8AAB2E7A88EE9A18DE59088E8A888';
2566   l_bal_names_tab(11) := 'B_BON_TXBL_ERN_KIND_NRES';
2567   l_bal_rep_tab(11) := 'Total Assessable Amount (Non Resident) (in Kind)';
2568 
2569   l_jp_bal_names_tab(12) := '42EFBCBFE8B39EEFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE694AFE7B5A6E58886E8AAB2E7A88EE9A18DE59088E8A888';
2570   l_bal_names_tab(12) := 'B_BON_TXBL_ERN_MONEY_NRES';
2571   l_bal_rep_tab(12) := 'Total Assessable Amount (Non Resident)';
2572 
2573   l_jp_bal_names_tab(13) := '42EFBCBFE98080EFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE78FBEE789A9E58886E8AAB2E7A88EE9A18DE59088E8A888';
2574   l_bal_names_tab(13) := 'B_TRM_TXBL_ERN_KIND_NRES';
2575   l_bal_rep_tab(13) := 'Total Assessable Amount (Non Resident) (In Kind)';
2576 
2577   l_jp_bal_names_tab(14) := '42EFBCBFE98080EFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE694AFE7B5A6E58886E8AAB2E7A88EE9A18DE59088E8A888';
2578   l_bal_names_tab(14) := 'B_TRM_TXBL_ERN_MONEY_NRES';
2579   l_bal_rep_tab(14) := 'Total Assessable Amount (Non Resident)';
2580 
2581   l_jp_bal_names_tab(15) := '42EFBCBFE789B9E8B39EEFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE78FBEE789A9E58886E8AAB2E7A88EE9A18DE59088E8A888';
2582   l_bal_names_tab(15) := 'B_SPB_TXBL_ERN_KIND_NRES';
2583   l_bal_rep_tab(15) := 'Total Assessable Amount (Non Resident) (In Kind)';
2584 
2585   l_jp_bal_names_tab(16) := '42EFBCBFE789B9E8B39EEFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE694AFE7B5A6E58886E8AAB2E7A88EE9A18DE59088E8A888';
2586   l_bal_names_tab(16) := 'B_SPB_TXBL_ERN_MONEY_NRES';
2587   l_bal_rep_tab(16) := 'Total Assessable Amount (Non Resident)';
2588 
2589   l_jp_bal_names_tab(17) := '42EFBCBFE5B9B4EFBCBFE68980E5BE97E68EA7E999A4E9A18DE59088E8A888';
2590   l_bal_names_tab(17) := 'B_YEA_INCOME_EXM';
2591   l_bal_rep_tab(17) := 'Total Income Deduction Amount';
2592 
2593   l_jp_bal_names_tab(18) := '42EFBCBFE98080EFBCBFE68980E5BE97E68EA7E999A4E9A18D';
2594   l_bal_names_tab(18) := 'B_TRM_INCOME_EXM';
2595   l_bal_rep_tab(18) := 'Income Deduction Amount';
2596 
2597   l_jp_bal_names_tab(19) := '42EFBCBFE8B39EEFBCBFE99B87E794A8E4BF9DE999BAE5AFBEE8B1A1E8B383E98791E7B78FE9A18D';
2598   l_bal_names_tab(19) := 'B_BON_ERN_SUBJ_EI';
2599   l_bal_rep_tab(19) := 'Total Amount of Wage subject to Employment Insurance';
2600 
2601   l_jp_bal_names_tab(20) := '42EFBCBFE8B39EEFBCBFE58AB4E781BDE4BF9DE999BAE5AFBEE8B1A1E8B383E98791E7B78FE9A18D';
2602   l_bal_names_tab(20) := 'B_BON_ERN_SUBJ_WAI';
2603   l_bal_rep_tab(20) := 'Total Amount of Wage subject to Work Accident Insurance';
2604 
2605   l_jp_bal_names_tab(21) := '42EFBCBFE8B39EEFBCBFE694AFE7B5A6E9A18DE59088E8A888';
2606   l_bal_names_tab(21) := 'B_BON_ERN';
2607   l_bal_rep_tab(21) := 'Total Earning Amount';
2608 
2609   l_jp_bal_names_tab(22) := '42EFBCBFE8B39EEFBCBFE68980E5BE97E7A88EE9A18D';
2610   l_bal_names_tab(22) := 'B_BON_ITX';
2611   l_bal_rep_tab(22) := 'Income Tax';
2612 
2613   l_jp_bal_names_tab(23) := '42EFBCBFE8B39EEFBCBFE5B7AEE5BC95E694AFE7B5A6E9A18D';
2614   l_bal_names_tab(23) := 'B_BON_NET_PAY';
2615   l_bal_rep_tab(23) := 'Net Pay Amount';
2616 
2617   l_jp_bal_names_tab(24) := '42EFBCBFE8B39EEFBCBFE694AFE7B5A6E58886E8AAB2E7A88EE9A18DE59088E8A888';
2618   l_bal_names_tab(24) := 'B_BON_TXBL_ERN_MONEY';
2619   l_bal_rep_tab(24) := 'Total Assessable Amount';
2620 
2621   l_jp_bal_names_tab(25) := '42EFBCBFE8B39EEFBCBFE7A4BEE4BC9AE4BF9DE999BAE69699E68EA7E999A4E5BE8CE381AEE98791E9A18D';
2622   l_bal_names_tab(25) := 'B_BON_AMT_AFTER_SI_PREM_DCT';
2623   l_bal_rep_tab(25) := 'Amount after Deduction of Social Insurance Premium';
2624 
2625   l_jp_bal_names_tab(26) := '42EFBCBFE8B39EEFBCBFE78FBEE789A9E58886E8AAB2E7A88EE9A18DE59088E8A888';
2626   l_bal_names_tab(26) := 'B_BON_TXBL_ERN_KIND';
2627   l_bal_rep_tab(26) := 'Total Assessable Amount (In Kind)';
2628 
2629   l_jp_bal_names_tab(27) := '42EFBCBFE8B39EEFBCBFE68EA7E999A4E9A18DE59088E8A888';
2630   l_bal_names_tab(27) := 'B_BON_DCT';
2631   l_bal_rep_tab(27) := 'Total Deduction Amount';
2632 
2633   l_jp_bal_names_tab(28) := '42EFBCBFE8B39EEFBCBFE7A4BEE4BC9AE4BF9DE999BAE69699E59088E8A888';
2634   l_bal_names_tab(28) := 'B_BON_SI_PREM';
2635   l_bal_rep_tab(28) := 'Social Insurance Premium';
2636 
2637   l_jp_bal_names_tab(29) := '42EFBCBFE8B39EEFBCBFE99B87E794A8E4BF9DE999BAE69699';
2638   l_bal_names_tab(29) := 'B_BON_EI_PREM';
2639   l_bal_rep_tab(29) := 'Employment Insurance Premium';
2640 
2641   l_jp_bal_names_tab(30) := '42EFBCBFE694AFE68995E5898DE587A6E79086E794A8E5B7AEE5BC95E694AFE7B5A6E9A18D';
2642   l_bal_names_tab(30) := 'B_NET_PAY';
2643   l_bal_rep_tab(30) := 'Net Pay Amount for PrePayments';
2644 
2645   l_jp_bal_names_tab(31) := '42EFBCBFE7B5A6EFBCBFE99B87E794A8E4BF9DE999BAE5AFBEE8B1A1E8B383E98791E7B78FE9A18D';
2646   l_bal_names_tab(31) := 'B_SAL_ERN_SUBJ_EI';
2647   l_bal_rep_tab(31) := 'Total Amount of Wage subject to Employment Insurance';
2648 
2649   l_jp_bal_names_tab(32) := '42EFBCBFE7B5A6EFBCBFE58AB4E781BDE4BF9DE999BAE5AFBEE8B1A1E8B383E98791E7B78FE9A18D';
2650   l_bal_names_tab(32) := 'B_SAL_ERN_SUBJ_WAI';
2651   l_bal_rep_tab(32) := 'Total Amount of Wage subject to Wa Insurance';
2652 
2653   l_jp_bal_names_tab(33) := '42EFBCBFE7B5A6EFBCBFE694AFE7B5A6E9A18DE59088E8A888';
2654   l_bal_names_tab(33) := 'B_SAL_ERN';
2655   l_bal_rep_tab(33) := 'Total Earning Amount';
2656 
2657   l_jp_bal_names_tab(34) := '42EFBCBFE7B5A6EFBCBFE581A5E5BAB7E4BF9DE999BAE69699';
2658   l_bal_names_tab(34) := 'B_SAL_HI_PREM';
2659   l_bal_rep_tab(34) := 'Health Insurance Premium';
2660 
2661   l_jp_bal_names_tab(35) := '42EFBCBFE7B5A6EFBCBFE68980E5BE97E7A88EE9A18D';
2662   l_bal_names_tab(35) := 'B_SAL_ITX';
2663   l_bal_rep_tab(35) := 'Income Tax';
2664 
2665   l_jp_bal_names_tab(36) := '42EFBCBFE7B5A6EFBCBFE5B7AEE5BC95E694AFE7B5A6E9A18D';
2666   l_bal_names_tab(36) := 'B_SAL_NET_PAY';
2667   l_bal_rep_tab(36) := 'Net Pay Amount';
2668 
2669   l_jp_bal_names_tab(37) := '42EFBCBFE7B5A6EFBCBFE694AFE7B5A6E58886E8AAB2E7A88EE9A18DE59088E8A888';
2670   l_bal_names_tab(37) := 'B_SAL_TXBL_ERN_MONEY';
2671   l_bal_rep_tab(37) := 'Total Assessable Amount';
2672 
2673   l_jp_bal_names_tab(38) := '42EFBCBFE7B5A6EFBCBFE7A4BEE4BC9AE4BF9DE999BAE69699E68EA7E999A4E5BE8CE381AEE98791E9A18D';
2674   l_bal_names_tab(38) := 'B_SAL_AMT_AFTER_SI_PREM_DCT';
2675   l_bal_rep_tab(38) := 'Amount after Deduction of Social Insurance Premium';
2676 
2677   l_jp_bal_names_tab(39) := '42EFBCBFE7B5A6EFBCBFE78FBEE789A9E58886E8AAB2E7A88EE9A18DE59088E8A888';
2678   l_bal_names_tab(39) := 'B_SAL_TXBL_ERN_KIND';
2679   l_bal_rep_tab(39) := 'Total Assessable Amount (In Kind)';
2680 
2681   l_jp_bal_names_tab(40) := '42EFBCBFE7B5A6EFBCBFE68EA7E999A4E9A18DE59088E8A888';
2682   l_bal_names_tab(40) := 'B_SAL_DCT';
2683   l_bal_rep_tab(40) := 'Total Deduction Amount';
2684 
2685   l_jp_bal_names_tab(41) := '42EFBCBFE7B5A6EFBCBFE7A4BEE4BC9AE4BF9DE999BAE69699E59088E8A888';
2686   l_bal_names_tab(41) := 'B_SAL_SI_PREM';
2687   l_bal_rep_tab(41) := 'Social Insurance Premium';
2688 
2689   l_jp_bal_names_tab(42) := '42EFBCBFE7B5A6EFBCBFE99B87E794A8E4BF9DE999BAE69699';
2690   l_bal_names_tab(42) := 'B_SAL_EI_PREM';
2691   l_bal_rep_tab(42) := 'Employment Insurance Premium';
2692 
2693   l_jp_bal_names_tab(43) := '42EFBCBFE7B5A6EFBCBFE58E9AE7949FE5B9B4E98791E4BF9DE999BAE69699';
2694   l_bal_names_tab(43) := 'B_SAL_WP_PREM';
2695   l_bal_rep_tab(43) := 'Welfare Pension Insurance Premium';
2696 
2697   l_jp_bal_names_tab(44) := '42EFBCBFE789B9E8B39EEFBCBFE99B87E794A8E4BF9DE999BAE5AFBEE8B1A1E8B383E98791E7B78FE9A18D';
2698   l_bal_names_tab(44) := 'B_SPB_ERN_SUBJ_EI';
2699   l_bal_rep_tab(44) := 'Total Amount of Wage subject to Employment Insurance';
2700 
2701   l_jp_bal_names_tab(45) := '42EFBCBFE789B9E8B39EEFBCBFE58AB4E781BDE4BF9DE999BAE5AFBEE8B1A1E8B383E98791E7B78FE9A18D';
2702   l_bal_names_tab(45) := 'B_SPB_ERN_SUBJ_WAI';
2703   l_bal_rep_tab(45) := 'Total Amount of Wage subject to Wa Insurance';
2704 
2705   l_jp_bal_names_tab(46) := '42EFBCBFE789B9E8B39EEFBCBFE694AFE7B5A6E9A18DE59088E8A888';
2706   l_bal_names_tab(46) := 'B_SPB_ERN';
2707   l_bal_rep_tab(46) := 'Total Earning Amount';
2708 
2709   l_jp_bal_names_tab(47) := '42EFBCBFE789B9E8B39EEFBCBFE68980E5BE97E7A88EE9A18D';
2710   l_bal_names_tab(47) := 'B_SPB_ITX';
2711   l_bal_rep_tab(47) := 'Income Tax';
2712 
2713   l_jp_bal_names_tab(48) := '42EFBCBFE789B9E8B39EEFBCBFE5B7AEE5BC95E694AFE7B5A6E9A18D';
2714   l_bal_names_tab(48) := 'B_SPB_NET_PAY';
2715   l_bal_rep_tab(48) := 'Net Pay Amount';
2716 
2717   l_jp_bal_names_tab(49) := '42EFBCBFE789B9E8B39EEFBCBFE694AFE7B5A6E58886E8AAB2E7A88EE9A18DE59088E8A888';
2718   l_bal_names_tab(49) := 'B_SPB_TXBL_ERN_MONEY';
2719   l_bal_rep_tab(49) := 'Total Assessable Amount';
2720 
2721   l_jp_bal_names_tab(50) := '42EFBCBFE789B9E8B39EEFBCBFE78FBEE789A9E58886E8AAB2E7A88EE9A18DE59088E8A888';
2722   l_bal_names_tab(50) := 'B_SPB_TXBL_ERN_KIND';
2723   l_bal_rep_tab(50) := 'Total Assessable Amount (In Kind)';
2724 
2725   l_jp_bal_names_tab(51) := '42EFBCBFE789B9E8B39EEFBCBFE68EA7E999A4E9A18DE59088E8A888';
2726   l_bal_names_tab(51) := 'B_SPB_DCT';
2727   l_bal_rep_tab(51) := 'Total Deduction Amount';
2728 
2729   l_jp_bal_names_tab(52) := '42EFBCBFE789B9E8B39EEFBCBFE99B87E794A8E4BF9DE999BAE69699';
2730   l_bal_names_tab(52) := 'B_SPB_EI_PREM';
2731   l_bal_rep_tab(52) := 'Employment Insurance Premium';
2732 
2733   l_jp_bal_names_tab(53) := '42EFBCBFE585B1EFBCBFE7AE97E5AE9AE69C88E5A489EFBCBFE694AFE68995E59FBAE7A48EE697A5E695B0';
2734   l_bal_names_tab(53) := 'B_COM_SAN_GEP_PAY_BASE_DAYS';
2735   l_bal_rep_tab(53) := 'Payment Base Days (Santei Geppen)';
2736 
2737   l_jp_bal_names_tab(54) := '42EFBCBFE585B1EFBCBFE7AE97E5AE9AE69C88E5A489EFBCBFE7B5A6E4B88EE78FBEE789A9';
2738   l_bal_names_tab(54) := 'B_COM_SAN_GEP_SAL_ERN_KIND';
2739   l_bal_rep_tab(54) := 'Salary in Kind (Santei Geppen)';
2740 
2741   l_jp_bal_names_tab(55) := '42EFBCBFE585B1EFBCBFE7AE97E5AE9AE69C88E5A489EFBCBFE7B5A6E4B88EE98791E98AAD';
2742   l_bal_names_tab(55) := 'B_COM_SAN_GEP_SAL_ERN_MONEY';
2743   l_bal_rep_tab(55) := 'Salary in Money (Santei Geppen)';
2744 
2745   l_jp_bal_names_tab(56) := '42EFBCBFE585B1EFBCBFE7AE97E5AE9AE69C88E5A489EFBCBFE789B9E588A5E8B39EE4B88EE98791E98AAD';
2746   l_bal_names_tab(56) := 'B_COM_SAN_GEP_SP_BON_ERN_MONEY';
2747   l_bal_rep_tab(56) := 'Special Bonus in Money';
2748 
2749   l_jp_bal_names_tab(57) := '42EFBCBFE98080EFBCBFE694AFE7B5A6E9A18DE59088E8A888';
2750   l_bal_names_tab(57) := 'B_TRM_ERN';
2751   l_bal_rep_tab(57) := 'Liquidation Amount';
2752 
2753   l_jp_bal_names_tab(58) := '42EFBCBFE98080EFBCBFE5B7AEE5BC95E694AFE7B5A6E9A18D';
2754   l_bal_names_tab(58) := 'B_TRM_NET_PAY';
2755   l_bal_rep_tab(58) := 'Net Pay Amount';
2756 
2757   l_jp_bal_names_tab(59) := '42EFBCBFE98080EFBCBFE694AFE7B5A6E58886E8AAB2E7A88EE9A18DE59088E8A888';
2758   l_bal_names_tab(59) := 'B_TRM_TXBL_ERN_MONEY';
2759   l_bal_rep_tab(59) := 'Total Assessable Amount';
2760 
2761   l_jp_bal_names_tab(60) := '42EFBCBFE98080EFBCBFE68EA7E999A4E9A18DE59088E8A888';
2762   l_bal_names_tab(60) := 'B_TRM_DCT';
2763   l_bal_rep_tab(60) := 'Total Deduction Amount';
2764 
2765   l_jp_bal_names_tab(61) := '42EFBCBFE5B9B4EFBCBFE5B7AEE5BC95E5B9B4E7A88EE9A18D';
2766   l_bal_names_tab(61) := 'B_YEA_NET_ANNUAL_TAX';
2767   l_bal_rep_tab(61) := 'Net Annual Tax Amount';
2768 
2769   l_jp_bal_names_tab(62) := '42EFBCBFE5B9B4EFBCBFE5B7AEE5BC95E8AAB2E7A88EE7B5A6E4B88EE68980E5BE97E98791E9A18D';
2770   l_bal_names_tab(62) := 'B_YEA_NET_TXBL_INCOME';
2771   l_bal_rep_tab(62) := 'Net Assessable Salary Income Amount';
2772 
2773   l_jp_bal_names_tab(63) := '42EFBCBFE585B1EFBCBFE581A5E5BAB7E4BF9DE999BAE69699E59088E8A888';
2774   l_bal_names_tab(63) := 'B_COM_HI_PREM';
2775   l_bal_rep_tab(63) := 'Health Insurance Premium';
2776 
2777   l_jp_bal_names_tab(64) := '42EFBCBFE5B9B4EFBCBFE5BEB4E58F8EE6B888E68980E5BE97E7A88EE59088E8A888';
2778   l_bal_names_tab(64) := 'B_YEA_WITHHOLD_ITX';
2779   l_bal_rep_tab(64) := 'Total Collected Income Tax';
2780 
2781   l_jp_bal_names_tab(65) := '42EFBCBFE5B9B4EFBCBFE7B5A6E4B88EE68EA7E999A4E58886E7949FE591BDE4BF9DE999BAE69699';
2782   l_bal_names_tab(65) := 'B_YEA_SAL_DCT_LIFE_INS_PREM';
2783   l_bal_rep_tab(65) := 'Life Insurance Premium (Salary Deduction)';
2784 
2785   l_jp_bal_names_tab(66) := '42EFBCBFE5B9B4EFBCBFE7B5A6E4B88EE68EA7E999A4E58886E995B7E69C9FE6908DE5AEB3E4BF9DE999BAE69699';
2786   l_bal_names_tab(66) := 'B_YEA_SAL_DCT_LONG_TERM_NONLIFE_INS_PREM';
2787   l_bal_rep_tab(66) := 'Long Term Nonlife Insurance Premium (Salary Deduction)';
2788 
2789   l_jp_bal_names_tab(67) := '42EFBCBFE5B9B4EFBCBFE7B5A6E4B88EE68EA7E999A4E58886E5808BE4BABAE5B9B4E98791E4BF9DE999BAE69699';
2790   l_bal_names_tab(67) := 'B_YEA_SAL_DCT_INDIVIDUAL_PENSION_PREM';
2791   l_bal_rep_tab(67) := 'Individual Pension Insurance Premium (Salary Deduction)';
2792 
2793   l_jp_bal_names_tab(68) := '42EFBCBFE5B9B4EFBCBFE7B5A6E4B88EE68980E5BE97E68EA7E999A4E5BE8CE381AEE98791E9A18D';
2794   l_bal_names_tab(68) := 'B_YEA_AMT_AFTER_EMP_INCOME_DCT';
2795   l_bal_rep_tab(68) := 'Amount after Salary Income Deduction';
2796 
2797   l_jp_bal_names_tab(69) := '42EFBCBFE5B9B4EFBCBFE7B5A6E4B88EE68EA7E999A4E58886E79FADE69C9FE6908DE5AEB3E4BF9DE999BAE69699';
2798   l_bal_names_tab(69) := 'B_YEA_SAL_DCT_SHORT_TERM_NONLIFE_INS_PREM';
2799   l_bal_rep_tab(69) := 'Short Term Nonlife Insurance Premium (Salary Deduction)';
2800 
2801   l_jp_bal_names_tab(70) := '42EFBCBFE5B9B4EFBCBFE694AFE7B5A6E58886E8AAB2E7A88EE9A18DE59088E8A888';
2802   l_bal_names_tab(70) := 'B_YEA_TXBL_ERN_MONEY';
2803   l_bal_rep_tab(70) := 'Total Assessable Amount';
2804 
2805   l_jp_bal_names_tab(71) := '42EFBCBFE5B9B4EFBCBFE78FBEE789A9E58886E8AAB2E7A88EE9A18DE59088E8A888';
2806   l_bal_names_tab(71) := 'B_YEA_TXBL_ERN_KIND';
2807   l_bal_rep_tab(71) := 'Total Assessable Amount (In Kind)';
2808 
2809   l_jp_bal_names_tab(72) := '42EFBCBFE585B1EFBCBFE99B87E794A8E4BF9DE999BAE69699E59088E8A888';
2810   l_bal_names_tab(72) := 'B_COM_EI_PREM';
2811   l_bal_rep_tab(72) := 'Employment Insurance Premium';
2812 
2813   l_jp_bal_names_tab(73) := '42EFBCBFE7B5A6EFBCBFE68980E5BE97E7A88EE794A8E8A888E7AE97E59FBAE7A48EE697A5E695B0';
2814   l_bal_names_tab(73) := 'B_SAL_ITX_CALC_BASE_DAYS';
2815   l_bal_rep_tab(73) := 'Calculation Base Days (Income Tax)';
2816 
2817   l_jp_bal_names_tab(74) := '42EFBCBFE7B5A6EFBCBFE4BD8FE6B091E7A88EE9A18D';
2818   l_bal_names_tab(74) := 'B_SAL_LTX';
2819   l_bal_rep_tab(74) := 'Local Tax';
2820 
2821   l_jp_bal_names_tab(75) := '42EFBCBFE585B1EFBCBFE78FBEE789A9E58886E8AAB2E7A88EE9A18DE59088E8A888';
2822   l_bal_names_tab(75) := 'B_COM_TXBL_ERN_KIND';
2823   l_bal_rep_tab(75) := 'Total Assessable Amount (In Kind)';
2824 
2825   l_jp_bal_names_tab(76) := '42EFBCBFE585B1EFBCBFE99B87E794A8E4BF9DE999BAE5AFBEE8B1A1E8B383E98791E7B78FE9A18D';
2826   l_bal_names_tab(76) := 'B_COM_ERN_SUBJ_EI';
2827   l_bal_rep_tab(76) := 'Total Amount of Wage subject to Employment Insurance';
2828 
2829   l_jp_bal_names_tab(77) := '42EFBCBFE585B1EFBCBFE694AFE7B5A6E58886E8AAB2E7A88EE9A18DE59088E8A888';
2830   l_bal_names_tab(77) := 'B_COM_TXBL_ERN_MONEY';
2831   l_bal_rep_tab(77) := 'Total Assessable Amount';
2832 
2833   l_jp_bal_names_tab(78) := '42EFBCBFE585B1EFBCBFE4BD8FE6B091E7A88EE9A18DEFBCBFE4B880E68BACE5BEB4E58F8E';
2834   l_bal_names_tab(78) := 'B_COM_LTX_LUMP_SUM_WITHHOLD';
2835   l_bal_rep_tab(78) := 'Local Tax (Lump Sum Collection)';
2836 
2837   l_jp_bal_names_tab(79) := '42EFBCBFE585B1EFBCBFE68980E5BE97E7A88EE9A18D';
2838   l_bal_names_tab(79) := 'B_COM_ITX';
2839   l_bal_rep_tab(79) := 'Income Tax';
2840 
2841   l_jp_bal_names_tab(80) := '42EFBCBFE585B1EFBCBFE58AB4E781BDE4BF9DE999BAE5AFBEE8B1A1E8B383E98791E7B78FE9A18D';
2842   l_bal_names_tab(80) := 'B_COM_ERN_SUBJ_WAI';
2843   l_bal_rep_tab(80) := 'Total Amount of Wage subject to Wa Insurance';
2844 
2845   l_jp_bal_names_tab(81) := '42EFBCBFE98080EFBCBFE4BD8FE6B091E7A88EE9A18DEFBCBFE789B9E588A5E5BEB4E58F8EEFBCBFE5B882E58CBAE794BAE69D91E7A88EE9A18D';
2846   l_bal_names_tab(81) := 'B_TRM_LTX_SP_WITHHOLD_MUNICIPAL_TAX';
2847   l_bal_rep_tab(81) := 'Special Collecting Local Tax (Municipal Tax)';
2848 
2849   l_jp_bal_names_tab(82) := '42EFBCBFE585B1EFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE78FBEE789A9E58886E8AAB2E7A88EE9A18DE59088E8A888';
2850   l_bal_names_tab(82) := 'B_COM_TXBL_ERN_KIND_NRES';
2851   l_bal_rep_tab(82) := 'Total Assessable Amount (Non Resident) (In Kind)';
2852 
2853   l_jp_bal_names_tab(83) := '42EFBCBFE98080EFBCBFE4BD8FE6B091E7A88EE9A18DEFBCBFE789B9E588A5E5BEB4E58F8EEFBCBFE98080E881B7E68980E5BE97E9A18D';
2854   l_bal_names_tab(83) := 'B_TRM_LTX_SP_WITHHOLD_TRM_INCOME';
2855   l_bal_rep_tab(83) := 'Special Collecting Local Tax (Termination Income)';
2856 
2857   l_jp_bal_names_tab(84) := '42EFBCBFE98080EFBCBFE4BD8FE6B091E7A88EE9A18DEFBCBFE789B9E588A5E5BEB4E58F8EEFBCBFE983BDE98193E5BA9CE79C8CE7A88EE9A18D';
2858   l_bal_names_tab(84) := 'B_TRM_LTX_SP_WITHHOLD_PREFECTURAL_TAX';
2859   l_bal_rep_tab(84) := 'Special Collecting Local Tax (Prefectural Tax)';
2860 
2861   l_jp_bal_names_tab(85) := '42EFBCBFE7B5A6EFBCBFE58E9AE7949FE5B9B4E98791E59FBAE98791E4BF9DE999BAE69699';
2862   l_bal_names_tab(85) := 'B_SAL_WPF_PREM';
2863   l_bal_rep_tab(85) := 'Welfare Pension Fund Insurance Premium';
2864 
2865   l_jp_bal_names_tab(86) := '42EFBCBFE5B9B4EFBCBFE7B5A6E4B88EE68EA7E999A4E58886E7A4BEE4BC9AE4BF9DE999BAE69699';
2866   l_bal_names_tab(86) := 'B_YEA_SAL_DCT_SI_PREM';
2867   l_bal_rep_tab(86) := 'Social Insurance Premium (Salary Deduction)';
2868 
2869   l_jp_bal_names_tab(87) := '42EFBCBFE585B1EFBCBFE99D9EE5B185E4BD8FE88085EFBCBFE694AFE7B5A6E58886E8AAB2E7A88EE9A18DE59088E8A888';
2870   l_bal_names_tab(87) := 'B_COM_TXBL_ERN_MONEY_NRES';
2871   l_bal_rep_tab(87) := 'Total Assessable Amount (Non Resident)';
2872 
2873   l_jp_bal_names_tab(88) := '42EFBCBFE585B1EFBCBFE581A5E5BAB7E4BF9DE999BAE69699E59088E8A888EFBCBFE4BA8BE6A5ADE4B8BB';
2874   l_bal_names_tab(88) := 'B_COM_HI_PREM_ER';
2875   l_bal_rep_tab(88) := 'Health Insurance Premium (Employer)';
2876 
2877   l_jp_bal_names_tab(89) := '42EFBCBFE585B1EFBCBFE58E9AE7949FE5B9B4E98791E59FBAE98791E4BF9DE999BAE69699E59088E8A888EFBCBFE4BA8BE6A5ADE4B8BB';
2878   l_bal_names_tab(89) := 'B_COM_WPF_PREM_ER';
2879   l_bal_rep_tab(89) := 'Welfare Pension Fund Insurance Premium (Employer)';
2880 
2881   l_jp_bal_names_tab(90) := '42EFBCBFE585B1EFBCBFE58E9AE7949FE5B9B4E98791E4BF9DE999BAE69699E59088E8A888EFBCBFE4BA8BE6A5ADE4B8BB';
2882   l_bal_names_tab(90) := 'B_COM_WP_PREM_ER';
2883   l_bal_rep_tab(90) := 'Welfare Pension Insurance Premium (Employer)';
2884 
2885   l_jp_bal_names_tab(91) := '42EFBCBFE5B9B4EFBCBFE5898DE881B7E68385E5A0B1EFBCBFE7B5A6E4B88EE68980E5BE97E9A18D';
2886   l_bal_names_tab(91) := 'B_YEA_PREV_EMP_INCOME';
2887   l_bal_rep_tab(91) := 'Salary Income (Previous Employment)';
2888 
2889   l_jp_bal_names_tab(92) := '42EFBCBFE5B9B4EFBCBFE5898DE881B7E68385E5A0B1EFBCBFE7A4BEE4BC9AE4BF9DE999BAE69699';
2890   l_bal_names_tab(92) := 'B_YEA_PREV_EMP_SI_PREM';
2891   l_bal_rep_tab(92) := 'Social Insurance Premium (Previous Employment)';
2892 
2893   l_jp_bal_names_tab(93) := '42EFBCBFE5B9B4EFBCBFE5898DE881B7E68385E5A0B1EFBCBFE68980E5BE97E7A88EE9A18D';
2894   l_bal_names_tab(93) := 'B_YEA_PREV_EMP_ITX';
2895   l_bal_rep_tab(93) := 'Income Tax (Previous Employment)';
2896 
2897   l_jp_bal_names_tab(94) := '42EFBCBFE5B9B4EFBCBFE5AFBEE8B1A1E88085E588A4E588A5';
2898   l_bal_names_tab(94) := 'B_YEA_TYPE';
2899   l_bal_rep_tab(94) := 'Subjected Person Determination';
2900 
2901   l_jp_bal_names_tab(95) := '42EFBCBFE98080EFBCBFE68980E5BE97E7A88EE9A18D';
2902   l_bal_names_tab(95) := 'B_TRM_ITX';
2903   l_bal_rep_tab(95) := 'Income Tax';
2904 
2905   l_jp_bal_names_tab(96) := '42EFBCBFE68980E5BE97E7A88EEFBCBF31393939E5B9B4E7B5A6E4B88EE789B9E588A5E8AABFE695B4E68EA7E999A4EFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18D';
2906   l_bal_names_tab(96) := 'B_COM_ITX_1999_SAL_SP_DCT_WITHHOLD_TAX';
2907   l_bal_rep_tab(96) := 'Income Tax Special Adjustment Deduction (Withholding Tax)';
2908 
2909   l_jp_bal_names_tab(97) := '42EFBCBFE68980E5BE97E7A88EEFBCBF31393939E5B9B4E7B5A6E4B88EE789B9E588A5E8AABFE695B4E68EA7E999A4EFBCBFE68EA7E999A4E9A18D';
2910   l_bal_names_tab(97) := 'B_COM_ITX_1999_SAL_SP_DCT';
2911   l_bal_rep_tab(97) := 'Income Tax Special Adjustment Deduction (Deduction)';
2912 
2913   l_jp_bal_names_tab(98) := '42EFBCBFE68980E5BE97E7A88EEFBCBF31393939E5B9B4E7B5A6E4B88EE789B9E588A5E8AABFE695B4E68EA7E999A4EFBCBFE68EA7E999A4E6B888';
2914   l_bal_names_tab(98) := 'B_COM_ITX_1999_SAL_SP_DCT_TAKEN';
2915   l_bal_rep_tab(98) := 'Income Tax Special Adjustment Deduction (Deductions Taken)';
2916 
2917   l_jp_bal_names_tab(99) := '42EFBCBFE68980E5BE97E7A88EEFBCBF31393939E5B9B4E7B5A6E4B88EE789B9E588A5E8AABFE695B4E68EA7E999A4EFBCBFE69CAAE68EA7E999A4';
2918   l_bal_names_tab(99) := 'B_COM_ITX_1999_SAL_SP_DCT_UNTAKEN';
2919   l_bal_rep_tab(99) := 'Income Tax Special Adj Deduction (Deductions Not Taken)';
2920 
2921   l_jp_bal_names_tab(100) := '42EFBCBFE5B9B4EFBCBFE5BEB4E58F8EE78CB6E4BA88E7A88EE9A18DE59088E8A888';
2922   l_bal_names_tab(100) := 'B_YEA_GRACE_ITX';
2923   l_bal_rep_tab(100) := 'Total Grace Tax Amount';
2924 
2925   l_jp_bal_names_tab(101) := '42EFBCBFE7B5A6EFBCBFE5B08FE8A68FE6A8A1E4BC81E6A5ADE585B1E6B888E7AD89E68E9BE98791';
2926   l_bal_names_tab(101) := 'B_SAL_SMALL_COMPANY_MUTUAL_AID_PREM';
2927   l_bal_rep_tab(101) := 'Salary Deduction Small Company Mutual Aid Premium';
2928 
2929   l_jp_bal_names_tab(102) := '42EFBCBFE8B39EEFBCBFE5B08FE8A68FE6A8A1E4BC81E6A5ADE585B1E6B888E7AD89E68E9BE98791';
2930   l_bal_names_tab(102) := 'B_BON_SMALL_COMPANY_MUTUAL_AID_PREM';
2931   l_bal_rep_tab(102) := 'Small Company Mutual Aid Premium';
2932 
2933   l_jp_bal_names_tab(103) := '42EFBCBFE789B9E8B39EEFBCBFE5B08FE8A68FE6A8A1E4BC81E6A5ADE585B1E6B888E7AD89E68E9BE98791';
2934   l_bal_names_tab(103) := 'B_SPB_SMALL_COMPANY_MUTUAL_AID_PREM';
2935   l_bal_rep_tab(103) := 'Salary Deduction Small Company Mutual Aid Premium';
2936 
2937   l_jp_bal_names_tab(104) := '42EFBCBFE5B9B4EFBCBFE7B5A6E4B88EE68EA7E999A4E58886E5B08FE8A68FE6A8A1E4BC81E6A5ADE585B1E6B888E7AD89E68E9BE98791';
2938   l_bal_names_tab(104) := 'B_YEA_SAL_DCT_SMALL_COMPANY_MUTUAL_AID_PREM';
2939   l_bal_rep_tab(104) := 'Salary Deduction Small Co Mutual Aid Prem (Salary Deduction)';
2940 
2941   l_jp_bal_names_tab(105) := '42EFBCBFE5B9B4EFBCBFE5898DE881B7E68385E5A0B1EFBCBFE5B08FE8A68FE6A8A1E4BC81E6A5ADE585B1E6B888E7AD89E68E9BE98791';
2942   l_bal_names_tab(105) := 'B_YEA_PREV_EMP_SMALL_COMPANY_MUTUAL_AID_PREM';
2943   l_bal_rep_tab(105) := 'Salary Deduction Small Co Mutual Aid Prem (Prev Employment)';
2944 
2945   l_jp_bal_names_tab(106) := '42EFBCBFE5B9B4EFBCBFE694AFE7B5A6E9A18DE59088E8A888';
2946   l_bal_names_tab(106) := 'B_YEA_ERN';
2947   l_bal_rep_tab(106) := 'Total Earning Amount';
2948 
2949   l_jp_bal_names_tab(107) := '42EFBCBFE8B39EEFBCBFE4BF9DE999BAE69699E5AFBEE8B1A1E9A18DE59088E8A888';
2950   l_bal_names_tab(107) := 'B_BON_ERN_SUBJ_SI';
2951   l_bal_rep_tab(107) := 'Total Amount of Wage subject to Social Insurance';
2952 
2953   l_jp_bal_names_tab(108) := '42EFBCBFE8B39EEFBCBFE58E9AE7949FE5B9B4E98791E59FBAE98791E4BF9DE999BAE69699';
2954   l_bal_names_tab(108) := 'B_BON_WPF_PREM';
2955   l_bal_rep_tab(108) := 'Welfare Pension Fund Insurance Premium';
2956 
2957   l_jp_bal_names_tab(109) := '42EFBCBFE8B39EEFBCBFE7A4BEE4BC9AE4BF9DE999BAE5AFBEE8B1A1EFBCBFE98791E98AAD';
2958   l_bal_names_tab(109) := 'B_BON_ERN_MONEY_SUBJ_SI';
2959   l_bal_rep_tab(109) := 'Total Amount of Wage subject to Social Insurance';
2960 
2961   l_jp_bal_names_tab(110) := '42EFBCBFE8B39EEFBCBFE7A4BEE4BC9AE4BF9DE999BAE5AFBEE8B1A1EFBCBFE78FBEE789A9';
2962   l_bal_names_tab(110) := 'B_BON_ERN_KIND_SUBJ_SI';
2963   l_bal_rep_tab(110) := 'Total Amount of Wage subject to Social Insurance (in Kind)';
2964 
2965   l_jp_bal_names_tab(111) := '42EFBCBFE8B39EEFBCBFE581A5E5BAB7E4BF9DE999BAE69699';
2966   l_bal_names_tab(111) := 'B_BON_HI_PREM';
2967   l_bal_rep_tab(111) := 'Health Insurance Premium';
2968 
2969   l_jp_bal_names_tab(112) := '42EFBCBFE8B39EEFBCBFE58E9AE7949FE5B9B4E98791E4BF9DE999BAE69699';
2970   l_bal_names_tab(112) := 'B_BON_WP_PREM';
2971   l_bal_rep_tab(112) := 'Welfare Pension Insurance Premium';
2972 
2973   l_jp_bal_names_tab(113) := '42EFBCBFE8B39EEFBCBFE581A5E4BF9DEFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE98791E98AAD';
2974   l_bal_names_tab(113) := 'B_BON_HI_ERN_MONEY_SUBJ_SI_ACMLT';
2975   l_bal_rep_tab(113) := 'Health Insurance Premium (Accumulation)';
2976 
2977   l_jp_bal_names_tab(114) := '42EFBCBFE8B39EEFBCBFE581A5E4BF9DEFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE78FBEE789A9';
2978   l_bal_names_tab(114) := 'B_BON_HI_ERN_KIND_SUBJ_SI_ACMLT';
2979   l_bal_rep_tab(114) := 'Health Insurnace Premium (Accumulation) (In Kind)';
2980 
2981   l_jp_bal_names_tab(115) := '42EFBCBFE8B39EEFBCBFE58E9AE5B9B4EFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE98791E98AAD';
2982   l_bal_names_tab(115) := 'B_BON_WP_ERN_MONEY_SUBJ_SI_ACMLT';
2983   l_bal_rep_tab(115) := 'Welfare Pension Insurance Premium (Add Up)';
2984 
2985   l_jp_bal_names_tab(116) := '42EFBCBFE8B39EEFBCBFE58E9AE5B9B4EFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE78FBEE789A9';
2986   l_bal_names_tab(116) := 'B_BON_WP_ERN_KIND_SUBJ_SI_ACMLT';
2987   l_bal_rep_tab(116) := 'Welfare Pension Insurance Premium (Add Up) (in Kind)';
2988 
2989   l_jp_bal_names_tab(117) := '42EFBCBFE8B39EEFBCBFE581A5E4BF9DEFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE8A2ABE4BF9DE999BAE88085E58886E4BF9DE999BAE69699';
2990   l_bal_names_tab(117) := 'B_BON_HI_PREM_EE_ACMLT';
2991   l_bal_rep_tab(117) := 'Health Insurance Premium (Accumulation)';
2992 
2993   l_jp_bal_names_tab(118) := '42EFBCBFE8B39EEFBCBFE581A5E4BF9DEFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE4BA8BE6A5ADE4B8BBE58886E4BF9DE999BAE69699';
2994   l_bal_names_tab(118) := 'B_BON_HI_PREM_ER_ACMLT';
2995   l_bal_rep_tab(118) := 'Health Insurance Premium (Accumulation) (Employer)';
2996 
2997   l_jp_bal_names_tab(119) := '42EFBCBFE8B39EEFBCBFE4BB8BE4BF9DEFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE8A2ABE4BF9DE999BAE88085E58886E4BF9DE999BAE69699';
2998   l_bal_names_tab(119) := 'B_BON_CI_PREM_EE_ACMLT';
2999   l_bal_rep_tab(119) := 'Care Insurance Premium (Accumulation)';
3000 
3001   l_jp_bal_names_tab(120) := '42EFBCBFE8B39EEFBCBFE4BB8BE4BF9DEFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE4BA8BE6A5ADE4B8BBE58886E4BF9DE999BAE69699';
3002   l_bal_names_tab(120) := 'B_BON_CI_PREM_ER_ACMLT';
3003   l_bal_rep_tab(120) := 'Care Insurance Premium (Accumulation) (Employer)';
3004 
3005   l_jp_bal_names_tab(121) := '42EFBCBFE8B39EEFBCBFE58E9AE5B9B4EFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE8A2ABE4BF9DE999BAE88085E58886E4BF9DE999BAE69699';
3006   l_bal_names_tab(121) := 'B_BON_WP_PREM_EE_ACMLT';
3007   l_bal_rep_tab(121) := 'Welfare Pension Insurance Premium (Add Up)';
3008 
3009   l_jp_bal_names_tab(122) := '42EFBCBFE8B39EEFBCBFE58E9AE5B9B4EFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE4BA8BE6A5ADE4B8BBE58886E4BF9DE999BAE69699';
3010   l_bal_names_tab(122) := 'B_BON_WP_PREM_ER_ACMLT';
3011   l_bal_rep_tab(122) := 'Welfare Pension Insurance Premium (Add Up) (Employer)';
3012 
3013   l_jp_bal_names_tab(123) := '42EFBCBFE8B39EEFBCBFE59FBAE98791EFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE8A2ABE4BF9DE999BAE88085E58886E4BF9DE999BAE69699';
3014   l_bal_names_tab(123) := 'B_BON_WPF_PREM_EE_ACMLT';
3015   l_bal_rep_tab(123) := 'Welfare Pension Fund Insurance Premium (Accumulation)';
3016 
3017   l_jp_bal_names_tab(124) := '42EFBCBFE8B39EEFBCBFE59FBAE98791EFBCBFE59088E7AE97E5AFBEE8B1A1EFBCBFE4BA8BE6A5ADE4B8BBE58886E4BF9DE999BAE69699';
3018   l_bal_names_tab(124) := 'B_BON_WPF_PREM_ER_ACMLT';
3019   l_bal_rep_tab(124) := 'Welfare Pension Fund Ins Premium (Accumulation) (Employer)';
3020 
3021   l_jp_bal_names_tab(125) := '42EFBCBFE7B5A6EFBCBFE9809AE58BA4E6898BE5BD93EFBCBFE99B87E4BF9DE5AFBEE8B1A1E9A18D5FE69C88E9A18DE8AABFE695B4';
3022   l_bal_names_tab(125) := 'B_SAL_CMA_MTHLY_ERN_SUB_EI_ADJ';
3023   l_bal_rep_tab(125) := 'Commutation Allowance (Amt subj to Employment Ins by Month)';
3024 
3025   --
3026   -- bug.6031466
3027   --
3028   l_jp_bal_names_tab(126) := '42EFBCBFE5B9B4EFBCBFE7B5A6E4B88EE68EA7E999A4E58886E59CB0E99C87E4BF9DE999BAE69699';
3029   l_bal_names_tab(126) := 'B_YEA_SAL_DCT_EARTHQUAKE_INS_PREM';
3030   l_bal_rep_tab(126) := 'Earthquake Insurance Premium (Salary Deduction)';
3031 
3032   hr_utility.set_location(l_proc, 20);
3033 
3034   if (g_dbg) then
3035     hr_utility.trace('| Balance Type Count = ' || l_jp_bal_names_tab.COUNT);
3036     hr_utility.trace('+--------------------------------------------+ ');
3037   end if;
3038 --
3039 
3040   FORALL l_tab_cnt IN 1..l_jp_bal_names_tab.COUNT
3041 
3042     UPDATE pay_balance_types
3043     SET    balance_name = l_bal_names_tab(l_tab_cnt),
3044            reporting_name = l_bal_rep_tab(l_tab_cnt)
3045     WHERE  balance_name LIKE hr_jp_standard_pkg.hextochar(l_jp_bal_names_tab(l_tab_cnt),'AL32UTF8')
3046     AND    legislation_code = 'JP';
3047 
3048   UPDATE pay_balance_types
3049   SET    reporting_name = reporting_name || 'Obsoleted'
3050   WHERE  ASCII(reporting_name) > 127
3051   AND    legislation_code = 'JP';
3052 
3053   hr_utility.set_location(l_proc, 30);
3054 
3055   if (g_dbg) then
3056     hr_utility.trace('| Total Balance Types Updated = ' || SQL%ROWCOUNT);
3057     hr_utility.trace('+-------------------------------+ ');
3058   end if;
3059 --
3060 EXCEPTION
3061 
3062   WHEN OTHERS THEN
3063 
3064     hr_utility.set_location(l_proc, 40);
3065 
3066     raise;
3067 
3068 END migrate_balance_types;
3069 --
3070 -- |-------------------------------------------------------------------|
3071 -- |--------------------< migrate_bal_dimensions >---------------------|
3072 -- |-------------------------------------------------------------------|
3073 --
3074 procedure migrate_bal_dimensions is
3075 --
3076   type t_jp_dim_names_tab is table of VARCHAR2(200) index by binary_integer;
3077 
3078   type t_dim_names_tab is table of pay_balance_dimensions.dimension_name%TYPE index by binary_integer;
3079 
3080   type t_dim_desc_tab is table of pay_balance_dimensions.description%TYPE index by binary_integer;
3081 
3082   type t_dim_suffix_tab is table of pay_balance_dimensions.database_item_suffix%TYPE index by binary_integer;
3083 
3084   l_jp_dim_names_tab  t_jp_dim_names_tab;
3085   l_dim_names_tab     t_dim_names_tab;
3086   l_dim_desc_tab      t_dim_desc_tab;
3087   l_dim_suffix_tab    t_dim_suffix_tab;
3088 
3089   l_proc              VARCHAR2(50) := g_pkg||'.migrate_bal_dimensions';
3090 
3091 BEGIN
3092 
3093   l_jp_dim_names_tab.DELETE;
3094   l_dim_names_tab.DELETE;
3095   l_dim_desc_tab.DELETE;
3096   l_dim_suffix_tab.DELETE;
3097 
3098   hr_utility.set_location(l_proc, 10);
3099 
3100   l_jp_dim_names_tab(1) := '5F41EFBCBFE5BD93E7B5A6E4B88EE587A6E79086';
3101   l_dim_names_tab(1) := '_ASG_RUN';
3102   l_dim_desc_tab(1) := 'Grand Total within Current Payroll Process (Assignment)';
3103   l_dim_suffix_tab(1) := '_ASG_RUN';
3104 
3105   l_jp_dim_names_tab(2) := '5F41EFBCBFE585A5E7A4BEE697A5EFBCBFE5BD93E697A5';
3106   l_dim_names_tab(2) := '_ASG_LTD';
3107   l_dim_desc_tab(2) := 'Grand Total from Hire Date to Processing Date (Assignment)';
3108   l_dim_suffix_tab(2) := '_ASG_LTD';
3109 
3110   l_jp_dim_names_tab(3) := '5FE694AFE68995E5898DE587A6E79086E794A8';
3111   l_dim_names_tab(3) := '_PAYMENTS';
3112   l_dim_desc_tab(3) := 'Used for PrePayments Process';
3113   l_dim_suffix_tab(3) := '_PAYMENTS';
3114 
3115   l_jp_dim_names_tab(4) := '5F45EFBCBFE69C80E5889DE381AEE585A5E58A9BEFBCBFE5BD93E697A5';
3116   l_dim_names_tab(4) := '_ELM_LTD';
3117   l_dim_desc_tab(4) := 'Grand Total from Hire Date to Processing Date (Element)';
3118   l_dim_suffix_tab(4) := '_ELM_LTD';
3119 
3120   l_jp_dim_names_tab(5) := '5F41EFBCBF31E697A5EFBCBFE5BD93E697A520202020202020202020202020202020204546464543544956455F444154452030312D3031205245534554203132';
3121   l_dim_names_tab(5) := '_ASG_MTD                      EFFECTIVE_DATE 01-01 RESET 12';
3122   l_dim_desc_tab(5) := 'Grand Total until Processing Date within the Period from 1st to the End of the Month (Assignment)';
3123   l_dim_suffix_tab(5) := '_ASG_MTD';
3124 
3125   l_jp_dim_names_tab(6) := '5F41EFBCBF31E69C8831E697A5EFBCBFE5BD93E697A520202020202020202020202020204546464543544956455F444154452030312D3031205245534554203031';
3126   l_dim_names_tab(6) := '_ASG_YTD                      EFFECTIVE_DATE 01-01 RESET 01';
3127   l_dim_desc_tab(6) := 'Grand Total until Processing Date within the Period from January 1st to the End of the Year (Assignment)';
3128   l_dim_suffix_tab(6) := '_ASG_YTD';
3129 
3130   l_jp_dim_names_tab(7) := '5F41EFBCBF38E69C8831E697A5EFBCBFE5BD93E697A520202020202020202020202020204546464543544956455F444154452030312D3038205245534554203031';
3131   l_dim_names_tab(7) := '_ASG_AUGTD                    EFFECTIVE_DATE 01-08 RESET 01';
3132   l_dim_desc_tab(7) := 'Grand Total until Processing Date within the Period from August 1st to July 31st next year (Assignment)';
3133   l_dim_suffix_tab(7) := '_ASG_AUGTD';
3134 
3135   l_jp_dim_names_tab(8) := '5F41EFBCBFE5B7AEE9A18DE981A1E58F8A';
3136   l_dim_names_tab(8) := '_ASG_RETRO_RUN';
3137   l_dim_desc_tab(8) := 'Used for Retropay by Run Process';
3138   l_dim_suffix_tab(8) := '_ASG_RETRO_RUN';
3139 
3140   l_jp_dim_names_tab(9) := '5F41EFBCBFE7B5A6E4B88EE69C9FE99693E9968BE5A78BE697A5EFBCBFE5BD93E697A5';
3141   l_dim_names_tab(9) := '_ASG_PTD';
3142   l_dim_desc_tab(9) := 'Grand Total until Processing Date within the Payroll Period (Assignment)';
3143   l_dim_suffix_tab(9) := '_ASG_PTD';
3144 
3145   l_jp_dim_names_tab(10) := '5F45EFBCBFE7B5A6E4B88EE69C9FE99693E9968BE5A78BE697A5EFBCBFE5BD93E697A5';
3146   l_dim_names_tab(10) := '_ELM_PTD';
3147   l_dim_desc_tab(10) := 'Grand Total until Processing Date within the Payroll Period (Element)';
3148   l_dim_suffix_tab(10) := '_ELM_PTD';
3149 
3150   l_jp_dim_names_tab(11) := '5F41EFBCBFE4BC9AE8A888E5B9B4E5BAA6E9968BE5A78BE697A5EFBCBFE5BD93E697A5202020202020444154455F4541524E4544202020202020202020205245534554203031';
3151   l_dim_names_tab(11) := '_ASG_FYTD                     DATE_EARNED          RESET 01';
3152   l_dim_desc_tab(11) := 'Grand Total until Date Earned within the Business Year Period (Assignment)';
3153   l_dim_suffix_tab(11) := '_ASG_FYTD';
3154 
3155   l_jp_dim_names_tab(12) := '5F41EFBCBF37E69C8831E697A5EFBCBFE5BD93E697A520202020202020202020202020204546464543544956455F444154452030312D3037205245534554203031';
3156   l_dim_names_tab(12) := '_ASG_JULTD                    EFFECTIVE_DATE 01-07 RESET 01';
3157   l_dim_desc_tab(12) := 'Grand Total until Processing Date within the Period from July 1st to Jun 30th next year (Assignment)';
3158   l_dim_suffix_tab(12) := '_ASG_JULTD';
3159 
3160   l_jp_dim_names_tab(13) := '5F41EFBCBFE4BA8BE6A5ADE5B9B4E5BAA6E9968BE5A78BE697A5EFBCBFE5BD93E697A5';
3161   l_dim_names_tab(13) := '_ASG_BYTD';
3162   l_dim_desc_tab(13) := 'Grand Total until Processing Date within the Business Year Period (Assignment)';
3163   l_dim_suffix_tab(13) := '_ASG_BYTD';
3164 
3165   hr_utility.set_location(l_proc, 20);
3166 
3167   if (g_dbg) then
3168     hr_utility.trace('| Balance Dimension Count = ' || l_jp_dim_names_tab.COUNT);
3169     hr_utility.trace('+--------------------------------------------+ ');
3170   end if;
3171 --
3172 
3173   FORALL l_tab_cnt IN 1..l_jp_dim_names_tab.COUNT
3174 
3175     UPDATE pay_balance_dimensions
3176     SET    dimension_name = l_dim_names_tab(l_tab_cnt),
3177            database_item_suffix = l_dim_suffix_tab(l_tab_cnt),
3178            description = l_dim_desc_tab(l_tab_cnt)
3179     WHERE  dimension_name LIKE hr_jp_standard_pkg.hextochar(l_jp_dim_names_tab(l_tab_cnt),'AL32UTF8')
3180     AND    legislation_code = 'JP';
3181 
3182   hr_utility.set_location(l_proc, 30);
3183 
3184   if (g_dbg) then
3185     hr_utility.trace('| Total Balance Dimensions Updated = ' || SQL%ROWCOUNT);
3186     hr_utility.trace('+-----------------------------------------+ ');
3187   end if;
3188 --
3189 EXCEPTION
3190 
3191   WHEN OTHERS THEN
3192 
3193     hr_utility.set_location(l_proc, 40);
3194 
3195     raise;
3196 
3197 END migrate_bal_dimensions;
3198 --
3199 -- |-------------------------------------------------------------------|
3200 -- |---------------------< migrate_element_sets >----------------------|
3201 -- |-------------------------------------------------------------------|
3202 --
3203 procedure migrate_element_sets is
3204 --
3205   type t_jp_ele_set_names_tab is table of VARCHAR2(50) index by binary_integer;
3206 
3207   type t_ele_set_names_tab is table of pay_element_sets.element_set_name%TYPE index by binary_integer;
3208 
3209   l_jp_ele_set_names_tab  t_jp_ele_set_names_tab;
3210   l_ele_set_names_tab     t_ele_set_names_tab;
3211 
3212   l_proc              VARCHAR2(50) := g_pkg||'.migrate_element_sets';
3213 
3214 BEGIN
3215 
3216   l_jp_ele_set_names_tab.DELETE;
3217   l_ele_set_names_tab.DELETE;
3218 
3219   hr_utility.set_location(l_proc, 10);
3220 
3221   l_jp_ele_set_names_tab(1) := 'E8B39EE4B88E';	l_ele_set_names_tab(1) := 'BON';
3222   l_jp_ele_set_names_tab(2) := 'E7AE97E5AE9A';	l_ele_set_names_tab(2) := 'SAN';
3223   l_jp_ele_set_names_tab(3) := 'E7B5A6E4B88E';	l_ele_set_names_tab(3) := 'SAL';
3224   l_jp_ele_set_names_tab(4) := 'E69C88E5A489';	l_ele_set_names_tab(4) := 'GEP';
3225   l_jp_ele_set_names_tab(5) := 'E98080E881B7E98791';	l_ele_set_names_tab(5) := 'TRM';
3226   l_jp_ele_set_names_tab(6) := 'E5B9B4E69CABE8AABFE695B4';	l_ele_set_names_tab(6) := 'YEA';
3227   l_jp_ele_set_names_tab(7) := 'E789B9E588A5E8B39EE4B88E';	l_ele_set_names_tab(7) := 'SPB';
3228   l_jp_ele_set_names_tab(8) := 'E5868DE5B9B4E69CABE8AABFE695B4';	l_ele_set_names_tab(8) := 'REY';
3229   l_jp_ele_set_names_tab(9) := 'E882B2E694B9';	l_ele_set_names_tab(9) := 'IKU';
3230 
3231   hr_utility.set_location(l_proc, 20);
3232 
3233   if (g_dbg) then
3234     hr_utility.trace('| Element Sets Count = ' || l_jp_ele_set_names_tab.COUNT);
3235     hr_utility.trace('+--------------------------------------------+ ');
3236   end if;
3237 --
3238 
3239   FORALL l_tab_cnt IN 1..l_jp_ele_set_names_tab.COUNT
3240 
3241     UPDATE pay_element_sets
3242     SET    element_set_name = l_ele_set_names_tab(l_tab_cnt)
3243     WHERE  element_set_name LIKE hr_jp_standard_pkg.hextochar(l_jp_ele_set_names_tab(l_tab_cnt),'AL32UTF8')
3244     AND    legislation_code = 'JP';
3245 
3246   hr_utility.set_location(l_proc, 30);
3247 
3248   if (g_dbg) then
3249     hr_utility.trace('| Total Element Sets Updated = ' || SQL%ROWCOUNT);
3250     hr_utility.trace('+-----------------------------------------+ ');
3251   end if;
3252 --
3253 EXCEPTION
3254 
3255   WHEN OTHERS THEN
3256 
3257     hr_utility.set_location(l_proc, 40);
3258 
3259     raise;
3260 
3261 END migrate_element_sets;
3262 --
3263 -- |-------------------------------------------------------------------|
3264 -- |-----------------------< migrate_globals >-------------------------|
3265 -- |-------------------------------------------------------------------|
3266 --
3267 procedure migrate_globals is
3268 --
3269   type t_jp_global_names_tab is table of VARCHAR2(200) index by binary_integer;
3270 
3271   type t_global_names_tab is table of ff_globals_f.global_name%TYPE index by binary_integer;
3272 
3273   type t_global_desc_tab is table of ff_globals_f.global_description%TYPE index by binary_integer;
3274 
3275   l_jp_global_names_tab  t_jp_global_names_tab;
3276   l_global_names_tab     t_global_names_tab;
3277   l_global_desc_tab      t_global_desc_tab;
3278 
3279   l_proc                 VARCHAR2(50) := g_pkg||'.migrate_globals';
3280 --
3281   l_status_mode varchar2(1);
3282 --
3283 BEGIN
3284 
3285   l_jp_global_names_tab.DELETE;
3286   l_global_names_tab.DELETE;
3287   l_global_desc_tab.DELETE;
3288 
3289   hr_utility.set_location(l_proc, 10);
3290 
3291   l_jp_global_names_tab(1) := '47EFBCBFE585B1EFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE8A1A8E69C80E5A4A7E689B6E9A48AE88085E695B0';
3292   l_global_names_tab(1) := 'G_COM_ITX_TBL_NUM_OF_DEP_MAX';
3293   l_global_desc_tab(1) := 'Maximum Number of Dependent People of Withholding Tax Amount Table';
3294 
3295   l_jp_global_names_tab(2) := '47EFBCBFE7B5A6EFBCBFE581A5E5BAB7E4BF9DE999BAE69699E78E87EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
3296   l_global_names_tab(2) := 'G_SAL_HI_PREM_RATE_EE';
3297   l_global_desc_tab(2) := 'Health Insurance Premium Rate on Salary (Insured)';
3298 
3299   l_jp_global_names_tab(3) := '47EFBCBFE7B5A6EFBCBFE581A5E5BAB7E4BF9DE999BAE69699E78E87';
3300   l_global_names_tab(3) := 'G_SAL_HI_PREM_RATE';
3301   l_global_desc_tab(3) := 'Health Insurance Premium Rate on Salary (Whole)';
3302 
3303   l_jp_global_names_tab(4) := '47EFBCBFE98080EFBCBFE7A88EE78E87EFBCBFE794B3E5918AE69BB8E69CAAE68F90E587BA';
3304   l_global_names_tab(4) := 'G_TRM_UNDECLARE_ITX_RATE';
3305   l_global_desc_tab(4) := 'Income Tax Rate in case of No File Declaration about Receipt of Termination Income';
3306 
3307   l_jp_global_names_tab(5) := '47EFBCBFE585B1EFBCBFE99B87E794A8E4BF9DE999BAE69699E78E87EFBCBFE4B880E888ACE381AEE4BA8BE6A5AD';
3308   l_global_names_tab(5) := 'G_COM_EI_PREM_RATE_GEN_BUSINESS';
3309   l_global_desc_tab(5) := 'Employment Insurance Permium Rate for General Business (Insured)';
3310 
3311   l_jp_global_names_tab(6) := '47EFBCBFE585B1EFBCBFE99B87E794A8E4BF9DE999BAE69699E78E87EFBCBFE8BEB2E69E97E6B0B4E794A3E6A5ADE6B885E98592E8A3BDE980A0E6A5AD';
3312   l_global_names_tab(6) := 'G_COM_EI_PREM_RATE_AGRICULTURE';
3313   l_global_desc_tab(6) := 'Employment Insurance Permium Rate for Agriculture Forest Fisher Industry, Liquor Industry (Insured)';
3314 
3315   l_jp_global_names_tab(7) := '47EFBCBFE585B1EFBCBFE99B87E794A8E4BF9DE999BAE69699E78E87EFBCBFE5BBBAE8A8ADE6A5AD';
3316   l_global_names_tab(7) := 'G_COM_EI_PREM_RATE_CONSTRUCTION';
3317   l_global_desc_tab(7) := 'Employment Insurance Permium Rate for Construction (Insured)';
3318 
3319   l_jp_global_names_tab(8) := '47EFBCBFE7B5A6EFBCBFE58E9AE7949FE5B9B4E98791E4BF9DE999BAE69699E78E87EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
3320   l_global_names_tab(8) := 'G_SAL_WP_PREM_RATE_EE';
3321   l_global_desc_tab(8) := 'Welfare Pension Insurance Premium Rate on Salary (Insured)';
3322 
3323   l_jp_global_names_tab(9) := '47EFBCBFE7B5A6EFBCBFE58E9AE7949FE5B9B4E98791E4BF9DE999BAE69699E78E87';
3324   l_global_names_tab(9) := 'G_SAL_WP_PREM_RATE';
3325   l_global_desc_tab(9) := 'Welfare Pension Insurance Premium Rate on Salary (Whole)';
3326 
3327   l_jp_global_names_tab(10) := '47EFBCBFE7B5A6EFBCBFE59FBAE98791E4BF9DE999BAE69699E78E87';
3328   l_global_names_tab(10) := 'G_SAL_WPF_PREM_RATE';
3329   l_global_desc_tab(10) := 'Welfare Pension Fund Insurance Premium Rate on Salary (Whole)';
3330 
3331   l_jp_global_names_tab(11) := '47EFBCBFE7B5A6EFBCBFE59FBAE98791E4BF9DE999BAE69699E78E87EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
3332   l_global_names_tab(11) := 'G_SAL_WPF_PREM_RATE_EE';
3333   l_global_desc_tab(11) := 'Welfare Pension Fund Insurance Premium Rate on Salary (Insured)';
3334 
3335   l_jp_global_names_tab(12) := '47EFBCBFE585B1EFBCBFE7AE97E5AE9AE69C88E5A489EFBCBFE694AFE68995E59FBAE7A48EE697A5E695B0';
3336   l_global_names_tab(12) := 'G_COM_PAY_BASE_DAYS_MIN';
3337   l_global_desc_tab(12) := 'Minimum Payment Base Days of Full Time Worker';
3338 
3339   l_jp_global_names_tab(13) := '47EFBCBFE7AE97EFBCBFE694AFE68995E59FBAE7A48EE697A5E695B0EFBCBFE79FADE69982E99693E58AB4E5838DE88085';
3340   l_global_names_tab(13) := 'G_SAN_PAY_BASE_DAYS_SHORT_TIME_WORKER_MIN';
3341   l_global_desc_tab(13) := 'Minimum Payment Base Days of Short Time Worker';
3342 
3343   l_jp_global_names_tab(14) := '47EFBCBFE585B1EFBCBFE7A88EE78E87EFBCBFE99D9EE5B185E4BD8FE88085';
3344   l_global_names_tab(14) := 'G_COM_ITX_RATE_NRES';
3345   l_global_desc_tab(14) := 'Income Tax Rate (Non Resident)';
3346 
3347   l_jp_global_names_tab(15) := '47EFBCBFE7B5A6EFBCBFE4BB8BE8ADB7E4BF9DE999BAE69699E78E87';
3348   l_global_names_tab(15) := 'G_SAL_CI_PREM_RATE';
3349   l_global_desc_tab(15) := 'Care Insurance Premium Rate on Salary (Whole)';
3350 
3351   l_jp_global_names_tab(16) := '47EFBCBFE7B5A6EFBCBFE4BB8BE8ADB7E4BF9DE999BAE69699E78E87EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
3352   l_global_names_tab(16) := 'G_SAL_CI_PREM_RATE_EE';
3353   l_global_desc_tab(16) := 'Care Insurance Premium Rate on Salary (Insured)';
3354 
3355   l_jp_global_names_tab(17) := '47EFBCBFE8B39EEFBCBFE581A5E5BAB7E4BF9DE999BAEFBCBFE6A899E6BA96E8B39EE4B88EEFBCBFE4B88AE99990E9A18D';
3356   l_global_names_tab(17) := 'G_BON_HI_STD_BON_MAX';
3357   l_global_desc_tab(17) := 'Maximum Standard Bonus Amount (Health Insurance)';
3358 
3359   l_jp_global_names_tab(18) := '47EFBCBFE8B39EEFBCBFE58E9AE7949FE5B9B4E98791E4BF9DE999BAEFBCBFE6A899E6BA96E8B39EE4B88EEFBCBFE4B88AE99990E9A18D';
3360   l_global_names_tab(18) := 'G_BON_WP_STD_BON_MAX';
3361   l_global_desc_tab(18) := 'Maximum Standard Bonus Amount (Welfare Pension Insurance)';
3362 
3363   l_jp_global_names_tab(19) := '47EFBCBFE7B5A6EFBCBFE4BAA4E9809AE6A99FE996A2EFBCBFE99D9EE8AAB2E7A88EE99990E5BAA6E9A18D';
3364   l_global_names_tab(19) := 'G_SAL_CMA_PUBLIC_TRANSPORT_NTXBL_ERN_MAX';
3365   l_global_desc_tab(19) := 'Non Assessable Limited Amount per One Month in case of utilizing Public Transportation';
3366 
3367   l_jp_global_names_tab(20) := '47EFBCBFE5B9B4EFBCBFE5AE9AE78E87E6B89BE7A88EE69699E78E87';
3368   l_global_names_tab(20) := 'G_YEA_PROPORTIONAL_TAX_CREDIT_RATE';
3369   l_global_desc_tab(20) := 'Proportional Tax Credit Rate on Year End Adjustment';
3370 
3371   l_jp_global_names_tab(21) := '47EFBCBFE5B9B4EFBCBFE5AE9AE78E87E6B89BE7A88EEFBCBFE4B88AE99990E9A18D';
3372   l_global_names_tab(21) := 'G_YEA_PROPORTIONAL_TAX_CREDIT_MAX';
3373   l_global_desc_tab(21) := 'Maximum Proportional Tax Credit on Year End Adjustment';
3374 
3375   --
3376   -- bug.6031466
3377   --
3378   l_jp_global_names_tab(22) := '47EFBCBFE98080EFBCBFE4BD8FE6B091E7A88EEFBCBFE789B9E588A5E5BEB4E58F8EEFBCBFE5B882E58CBAE794BAE69D91E7A88EE78E87';
3379   l_global_names_tab(22) := 'G_TRM_LTX_SP_WITHHOLD_MUNICIPAL_TAX_RATE';
3380   l_global_desc_tab(22) := 'Municipal Tax Rate of Special Collecting Local Tax on Termination Payment';
3381 
3382   l_jp_global_names_tab(23) := '47EFBCBFE98080EFBCBFE4BD8FE6B091E7A88EEFBCBFE789B9E588A5E5BEB4E58F8EEFBCBFE983BDE98193E5BA9CE79C8CE7A88EE78E87';
3383   l_global_names_tab(23) := 'G_TRM_LTX_SP_WITHHOLD_PREFECTURAL_TAX_RATE';
3384   l_global_desc_tab(23) := 'Prefectural Tax Rate of Special Collecting Local Tax on Termination Payment';
3385 
3386   l_jp_global_names_tab(24) := '47EFBCBFE98080EFBCBFE4BD8FE6B091E7A88EEFBCBFE789B9E588A5E5BEB4E58F8EEFBCBFE68EA7E999A4E78E87';
3387   l_global_names_tab(24) := 'G_TRM_LTX_SP_WITHHOLD_DCTBL_RATE';
3388   l_global_desc_tab(24) := 'Deduction Rate of Special Collecting Local Tax on Termination Payment';
3389 
3390   hr_utility.set_location(l_proc, 20);
3391 
3392   if (g_dbg) then
3393     hr_utility.trace('| Global Names Count = ' || l_jp_global_names_tab.COUNT);
3394     hr_utility.trace('+----------------------------------+ ');
3395   end if;
3396 --
3397   l_status_mode := hr_general.g_data_migrator_mode;
3398 --
3399   hr_utility.trace('hr_general.g_data_migrator_mode : '||l_status_mode);
3400 --
3401   if nvl(l_status_mode,'N') <> 'Y' then
3402   --
3403     -- this is required to set for FF_GLOBALS_F_BRU trigger
3404     -- FF_GLOBALS_F_MNT_TL_ARU also will be disabled
3405     -- but global tl will be set finally by subsequent step, ldt load
3406     -- so it can be skipped.
3407     hr_general.g_data_migrator_mode := 'Y';
3408   --
3409   end if;
3410 --
3411   FORALL l_tab_cnt IN 1..l_jp_global_names_tab.COUNT
3412 
3413     UPDATE ff_globals_f
3414     SET    global_name = l_global_names_tab(l_tab_cnt),
3415            global_description = l_global_desc_tab(l_tab_cnt)
3416     WHERE  global_name LIKE hr_jp_standard_pkg.hextochar(l_jp_global_names_tab(l_tab_cnt),'AL32UTF8')
3417     AND    legislation_code = 'JP';
3418 --
3419   -- unset for subsequent procedure to enable trigger
3420   hr_general.g_data_migrator_mode := l_status_mode;
3421 --
3422   UPDATE ff_globals_f
3423   SET    global_description = global_description || 'Obsoleted'
3424   WHERE  ASCII(global_description) > 127
3425   AND    legislation_code = 'JP';
3426 
3427   hr_utility.set_location(l_proc, 30);
3428 
3429   if (g_dbg) then
3430     hr_utility.trace('| Total Global Names Updated = ' || SQL%ROWCOUNT);
3431     hr_utility.trace('+-----------------------------------------+ ');
3432   end if;
3433 --
3434 EXCEPTION
3435 
3436   WHEN OTHERS THEN
3437 
3438     hr_utility.set_location(l_proc, 40);
3439 
3440     raise;
3441 
3442 END migrate_globals;
3443 --
3444 -- |-------------------------------------------------------------------|
3445 -- |-----------------------< migrate_formulas >------------------------|
3446 -- |-------------------------------------------------------------------|
3447 --
3448 procedure migrate_formulas is
3449 --
3450   type t_jp_formula_names_tab is table of VARCHAR2(200) index by binary_integer;
3451 
3452   type t_formula_names_tab is table of ff_formulas_f.formula_name%TYPE index by binary_integer;
3453 
3454   type t_formula_desc_tab is table of ff_formulas_f.description%TYPE index by binary_integer;
3455 
3456   l_jp_formula_names_tab  t_jp_formula_names_tab;
3457   l_formula_names_tab     t_formula_names_tab;
3458   l_formula_desc_tab      t_formula_desc_tab;
3459 
3460   l_proc              VARCHAR2(50) := g_pkg||'.migrate_formulas';
3461 
3462 BEGIN
3463 
3464   l_jp_formula_names_tab.DELETE;
3465   l_formula_names_tab.DELETE;
3466   l_formula_desc_tab.DELETE;
3467 
3468   hr_utility.set_location(l_proc, 10);
3469 
3470   l_jp_formula_names_tab(1) := '46EFBCBFE69C88EFBCBFE59FBAE69CACEFBCBFE5A0B1E985ACE69C88E9A18D';
3471   l_formula_names_tab(1) := 'GEP_MR_PROC';
3472   l_formula_desc_tab(1) := 'Calculation of Standard Monthly Remuneration on Unscheduled Revision';
3473 
3474   l_jp_formula_names_tab(2) := '46EFBCBFE7AE97EFBCBFE59FBAE69CACEFBCBFE5A0B1E985ACE69C88E9A18D';
3475   l_formula_names_tab(2) := 'SAN_MR_PROC';
3476   l_formula_desc_tab(2) := 'Calculation of Standard Monthly Remuneration on Scheduled Revision';
3477 
3478   l_jp_formula_names_tab(3) := '4653EFBCBFE69C88EFBCBFE59FBAE69CACEFBCBFE5A0B1E985ACE69C88E9A18D';
3479   l_formula_names_tab(3) := 'GEP_MR_PROC_SKIP';
3480   l_formula_desc_tab(3) := 'Judgement of Calculation of Standard Monthly Renumeration on Unscheduled Revision';
3481 
3482   l_jp_formula_names_tab(4) := '4656EFBCBFE585B1EFBCBFE4BD8FE6B091E7A88EEFBCBFE68385E5A0B1EFBCBFE5B882E58CBAE794BAE69D91E382B3E383BCE38389';
3483   l_formula_names_tab(4) := 'LTX_MUNICIPAL_CODE_VALIDATION';
3484   l_formula_desc_tab(4) := 'Validation of Local Tax Paying Municipal Code';
3485 
3486   l_jp_formula_names_tab(5) := '4656EFBCBFE585B1EFBCBFE697A5E4BB98595959594D4D';
3487   l_formula_names_tab(5) := 'DATE_YYYYMM_VALIDATION';
3488   l_formula_desc_tab(5) := 'Validation of Date Format YYYYMM';
3489 
3490   l_jp_formula_names_tab(6) := '4656EFBCBFE585B1EFBCBFE4BD8FE6B091E7A88EEFBCBFE68385E5A0B1EFBCBFE5BEB4E58F8EE7BEA9E58B99E88085E795AAE58FB7';
3491   l_formula_names_tab(6) := 'LTX_WITHHOLD_AGENT_NUM_VALIDATION';
3492   l_formula_desc_tab(6) := 'Validation of Local Tax Withholding Agent Number';
3493 
3494   l_jp_formula_names_tab(7) := '4653EFBCBFE7AE97EFBCBFE59FBAE69CACEFBCBFE5A0B1E985ACE69C88E9A18D';
3495   l_formula_names_tab(7) := 'SAN_MR_PROC_SKIP';
3496   l_formula_desc_tab(7) := 'Judgement of Calculation of Standard Monthly Renumeration on Scheduled Revision';
3497 
3498   l_jp_formula_names_tab(8) := '46EFBCBFE7B5A6EFBCBFE59FBAE69CACEFBCBFE581A5E4BF9DEFBCBFE4BF9DE999BAE69699';
3499   l_formula_names_tab(8) := 'SAL_HI_PREM_PROC';
3500   l_formula_desc_tab(8) := 'Calculation of Health Insurance Premium on Salary Process';
3501 
3502   l_jp_formula_names_tab(9) := '46EFBCBFE7B5A6EFBCBFE59FBAE69CACEFBCBFE99B87E4BF9DEFBCBFE4BF9DE999BAE69699';
3503   l_formula_names_tab(9) := 'SAL_EI_PREM_PROC';
3504   l_formula_desc_tab(9) := 'Calculation of Employment Insurance Premium on Salary Process';
3505 
3506   l_jp_formula_names_tab(10) := '46EFBCBFE7B5A6EFBCBFE59FBAE69CACEFBCBFE58E9AE5B9B4EFBCBFE4BF9DE999BAE69699';
3507   l_formula_names_tab(10) := 'SAL_WP_PREM_PROC';
3508   l_formula_desc_tab(10) := 'Calculation of Welfare Pension Insurance Premium on Salary Process';
3509 
3510   l_jp_formula_names_tab(11) := '46EFBCBFE7B5A6EFBCBFE59FBAE69CACEFBCBFE68980E5BE97E7A88E';
3511   l_formula_names_tab(11) := 'SAL_ITX_PROC';
3512   l_formula_desc_tab(11) := 'Calculation of Income Tax on Salary Process';
3513 
3514   l_jp_formula_names_tab(12) := '46EFBCBFE7B5A6EFBCBFE4BD8FE6B091E7A88E';
3515   l_formula_names_tab(12) := 'SAL_LTX';
3516   l_formula_desc_tab(12) := 'Calculation of Local Tax on Salary Process';
3517 
3518   l_jp_formula_names_tab(13) := '46EFBCBFE7B5A6EFBCBFE68980E5BE97E7A88EEFBCBFE99D9EE5B185E4BD8FE88085';
3519   l_formula_names_tab(13) := 'SAL_ITX_NRES';
3520   l_formula_desc_tab(13) := 'Calculation of Income Tax on Salary Process (Non Resident)';
3521 
3522   l_jp_formula_names_tab(14) := '46EFBCBFE585B1EFBCBFE59FBAE69CACEFBCBFE4BD8FE6B091E7A88EEFBCBFE4B880E68BACE5BEB4E58F8E';
3523   l_formula_names_tab(14) := 'COM_LTX_LUMP_SUM_WITHHOLD_PROC';
3524   l_formula_desc_tab(14) := 'Calculation of Lump Sum Collecting Local Tax';
3525 
3526   l_jp_formula_names_tab(15) := '46EFBCBFE585B1EFBCBFE59FBAE69CACEFBCBFE689B6E9A48AE68EA7E999A4E7AD89';
3527   l_formula_names_tab(15) := 'YEA_DEP_EXM_PROC';
3528   l_formula_desc_tab(15) := 'Calculation of Dependent Exemption etc on Year End Adjustment Process';
3529 
3530   l_jp_formula_names_tab(16) := '46EFBCBFE5868DE5B9B4EFBCBFE7B2BEE7AE97E9A18D';
3531   l_formula_names_tab(16) := 'REY_ITX';
3532   l_formula_desc_tab(16) := 'Calculation of Liquidation Amount on Re-year End Adjustment Process';
3533 
3534   l_jp_formula_names_tab(17) := '46EFBCBFE8B39EEFBCBFE59FBAE69CACEFBCBFE99B87E4BF9DEFBCBFE4BF9DE999BAE69699';
3535   l_formula_names_tab(17) := 'BON_EI_PREM_PROC';
3536   l_formula_desc_tab(17) := 'Calculation of Employment Insurance Premium on Bonus Process';
3537 
3538   l_jp_formula_names_tab(18) := '46EFBCBFE8B39EEFBCBFE59FBAE69CACEFBCBFE68980E5BE97E7A88E';
3539   l_formula_names_tab(18) := 'BON_ITX_PROC';
3540   l_formula_desc_tab(18) := 'Calculation of Income Tax on Bonus Process';
3541 
3542   l_jp_formula_names_tab(19) := '46EFBCBFE8B39EEFBCBFE68980E5BE97E7A88EEFBCBFE99D9EE5B185E4BD8FE88085';
3543   l_formula_names_tab(19) := 'BON_ITX_NRES';
3544   l_formula_desc_tab(19) := 'Calculation of Income Tax on Bonus Process (Non Resident)';
3545 
3546   l_jp_formula_names_tab(20) := '46EFBCBFE98080EFBCBFE59FBAE69CACEFBCBFE4BD8FE6B091E7A88EEFBCBFE789B9E588A5E5BEB4E58F8E';
3547   l_formula_names_tab(20) := 'TRM_LTX_SP_WITHHOLD_PROC';
3548   l_formula_desc_tab(20) := 'Calculation of Special Collecting Local Tax on Termination Payment Process';
3549 
3550   l_jp_formula_names_tab(21) := '46EFBCBFE98080EFBCBFE59FBAE69CACEFBCBFE68980E5BE97E68EA7E999A4E9A18D';
3551   l_formula_names_tab(21) := 'TRM_INCOME_DCT_PROC';
3552   l_formula_desc_tab(21) := 'Calculation of Income Deduction on Termination Payment Process';
3553 
3554   l_jp_formula_names_tab(22) := '46EFBCBFE98080EFBCBFE68980E5BE97E7A88E';
3555   l_formula_names_tab(22) := 'TRM_ITX';
3556   l_formula_desc_tab(22) := 'Calculation of Income Tax on Termination Payment Process';
3557 
3558   l_jp_formula_names_tab(23) := '46EFBCBFE789B9E8B39EEFBCBFE59FBAE69CACEFBCBFE99B87E4BF9DEFBCBFE4BF9DE999BAE69699';
3559   l_formula_names_tab(23) := 'SPB_EI_PREM_PROC';
3560   l_formula_desc_tab(23) := 'Calculation of Employment Insurance Premium on Special Bonus Process';
3561 
3562   l_jp_formula_names_tab(24) := '46EFBCBFE789B9E8B39EEFBCBFE59FBAE69CACEFBCBFE68980E5BE97E7A88E';
3563   l_formula_names_tab(24) := 'SPB_ITX_PROC';
3564   l_formula_desc_tab(24) := 'Calculation of Income Tax on Special Bonus Process';
3565 
3566   l_jp_formula_names_tab(25) := '46EFBCBFE789B9E8B39EEFBCBFE68980E5BE97E7A88EEFBCBFE99D9EE5B185E4BD8FE88085';
3567   l_formula_names_tab(25) := 'SPB_ITX_NRES';
3568   l_formula_desc_tab(25) := 'Calculation of Income Tax on Special Bonus Process (Non Resident)';
3569 
3570   l_jp_formula_names_tab(26) := '46EFBCBFE5B9B4EFBCBFE9818EE4B88DE8B6B3E7A88EE9A18D';
3571   l_formula_names_tab(26) := 'YEA_TAX';
3572   l_formula_desc_tab(26) := 'Calculation of Over and Short Tax Amount on Year End Adjustment Process';
3573 
3574   l_jp_formula_names_tab(27) := '46EFBCBFE5B9B4EFBCBFE59FBAE69CACEFBCBFE7B5A6E4B88EE68980E5BE97E68EA7E999A4E5BE8CE381AEE98791E9A18D';
3575   l_formula_names_tab(27) := 'YEA_AMT_AFTER_EMP_INCOME_DCT_PROC';
3576   l_formula_desc_tab(27) := 'Calculation of Amount after Salary Income Deduction on Year End Adjustment Process';
3577 
3578   l_jp_formula_names_tab(28) := '46EFBCBFE5B9B4EFBCBFE59FBAE69CACEFBCBFE4BF9DE999BAE69699E585BCE9858DE789B9E68EA7E999A4';
3579   l_formula_names_tab(28) := 'YEA_INS_PREM_SPOUSE_SP_EXM_PROC';
3580   l_formula_desc_tab(28) := 'Calculation of Insurance Premium and Spouse Special Exemption on Year End Adjustment Process';
3581 
3582   l_jp_formula_names_tab(29) := '46EFBCBFE5B9B4EFBCBFE59FBAE69CACEFBCBFE5B7AEE5BC95E5B9B4E7A88EE9A18D';
3583   l_formula_names_tab(29) := 'YEA_NET_ANNUAL_TAX_PROC';
3584   l_formula_desc_tab(29) := 'Calculation of Net Annual Tax Amount on Year End Adjustment Process';
3585 
3586   l_jp_formula_names_tab(30) := '46EFBCBFE5B9B4EFBCBFE5B9B4E7A88EE9A18D';
3587   l_formula_names_tab(30) := 'YEA_ANNUAL_TAX';
3588   l_formula_desc_tab(30) := 'Liquidation Amount';
3589 
3590   l_jp_formula_names_tab(31) := '4653EFBCBFE7B5A6EFBCBFE4BD8FE6B091E7A88E';
3591   l_formula_names_tab(31) := 'SAL_LTX_SKIP';
3592   l_formula_desc_tab(31) := 'Judgement of Calculation of Local Tax on Salary Process';
3593 
3594   l_jp_formula_names_tab(32) := '4653EFBCBFE585B1EFBCBFE68980E5BE97E7A88EEFBCBFE99D9EE5B185E4BD8FE88085';
3595   l_formula_names_tab(32) := 'COM_ITX_NRES_SKIP';
3596   l_formula_desc_tab(32) := 'Judgement of Calculation of Income Tax (Non Resident)';
3597 
3598   l_jp_formula_names_tab(33) := '4653EFBCBFE585B1EFBCBFE59FBAE69CACEFBCBFE4BD8FE6B091E7A88EEFBCBFE4B880E68BACE5BEB4E58F8E';
3599   l_formula_names_tab(33) := 'COM_LTX_LUMP_SUM_WITHHOLD_PROC_SKIP';
3600   l_formula_desc_tab(33) := 'Judgement of Calculation of Lump Sum Collecting Local Tax';
3601 
3602   l_jp_formula_names_tab(34) := '4653EFBCBFE8B39EEFBCBFE59FBAE69CACEFBCBFE68980E5BE97E7A88E';
3603   l_formula_names_tab(34) := 'BON_ITX_PROC_SKIP';
3604   l_formula_desc_tab(34) := 'Judgement of Calculation of Income Tax on Bonus Process';
3605 
3606   l_jp_formula_names_tab(35) := '4653EFBCBFE8B39EEFBCBFE59FBAE69CACEFBCBFE99B87E4BF9DEFBCBFE4BF9DE999BAE69699';
3607   l_formula_names_tab(35) := 'BON_EI_PREM_PROC_SKIP';
3608   l_formula_desc_tab(35) := 'Judgement of Calculation of Employment Insurance Premium on Bonus Process';
3609 
3610   l_jp_formula_names_tab(36) := '4653EFBCBFE7B5A6EFBCBFE59FBAE69CACEFBCBFE581A5E4BF9DEFBCBFE4BF9DE999BAE69699';
3611   l_formula_names_tab(36) := 'SAL_HI_PREM_PROC_SKIP';
3612   l_formula_desc_tab(36) := 'Judgement of Calculation of Health Insurance Premium on Salary Process';
3613 
3614   l_jp_formula_names_tab(37) := '4653EFBCBFE7B5A6EFBCBFE59FBAE69CACEFBCBFE58E9AE5B9B4EFBCBFE4BF9DE999BAE69699';
3615   l_formula_names_tab(37) := 'SAL_WP_PREM_PROC_SKIP';
3616   l_formula_desc_tab(37) := 'Judgement of Calculation of Welfare Pension Insurance Premium on Salary Process';
3617 
3618   l_jp_formula_names_tab(38) := '4653EFBCBFE7B5A6EFBCBFE59FBAE69CACEFBCBFE68980E5BE97E7A88E';
3619   l_formula_names_tab(38) := 'SAL_ITX_PROC_SKIP';
3620   l_formula_desc_tab(38) := 'Judgement of Calculation of Income Tax on Salary Process';
3621 
3622   l_jp_formula_names_tab(39) := '4653EFBCBFE7B5A6EFBCBFE59FBAE69CACEFBCBFE99B87E4BF9DEFBCBFE4BF9DE999BAE69699';
3623   l_formula_names_tab(39) := 'SAL_EI_PREM_PROC_SKIP';
3624   l_formula_desc_tab(39) := 'Judgement of Calculation of Employment Insurance Premium on Salary Process';
3625 
3626   l_jp_formula_names_tab(40) := '4653EFBCBFE98080EFBCBFE59FBAE69CACEFBCBFE68980E5BE97E68EA7E999A4E9A18D';
3627   l_formula_names_tab(40) := 'TRM_INCOME_DCT_PROC_SKIP';
3628   l_formula_desc_tab(40) := 'Judgement of Calculation of Income Deduction on Termination Payment Process';
3629 
3630   l_jp_formula_names_tab(41) := '4653EFBCBFE585B1EFBCBFE59FBAE69CACEFBCBFE689B6E9A48AE68EA7E999A4E7AD89';
3631   l_formula_names_tab(41) := 'YEA_DEP_EXM_PROC_SKIP';
3632   l_formula_desc_tab(41) := 'Judgement of Calculation of Dependent Exemption etc on Year End Adjustment Process';
3633 
3634   l_jp_formula_names_tab(42) := '4653EFBCBFE789B9E8B39EEFBCBFE59FBAE69CACEFBCBFE99B87E4BF9DEFBCBFE4BF9DE999BAE69699';
3635   l_formula_names_tab(42) := 'SPB_EI_PREM_PROC_SKIP';
3636   l_formula_desc_tab(42) := 'Judgement of Calculation of Employment Insurance Premium on Special Bonus Process';
3637 
3638   l_jp_formula_names_tab(43) := '4656EFBCBFE58E9AE7949FE5B9B4E98791E59FBAE98791E4BA8BE6A5ADE68980';
3639   l_formula_names_tab(43) := 'WPF_LOCATION_VALIDATION';
3640   l_formula_desc_tab(43) := 'Validation of Welfare Pension Fund Location';
3641 
3642   l_jp_formula_names_tab(44) := '4656EFBCBFE58E9AE7949FE5B9B4E98791E4BF9DE999BAE4BA8BE6A5ADE68980';
3643   l_formula_names_tab(44) := 'WP_LOCATION_VALIDATION';
3644   l_formula_desc_tab(44) := 'Validation of Welfare Pension Insurance Location';
3645 
3646   l_jp_formula_names_tab(45) := '4656EFBCBFE4BD8FE6B091E7A88EE789B9E588A5E5BEB4E58F8EE7BEA9E58B99E88085';
3647   l_formula_names_tab(45) := 'LTX_WITHHOLD_AGENT_VALIDATION';
3648   l_formula_desc_tab(45) := 'Validation of Local Tax Special Withholding Agent';
3649 
3650   l_jp_formula_names_tab(46) := '4656EFBCBFE68980E5BE97E7A88EE5BEB4E58F8EE7BEA9E58B99E88085';
3651   l_formula_names_tab(46) := 'ITX_WITHHOLD_AGENT_VALIDATION';
3652   l_formula_desc_tab(46) := 'Validation of Income Tax Withholding Agent';
3653 
3654   l_jp_formula_names_tab(47) := '4656EFBCBFE581A5E5BAB7E4BF9DE999BAE4BA8BE6A5ADE68980';
3655   l_formula_names_tab(47) := 'HI_LOCATION_VALIDATION';
3656   l_formula_desc_tab(47) := 'Validation of Health Insurance Location';
3657 
3658   l_jp_formula_names_tab(48) := '4656EFBCBFE58E9AE7949FE5B9B4E98791E4BF9DE999BAE695B4E79086E795AAE58FB7';
3659   l_formula_names_tab(48) := 'WP_SERIAL_NUM_VALIDATION';
3660   l_formula_desc_tab(48) := 'Validation of Welfare Pension Insurance Serial Number';
3661 
3662   l_jp_formula_names_tab(49) := '4656EFBCBFE581A5E5BAB7E4BF9DE999BAE8A2ABE4BF9DE999BAE88085E8A8BCE381AEE795AAE58FB7';
3663   l_formula_names_tab(49) := 'HI_CARD_NUM_VALIDATION';
3664   l_formula_desc_tab(49) := 'Validation of Number of Health Insurance Card';
3665 
3666   l_jp_formula_names_tab(50) := '4656EFBCBFE99B87E794A8E4BF9DE999BAE8A2ABE4BF9DE999BAE88085E795AAE58FB7';
3667   l_formula_names_tab(50) := 'EI_NUM_VALIDATION';
3668   l_formula_desc_tab(50) := 'Validation of Employment Insurance Insured Number';
3669 
3670   l_jp_formula_names_tab(51) := '4656EFBCBFE59FBAE7A48EE5B9B4E98791E795AAE58FB7';
3671   l_formula_names_tab(51) := 'BASIC_PENSION_NUM_VALIDATION';
3672   l_formula_desc_tab(51) := 'Validation of Basis Pension Number';
3673 
3674   l_jp_formula_names_tab(52) := '4650EFBCBFE585A8E98A80E3839CE38387E382A3E383BC';
3675   l_formula_names_tab(52) := 'JBA_SAL_EFILE_RECEIVE_BANK_BODY_PAYMENT';
3676   l_formula_desc_tab(52) := 'Jba Salary Deposit File (Incoming Bank) (Body)';
3677 
3678   l_jp_formula_names_tab(53) := '4650EFBCBFE585A8E98A80E4BB95E59091E58588E98A80E8A18CE38395E38383E382BFE383BC';
3679   l_formula_names_tab(53) := 'JBA_SAL_EFILE_SEND_BANK_FOOTER_PAYMENT';
3680   l_formula_desc_tab(53) := 'Jba Salary Deposit File (Outcoming Bank) (Footer)';
3681 
3682   l_jp_formula_names_tab(54) := '4650EFBCBFE585A8E98A80E4BB95E59091E58588E98A80E8A18CE38398E38383E38380E383BC';
3683   l_formula_names_tab(54) := 'JBA_SAL_EFILE_SEND_BANK_HEADER_PAYMENT';
3684   l_formula_desc_tab(54) := 'Jba Salary Deposit File (Outcoming Bank) (Header)';
3685 
3686   l_jp_formula_names_tab(55) := '4650EFBCBFE585A8E98A80E8A2ABE4BB95E59091E58588E98A80E8A18CE38395E38383E382BFE383BC';
3687   l_formula_names_tab(55) := 'JBA_SAL_EFILE_RECEIVE_BANK_FOOTER_PAYMENT';
3688   l_formula_desc_tab(55) := 'Jba Salary Deposit File (Incoming Bank) (Footer)';
3689 
3690   l_jp_formula_names_tab(56) := '4650EFBCBFE585A8E98A80E8A2ABE4BB95E59091E58588E98A80E8A18CE38398E38383E38380E383BC';
3691   l_formula_names_tab(56) := 'JBA_SAL_EFILE_RECEIVE_BANK_HEADER_PAYMENT';
3692   l_formula_desc_tab(56) := 'Jba Salary Deposit File (Incoming Bank) (Header)';
3693 
3694   l_jp_formula_names_tab(57) := '4656EFBCBFE58AB4E5838DE4BF9DE999BAE4BA8BE6A5ADE4B8BB';
3695   l_formula_names_tab(57) := 'LI_LOCATION_VALIDATION';
3696   l_formula_desc_tab(57) := 'Validation of Labor Insurance Employer';
3697 
3698   l_jp_formula_names_tab(58) := '4653EFBCBFE585B1EFBCBFE68980E5BE97E7A88EEFBCBF31393939E5B9B4E7B5A6E4B88EE789B9E588A5E8AABFE695B4E68EA7E999A4EFBCBFE68385E5A0B1';
3699   l_formula_names_tab(58) := 'COM_ITX_1999_SAL_SP_DCT_INFO_SKIP';
3700   l_formula_desc_tab(58) := 'Judgement of Calculation of Income Tax Special Adjustment Deduction in 1999';
3701 
3702   l_jp_formula_names_tab(59) := '4653EFBCBFE585B1EFBCBFE68980E5BE97E7A88EEFBCBF31393939E5B9B4E7B5A6E4B88EE789B9E588A5E8AABFE695B4E68EA7E999A4';
3703   l_formula_names_tab(59) := 'COM_ITX_1999_SAL_SP_DCT_SKIP';
3704   l_formula_desc_tab(59) := 'Judgement of Calculation of Income Tax Special Adjustment Deduction in 1999';
3705 
3706   l_jp_formula_names_tab(60) := '46EFBCBFE585B1EFBCBFE68980E5BE97E7A88EEFBCBF31393939E5B9B4E7B5A6E4B88EE789B9E588A5E8AABFE695B4E68EA7E999A4';
3707   l_formula_names_tab(60) := 'COM_ITX_1999_SAL_SP_DCT';
3708   l_formula_desc_tab(60) := 'Calculation of Income Tax Special Adjustment Deduction in 1999';
3709 
3710   l_jp_formula_names_tab(61) := '4656EFBCBFE5B9B4EFBCBFE5898DE881B7E68385E5A0B1EFBCBFE382ABE3838A';
3711   l_formula_names_tab(61) := 'KANA_VALIDATION';
3712   l_formula_desc_tab(61) := 'Validation of Half Size Kana Entry';
3713 
3714   l_jp_formula_names_tab(62) := '4656EFBCBFE4BF9DE999BAE69699EFBCBFE7ABAFE695B0E587A6E79086';
3715   l_formula_names_tab(62) := 'INS_PREM_ROUNDING_VALIDATION';
3716   l_formula_desc_tab(62) := 'Validation of Rounding Entry Value';
3717 
3718   l_jp_formula_names_tab(63) := '4650EFBCBFE4BD8FE6B091E7A88EE7B48DE4BB98E38395E382A1E382A4E383ABEFBCBFE38398E38383E38380E383BCE383ACE382B3E383BCE38389E38395E382A9E383BCE3839EE38383E382BF';
3719   l_formula_names_tab(63) := 'LTX_EFILE_WITHHOLD_AGENT_HEADER_PAYMENT';
3720   l_formula_desc_tab(63) := 'Local Tax Payment File (Header Record)';
3721 
3722   l_jp_formula_names_tab(64) := '4650EFBCBFE4BD8FE6B091E7A88EE7B48DE4BB98E38395E382A1E382A4E383ABEFBCBFE38387E383BCE382BFE383ACE382B3E383BCE38389E5889DE69C9FE58C96';
3723   l_formula_names_tab(64) := 'LTX_EFILE_LTX_HEADER_PAYMENT';
3724   l_formula_desc_tab(64) := 'Local Tax Payment File (Data Record) (Header)';
3725 
3726   l_jp_formula_names_tab(65) := '4650EFBCBFE4BD8FE6B091E7A88EE7B48DE4BB98E38395E382A1E382A4E383ABEFBCBFE38387E383BCE382BFE383ACE382B3E383BCE38389E8A9B3E7B4B0';
3727   l_formula_names_tab(65) := 'LTX_EFILE_LTX_FOOTER_PAYMENT';
3728   l_formula_desc_tab(65) := 'Local Tax Payment File (Data Record) (Footer)';
3729 
3730   l_jp_formula_names_tab(66) := '4650EFBCBFE4BD8FE6B091E7A88EE7B48DE4BB98E38395E382A1E382A4E383ABEFBCBFE38387E383BCE382BFE383ACE382B3E383BCE38389E38395E382A9E383BCE3839EE38383E382BF';
3731   l_formula_names_tab(66) := 'LTX_EFILE_LTX_BODY_PAYMENT';
3732   l_formula_desc_tab(66) := 'Local Tax Payment File (Data Record) (Body)';
3733 
3734   l_jp_formula_names_tab(67) := '4650EFBCBFE4BD8FE6B091E7A88EE7B48DE4BB98E38395E382A1E382A4E383ABEFBCBFE38388E383ACE383BCE383A9E383ACE382B3E383BCE38389E38395E382A9E383BCE3839EE38383E382BF';
3735   l_formula_names_tab(67) := 'LTX_EFILE_WITHHOLD_AGENT_FOOTER_PAYMENT';
3736   l_formula_desc_tab(67) := 'Local Tax Payment File (Trailer Record)';
3737 
3738   l_jp_formula_names_tab(68) := '4650EFBCBFE4BD8FE6B091E7A88EE7B48DE4BB98E38395E382A1E382A4E383ABEFBCBFE382A8E383B3E38389E383ACE382B3E383BCE38389E38395E382A9E383BCE3839EE38383E382BF';
3739   l_formula_names_tab(68) := 'LTX_EFILE_END_PAYMENT';
3740   l_formula_desc_tab(68) := 'Local Tax Payment File (End Record)';
3741 
3742   l_jp_formula_names_tab(69) := '4653EFBCBFE8B39EEFBCBFE59FBAE69CACEFBCBFE581A5E4BF9DEFBCBFE4BF9DE999BAE69699';
3743   l_formula_names_tab(69) := 'BON_HI_PREM_PROC_SKIP';
3744   l_formula_desc_tab(69) := 'Judgement of Calculation of Health Insurance Premium on Bonus Process';
3745 
3746   l_jp_formula_names_tab(70) := '4653EFBCBFE8B39EEFBCBFE59FBAE69CACEFBCBFE58E9AE5B9B4EFBCBFE4BF9DE999BAE69699';
3747   l_formula_names_tab(70) := 'BON_WP_PREM_PROC_SKIP';
3748   l_formula_desc_tab(70) := 'Judgement of Calculation of Welfare Pension Insurance Premium on Bonus Process';
3749 
3750   l_jp_formula_names_tab(71) := '46EFBCBFE8B39EEFBCBFE59FBAE69CACEFBCBFE581A5E4BF9DEFBCBFE4BF9DE999BAE69699';
3751   l_formula_names_tab(71) := 'BON_HI_PREM_PROC';
3752   l_formula_desc_tab(71) := 'Calculation of Health Insurance Premium on Bonus Process';
3753 
3754   l_jp_formula_names_tab(72) := '46EFBCBFE8B39EEFBCBFE59FBAE69CACEFBCBFE58E9AE5B9B4EFBCBFE4BF9DE999BAE69699';
3755   l_formula_names_tab(72) := 'BON_WP_PREM_PROC';
3756   l_formula_desc_tab(72) := 'Calculation of Welfare Pension Insurance Premium on Bonus Process';
3757 
3758   l_jp_formula_names_tab(73) := '4656EFBCBFE581A5E4BF9DEFBCBFE6A899E6BA96E5A0B1E985ACE69C88E9A18D';
3759   l_formula_names_tab(73) := 'HI_REVISED_SMR_VALIDATION';
3760   l_formula_desc_tab(73) := 'Validation of Hi Standard Monthly Remuneration';
3761 
3762   l_jp_formula_names_tab(74) := '4656EFBCBFE58E9AE5B9B4EFBCBFE6A899E6BA96E5A0B1E985ACE69C88E9A18D';
3763   l_formula_names_tab(74) := 'WP_REVISED_SMR_VALIDATION';
3764   l_formula_desc_tab(74) := 'Validation of Wp Standard Monthly Remuneration';
3765 
3766   l_jp_formula_names_tab(75) := '4656EFBCBFE8BB8AE4B8A1E68385E5A0B1';
3767   l_formula_names_tab(75) := 'VEHICLE_INFO_VALIDATION';
3768   l_formula_desc_tab(75) := 'Validation of Vehicle Information';
3769 
3770   l_jp_formula_names_tab(76) := '46EFBCBFE7B5A6EFBCBFE59FBAE69CACEFBCBFE9809AE58BA4E6898BE5BD93';
3771   l_formula_names_tab(76) := 'SAL_CMA_PROC';
3772   l_formula_desc_tab(76) := 'Calculation of Commutation Allowance on Salary Process';
3773 
3774   l_jp_formula_names_tab(77) := '4656EFBCBFE581A5E4BF9DEFBCBFE6A899E6BA96E5A0B1E985ACE69C88E9A18DEFBCBFE5BE93E5898D';
3775   l_formula_names_tab(77) := 'HI_PRIOR_SMR_VALIDATION';
3776   l_formula_desc_tab(77) := 'Validation of Hi Prior Standard Monthly Remuneration';
3777 
3778   l_jp_formula_names_tab(78) := '4656EFBCBFE58E9AE5B9B4EFBCBFE6A899E6BA96E5A0B1E985ACE69C88E9A18DEFBCBFE5BE93E5898D';
3779   l_formula_names_tab(78) := 'WP_PRIOR_SMR_VALIDATION';
3780   l_formula_desc_tab(78) := 'Validation of Wp Prior Standard Monthly Remuneration';
3781 
3782   l_jp_formula_names_tab(79) := '4642EFBCBFE5B9B4EFBCBFE9818EE4B88DE8B6B3E7A88EE9A18D';
3783   l_formula_names_tab(79) := 'YEA_ITX';
3784   l_formula_desc_tab(79) := 'Calculation of Over and Short Tax Amount on Year End Adjustment';
3785 
3786   l_jp_formula_names_tab(80) := '4653EFBCBFE882B2E694B9EFBCBFE59FBAE69CACEFBCBFE5A0B1E985ACE69C88E9A18D';
3787   l_formula_names_tab(80) := 'IKU_MR_PROC_SKIP';
3788   l_formula_desc_tab(80) := 'Judgement of Calculation of Standard Monthly Renumeration on Unscheduled Revision after Chid-Care Leave';
3789 
3790   l_jp_formula_names_tab(81) := '46EFBCBFE882B2E694B9EFBCBFE59FBAE69CACEFBCBFE5A0B1E985ACE69C88E9A18D';
3791   l_formula_names_tab(81) := 'IKU_MR_PROC';
3792   l_formula_desc_tab(81) := 'Calculation of Standard Monthly Remuneration on Unscheduled Revision after Child-Care Leave';
3793 
3794   l_jp_formula_names_tab(82) := '4A505F4C495F4749505F5052454D';
3795   l_formula_names_tab(82) := 'LIFE_INS_GIP_PREM_TEMPLATE';
3796   l_formula_desc_tab(82) := 'Calculation Template of Group Life Insurance Premium Total for Insurance Premium and Spouse Special Exemption Declaration';
3797 
3798   l_jp_formula_names_tab(83) := '4A505F4C495F4C494E435F5052454D';
3799   l_formula_names_tab(83) := 'LIFE_INS_LINC_PREM_TEMPLATE';
3800   l_formula_desc_tab(83) := 'Calculation Template of Network Center Life Insurance Premium Total for Insurance Premium and Spouse Special Exemption Declaration';
3801 
3802  -- Added it for Bug# 6054975.
3803 
3804   l_jp_formula_names_tab(84) := '4A505F41495F5052454D5F43414C43';
3805   l_formula_names_tab(84) := 'ACCIDENT_INS_PREM_TEMPLATE';
3806   l_formula_desc_tab(84) := 'Calculation Template of Accident Insurance Premium Total for Insurance Premium and Spouse Special Exemption Declaration';
3807 
3808   hr_utility.set_location(l_proc, 20);
3809 
3810   if (g_dbg) then
3811     hr_utility.trace('| Fast Formulas Count = ' || l_jp_formula_names_tab.COUNT);
3812     hr_utility.trace('+----------------------------------+ ');
3813   end if;
3814 --
3815 
3816   FORALL l_tab_cnt IN 1..l_jp_formula_names_tab.COUNT
3817 
3818     UPDATE ff_formulas_f
3819     SET    formula_name = l_formula_names_tab(l_tab_cnt),
3820            description = l_formula_desc_tab(l_tab_cnt)
3821     WHERE  formula_name LIKE hr_jp_standard_pkg.hextochar(l_jp_formula_names_tab(l_tab_cnt),'AL32UTF8')
3822     AND    legislation_code = 'JP';
3823 
3824   UPDATE ff_formulas_f
3825   SET    description = description || 'Obsoleted'
3826   WHERE  ASCII(description) > 127
3827   AND    legislation_code = 'JP';
3828 
3829   hr_utility.set_location(l_proc, 30);
3830 
3831   if (g_dbg) then
3832     hr_utility.trace('| Total Formulas Updated = ' || SQL%ROWCOUNT);
3833     hr_utility.trace('+-----------------------------------+ ');
3834   end if;
3835 --
3836 EXCEPTION
3837 
3838   WHEN OTHERS THEN
3839 
3840     hr_utility.set_location(l_proc, 40);
3841 
3842     raise;
3843 
3844 END migrate_formulas;
3845 --
3846 -- |-------------------------------------------------------------------|
3847 -- |--------------------< migrate_monetary_units >---------------------|
3848 -- |-------------------------------------------------------------------|
3849 --
3850 procedure migrate_monetary_units is
3851 --
3852   type t_jp_monetary_name_tab is table of VARCHAR2(50) index by binary_integer;
3853 
3854   type t_monetary_name_tab is table of pay_monetary_units.monetary_unit_name%TYPE index by binary_integer;
3855 
3856   l_jp_monetary_name_tab  t_jp_monetary_name_tab;
3857   l_monetary_name_tab     t_monetary_name_tab;
3858 
3859   l_proc            VARCHAR2(50) := g_pkg||'.migrate_monetary_units';
3860 
3861 BEGIN
3862 
3863   l_jp_monetary_name_tab.DELETE;
3864   l_monetary_name_tab.DELETE;
3865 
3866   hr_utility.set_location(l_proc, 10);
3867 
3868   l_jp_monetary_name_tab(1) := '3130303030E58686';	l_monetary_name_tab(1) := 'TEN_THOUSAND_YEN';
3869   l_jp_monetary_name_tab(2) := '31303030E58686';	l_monetary_name_tab(2) := 'ONE_THOUSAND_YEN';
3870   l_jp_monetary_name_tab(3) := '313030E58686';	l_monetary_name_tab(3) := 'ONE_HUNDRED_YEN';
3871   l_jp_monetary_name_tab(4) := '3130E58686';	l_monetary_name_tab(4) := 'TEN_YEN';
3872   l_jp_monetary_name_tab(5) := '31E58686';	l_monetary_name_tab(5) := 'ONE_YEN';
3873   l_jp_monetary_name_tab(6) := '32303030E58686';	l_monetary_name_tab(6) := 'TWO_THOUSAND_YEN';
3874   l_jp_monetary_name_tab(7) := '35303030E58686';	l_monetary_name_tab(7) := 'FIVE_THOUSAND_YEN';
3875   l_jp_monetary_name_tab(8) := '353030E58686';	l_monetary_name_tab(8) := 'FIVE_HUNDRED_YEN';
3876   l_jp_monetary_name_tab(9) := '3530E58686';	l_monetary_name_tab(9) := 'FIFTY_YEN';
3877   l_jp_monetary_name_tab(10) := '35E58686';	l_monetary_name_tab(10) := 'FIVE_YEN';
3878 
3879   hr_utility.set_location(l_proc, 20);
3880 
3881   if (g_dbg) then
3882     hr_utility.trace('| Monetary Units Count = ' || l_jp_monetary_name_tab.COUNT);
3883     hr_utility.trace('+----------------------------------+ ');
3884   end if;
3885 --
3886 
3887   FORALL l_tab_cnt IN 1..l_jp_monetary_name_tab.COUNT
3888 
3889     UPDATE pay_monetary_units
3890     SET    monetary_unit_name = l_monetary_name_tab(l_tab_cnt)
3891     WHERE  monetary_unit_name LIKE hr_jp_standard_pkg.hextochar(l_jp_monetary_name_tab(l_tab_cnt),'AL32UTF8')
3892     AND    legislation_code = 'JP';
3893 
3894   hr_utility.set_location(l_proc, 30);
3895 
3896   if (g_dbg) then
3897     hr_utility.trace('| Total Monetary Units Updated = ' || SQL%ROWCOUNT);
3898     hr_utility.trace('+-----------------------------------------+ ');
3899   end if;
3900 --
3901 EXCEPTION
3902 
3903   WHEN OTHERS THEN
3904 
3905     hr_utility.set_location(l_proc, 40);
3906 
3907     raise;
3908 
3909 END migrate_monetary_units;
3910 --
3911 -- |-------------------------------------------------------------------|
3912 -- |--------------------< migrate_user_columns >-----------------------|
3913 -- |-------------------------------------------------------------------|
3914 --
3915 procedure migrate_user_columns is
3916 --
3917   type t_jp_column_names_tab is table of VARCHAR2(200) index by binary_integer;
3918 
3919   type t_column_names_tab is table of pay_user_columns.user_column_name%TYPE index by binary_integer;
3920 
3921   l_jp_column_names_tab  t_jp_column_names_tab;
3922   l_column_names_tab     t_column_names_tab;
3923 
3924   l_proc              VARCHAR2(50) := g_pkg||'.migrate_user_columns';
3925 
3926 BEGIN
3927 
3928   l_jp_column_names_tab.DELETE;
3929   l_column_names_tab.DELETE;
3930 
3931   hr_utility.set_location(l_proc, 10);
3932 
3933   l_jp_column_names_tab(1) := 'E4B880E888ACE98080E881B7';
3934   l_column_names_tab(1) := 'GEN_TRM';
3935 
3936   l_jp_column_names_tab(2) := 'E9818BE8B383E79BB8E5BD93E9A18DE584AAE58588';
3937   l_column_names_tab(2) := 'FARE_EQUIVALENT_AMT_PRIORITY_FLAG';
3938 
3939   l_jp_column_names_tab(3) := 'E4B999E6AC84EFBCBFE59FBAE6BA96E9A18D';
3940   l_column_names_tab(3) := 'OTSU_BASIC_AMT';
3941 
3942   l_jp_column_names_tab(4) := 'E4B999E6AC84EFBCBFE59FBAE6BA96E7A88EE9A18D';
3943   l_column_names_tab(4) := 'OTSU_BASIC_ITX';
3944 
3945   l_jp_column_names_tab(5) := 'E4B999E6AC84EFBCBFE7A88EE9A18D';
3946   l_column_names_tab(5) := 'OTSU_ITX';
3947 
3948   l_jp_column_names_tab(6) := 'E4B999E6AC84EFBCBFE78E87';
3949   l_column_names_tab(6) := 'OTSU_DCTBL_RATE';
3950 
3951   l_jp_column_names_tab(7) := 'E58AA0E7AE97E9A18D';
3952   l_column_names_tab(7) := 'ADD_AMT';
3953 
3954   l_jp_column_names_tab(8) := 'E8AAB2E7A88EE5AFBEE8B1A1E38395E383A9E382B0';
3955   l_column_names_tab(8) := 'TXBL_FLAG';
3956 
3957   l_jp_column_names_tab(9) := 'E99A8EE5B7AE';
3958   l_column_names_tab(9) := 'GRADE_DIFF';
3959 
3960   l_jp_column_names_tab(10) := 'E9A18D';
3961   l_column_names_tab(10) := 'AMT';
3962 
3963   l_jp_column_names_tab(11) := 'E59FBAE6BA96E9A18D';
3964   l_column_names_tab(11) := 'BASIC_AMT';
3965 
3966   l_jp_column_names_tab(12) := 'E59FBAE6BA96E7A88EE9A18D';
3967   l_column_names_tab(12) := 'BASIC_ITX';
3968 
3969   l_jp_column_names_tab(13) := 'E7B5A6EFBCBFE4BB8BE4BF9DEFBCBFE7ABAFE695B0E587A6E79086';
3970   l_column_names_tab(13) := 'SAL_CI_ROUNDING';
3971 
3972   l_jp_column_names_tab(14) := 'E7B5A6EFBCBFE4BB8BE4BF9DEFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886EFBCBFE7ABAFE695B0E587A6E79086';
3973   l_column_names_tab(14) := 'SAL_CI_ROUNDING_EE';
3974 
3975   l_jp_column_names_tab(15) := 'E7B5A6EFBCBFE4BB8BE4BF9DE69699E78E87';
3976   l_column_names_tab(15) := 'SAL_CI_RATE';
3977 
3978   l_jp_column_names_tab(16) := 'E7B5A6EFBCBFE4BB8BE4BF9DE69699E78E87EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
3979   l_column_names_tab(16) := 'SAL_CI_RATE_EE';
3980 
3981   l_jp_column_names_tab(17) := 'E7B5A6EFBCBFE59FBAE98791E69699E78E87';
3982   l_column_names_tab(17) := 'SAL_WPF_RATE';
3983 
3984   l_jp_column_names_tab(18) := 'E7B5A6EFBCBFE59FBAE98791E69699E78E87EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
3985   l_column_names_tab(18) := 'SAL_WPF_RATE_EE';
3986 
3987   l_jp_column_names_tab(19) := 'E7B5A6EFBCBFE581A5E4BF9DE69699E78E87';
3988   l_column_names_tab(19) := 'SAL_HI_RATE';
3989 
3990   l_jp_column_names_tab(20) := 'E7B5A6EFBCBFE581A5E4BF9DE69699E78E87EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
3991   l_column_names_tab(20) := 'SAL_HI_RATE_EE';
3992 
3993   l_jp_column_names_tab(21) := 'E7B5A6EFBCBFE58E9AE5B9B4E69699E78E87';
3994   l_column_names_tab(21) := 'SAL_WP_RATE';
3995 
3996   l_jp_column_names_tab(22) := 'E7B5A6EFBCBFE58E9AE5B9B4E69699E78E87EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
3997   l_column_names_tab(22) := 'SAL_WP_RATE_EE';
3998 
3999   l_jp_column_names_tab(23) := 'E585B1EFBCBFE4BB8BE4BF9DEFBCBFE7ABAFE695B0E587A6E79086';
4000   l_column_names_tab(23) := 'COM_CI_ROUNDING';
4001 
4002   l_jp_column_names_tab(24) := 'E585B1EFBCBFE4BB8BE4BF9DEFBCBFE7ABAFE695B0E587A6E79086EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
4003   l_column_names_tab(24) := 'COM_CI_ROUNDING_EE';
4004 
4005   l_jp_column_names_tab(25) := 'E585B1EFBCBFE4BB8BE4BF9DE69699E78E87';
4006   l_column_names_tab(25) := 'COM_CI_RATE';
4007 
4008   l_jp_column_names_tab(26) := 'E585B1EFBCBFE4BB8BE4BF9DE69699E78E87EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
4009   l_column_names_tab(26) := 'COM_CI_RATE_EE';
4010 
4011   l_jp_column_names_tab(27) := 'E585B1EFBCBFE59FBAE98791EFBCBFE7ABAFE695B0E587A6E79086';
4012   l_column_names_tab(27) := 'COM_WPF_ROUNDING';
4013 
4014   l_jp_column_names_tab(28) := 'E585B1EFBCBFE59FBAE98791EFBCBFE7ABAFE695B0E587A6E79086EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
4015   l_column_names_tab(28) := 'COM_WPF_ROUNDING_EE';
4016 
4017   l_jp_column_names_tab(29) := 'E585B1EFBCBFE59FBAE98791E69699E78E87';
4018   l_column_names_tab(29) := 'COM_WPF_RATE';
4019 
4020   l_jp_column_names_tab(30) := 'E585B1EFBCBFE59FBAE98791E69699E78E87EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
4021   l_column_names_tab(30) := 'COM_WPF_RATE_EE';
4022 
4023   l_jp_column_names_tab(31) := 'E585B1EFBCBFE581A5E4BF9DE69699E78E87';
4024   l_column_names_tab(31) := 'COM_HI_RATE';
4025 
4026   l_jp_column_names_tab(32) := 'E585B1EFBCBFE581A5E4BF9DE69699E78E87EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
4027   l_column_names_tab(32) := 'COM_HI_RATE_EE';
4028 
4029   l_jp_column_names_tab(33) := 'E585B1EFBCBFE58E9AE5B9B4EFBCBFE7ABAFE695B0E587A6E79086';
4030   l_column_names_tab(33) := 'COM_WP_ROUNDING';
4031 
4032   l_jp_column_names_tab(34) := 'E585B1EFBCBFE58E9AE5B9B4EFBCBFE7ABAFE695B0E587A6E79086EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
4033   l_column_names_tab(34) := 'COM_WP_ROUNDING_EE';
4034 
4035   l_jp_column_names_tab(35) := 'E585B1EFBCBFE58E9AE5B9B4E69699E78E87';
4036   l_column_names_tab(35) := 'COM_WP_RATE';
4037 
4038   l_jp_column_names_tab(36) := 'E585B1EFBCBFE58E9AE5B9B4E69699E78E87EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
4039   l_column_names_tab(36) := 'COM_WP_RATE_EE';
4040 
4041   l_jp_column_names_tab(37) := 'E581A5E4BF9DE7AD89E7B49A';
4042   l_column_names_tab(37) := 'HI_GRADE';
4043 
4044   l_jp_column_names_tab(38) := 'E581A5E4BF9DE7AD89E7B49AEFBCBFE8A888E7AE97E794A8';
4045   l_column_names_tab(38) := 'HI_GRADE_CALC';
4046 
4047   l_jp_column_names_tab(39) := 'E581A5E4BF9DE6A899E6BA96E5A0B1E985ACE69C88E9A18D';
4048   l_column_names_tab(39) := 'HI_SMR';
4049 
4050   l_jp_column_names_tab(40) := 'E99990E5BAA6E9A18D';
4051   l_column_names_tab(40) := 'MAX';
4052 
4053   l_jp_column_names_tab(41) := 'E58E9AE5B9B4E7AD89E7B49A';
4054   l_column_names_tab(41) := 'WP_GRADE';
4055 
4056   l_jp_column_names_tab(42) := 'E58E9AE5B9B4E7AD89E7B49AEFBCBFE8A888E7AE97E794A8';
4057   l_column_names_tab(42) := 'WP_GRADE_CALC';
4058 
4059   l_jp_column_names_tab(43) := 'E58E9AE5B9B4E6A899E6BA96E5A0B1E985ACE69C88E9A18D';
4060   l_column_names_tab(43) := 'WP_SMR';
4061 
4062   l_jp_column_names_tab(44) := 'E68EA7E999A4E9A18D';
4063   l_column_names_tab(44) := 'ITX_CREDIT';
4064 
4065   l_jp_column_names_tab(45) := 'E794B2E6AC8430E4BABAEFBCBFE59FBAE6BA96E7A88EE9A18D';
4066   l_column_names_tab(45) := 'KOU0_BASIC_ITX';
4067 
4068   l_jp_column_names_tab(46) := 'E794B2E6AC8430E4BABAEFBCBFE7A88EE9A18D';
4069   l_column_names_tab(46) := 'KOU0_ITX';
4070 
4071   l_jp_column_names_tab(47) := 'E794B2E6AC8431E4BABAEFBCBFE59FBAE6BA96E7A88EE9A18D';
4072   l_column_names_tab(47) := 'KOU1_BASIC_ITX';
4073 
4074   l_jp_column_names_tab(48) := 'E794B2E6AC8431E4BABAEFBCBFE7A88EE9A18D';
4075   l_column_names_tab(48) := 'KOU1_ITX';
4076 
4077   l_jp_column_names_tab(49) := 'E794B2E6AC8432E4BABAEFBCBFE59FBAE6BA96E7A88EE9A18D';
4078   l_column_names_tab(49) := 'KOU2_BASIC_ITX';
4079 
4080   l_jp_column_names_tab(50) := 'E794B2E6AC8432E4BABAEFBCBFE7A88EE9A18D';
4081   l_column_names_tab(50) := 'KOU2_ITX';
4082 
4083   l_jp_column_names_tab(51) := 'E794B2E6AC8433E4BABAEFBCBFE59FBAE6BA96E7A88EE9A18D';
4084   l_column_names_tab(51) := 'KOU3_BASIC_ITX';
4085 
4086   l_jp_column_names_tab(52) := 'E794B2E6AC8433E4BABAEFBCBFE7A88EE9A18D';
4087   l_column_names_tab(52) := 'KOU3_ITX';
4088 
4089   l_jp_column_names_tab(53) := 'E794B2E6AC8434E4BABAEFBCBFE59FBAE6BA96E7A88EE9A18D';
4090   l_column_names_tab(53) := 'KOU4_BASIC_ITX';
4091 
4092   l_jp_column_names_tab(54) := 'E794B2E6AC8434E4BABAEFBCBFE7A88EE9A18D';
4093   l_column_names_tab(54) := 'KOU4_ITX';
4094 
4095   l_jp_column_names_tab(55) := 'E794B2E6AC8435E4BABAEFBCBFE59FBAE6BA96E7A88EE9A18D';
4096   l_column_names_tab(55) := 'KOU5_BASIC_ITX';
4097 
4098   l_jp_column_names_tab(56) := 'E794B2E6AC8435E4BABAEFBCBFE7A88EE9A18D';
4099   l_column_names_tab(56) := 'KOU5_ITX';
4100 
4101   l_jp_column_names_tab(57) := 'E794B2E6AC8436E4BABAEFBCBFE59FBAE6BA96E7A88EE9A18D';
4102   l_column_names_tab(57) := 'KOU6_BASIC_ITX';
4103 
4104   l_jp_column_names_tab(58) := 'E794B2E6AC8436E4BABAEFBCBFE7A88EE9A18D';
4105   l_column_names_tab(58) := 'KOU6_ITX';
4106 
4107   l_jp_column_names_tab(59) := 'E794B2E6AC8437E4BABAEFBCBFE59FBAE6BA96E7A88EE9A18D';
4108   l_column_names_tab(59) := 'KOU7_BASIC_ITX';
4109 
4110   l_jp_column_names_tab(60) := 'E794B2E6AC8437E4BABAEFBCBFE7A88EE9A18D';
4111   l_column_names_tab(60) := 'KOU7_ITX';
4112 
4113   l_jp_column_names_tab(61) := 'E794B2E6AC84EFBCBFE59FBAE6BA96E9A18D';
4114   l_column_names_tab(61) := 'KOU_BASIC_AMT';
4115 
4116   l_jp_column_names_tab(62) := 'E794B2E6AC84EFBCBFE78E87';
4117   l_column_names_tab(62) := 'KOU_DCTBL_RATE';
4118 
4119   l_jp_column_names_tab(63) := 'E5B882E58CBAE794BAE69D91E6B091E7A88E';
4120   l_column_names_tab(63) := 'MUNICIPAL_TAX';
4121 
4122   l_jp_column_names_tab(64) := 'E5B882E58CBAE794BAE69D91E6B091E7A88EE68EA7E999A4E9A18D';
4123   l_column_names_tab(64) := 'MUNICIPAL_TAX_DCT';
4124 
4125   l_jp_column_names_tab(65) := 'E5B882E58CBAE794BAE69D91E6B091E7A88EE78E87';
4126   l_column_names_tab(65) := 'MUNICIPAL_TAX_RATE';
4127 
4128   l_jp_column_names_tab(66) := 'E8B39EEFBCBFE789B9E588A5E581A5E4BF9DE69699E78E87';
4129   l_column_names_tab(66) := 'BON_HI_RATE';
4130 
4131   l_jp_column_names_tab(67) := 'E8B39EEFBCBFE789B9E588A5E581A5E4BF9DE69699E78E87EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
4132   l_column_names_tab(67) := 'BON_HI_RATE_EE';
4133 
4134   l_jp_column_names_tab(68) := 'E8B39EEFBCBFE789B9E588A5E58E9AE5B9B4E69699E78E87';
4135   l_column_names_tab(68) := 'BON_WP_RATE';
4136 
4137   l_jp_column_names_tab(69) := 'E8B39EEFBCBFE789B9E588A5E58E9AE5B9B4E69699E78E87EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
4138   l_column_names_tab(69) := 'BON_WP_RATE_EE';
4139 
4140   l_jp_column_names_tab(70) := 'E99A9CE5AEB3E98080E881B7';
4141   l_column_names_tab(70) := 'DISABLE_TRM';
4142 
4143   l_jp_column_names_tab(71) := 'E4B88AE99990E9A18D';
4144   l_column_names_tab(71) := 'MAX';
4145 
4146   l_jp_column_names_tab(72) := 'E7A88EE9A18D';
4147   l_column_names_tab(72) := 'ITX';
4148 
4149   l_jp_column_names_tab(73) := 'E7A88EE78E87';
4150   l_column_names_tab(73) := 'ITX_RATE';
4151 
4152   l_jp_column_names_tab(74) := 'E983BDE98193E5BA9CE79C8CE6B091E7A88E';
4153   l_column_names_tab(74) := 'PREFECTURAL_TAX';
4154 
4155   l_jp_column_names_tab(75) := 'E983BDE98193E5BA9CE79C8CE6B091E7A88EE68EA7E999A4E9A18D';
4156   l_column_names_tab(75) := 'PREFECTURAL_TAX_DCT';
4157 
4158   l_jp_column_names_tab(76) := 'E983BDE98193E5BA9CE79C8CE6B091E7A88EE78E87';
4159   l_column_names_tab(76) := 'PREFECTURAL_TAX_RATE';
4160 
4161   l_jp_column_names_tab(77) := 'E5908CE4B880E99A8EE5B7AEE381AEE69C80E5B08FE580A4';
4162   l_column_names_tab(77) := 'SAME_GRADE_MIN';
4163 
4164   l_jp_column_names_tab(78) := 'E4B899E6AC84EFBCBFE59FBAE6BA96E9A18D';
4165   l_column_names_tab(78) := 'HEI_BASIC_AMT';
4166 
4167   l_jp_column_names_tab(79) := 'E4B899E6AC84EFBCBFE59FBAE6BA96E7A88EE9A18D';
4168   l_column_names_tab(79) := 'HEI_BASIC_ITX';
4169 
4170   l_jp_column_names_tab(80) := 'E4B899E6AC84EFBCBFE7A88EE9A18D';
4171   l_column_names_tab(80) := 'HEI_ITX';
4172 
4173   l_jp_column_names_tab(81) := 'E4B899E6AC84EFBCBFE78E87';
4174   l_column_names_tab(81) := 'HEI_DCTBL_RATE';
4175 
4176   l_jp_column_names_tab(82) := 'E585B1EFBCBFE581A5E4BF9DEFBCBFE7ABAFE695B0E587A6E79086';
4177   l_column_names_tab(82) := 'COM_HI_ROUNDING';
4178 
4179   l_jp_column_names_tab(83) := 'E585B1EFBCBFE581A5E4BF9DEFBCBFE7ABAFE695B0E587A6E79086EFBCBFE8A2ABE4BF9DE999BAE88085E8B2A0E68B85E58886';
4180   l_column_names_tab(83) := 'COM_HI_ROUNDING_EE';
4181 
4182   l_jp_column_names_tab(84) := 'E585B1EFBCBFE581A5E4BF9DEFBCBFE7ABAFE695B0E587A6E79086E382BFE382A4E38397';
4183   l_column_names_tab(84) := 'COM_HI_ROUNDING_TYPE';
4184 
4185   l_jp_column_names_tab(85) := 'E78E87';
4186   l_column_names_tab(85) := 'DCTBL_RATE';
4187 
4188 
4189   hr_utility.set_location(l_proc, 20);
4190 
4191   if (g_dbg) then
4192     hr_utility.trace('| User Columns Count = ' || l_jp_column_names_tab.COUNT);
4193     hr_utility.trace('+----------------------------------+ ');
4194   end if;
4195 --
4196 
4197   UPDATE pay_user_columns
4198   SET    user_column_name = 'RATE'
4199   WHERE  user_column_name LIKE hr_jp_standard_pkg.hextochar('E78E87','AL32UTF8')
4200   AND    legislation_code = 'JP'
4201   AND    user_table_id IN (
4202            SELECT user_table_id
4203            FROM   pay_user_tables
4204            WHERE  user_table_name IN (
4205              hr_jp_standard_pkg.hextochar('54EFBCBFE5B9B4EFBCBFE5808BE4BABAE5B9B4E98791E4BF9DE999BAE69699E68EA7E999A4E9A18DE8A1A8','AL32UTF8'),
4206              hr_jp_standard_pkg.hextochar('54EFBCBFE5B9B4EFBCBFE7949FE591BDE4BF9DE999BAE69699E68EA7E999A4E9A18DE8A1A8','AL32UTF8'),
4207              hr_jp_standard_pkg.hextochar('54EFBCBFE5B9B4EFBCBFE995B7E69C9FE6908DE5AEB3E4BF9DE999BAE69699E68EA7E999A4E9A18DE8A1A8','AL32UTF8'),
4208              hr_jp_standard_pkg.hextochar('54EFBCBFE5B9B4EFBCBFE79FADE69C9FE6908DE5AEB3E4BF9DE999BAE69699E68EA7E999A4E9A18DE8A1A8','AL32UTF8'))
4209            AND    legislation_code = 'JP');
4210 
4211   hr_utility.set_location(l_proc, 30);
4212 
4213   UPDATE pay_user_columns
4214   SET    user_column_name = 'EXM'
4215   WHERE  user_column_name LIKE hr_jp_standard_pkg.hextochar('E68EA7E999A4E9A18D','AL32UTF8')
4216   AND    legislation_code = 'JP'
4217   AND    user_table_id IN (
4218            SELECT user_table_id
4219            FROM   pay_user_tables
4220            WHERE  user_table_name IN (
4221              hr_jp_standard_pkg.hextochar('54EFBCBFE5B9B4EFBCBFE59084E7A8AEE68980E5BE97E68EA7E999A4E9A18DE8A1A8','AL32UTF8'),
4222              hr_jp_standard_pkg.hextochar('54EFBCBFE5B9B4EFBCBFE9858DE581B6E88085E789B9E588A5E68EA7E999A4E9A18DE697A9E8A68BE8A1A8','AL32UTF8'))
4223            AND    legislation_code = 'JP');
4224 
4225   hr_utility.set_location(l_proc, 40);
4226 
4227   UPDATE pay_user_columns
4228   SET    user_column_name = 'STD_DCT'
4229   WHERE  user_column_name LIKE hr_jp_standard_pkg.hextochar('E68EA7E999A4E9A18D','AL32UTF8')
4230   AND    legislation_code = 'JP'
4231   AND    user_table_id = (
4232            SELECT user_table_id
4233            FROM   pay_user_tables
4234            WHERE  user_table_name LIKE hr_jp_standard_pkg.hextochar('54EFBCBFE5B9B4EFBCBFE7B5A6E4B88EE68980E5BE97E68EA7E999A4E5BE8CE381AEE7B5A6E4B88EE7AD89E381AEE98791E9A18DE8A1A832','AL32UTF8')
4235            AND    legislation_code = 'JP');
4236 
4237   hr_utility.set_location(l_proc, 50);
4238 
4239   FORALL l_tab_cnt IN 1..l_jp_column_names_tab.COUNT
4240 
4241     UPDATE pay_user_columns
4242     SET    user_column_name = l_column_names_tab(l_tab_cnt)
4243     WHERE  user_column_name LIKE hr_jp_standard_pkg.hextochar(l_jp_column_names_tab(l_tab_cnt),'AL32UTF8')
4244     AND    legislation_code = 'JP';
4245 
4246   hr_utility.set_location(l_proc, 60);
4247 
4248   if (g_dbg) then
4249     hr_utility.trace('| Total User Columns Updated = ' || SQL%ROWCOUNT);
4250     hr_utility.trace('+-----------------------------------------+ ');
4251   end if;
4252 
4253 --
4254 EXCEPTION
4255 
4256   WHEN OTHERS THEN
4257 
4258     hr_utility.set_location(l_proc, 70);
4259 
4260     raise;
4261 
4262 END migrate_user_columns;
4263 --
4264 -- |-------------------------------------------------------------------|
4265 -- |----------------------< migrate_user_rows >------------------------|
4266 -- |-------------------------------------------------------------------|
4267 --
4268 procedure migrate_user_rows is
4269 --
4270   type t_jp_row_names_tab is table of VARCHAR2(200) index by binary_integer;
4271 
4272   type t_row_names_tab is table of pay_user_rows_f.row_low_range_or_name%TYPE index by binary_integer;
4273 
4274   l_jp_row_names_tab  t_jp_row_names_tab;
4275   l_row_names_tab     t_row_names_tab;
4276 
4277   l_proc           VARCHAR2(50) := g_pkg||'.migrate_user_rows';
4278 
4279 BEGIN
4280 
4281   l_jp_row_names_tab.DELETE;
4282   l_row_names_tab.DELETE;
4283 
4284   hr_utility.set_location(l_proc, 10);
4285 
4286   l_jp_row_names_tab(1) := 'E9A790E8BB8AE5A0B4E4BBA3E7AD89';
4287   l_row_names_tab(1) := 'PARKING_FEE';
4288 
4289   l_jp_row_names_tab(2) := 'E69C88E9A18DE8A1A8EFBCBFE689B6E9A48AE8A6AAE6978FE7AD8931E4BABAE38182E3819FE3828AE381AEE68EA7E999A4E9A18D';
4290   l_row_names_tab(2) := 'MTH_TBL_PER_DEP_EXM';
4291 
4292   l_jp_row_names_tab(3) := 'E98080E881B7E68980E5BE97E68EA7E999A4E9A18DE8A1A8EFBCBFE58BA4E7B69AE5B9B4E695B031E5B9B4E38182E3819FE3828AE381AEE68EA7E999A4E9A18D';
4293   l_row_names_tab(3) := 'TRM_INCOME_EXM_TBL_PER_SERVICE_YEAR_EXM';
4294 
4295   l_jp_row_names_tab(4) := 'E697A5E9A18DE8A1A8EFBCBFE689B6E9A48AE8A6AAE6978FE7AD8931E4BABAE38182E3819FE3828AE381AEE68EA7E999A4E9A18D';
4296   l_row_names_tab(4) := 'DAY_TBL_PER_DEP_EXM';
4297 
4298   l_jp_row_names_tab(5) := 'E59FBAE7A48EE68EA7E999A4';
4299   l_row_names_tab(5) := 'BASIC_EXM';
4300 
4301   l_jp_row_names_tab(6) := 'E9858DE581B6E88085E68EA7E999A4';
4302   l_row_names_tab(6) := 'SPOUSE_EXM';
4303 
4304   l_jp_row_names_tab(7) := 'E689B6E9A48AE68EA7E999A4';
4305   l_row_names_tab(7) := 'DEP_EXM';
4306 
4307   l_jp_row_names_tab(8) := 'E694BFE5BA9CE7AEA1E68E8C';
4308   l_row_names_tab(8) := 'GOVT_MANAGE';
4309 
4310   l_jp_row_names_tab(9) := 'E4B880E888ACE68EA7E999A4E5AFBEE8B1A1E9858DE581B6E88085';
4311   l_row_names_tab(9) := 'GEN_SPOUSE';
4312 
4313   l_jp_row_names_tab(10) := 'E4B880E888ACE99A9CE5AEB3E88085';
4314   l_row_names_tab(10) := 'GEN_DISABLE';
4315 
4316   l_jp_row_names_tab(11) := 'E4B880E888ACE689B6E9A48AE8A6AAE6978F';
4317   l_row_names_tab(11) := 'GEN_DEP';
4318 
4319   l_jp_row_names_tab(12) := 'E5AFA1E5A4AB';
4320   l_row_names_tab(12) := 'WIDOWER';
4321 
4322   l_jp_row_names_tab(13) := 'E5AFA1E5A9A6';
4323   l_row_names_tab(13) := 'WIDOW';
4324 
4325   l_jp_row_names_tab(14) := 'E59FBAE7A48E';
4326   l_row_names_tab(14) := 'BASIC';
4327 
4328   l_jp_row_names_tab(15) := 'E58BA4E58AB4E5ADA6E7949F';
4329   l_row_names_tab(15) := 'WORKING_STUDENT';
4330 
4331   l_jp_row_names_tab(16) := 'E5908CE5B185E789B9E588A5E99A9CE5AEB3E88085';
4332   l_row_names_tab(16) := 'SEV_DISABLE_LT';
4333 
4334   l_jp_row_names_tab(17) := 'E5908CE5B185E88081E8A6AAE7AD89';
4335   l_row_names_tab(17) := 'ELDER_PARENT_LT';
4336 
4337   l_jp_row_names_tab(18) := 'E789B9E5AE9AE689B6E9A48AE8A6AAE6978F';
4338   l_row_names_tab(18) := 'SPECIFIC_DEP';
4339 
4340   l_jp_row_names_tab(19) := 'E789B9E588A5E381AEE5AFA1E5A9A6';
4341   l_row_names_tab(19) := 'SP_WIDOW';
4342 
4343   l_jp_row_names_tab(20) := 'E789B9E588A5E99A9CE5AEB3E88085';
4344   l_row_names_tab(20) := 'SEV_DISABLE';
4345 
4346   l_jp_row_names_tab(21) := 'E5B9B4E5B091E689B6E9A48AE8A6AAE6978F';
4347   l_row_names_tab(21) := 'JUNIOR_DEP';
4348 
4349   l_jp_row_names_tab(22) := 'E88081E4BABAE68EA7E999A4E5AFBEE8B1A1E9858DE581B6E88085';
4350   l_row_names_tab(22) := 'ELDER_SPOUSE';
4351 
4352   l_jp_row_names_tab(23) := 'E88081E4BABAE689B6E9A48AE8A6AAE6978F';
4353   l_row_names_tab(23) := 'ELDER_DEP';
4354 
4355   l_jp_row_names_tab(24) := 'E88081E5B9B4E88085';
4356   l_row_names_tab(24) := 'ELDER';
4357 
4358   l_jp_row_names_tab(25) := 'E5AFA1E5A4ABE68EA7E999A4EFBCBFE59088E8A888E68980E5BE97';
4359   l_row_names_tab(25) := 'WIDOWER_EXM_ANNUAL_INCOME';
4360 
4361   l_jp_row_names_tab(26) := 'E5AFA1E5A9A6E68EA7E999A4EFBCBFE59088E8A888E68980E5BE97';
4362   l_row_names_tab(26) := 'WINDOW_EXM_ANNUAL_INCOME';
4363 
4364   l_jp_row_names_tab(27) := 'E58BA4E58AB4E5ADA6E7949FE68EA7E999A4EFBCBFE59088E8A888E68980E5BE97';
4365   l_row_names_tab(27) := 'WORKING_STUDENT_EXM_ANNUAL_INCOME';
4366 
4367   l_jp_row_names_tab(28) := 'E68EA7E999A4E5AFBEE8B1A1E9858DE581B6E88085E68EA7E999A4EFBCBFE9858DE581B6E88085E59088E8A888E68980E5BE97';
4368   l_row_names_tab(28) := 'SPOUSE_EXM_SPOUSE_ANNUAL_INCOME';
4369 
4370   l_jp_row_names_tab(29) := 'E6908DE5AEB3E4BF9DE999BAE69699E68EA7E999A4';
4371   l_row_names_tab(29) := 'NONLIFE_INS_EXM';
4372 
4373   l_jp_row_names_tab(30) := 'E789B9E588A5E381AEE5AFA1E5A9A6E68EA7E999A4EFBCBFE59088E8A888E68980E5BE97';
4374   l_row_names_tab(30) := 'SP_WIDOW_EXM_ANNUAL_INCOME';
4375 
4376   l_jp_row_names_tab(31) := 'E5B9B4E69CABE8AABFE695B4E5AFBEE8B1A1EFBCBFE58F8EE585A5E98791E9A18D';
4377   l_row_names_tab(31) := 'YEA_ANNUAL_INCOME';
4378 
4379   l_jp_row_names_tab(32) := 'E9858DE581B6E88085E789B9E588A5E68EA7E999A4EFBCBFE68980E5BE97E88085E59088E8A888E68980E5BE97';
4380   l_row_names_tab(32) := 'SPOUSE_SP_EXM_EARNER_ANNUAL_INCOME';
4381 
4382   l_jp_row_names_tab(33) := 'E9858DE581B6E88085E789B9E588A5E68EA7E999A4EFBCBFE9858DE581B6E88085E59088E8A888E68980E5BE97';
4383   l_row_names_tab(33) := 'SPOUSE_SP_EXM_SPOUSE_ANNUAL_INCOME';
4384 
4385   l_jp_row_names_tab(34) := 'E88081E5B9B4E88085E68EA7E999A4EFBCBFE59088E8A888E68980E5BE97';
4386   l_row_names_tab(34) := 'ELDER_EXM_ANNUAL_INCOME';
4387 
4388   -- bug.5914738. Earthquake Insurance Premium support
4389   l_jp_row_names_tab(35) := 'E995B7E69C9FE6908DE5AEB3E4BF9DE999BAE69699E68EA7E999A4';
4390   l_row_names_tab(35) := 'LONG_TERM_NONLIFE_INS_EXM';
4391 
4392   l_jp_row_names_tab(36) := 'E59CB0E99C87E4BF9DE999BAE69699E68EA7E999A4';
4393   l_row_names_tab(36) := 'EARTHQUAKE_INS_EXM';
4394 
4395   l_jp_row_names_tab(37) := 'E4B880E888ACE7949FE591BDE4BF9DE999BAE69699E68EA7E999A4EFBCBF32303132E5B9B4E4BBA5E9998D';
4396   l_row_names_tab(37) := 'GEN_LIFE_INS_EXM_2012';
4397 
4398   l_jp_row_names_tab(38) := 'E5808BE4BABAE5B9B4E98791E4BF9DE999BAE69699E68EA7E999A4EFBCBF32303132E5B9B4E4BBA5E9998D';
4399   l_row_names_tab(38) := 'INDIVIDUAL_PENSION_INS_EXM_2012';
4400 
4401   l_jp_row_names_tab(39) := 'E7949FE591BDE4BF9DE999BAE69699E68EA7E999A4EFBCBF32303132E5B9B4E4BBA5E9998D';
4402   l_row_names_tab(39) := 'LIFE_INS_EXM_2012';
4403 
4404   hr_utility.set_location(l_proc, 20);
4405 
4406   if (g_dbg) then
4407     hr_utility.trace('| User Rows Count = ' || l_jp_row_names_tab.COUNT);
4408     hr_utility.trace('+----------------------------------+ ');
4409   end if;
4410 --
4411 
4412   FORALL l_tab_cnt IN 1..l_jp_row_names_tab.COUNT
4413 
4414     UPDATE pay_user_rows_f
4415     SET    row_low_range_or_name = l_row_names_tab(l_tab_cnt)
4416     WHERE  row_low_range_or_name LIKE hr_jp_standard_pkg.hextochar(l_jp_row_names_tab(l_tab_cnt),'AL32UTF8')
4417     AND    legislation_code = 'JP';
4418 
4419   hr_utility.set_location(l_proc, 30);
4420 
4421   if (g_dbg) then
4422     hr_utility.trace('| Total User Rows Updated = ' || SQL%ROWCOUNT);
4423     hr_utility.trace('+-----------------------------------------+ ');
4424   end if;
4425 --
4426 EXCEPTION
4427 
4428   WHEN OTHERS THEN
4429 
4430     hr_utility.set_location(l_proc, 40);
4431 
4432     raise;
4433 
4434 END migrate_user_rows;
4435 --
4436 -- |-------------------------------------------------------------------|
4437 -- |---------------------< migrate_user_tables >-----------------------|
4438 -- |-------------------------------------------------------------------|
4439 --
4440 procedure migrate_user_tables is
4441 --
4442   type t_jp_table_names_tab is table of VARCHAR2(200) index by binary_integer;
4443 
4444   type t_table_names_tab is table of pay_user_tables.user_table_name%TYPE index by binary_integer;
4445 
4446   type t_row_titles_tab is table of pay_user_tables.user_row_title%TYPE index by binary_integer;
4447 
4448   l_jp_table_names_tab  t_jp_table_names_tab;
4449   l_table_names_tab     t_table_names_tab;
4450   l_row_titles_tab      t_row_titles_tab;
4451 
4452   l_proc             VARCHAR2(50) := g_pkg||'.migrate_user_tables';
4453 
4454 BEGIN
4455 
4456   l_jp_table_names_tab.DELETE;
4457   l_table_names_tab.DELETE;
4458   l_row_titles_tab.DELETE;
4459 
4460   hr_utility.set_location(l_proc, 10);
4461 
4462   l_jp_table_names_tab(1) := '54EFBCBFE5B9B4EFBCBFE5808BE4BABAE5B9B4E98791E4BF9DE999BAE69699E68EA7E999A4E9A18DE8A1A8';
4463   l_table_names_tab(1) := 'T_YEA_INDIVIDUAL_PENSION_INS_EXM';
4464   l_row_titles_tab(1) := 'ANNUAL_INS_PREM';
4465 
4466   l_jp_table_names_tab(2) := '54EFBCBFE5B9B4EFBCBFE7B5A6E4B88EE68980E5BE97E68EA7E999A4E5BE8CE381AEE7B5A6E4B88EE7AD89E381AEE98791E9A18DE8A1A831';
4467   l_table_names_tab(2) := 'T_YEA_AMT_AFTER_EMP_INCOME_DCT1';
4468   l_row_titles_tab(2) := 'EMP_INCOME';
4469 
4470   l_jp_table_names_tab(3) := '54EFBCBFE5B9B4EFBCBFE7B5A6E4B88EE68980E5BE97E68EA7E999A4E5BE8CE381AEE7B5A6E4B88EE7AD89E381AEE98791E9A18DE8A1A832';
4471   l_table_names_tab(3) := 'T_YEA_AMT_AFTER_EMP_INCOME_DCT2';
4472   l_row_titles_tab(3) := 'YEA_EMP_INCOME';
4473 
4474   l_jp_table_names_tab(4) := '54EFBCBFE5B9B4EFBCBFE7949FE591BDE4BF9DE999BAE69699E68EA7E999A4E9A18DE8A1A8';
4475   l_table_names_tab(4) := 'T_YEA_LIFE_INS_EXM';
4476   l_row_titles_tab(4) := 'ANNUAL_INS_PREM';
4477 
4478   l_jp_table_names_tab(5) := '54EFBCBFE5B9B4EFBCBFE995B7E69C9FE6908DE5AEB3E4BF9DE999BAE69699E68EA7E999A4E9A18DE8A1A8';
4479   l_table_names_tab(5) := 'T_YEA_LONG_NONLIFE_INS_EXM';
4480   l_row_titles_tab(5) := 'ANNUAL_INS_PREM';
4481 
4482   l_jp_table_names_tab(6) := '54EFBCBFE5B9B4EFBCBFE79FADE69C9FE6908DE5AEB3E4BF9DE999BAE69699E68EA7E999A4E9A18DE8A1A8';
4483   l_table_names_tab(6) := 'T_YEA_SHORT_NONLIFE_INS_EXM';
4484   l_row_titles_tab(6) := 'ANNUAL_INS_PREM';
4485 
4486   l_jp_table_names_tab(7) := '54EFBCBFE5B9B4EFBCBFE9858DE581B6E88085E789B9E588A5E68EA7E999A4E9A18DE697A9E8A68BE8A1A8';
4487   l_table_names_tab(7) := 'T_YEA_SPOUSE_SP_EXM_RECKONER';
4488   l_row_titles_tab(7) := 'SPOUSE_ANNUAL_INCOME';
4489 
4490   l_jp_table_names_tab(8) := '54EFBCBFE5B9B4EFBCBFE59084E7A8AEE68980E5BE97E68EA7E999A4E9A18DE8A1A8';
4491   l_table_names_tab(8) := 'T_YEA_INCOME_EXM';
4492   l_row_titles_tab(8) := 'INCOME_EXM_TYPE';
4493 
4494   l_jp_table_names_tab(9) := '54EFBCBFE5B9B4EFBCBFE59084E7A8AEE4B88AE99990E9A18DE8A1A8';
4495   l_table_names_tab(9) := 'T_YEA_MAX_AMT';
4496   l_row_titles_tab(9) := 'AMT_TYPE';
4497 
4498   l_jp_table_names_tab(10) := '54EFBCBFE5B9B4EFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE9809FE7AE97E8A1A8';
4499   l_table_names_tab(10) := 'T_YEA_ITX_RAPID_CALC';
4500   l_row_titles_tab(10) := 'TXBL_INCOME';
4501 
4502   l_jp_table_names_tab(11) := '54EFBCBFE585B1EFBCBFE6A899E6BA96E5A0B1E985ACE69C88E9A18DE8A1A8';
4503   l_table_names_tab(11) := 'T_COM_SMR';
4504   l_row_titles_tab(11) := 'MR';
4505 
4506   l_jp_table_names_tab(12) := '54EFBCBFE585B1EFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE8A1A8EFBCBFE69C88E9A18DE8A1A8E794B2E6AC84EFBCBFE588A5E8A1A831';
4507   l_table_names_tab(12) := 'T_COM_ITX_MTH_KOU_APPENDIX1';
4508   l_row_titles_tab(12) := 'AMT_AFTER_SI_PREM_DCT';
4509 
4510   l_jp_table_names_tab(13) := '54EFBCBFE585B1EFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE8A1A8EFBCBFE69C88E9A18DE8A1A8E794B2E6AC84EFBCBFE588A5E8A1A832';
4511   l_table_names_tab(13) := 'T_COM_ITX_MTH_KOU_APPENDIX2';
4512   l_row_titles_tab(13) := 'INCOME_EXM_TYPE';
4513 
4514   l_jp_table_names_tab(14) := '54EFBCBFE585B1EFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE8A1A8EFBCBFE69C88E9A18DE8A1A8E794B2E6AC84EFBCBFE588A5E8A1A833';
4515   l_table_names_tab(14) := 'T_COM_ITX_MTH_KOU_APPENDIX3';
4516   l_row_titles_tab(14) := 'TXBL_ERN';
4517 
4518   l_jp_table_names_tab(15) := '54EFBCBFE7B5A6EFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE8A1A8EFBCBFE69C88E9A18DE8A1A8E4B999E6AC8431';
4519   l_table_names_tab(15) := 'T_SAL_ITX_MTH_OTSU1';
4520   l_row_titles_tab(15) := 'AMT_AFTER_SI_PREM_DCT';
4521 
4522   l_jp_table_names_tab(16) := '54EFBCBFE7B5A6EFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE8A1A8EFBCBFE69C88E9A18DE8A1A8E4B999E6AC8432';
4523   l_table_names_tab(16) := 'T_SAL_ITX_MTH_OTSU2';
4524   l_row_titles_tab(16) := 'AMT_AFTER_SI_PREM_DCT';
4525 
4526   l_jp_table_names_tab(17) := '54EFBCBFE7B5A6EFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE8A1A8EFBCBFE697A5E9A18DE8A1A831';
4527   l_table_names_tab(17) := 'T_SAL_ITX_DAY1';
4528   l_row_titles_tab(17) := 'AMT_AFTER_SI_PREM_DCT';
4529 
4530   l_jp_table_names_tab(18) := '54EFBCBFE7B5A6EFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE8A1A8EFBCBFE697A5E9A18DE8A1A832';
4531   l_table_names_tab(18) := 'T_SAL_ITX_DAY2';
4532   l_row_titles_tab(18) := 'AMT_AFTER_SI_PREM_DCT';
4533 
4534   l_jp_table_names_tab(19) := '54EFBCBFE8B39EEFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE7AE97E587BAE78E87E8A1A8EFBCBFE794B2E6AC8430E4BABA';
4535   l_table_names_tab(19) := 'T_BON_ITX_RATE_KOU0';
4536   l_row_titles_tab(19) := 'PREV_MTH_AMT_AFTER_SI_PREM_DCT';
4537 
4538   l_jp_table_names_tab(20) := '54EFBCBFE8B39EEFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE7AE97E587BAE78E87E8A1A8EFBCBFE794B2E6AC8431E4BABA';
4539   l_table_names_tab(20) := 'T_BON_ITX_RATE_KOU1';
4540   l_row_titles_tab(20) := 'PREV_MTH_AMT_AFTER_SI_PREM_DCT';
4541 
4542   l_jp_table_names_tab(21) := '54EFBCBFE8B39EEFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE7AE97E587BAE78E87E8A1A8EFBCBFE794B2E6AC8432E4BABA';
4543   l_table_names_tab(21) := 'T_BON_ITX_RATE_KOU2';
4544   l_row_titles_tab(21) := 'PREV_MTH_AMT_AFTER_SI_PREM_DCT';
4545 
4546   l_jp_table_names_tab(22) := '54EFBCBFE8B39EEFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE7AE97E587BAE78E87E8A1A8EFBCBFE794B2E6AC8433E4BABA';
4547   l_table_names_tab(22) := 'T_BON_ITX_RATE_KOU3';
4548   l_row_titles_tab(22) := 'PREV_MTH_AMT_AFTER_SI_PREM_DCT';
4549 
4550   l_jp_table_names_tab(23) := '54EFBCBFE8B39EEFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE7AE97E587BAE78E87E8A1A8EFBCBFE794B2E6AC8434E4BABA';
4551   l_table_names_tab(23) := 'T_BON_ITX_RATE_KOU4';
4552   l_row_titles_tab(23) := 'PREV_MTH_AMT_AFTER_SI_PREM_DCT';
4553 
4554   l_jp_table_names_tab(24) := '54EFBCBFE8B39EEFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE7AE97E587BAE78E87E8A1A8EFBCBFE794B2E6AC8435E4BABA';
4555   l_table_names_tab(24) := 'T_BON_ITX_RATE_KOU5';
4556   l_row_titles_tab(24) := 'PREV_MTH_AMT_AFTER_SI_PREM_DCT';
4557 
4558   l_jp_table_names_tab(25) := '54EFBCBFE8B39EEFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE7AE97E587BAE78E87E8A1A8EFBCBFE794B2E6AC8436E4BABA';
4559   l_table_names_tab(25) := 'T_BON_ITX_RATE_KOU6';
4560   l_row_titles_tab(25) := 'PREV_MTH_AMT_AFTER_SI_PREM_DCT';
4561 
4562   l_jp_table_names_tab(26) := '54EFBCBFE8B39EEFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE7AE97E587BAE78E87E8A1A8EFBCBFE794B2E6AC8437E4BABA';
4563   l_table_names_tab(26) := 'T_BON_ITX_RATE_KOU7';
4564   l_row_titles_tab(26) := 'PREV_MTH_AMT_AFTER_SI_PREM_DCT';
4565 
4566   l_jp_table_names_tab(27) := '54EFBCBFE8B39EEFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE7AE97E587BAE78E87E8A1A8EFBCBFE4B999E6AC84';
4567   l_table_names_tab(27) := 'T_BON_ITX_RATE_OTSU';
4568   l_row_titles_tab(27) := 'PREV_MTH_AMT_AFTER_SI_PREM_DCT';
4569 
4570   l_jp_table_names_tab(28) := '54EFBCBFE98080EFBCBFE98080E881B7E68980E5BE97E68EA7E999A4E9A18DE8A1A8';
4571   l_table_names_tab(28) := 'T_TRM_INCOME_EXM';
4572   l_row_titles_tab(28) := 'SERVICE_YEARS';
4573 
4574   l_jp_table_names_tab(29) := '54EFBCBFE98080EFBCBFE4BD8FE6B091E7A88EE789B9E588A5E5BEB4E58F8EE7A88EE9A18DE8A1A831';
4575   l_table_names_tab(29) := 'T_TRM_LTX1';
4576   l_row_titles_tab(29) := 'AMT_AFTER_TRM_INCOME_DCT';
4577 
4578   l_jp_table_names_tab(30) := '54EFBCBFE98080EFBCBFE4BD8FE6B091E7A88EE789B9E588A5E5BEB4E58F8EE7A88EE9A18DE8A1A832';
4579   l_table_names_tab(30) := 'T_TRM_LTX2';
4580   l_row_titles_tab(30) := 'AMT_AFTER_TRM_INCOME_DCT';
4581 
4582   l_jp_table_names_tab(31) := '54EFBCBFE98080EFBCBFE6BA90E6B389E5BEB4E58F8EE7A88EE9A18DE9809FE7AE97E8A1A8';
4583   l_table_names_tab(31) := 'T_TRM_ITX_RAPID_CALC';
4584   l_row_titles_tab(31) := 'TXBL_INCOME';
4585 
4586   l_jp_table_names_tab(32) := '54EFBCBFE585B1EFBCBFE59084E7A8AEE59FBAE7A48EE98791E9A18DE8A1A8';
4587   l_table_names_tab(32) := 'T_COM_BASE_AMT';
4588   l_row_titles_tab(32) := 'BASE_AMT_TYPE';
4589 
4590   l_jp_table_names_tab(33) := '54EFBCBFE581A5E4BF9DE58E9AE5B9B4E4BF9DE999BAE69699E78E87';
4591   l_table_names_tab(33) := 'T_HI_WP_PREM_RATE';
4592   l_row_titles_tab(33) := 'RATE_TYPE';
4593 
4594   l_jp_table_names_tab(34) := '54EFBCBFE7B5A6EFBCBFE4BAA4E9809AE794A8E585B7EFBCBFE99D9EE8AAB2E7A88EE99990E5BAA6E9A18D';
4595   l_table_names_tab(34) := 'T_SAL_CMA_PRIVATE_TRANSPORT_NTXBL_ERN_MAX';
4596   l_row_titles_tab(34) := 'DISTANCE';
4597 
4598   l_jp_table_names_tab(35) := '54EFBCBFE7B5A6EFBCBFE9809AE58BA4E6898BE6AEB5EFBCBFE68385E5A0B1';
4599   l_table_names_tab(35) := 'T_SAL_CMA_METHOD_INFO';
4600   l_row_titles_tab(35) := 'CMA_METHOD';
4601 
4602   hr_utility.set_location(l_proc, 20);
4603 
4604   if (g_dbg) then
4605     hr_utility.trace('| User Tables Count = ' || l_jp_table_names_tab.COUNT);
4606     hr_utility.trace('+----------------------------------+ ');
4607   end if;
4608 --
4609 
4610   FORALL l_tab_cnt IN 1..l_jp_table_names_tab.COUNT
4611 
4612     UPDATE pay_user_tables
4613     SET    user_table_name = l_table_names_tab(l_tab_cnt),
4614            user_row_title = l_row_titles_tab(l_tab_cnt)
4615     WHERE  user_table_name LIKE hr_jp_standard_pkg.hextochar(l_jp_table_names_tab(l_tab_cnt),'AL32UTF8')
4616     AND    legislation_code = 'JP';
4617 
4618   hr_utility.set_location(l_proc, 30);
4619 
4620   if (g_dbg) then
4621     hr_utility.trace('| Total User Tables Updated = ' || SQL%ROWCOUNT);
4622     hr_utility.trace('+-----------------------------------------+ ');
4623   end if;
4624 --
4625 EXCEPTION
4626 
4627   WHEN OTHERS THEN
4628 
4629     hr_utility.set_location(l_proc, 40);
4630 
4631     raise;
4632 
4633 END migrate_user_tables;
4634 --
4635 -- |-------------------------------------------------------------------|
4636 -- |-------------------------< delete_dbi >----------------------------|
4637 -- |-------------------------------------------------------------------|
4638 --
4639 procedure delete_dbi is
4640   --
4641   b_script_already_run          BOOLEAN;
4642   --
4643 --
4644   l_dbi_tl_cnt number := 0;
4645   l_dbi_cnt number := 0;
4646 --
4647   CURSOR c_del_dtls IS
4648   SELECT *
4649   FROM   pay_patch_status
4650   WHERE  patch_number     = 5758299
4651   AND    patch_name       = 'JP_UPGRADE_R12'
4652   AND    phase            = 'C'
4653   AND    legislation_code = 'JP';
4654   rec_del_dtls   c_del_dtls%ROWTYPE;
4655   --
4656   cursor csr_global is
4657   select g.global_name,
4658          g.data_type,
4659          g.global_id,
4660          g.business_group_id,
4661          g.legislation_code,
4662          g.created_by,
4663          g.creation_date
4664   from   ff_globals_f g
4665   where  g.legislation_code = 'JP'
4666   and    not exists(
4667            select null
4668            from   ff_globals_f g2
4669            where  g2.global_id = g.global_id
4670            and    g2.effective_start_date < g.effective_start_date);
4671 --
4672   cursor csr_corrupt_dbi_tl
4673   is
4674   select fdit.rowid row_id
4675   from   ff_globals_f fg,
4676          ff_globals_f_tl fgt,
4677          ff_database_items_tl fdit
4678   where fg.legislation_code = 'JP'
4679   and   fg.effective_start_date = (
4680     select max(fg2.effective_start_date)
4681     from   ff_globals_f fg2
4682     where  fg2.global_id = fg.global_id)
4683   and   fgt.global_id = fg.global_id
4684   and   fgt.language in ('US','JA')
4685   --there is translation bug so workaround
4686   --and   fdit.user_name = decode(fgt.language,'US',fg.global_name,'JA',fgt.global_name,null)
4687   and   fdit.user_name in (
4688     decode(fgt.language,'US',fg.global_name,'JA',fgt.global_name,null),
4689     decode(fgt.global_name,hr_jp_standard_pkg.sjhextochar('478151944E815192E897A68CB890C597A6'),
4690       hr_jp_standard_pkg.sjhextochar('478151944E815192E897A68CB890C597BF97A6'),null))
4691   and not exists(
4692     select null
4693     from   ff_database_items fdi
4694     where  fdi.user_entity_id = fdit.user_entity_id
4695     and    fdi.user_name = fdit.user_name);
4696 --
4697   cursor csr_corrupt_dbi
4698   is
4699   select fdi.user_entity_id,
4700          fdi.user_name,
4701          fdi.description
4702   from   ff_globals_f fg,
4703          ff_user_entities fue,
4704          ff_database_items fdi
4705   where  fg.legislation_code = 'JP'
4706   and    fg.effective_start_date = (
4707     select max(fg2.effective_start_date)
4708     from   ff_globals_f fg2
4709     where  fg2.global_id = fg.global_id)
4710   and    fue.legislation_code = 'JP'
4711   and    fue.creator_id = fg.global_id
4712   and    fue.creator_type = 'S'
4713   and    fdi.user_name = fg.global_name
4714   and    fdi.user_entity_id = fue.user_entity_id
4715   and not exists(
4716     select null
4717     from   ff_database_items_tl fdit
4718     where  fdit.user_entity_id = fdi.user_entity_id
4719     and    fdit.user_name = fdit.user_name);
4720 --
4721   l_csr_corrupt_dbi_tl csr_corrupt_dbi_tl%rowtype;
4722   l_csr_corrupt_dbi csr_corrupt_dbi%rowtype;
4723 --
4724 begin
4725   --
4726   OPEN c_del_dtls;
4727   FETCH c_del_dtls INTO rec_del_dtls;
4728     IF c_del_dtls%NOTFOUND THEN
4729       b_script_already_run := false;
4730     ELSE
4731       b_script_already_run := true;
4732     END IF;
4733   CLOSE  c_del_dtls;
4734   --
4735   IF NOT b_script_already_run THEN
4736     --
4737     -- bug.6040440
4738     -- 1) Delete CUST dbis which are created in pyjpgdbi.sql.
4739     -- 2) Both B and RB user entities need to be deleted.
4740     --    No DBIs for RB user entities, so no need to specify RB
4741     --    in the following 2 delete SQLs.
4742     -- 3) Delete Global Value DBIs, then rebuild.
4743     -- 4) PER_BUSINESS_GROUPS -> PER_BUSINESS_GROUPS_PERF
4744     --
4745     DELETE ff_compiled_info_f
4746     WHERE  formula_id in (
4747              SELECT /*+ ORDERED USE_NL(BG FDU FDT FUE BG2) */
4748                     distinct f.formula_id
4749              FROM   ff_formulas_f            f,
4750                     per_business_groups_perf bg,
4751                     ff_fdi_usages_f          fdu,
4752                     ff_database_items        fdt,
4753                     ff_user_entities         fue,
4754                     per_business_groups_perf bg2
4755              where  (f.legislation_code = 'JP' or f.business_group_id is not null)
4756              and    bg.business_group_id(+) = f.business_group_id
4757              and    nvl(f.legislation_code, bg.legislation_code) = 'JP'
4758              and    fdu.formula_id = f.formula_id
4759              and    fdu.effective_start_date = f.effective_start_date
4760              and    fdu.effective_end_date = f.effective_end_date
4761              and    fdu.usage = 'D'
4762              and    fdt.user_name = fdu.item_name
4763              and    fue.user_entity_id = fdt.user_entity_id
4764              -- bug.5758299
4765              and    (
4766                        (fue.legislation_code = 'JP' and fue.creator_type in ('E', 'I', 'CUST', 'S')
4767                     or (fue.creator_type = 'B'))
4768                     )
4769              and    bg2.business_group_id(+) = fue.business_group_id
4770              and    nvl(fue.legislation_code, bg2.legislation_code) = 'JP');
4771 --    hr_utility.trace(SQL%ROWCOUNT || ' rows deleted from FF_COMPILED_INFO_F');
4772     --
4773     DELETE ff_fdi_usages_f
4774     WHERE  formula_id in (
4775              SELECT /*+ ORDERED USE_NL(BG FDU FDT FUE BG2) */
4776                     distinct f.formula_id
4777              FROM   ff_formulas_f            f,
4778                     per_business_groups_perf bg,
4779                     ff_fdi_usages_f          fdu,
4780                     ff_database_items        fdt,
4781                     ff_user_entities         fue,
4782                     per_business_groups_perf bg2
4783              where  (f.legislation_code = 'JP' or f.business_group_id is not null)
4784              and    bg.business_group_id(+) = f.business_group_id
4785              and    nvl(f.legislation_code, bg.legislation_code) = 'JP'
4786              and    fdu.formula_id = f.formula_id
4787              and    fdu.effective_start_date = f.effective_start_date
4788              and    fdu.effective_end_date = f.effective_end_date
4789              and    fdu.usage = 'D'
4790              and    fdt.user_name = fdu.item_name
4791              and    fue.user_entity_id = fdt.user_entity_id
4792              -- bug.5758299
4793              and    (
4794                        (fue.legislation_code = 'JP' and fue.creator_type in ('E', 'I', 'CUST', 'S')
4795                     or (fue.creator_type = 'B'))
4796                     )
4797              and    bg2.business_group_id(+) = fue.business_group_id
4798              and    nvl(fue.legislation_code, bg2.legislation_code) = 'JP');
4799 --    hr_utility.trace(SQL%ROWCOUNT || ' rows deleted from FF_FDI_USAGES_F');
4800     --
4801     -- bug.5758299
4802     DELETE ff_user_entities
4803     WHERE  (    legislation_code = 'JP'
4804             and creator_type in ('E', 'I', 'B', 'RB', 'CUST', 'S'))
4805     OR     (    business_group_id IN (
4806                   SELECT business_group_id
4807                   FROM   per_business_groups_perf
4808                   WHERE  legislation_code = 'JP')
4809             and creator_type in ('B', 'RB'));
4810 --    hr_utility.trace(SQL%ROWCOUNT || ' rows deleted from FF_USER_ENTITIES');
4811     --
4812     -- bug.6040440
4813     -- Rebuild Global Values DBIs.
4814     --
4815     for l_global_rec in csr_global loop
4816       ffdict.create_global_dbitem(l_global_rec.global_name,
4817                                   l_global_rec.data_type,
4818                                   l_global_rec.global_id,
4819                                   l_global_rec.business_group_id,
4820                                   l_global_rec.legislation_code,
4821                                   l_global_rec.created_by,
4822                                   l_global_rec.creation_date);
4823 --      hr_utility.trace('Global Value DBI: ' || l_global_rec.global_name || ' created.');
4824     end loop;
4825     --
4826     INSERT INTO pay_patch_status
4827     (id
4828      ,patch_number
4829      ,patch_name
4830      ,phase
4831      ,applied_date
4832      ,legislation_code
4833      ,process_type)
4834     SELECT pay_patch_status_s.nextval
4835       ,5758299
4836       ,'JP_UPGRADE_R12'
4837       ,'C'
4838       ,sysdate
4839       ,'JP'
4840       ,'9737155,12566233'
4841     FROM dual;
4842   --
4843   else
4844   --
4845     if instr(nvl(rec_del_dtls.process_type,'X'),'9737155') = 0 then
4846     --
4847       -- this routine is added because of fix bug 9737155 for pre installed user
4848     --
4849       open csr_corrupt_dbi_tl;
4850       loop
4851       --
4852         fetch csr_corrupt_dbi_tl into l_csr_corrupt_dbi_tl;
4853         exit when csr_corrupt_dbi_tl%notfound;
4854       --
4855         delete from ff_database_items_tl
4856         where rowid = l_csr_corrupt_dbi_tl.row_id;
4857       --
4858         l_dbi_tl_cnt := l_dbi_tl_cnt + 1;
4859       --
4860       end loop;
4861       close csr_corrupt_dbi_tl;
4862     --
4863       open csr_corrupt_dbi;
4864       loop
4865       --
4866         fetch csr_corrupt_dbi into l_csr_corrupt_dbi;
4867         exit when csr_corrupt_dbi%notfound;
4868       --
4869         -- insert for multiple langs, updated translate row in subsequent procedure
4870         ff_database_items_pkg.insert_tl_rows(
4871           x_user_name            => l_csr_corrupt_dbi.user_name,
4872           x_user_entity_id       => l_csr_corrupt_dbi.user_entity_id,
4873           x_language             => userenv('LANG'),
4874           x_translated_user_name => l_csr_corrupt_dbi.user_name,
4875           x_description          => l_csr_corrupt_dbi.description);
4876       --
4877         l_dbi_cnt := l_dbi_cnt + 1;
4878       --
4879       end loop;
4880       close csr_corrupt_dbi;
4881     --
4882       -- need 12566233 check once even if post 9737155 pkg version
4883       -- because of case 12566233 issue of never run 9737155 status
4884       update pay_patch_status
4885       set process_type = decode(nvl(rec_del_dtls.process_type,'X'),'X',null,rec_del_dtls.process_type||',')||'9737155'
4886       where id = rec_del_dtls.id;
4887     --
4888       if (g_dbg) then
4889       --
4890         hr_utility.trace('l_dbi_tl_cnt : '||to_char(l_dbi_tl_cnt));
4891         hr_utility.trace('l_dbi_cnt    : '||to_char(l_dbi_cnt));
4892       --
4893       end if;
4894     --
4895     end if;
4896   --
4897   END IF;
4898 Exception
4899   --
4900   When Others Then
4901   --
4902    hr_utility.set_location( 'Error in deleting',99  );
4903    raise;
4904    --
4905 END delete_dbi;
4906 --
4907 procedure migrate_org_df(
4908   p_org_information_context in varchar2,
4909   p_org_information3_o      in varchar2,
4910   p_org_information3_n      in varchar2)
4911 is
4912 --
4913   l_proc varchar2(60) := g_pkg||'.migrate_org_df';
4914 --
4915   l_cnt number := 0;
4916 --
4917   cursor csr_org_df
4918   is
4919   select /*+ ORDERED */
4920          hoi.rowid row_id
4921   from   per_business_groups_perf pbg,
4922          hr_all_organization_units hou,
4923          hr_organization_information hoi
4924   where  pbg.legislation_code = 'JP'
4925   and    hou.business_group_id = pbg.business_group_id
4926   and    hoi.organization_id = hou.organization_id
4927   and    hoi.org_information_context = p_org_information_context
4928   and    hoi.org_information3 = p_org_information3_o;
4929 --
4930   l_csr_org_df csr_org_df%rowtype;
4931 --
4932 begin
4933 --
4934   if (g_dbg) then
4935     hr_utility.set_location(l_proc, 0);
4936   end if;
4937 --
4938   open csr_org_df;
4939   loop
4940   --
4941     fetch csr_org_df into l_csr_org_df;
4942     exit when csr_org_df%notfound;
4943   --
4944     update hr_organization_information
4945     set org_information3 = p_org_information3_n
4946     where rowid = l_csr_org_df.row_id;
4947   --
4948     if l_cnt > 1000 then
4949     --
4950       commit;
4951     --
4952     end if;
4953   --
4954     l_cnt := l_cnt + 1;
4955   --
4956   end loop;
4957   close csr_org_df;
4958 --
4959   if (g_dbg) then
4960     hr_utility.set_location(l_proc, 10);
4961     hr_utility.trace('update cnt                : '||to_char(l_cnt));
4962     hr_utility.trace('p_org_information_context : '||p_org_information_context);
4963     hr_utility.trace('p_org_information3_o      : '||p_org_information3_o);
4964     hr_utility.trace('p_org_information3_n      : '||p_org_information3_n);
4965   end if;
4966 --
4967   if l_cnt > 0 then
4968   --
4969     commit;
4970   --
4971   end if;
4972 --
4973   if (g_dbg) then
4974     hr_utility.set_location(l_proc, 1000);
4975   end if;
4976 --
4977 end migrate_org_df;
4978 --
4979 procedure migrate_li_ff
4980 is
4981 --
4982   l_proc varchar2(60) := g_pkg||'.migrate_li_ff';
4983 --
4984   l_li_ff_cnt number := 0;
4985 --
4986   cursor csr_li_ff
4987   is
4988   select /*+ ORDERED */
4989          count(hoi.org_information_id)
4990   from   per_business_groups_perf pbg,
4991          hr_all_organization_units hou,
4992          hr_organization_information hoi
4993   where  pbg.legislation_code = 'JP'
4994   and    hou.business_group_id = pbg.business_group_id
4995   and    hoi.organization_id = hou.organization_id
4996   and    hoi.org_information_context in (
4997            'JP_LI_GIP_INFO',
4998            'JP_LI_LINC_INFO',
4999            'JP_ACCIDENT_INS_INFO')
5000   and    hoi.org_information3 in (
5001            'JP_LI_GIP_PREM',
5002            'JP_LI_LINC_PREM',
5003            'JP_AI_PREM_CALC');
5004 --
5005 begin
5006 --
5007   if (g_dbg) then
5008     hr_utility.set_location(l_proc, 0);
5009   end if;
5010 --
5011   open csr_li_ff;
5012   fetch csr_li_ff into l_li_ff_cnt;
5013   close csr_li_ff;
5014 --
5015   if (g_dbg) then
5016     hr_utility.set_location(l_proc, 10);
5017     hr_utility.trace('migrate li ff cnt : '||to_char(l_li_ff_cnt));
5018   end if;
5019 --
5020   if (l_li_ff_cnt > 0) then
5021   --
5022     migrate_org_df('JP_LI_GIP_INFO','JP_LI_GIP_PREM','LIFE_INS_GIP_PREM_TEMPLATE');
5023     migrate_org_df('JP_LI_LINC_INFO','JP_LI_LINC_PREM','LIFE_INS_LINC_PREM_TEMPLATE');
5024     migrate_org_df('JP_ACCIDENT_INS_INFO','JP_AI_PREM_CALC','ACCIDENT_INS_PREM_TEMPLATE');
5025   --
5026   end if;
5027 --
5028   if (g_dbg) then
5029     hr_utility.set_location(l_proc, 1000);
5030   end if;
5031 --
5032 end migrate_li_ff;
5033 --
5034 -- ----------------------------------------------------------------------------
5035 -- chk_hr_corrupt
5036 -- ----------------------------------------------------------------------------
5037 function chk_hr_corrupt
5038 return varchar2
5039 is
5040 --
5041   l_proc varchar2(60) := g_pkg||'.chk_hr_corrupt';
5042 --
5043   o_hr_corrupt varchar2(1) := 'N';
5044 --
5045   l_hr_only varchar2(1);
5046   l_run_script varchar2(1);
5047 --
5048   cursor csr_hr_only
5049   is
5050   select 'Y'
5051   from   hr_legislation_installations hli
5052   where  hli.application_short_name = 'PER'
5053   and    hli.legislation_code = 'JP'
5054   and    nvl(hli.status,'X') = 'I'
5055   and    not exists(
5056     select null
5057     from   hr_legislation_installations hli2
5058     where  hli2.application_short_name = 'PAY'
5059     and    hli2.legislation_code = 'JP'
5060     and    nvl(hli2.status,'X') = 'I');
5061 --
5062   cursor csr_run_script
5063   is
5064   select 'Y'
5065   from   pay_patch_status
5066   where  patch_number = 5758299
5067   and    patch_name = 'JP_UPGRADE_R12'
5068   and    phase = 'C'
5069   and    legislation_code = 'JP';
5070 --
5071 begin
5072 --
5073   if (g_dbg) then
5074     hr_utility.set_location(l_proc,0);
5075   end if;
5076 --
5077   open csr_hr_only;
5078   fetch csr_hr_only into l_hr_only;
5079   close csr_hr_only;
5080 --
5081   if (g_dbg) then
5082     hr_utility.trace('chk_hr_corrupt l_hr_only : '||l_hr_only);
5083   end if;
5084 --
5085   if l_hr_only is not null
5086   and l_hr_only = 'Y' then
5087   --
5088     open csr_run_script;
5089     fetch csr_run_script into l_run_script;
5090     close csr_run_script;
5091   --
5092     if (g_dbg) then
5093       hr_utility.trace('chk_hr_corrupt l_run_script : '||l_run_script);
5094     end if;
5095   --
5096     if l_run_script is null then
5097     --
5098       o_hr_corrupt := 'Y';
5099     --
5100     end if;
5101   --
5102   end if;
5103 --
5104   if (g_dbg) then
5105     hr_utility.trace('chk_hr_corrupt o_hr_corrupt : '||o_hr_corrupt);
5106     hr_utility.set_location(l_proc,1000);
5107   end if;
5108 --
5109 return o_hr_corrupt;
5110 end chk_hr_corrupt;
5111 --
5112 -- ----------------------------------------------------------------------------
5113 -- fix_hr_corrupt
5114 -- ----------------------------------------------------------------------------
5115 procedure fix_hr_corrupt
5116 is
5117 --
5118   l_proc varchar2(60) := g_pkg||'.fix_hr_corrupt';
5119 --
5120   --l_dummy varchar2(1000);
5121   --l_dummy_cnt number;
5122 --
5123   l_status_mode varchar2(1);
5124   l_glb_id number;
5125   l_glb_name varchar2(80);
5126   l_glb_desc varchar2(240);
5127 --
5128   type t_char_tbl is table of varchar2(1000) index by binary_integer;
5129   l_elm_tbl   t_char_tbl;
5130   l_class_tbl t_char_tbl;
5131   l_bal_tbl   t_char_tbl;
5132   l_dim_tbl   t_char_tbl;
5133   l_eset_tbl  t_char_tbl;
5134   l_glb_tbl   t_char_tbl;
5135   l_ff_tbl    t_char_tbl;
5136   l_mon_tbl   t_char_tbl;
5137   l_udt_tbl   t_char_tbl;
5138 --
5139   l_elm_cnt   number;
5140   l_class_cnt number;
5141   l_bal_cnt   number;
5142   l_dim_cnt   number;
5143   l_eset_cnt  number;
5144   l_glb_cnt   number;
5145   l_ff_cnt    number;
5146   l_mon_cnt   number;
5147   l_udt_cnt   number;
5148 --
5149   -- no need to add new eng element
5150   -- because this routine will not be passed for new user,
5151   -- pyjpupgr12.sql should be ran by hrglobal.drv fix
5152   -- so effective for only bug 10040338 user
5153   cursor csr_elm_cnt
5154   is
5155   select count(pet.element_type_id)
5156   from   pay_element_types_f pet
5157   where  pet.legislation_code = 'JP'
5158   and    ascii(pet.element_name) <= 127
5159   and    pet.element_name not in (
5160     'BON_HI_PREM_ROUNDING_ERROR',
5161     'BON_HI_STD_BON_ACMLT',
5162     'SAL_HI_PREM_ROUNDING_ERROR',
5163     'YEA_ANNUAL_TAX_OVERRIDE',
5164     'YEA_HOUSING_LOAN_INFO',
5165     'Yea Insurance Deduction Form')
5166   and exists(
5167     select null
5168     from   pay_element_types_f pet2
5169     where  pet2.legislation_code = 'JP'
5170     and    ascii(pet2.element_name) > 127
5171     and    pet2.description not like '%Obsoleted');
5172 --
5173   cursor csr_class_cnt
5174   is
5175   select count(pec.classification_id)
5176   from   pay_element_classifications pec
5177   where  pec.legislation_code = 'JP'
5178   and    ascii(substr(pec.classification_name,8,1)) <= 127
5179   and exists(
5180     select null
5181     from   pay_element_classifications pec2
5182     where  pec2.legislation_code = 'JP'
5183     and    ascii(substr(pec2.classification_name,8,1)) > 127);
5184 --
5185   cursor csr_bal_cnt
5186   is
5187   select count(pbt.balance_type_id)
5188   from   pay_balance_types pbt
5189   where  pbt.legislation_code = 'JP'
5190   and    ascii(substr(pbt.balance_name,3,1)) <= 127
5191   and    pbt.balance_name not in (
5192     'B_BON_HI_STD_BON',
5193     'B_BON_HI_STD_BON_ACMLT',
5194     'B_COM_HI_PREM_EE_ROUNDING_ERROR',
5195     'B_COM_HI_PREM_EE_TRM_ROUNDING_ERROR',
5196     'B_COM_HI_PREM_ROUNDING_ERROR',
5197     'B_COM_HI_PREM_TRM_ROUNDING_ERROR',
5198     'B_PAYSLIP_NET_PAY',
5199     'B_YEA_SAL_DCT_EARTHQUAKE_INS_PREM')
5200   and exists(
5201     select null
5202     from   pay_balance_types pbt2
5203     where  pbt2.legislation_code = 'JP'
5204     and    ascii(substr(pbt2.balance_name,3,1)) > 127
5205     and    pbt2.reporting_name not like '%Obsoleted');
5206 --
5207   cursor csr_dim_cnt
5208   is
5209   select count(pbd.balance_dimension_id)
5210   from   pay_balance_dimensions pbd
5211   where  pbd.legislation_code = 'JP'
5212   and    ascii(substr(pbd.dimension_name,3,1)) <= 127
5213   and    pbd.dimension_name not in (
5214     '_ASG_ADV_RETRO_RUN',
5215     '_ASG_APRTD                    EFFECTIVE_DATE 01-04 RESET 01')
5216   and exists(
5217     select null
5218     from   pay_balance_dimensions pbd2
5219     where  pbd2.legislation_code = 'JP'
5220     and    ascii(substr(pbd2.dimension_name,3,1)) > 127);
5221 --
5222   cursor csr_eset_cnt
5223   is
5224   select count(pes.element_set_id)
5225   from   pay_element_sets pes
5226   where  pes.legislation_code = 'JP'
5227   and    ascii(pes.element_set_name) <= 127
5228   and exists(
5229     select null
5230     from   pay_element_sets pes2
5231     where  pes2.legislation_code = 'JP'
5232     and    ascii(pes2.element_set_name) > 127);
5233 --
5234   cursor csr_glb_cnt
5235   is
5236   select count(fg.global_id)
5237   from   ff_globals_f fg
5238   where  fg.legislation_code = 'JP'
5239   and    ascii(substr(fg.global_name,3,1)) <= 127
5240   and    fg.global_name not in (
5241     'G_TRM_LTX_SP_WITHHOLD_DCTBL_RATE',
5242     'G_TRM_LTX_SP_WITHHOLD_MUNICIPAL_TAX_RATE',
5243     'G_TRM_LTX_SP_WITHHOLD_PREFECTURAL_TAX_RATE')
5244   and exists(
5245     select null
5246     from   ff_globals_f fg2
5247     where  fg2.legislation_code = 'JP'
5248     and    ascii(substr(fg2.global_name,3,1)) > 127
5249     and    fg2.global_description not like '%Obsoleted');
5250 --
5251   cursor csr_ff_cnt
5252   is
5253   select count(ff.formula_id)
5254   from   ff_formulas_f ff
5255   where  ff.legislation_code = 'JP'
5256   and    ascii(substr(ff.formula_name,3,1)) <= 127
5257   and    ff.formula_name not in (
5258     'HI_PREM_ROUNDING_TYPE_VALIDATION',
5259     'JP_AI_PREM_CALC',
5260     'JP_AI_PREM_CALC',
5261     'JP_LI_GIP_PREM',
5262     'JP_LI_LINC_PREM')
5263   and exists(
5264     select null
5265     from   ff_formulas_f ff2
5266     where  ff2.legislation_code = 'JP'
5267     and    ascii(substr(ff2.formula_name,3,1)) > 127
5268     and    ff2.description not like '%Obsoleted');
5269 --
5270   cursor csr_mon_cnt
5271   is
5272   select count(pmu.monetary_unit_id)
5273   from   pay_monetary_units pmu
5274   where  pmu.legislation_code = 'JP'
5275   and    ascii(substr(pmu.monetary_unit_name,length(pmu.monetary_unit_name),1)) <= 127
5276   and exists(
5277     select null
5278     from   pay_monetary_units pmu2
5279     where  pmu2.legislation_code = 'JP'
5280     and    ascii(substr(pmu2.monetary_unit_name,length(pmu2.monetary_unit_name),1)) > 127);
5281 --
5282   cursor csr_udt_cnt
5283   is
5284   select count(put.user_table_id)
5285   from   pay_user_tables put
5286   where  put.legislation_code = 'JP'
5287   and    ascii(substr(put.user_table_name,3,1)) <= 127
5288   and exists(
5289     select null
5290     from   pay_user_tables put2
5291     where  put2.legislation_code = 'JP'
5292     and    ascii(substr(put2.user_table_name,3,1)) > 127);
5293 --
5294   cursor csr_glb(
5295     p_glb_name in varchar2)
5296   is
5297   select fg.global_id,
5298          fg.global_name,
5299          fg.global_description
5300   from   ff_globals_f fg
5301   where  fg.global_name = substrb(p_glb_name,1,80-4)||'_OBS'
5302   and    fg.global_description like '% (Obsolete)'
5303   and    fg.legislation_code = 'JP'
5304   and    fg.effective_start_date = (
5305     select max(fg2.effective_start_date)
5306     from   ff_globals_f fg2
5307     where  fg2.global_id = fg.global_id);
5308 --
5309 begin
5310 --
5311   if (g_dbg) then
5312     hr_utility.set_location(l_proc,0);
5313   end if;
5314 --
5315   -- fix only objects which might cause conflict
5316   --
5317   -- ---------------------------------------------
5318   -- element
5319   -- ---------------------------------------------
5320 --
5321   open csr_elm_cnt;
5322   fetch csr_elm_cnt into l_elm_cnt;
5323   close csr_elm_cnt;
5324 --
5325   if (g_dbg) then
5326     hr_utility.trace('fix_hr_corrupt l_elm_cnt : '||to_char(l_elm_cnt));
5327   end if;
5328 --
5329   if l_elm_cnt > 0 then
5330   --
5331   -- target only elm which are listed in rename by pay_jp_data_migration_pkg.migrate_element_types
5332   --
5333     l_elm_tbl(1)   := 'SAL_HI_PREM_PROC';
5334     l_elm_tbl(2)   := 'SAL_EI_PREM_PROC';
5335     l_elm_tbl(3)   := 'SAL_WP_PREM_PROC';
5336     l_elm_tbl(4)   := 'SAL_ITX_PROC';
5337     l_elm_tbl(5)   := 'SAL_CI_PREM_ER';
5338     l_elm_tbl(6)   := 'SAL_CI_PREM_EE';
5339     l_elm_tbl(7)   := 'SAL_CI_PREM_EE_NRES';
5340     l_elm_tbl(8)   := 'SAL_WPF_PREM_ER';
5341     l_elm_tbl(9)   := 'SAL_WPF_PREM_EE';
5342     l_elm_tbl(10)  := 'SAL_WPF_PREM_EE_NRES';
5343     l_elm_tbl(11)  := 'SAL_HI_PREM_ER';
5344     l_elm_tbl(12)  := 'SAL_HI_PREM_EE';
5345     l_elm_tbl(13)  := 'SAL_HI_PREM_EE_NRES';
5346     l_elm_tbl(14)  := 'SAL_EI_PREM_EE';
5347     l_elm_tbl(15)  := 'SAL_EI_PREM_EE_NRES';
5348     l_elm_tbl(16)  := 'SAL_WP_PREM_ER';
5349     l_elm_tbl(17)  := 'SAL_WP_PREM_EE';
5350     l_elm_tbl(18)  := 'SAL_WP_PREM_EE_NRES';
5351     l_elm_tbl(19)  := 'SAL_LTX_LUMP_SUM_WITHHOLD';
5352     l_elm_tbl(20)  := 'SAL_ITX';
5353     l_elm_tbl(21)  := 'SAL_LTX';
5354     l_elm_tbl(22)  := 'SAL_ITX_1999_SAL_SP_DCT';
5355     l_elm_tbl(23)  := 'SAL_ITX_NRES';
5356     l_elm_tbl(24)  := 'COM_CI_EXCLUDE_INFO';
5357     l_elm_tbl(25)  := 'COM_WPF_QUALIFY_INFO';
5358     l_elm_tbl(26)  := 'COM_LTX_LUMP_SUM_WITHHOLD_PROC';
5359     l_elm_tbl(27)  := 'YEA_DEP_EXM_PROC';
5360     l_elm_tbl(28)  := 'COM_HI_QUALIFY_INFO';
5361     l_elm_tbl(29)  := 'COM_HI_SMR_INFO';
5362     l_elm_tbl(30)  := 'COM_EI_QUALIFY_INFO';
5363     l_elm_tbl(31)  := 'COM_WP_QUALIFY_INFO';
5364     l_elm_tbl(32)  := 'COM_WP_SMR_INFO';
5365     l_elm_tbl(33)  := 'COM_SI_MR_AT_QUALIFY_INFO';
5366     l_elm_tbl(34)  := 'COM_SI_INFO';
5367     l_elm_tbl(35)  := 'COM_SI_REPORT_INFO';
5368     l_elm_tbl(36)  := 'COM_SI_PENSION_BOOK_NUM_INFO';
5369     l_elm_tbl(37)  := 'COM_LTX_INFO';
5370     l_elm_tbl(38)  := 'COM_ITX_1999_SAL_SP_DCT_INFO';
5371     l_elm_tbl(39)  := 'COM_ITX_INFO';
5372     l_elm_tbl(40)  := 'COM_TRM_INFO';
5373     l_elm_tbl(41)  := 'COM_LI_INFO';
5374     l_elm_tbl(42)  := 'GEP_MR_PROC';
5375     l_elm_tbl(43)  := 'GEP_RSLT';
5376     l_elm_tbl(44)  := 'GEP_FIXED_WAGE_RSLT';
5377     l_elm_tbl(45)  := 'GEP_ADJ_INFO';
5378     l_elm_tbl(46)  := 'REY_ITX';
5379     l_elm_tbl(47)  := 'SAN_MR_PROC';
5380     l_elm_tbl(48)  := 'SAN_BEFORE_20030331_RSLT';
5381     l_elm_tbl(49)  := 'SAN_GEP_MTH_RSLT';
5382     l_elm_tbl(50)  := 'SAN_REPORT_RMKS_RSLT';
5383     l_elm_tbl(51)  := 'SAN_ADJ_BEFORE_20030331_INFO';
5384     l_elm_tbl(52)  := 'INI_SAL1';
5385     l_elm_tbl(53)  := 'INI_SAL2';
5386     l_elm_tbl(54)  := 'INI_COM1';
5387     l_elm_tbl(55)  := 'INI_COM2';
5388     l_elm_tbl(56)  := 'INI_COM3';
5389     l_elm_tbl(57)  := 'INI_SAN_GEP1';
5390     l_elm_tbl(58)  := 'INI_PAY1';
5391     l_elm_tbl(59)  := 'INI_BON1';
5392     l_elm_tbl(60)  := 'INI_BON2';
5393     l_elm_tbl(61)  := 'INI_TRM1';
5394     l_elm_tbl(62)  := 'INI_SPB1';
5395     l_elm_tbl(63)  := 'INI_YEA1';
5396     l_elm_tbl(64)  := 'INI_YEA2';
5397     l_elm_tbl(65)  := 'BON_EI_PREM_PROC';
5398     l_elm_tbl(66)  := 'BON_ITX_PROC';
5399     l_elm_tbl(67)  := 'BON_EI_PREM_EE';
5400     l_elm_tbl(68)  := 'BON_EI_PREM_EE_NRES';
5401     l_elm_tbl(69)  := 'BON_LTX_LUMP_SUM_WITHHOLD';
5402     l_elm_tbl(70)  := 'BON_ITX';
5403     l_elm_tbl(71)  := 'BON_ITX_1999_SAL_SP_DCT';
5404     l_elm_tbl(72)  := 'BON_ITX_NRES';
5405     l_elm_tbl(73)  := 'TRM_LTX_SP_WITHHOLD_PROC';
5406     l_elm_tbl(74)  := 'TRM_INCOME_DCT_PROC';
5407     l_elm_tbl(75)  := 'TRM_LTX_LUMP_SUM_WITHHOLD';
5408     l_elm_tbl(76)  := 'TRM_LTX_SP_WITHHOLD';
5409     l_elm_tbl(77)  := 'TRM_INCOME_DCT';
5410     l_elm_tbl(78)  := 'TRM_ITX';
5411     l_elm_tbl(79)  := 'SPB_EI_PREM_PROC';
5412     l_elm_tbl(80)  := 'SPB_ITX_PROC';
5413     l_elm_tbl(81)  := 'SPB_EI_PREM_EE';
5414     l_elm_tbl(82)  := 'SPB_EI_PREM_EE_NRES';
5415     l_elm_tbl(83)  := 'SPB_ITX';
5416     l_elm_tbl(84)  := 'SPB_ITX_1999_SAL_SP_DCT';
5417     l_elm_tbl(85)  := 'SPB_ITX_NRES';
5418     l_elm_tbl(86)  := 'YEA_ITX';
5419     l_elm_tbl(87)  := 'YEA_AMT_AFTER_EMP_INCOME_DCT_PROC';
5420     l_elm_tbl(88)  := 'YEA_NET_ANNUAL_TAX_PROC';
5421     l_elm_tbl(89)  := 'YEA_INS_PREM_SPOUSE_SP_EXM_PROC';
5422     l_elm_tbl(90)  := 'YEA_AMT_AFTER_EMP_INCOME_DCT_RSLT';
5423     l_elm_tbl(91)  := 'YEA_NET_ANNUAL_TAX';
5424     l_elm_tbl(92)  := 'YEA_DEP_EXM_TYPE_RSLT';
5425     l_elm_tbl(93)  := 'YEA_DEP_EXM_RSLT';
5426     l_elm_tbl(94)  := 'YEA_INS_PREM_SPOUSE_SP_EXM_RSLT';
5427     l_elm_tbl(95)  := 'YEA_WITHHOLD_TAX_REPORT_INFO';
5428     l_elm_tbl(96)  := 'YEA_HOUSING_LOAN_TAX_CREDIT';
5429     l_elm_tbl(97)  := 'YEA_PREV_EMP_INFO';
5430     l_elm_tbl(98)  := 'YEA_ADJ_INFO';
5431     l_elm_tbl(99)  := 'YEA_ANNUAL_TAX';
5432     l_elm_tbl(100) := 'YEA_INS_PREM_SPOUSE_SP_EXM_INFO';
5433     l_elm_tbl(101) := 'COM_SI_DEP_REPORT_INFO';
5434     l_elm_tbl(102) := 'BON_CI_PREM_EE_NRES';
5435     l_elm_tbl(103) := 'BON_CI_PREM_ER';
5436     l_elm_tbl(104) := 'BON_WPF_PREM_EE';
5437     l_elm_tbl(105) := 'BON_WPF_PREM_EE_NRES';
5438     l_elm_tbl(106) := 'BON_WPF_PREM_ER';
5439     l_elm_tbl(107) := 'BON_HI_STD_BON';
5440     l_elm_tbl(108) := 'SAN_ADJ_INFO';
5441     l_elm_tbl(109) := 'SAN_REPORT_RMKS_ADJ_INFO';
5442     l_elm_tbl(110) := 'GEP_REPORT_RMKS_ADJ_INFO';
5443     l_elm_tbl(111) := 'SAN_RSLT';
5444     l_elm_tbl(112) := 'BON_WP_STD_BON';
5445     l_elm_tbl(113) := 'BON_CI_PREM_EE';
5446     l_elm_tbl(114) := 'BON_HI_PREM_PROC';
5447     l_elm_tbl(115) := 'BON_WP_PREM_PROC';
5448     l_elm_tbl(116) := 'BON_HI_PREM_EE';
5449     l_elm_tbl(117) := 'BON_WP_PREM_EE';
5450     l_elm_tbl(118) := 'BON_HI_PREM_EE_NRES';
5451     l_elm_tbl(119) := 'BON_WP_PREM_EE_NRES';
5452     l_elm_tbl(120) := 'BON_HI_PREM_ER';
5453     l_elm_tbl(121) := 'BON_WP_PREM_ER';
5454     l_elm_tbl(122) := 'INI_BON3';
5455     l_elm_tbl(123) := 'BON_HI_ERN_MONEY_SUBJ_SI_ACMLT';
5456     l_elm_tbl(124) := 'BON_HI_ERN_KIND_SUBJ_SI_ACMLT';
5457     l_elm_tbl(125) := 'BON_WP_ERN_MONEY_SUBJ_SI_ACMLT';
5458     l_elm_tbl(126) := 'BON_WP_ERN_KIND_SUBJ_SI_ACMLT';
5459     l_elm_tbl(127) := 'BON_HI_PREM_EE_ACMLT';
5460     l_elm_tbl(128) := 'BON_HI_PREM_ER_ACMLT';
5461     l_elm_tbl(129) := 'BON_CI_PREM_EE_ACMLT';
5462     l_elm_tbl(130) := 'BON_CI_PREM_ER_ACMLT';
5463     l_elm_tbl(131) := 'BON_WP_PREM_EE_ACMLT';
5464     l_elm_tbl(132) := 'BON_WP_PREM_ER_ACMLT';
5465     l_elm_tbl(133) := 'BON_WPF_PREM_EE_ACMLT';
5466     l_elm_tbl(134) := 'BON_WPF_PREM_ER_ACMLT';
5467     l_elm_tbl(135) := 'BON_HI_ADJ_INFO';
5468     l_elm_tbl(136) := 'BON_WP_ADJ_INFO';
5469     l_elm_tbl(137) := 'SAL_CMA_PRIVATE_TRANSPORT_INFO';
5470     l_elm_tbl(138) := 'SAL_CMA_PUBLIC_TRANSPORT_INFO';
5471     l_elm_tbl(139) := 'SAL_CMA_PROC';
5472     l_elm_tbl(140) := 'SAL_CMA_NTXBL_ERN';
5473     l_elm_tbl(141) := 'SAL_CMA_NTXBL_ERN_KIND';
5474     l_elm_tbl(142) := 'SAL_CMA_TXBL_ERN';
5475     l_elm_tbl(143) := 'SAL_CMA_TXBL_ERN_KIND';
5476     l_elm_tbl(144) := 'SAL_CMA_TXBL_ERN_NRES';
5477     l_elm_tbl(145) := 'SAL_CMA_TXBL_ERN_KIND_NRES';
5478     l_elm_tbl(146) := 'SAL_CMA_ERN_MONEY_SUBJ_SI';
5479     l_elm_tbl(147) := 'SAL_CMA_ERN_KIND_SUBJ_SI';
5480     l_elm_tbl(148) := 'SAL_CMA_ERN_MONEY_SUBJ_SI_NEGATIVE_ADJ';
5481     l_elm_tbl(149) := 'SAL_CMA_ERN_KIND_SUBJ_SI_NEGATIVE_ADJ';
5482     l_elm_tbl(150) := 'SAL_CMA_SUBJ_SI_FIXED_WAGE';
5483     l_elm_tbl(151) := 'SAL_CMA_MTHLY_ERN_SUBJ_EI_ADJ';
5484     l_elm_tbl(152) := 'SAL_CI_PREM_ER_TRM';
5485     l_elm_tbl(153) := 'SAL_CI_PREM_EE_TRM';
5486     l_elm_tbl(154) := 'SAL_CI_PREM_EE_NRES_TRM';
5487     l_elm_tbl(155) := 'SAL_WPF_PREM_ER_TRM';
5488     l_elm_tbl(156) := 'SAL_WPF_PREM_EE_TRM';
5489     l_elm_tbl(157) := 'SAL_WPF_PREM_EE_NRES_TRM';
5490     l_elm_tbl(158) := 'SAL_HI_PREM_ER_TRM';
5491     l_elm_tbl(159) := 'SAL_HI_PREM_EE_TRM';
5492     l_elm_tbl(160) := 'SAL_HI_PREM_EE_NRES_TRM';
5493     l_elm_tbl(161) := 'SAL_WP_PREM_ER_TRM';
5494     l_elm_tbl(162) := 'SAL_WP_PREM_EE_TRM';
5495     l_elm_tbl(163) := 'SAL_WP_PREM_EE_NRES_TRM';
5496     l_elm_tbl(164) := 'COM_NRES_INFO';
5497     l_elm_tbl(165) := 'IKU_MR_PROC';
5498     l_elm_tbl(166) := 'IKU_RSLT';
5499     l_elm_tbl(167) := 'IKU_ADJ_INFO';
5500     l_elm_tbl(168) := 'IKU_REPORT_RMKS_ADJ_INFO';
5501     l_elm_tbl(169) := 'YEA_INS_PREM_EXM_DECLARE_INFO';
5502   --
5503   -- for debug purpose
5504   --
5505   --  l_dummy_cnt := 0;
5506   ----
5507   --  for l_elm_ind in 1..l_elm_tbl.count loop
5508   --  --
5509   --    begin
5510   --    --
5511   --      l_dummy := null;
5512   --    --
5513   --      select pet.element_name
5514   --      into   l_dummy
5515   --      from   pay_element_types_f pet
5516   --      where  pet.element_name = l_elm_tbl(l_elm_ind)
5517   --      and    pet.legislation_code = 'JP'
5518   --      and    pet.effective_start_date = (
5519   --        select max(pet2.effective_start_date)
5520   --        from   pay_element_types_f pet2
5521   --        where  pet2.element_type_id = pet.element_type_id);
5522   --    --
5523   --      if (g_dbg) then
5524   --        hr_utility.trace('fix_hr_corrupt, update elm : '||l_dummy);
5525   --      end if;
5526   --    --
5527   --      if l_dummy is null then
5528   --      --
5529   --        if (g_dbg) then
5530   --          hr_utility.trace('fix_hr_corrupt, no update elm : '||l_elm_tbl(l_elm_ind));
5531   --        end if;
5532   --      --
5533   --      else
5534   --      --
5535   --        l_dummy_cnt := l_dummy_cnt + 1;
5536   --      --
5537   --      end if;
5538   --    --
5539   --    exception
5540   --    when others then
5541   --    --
5542   --      if (g_dbg) then
5543   --        hr_utility.trace('fix_hr_corrupt, no update elm err : '||l_elm_tbl(l_elm_ind));
5544   --      end if;
5545   --    --
5546   --    end;
5547   --  --
5548   --  end loop;
5549   ----
5550   --  if (g_dbg) then
5551   --    hr_utility.trace('fix_hr_corrupt l_dummy_cnt : '||to_char(l_dummy_cnt));
5552   --  end if;
5553   --
5554     -- use bulk collect
5555     forall l_elm_ind in 1..l_elm_tbl.count
5556     update pay_element_types_f
5557     set element_name = substrb(element_name,1,80-4)||'_OBS',
5558         description = substrb(description,1,240-11)||' (Obsolete)'
5559     where element_name = l_elm_tbl(l_elm_ind)
5560     and   legislation_code = 'JP';
5561   --
5562   end if;
5563 --
5564   if (g_dbg) then
5565     hr_utility.set_location(l_proc,10);
5566   end if;
5567 --
5568   -- ---------------------------------------------
5569   -- element classification
5570   -- ---------------------------------------------
5571 --
5572   open csr_class_cnt;
5573   fetch csr_class_cnt into l_class_cnt;
5574   close csr_class_cnt;
5575 --
5576   if (g_dbg) then
5577     hr_utility.trace('fix_hr_corrupt l_class_cnt : '||to_char(l_class_cnt));
5578   end if;
5579 --
5580   if l_class_cnt > 0 then
5581   --
5582   -- target only class which are listed in rename by pay_jp_data_migration_pkg.migrate_element_class
5583   --
5584     l_class_tbl(1)  := 'TRM_ERN_KIND_TXBL';
5585     l_class_tbl(2)  := 'TRM_ERN_KIND_NRES_TXBL';
5586     l_class_tbl(3)  := 'BON_SI_EI_PREM';
5587     l_class_tbl(4)  := 'BON_SI_WP_PREM';
5588     l_class_tbl(5)  := 'BON_SI_HI_PREM';
5589     l_class_tbl(6)  := 'SPB_SI_NRES_SMALL_COMPANY_MUTUAL_AID_PREM';
5590     l_class_tbl(7)  := 'SPB_SI_NRES_EI_PREM';
5591     l_class_tbl(8)  := 'SPB_SI_SMALL_COMPANY_MUTUAL_AID_PREM';
5592     l_class_tbl(9)  := 'SPB_SI_EI_PREM';
5593     l_class_tbl(10) := 'SPB_ERN_MONEY_TXBL';
5594     l_class_tbl(11) := 'SPB_ERN_MONEY_SUBJ_EI';
5595     l_class_tbl(12) := 'SPB_ERN_MONEY_TXBL_NRES';
5596     l_class_tbl(13) := 'SPB_ERN_MONEY_SUBJ_LI';
5597     l_class_tbl(14) := 'SPB_ERN_MONEY_SUBJ_SI';
5598     l_class_tbl(15) := 'SPB_ERN_KIND_SUBJ_SI';
5599     l_class_tbl(16) := 'SPB_ERN_KIND_TXBL_NRES';
5600     l_class_tbl(17) := 'SPB_ERN_KIND_SUBJ_LI';
5601     l_class_tbl(18) := 'SPB_ERN_KIND_TXBL';
5602     l_class_tbl(19) := 'SPB_ERN_KIND_SUBJ_EI';
5603     l_class_tbl(20) := 'TRM_ERN_MONEY_TXBL';
5604     l_class_tbl(21) := 'TRM_ERN_MONEY_TXBL_NRES';
5605     l_class_tbl(22) := 'SAL_ERN_KIND_SUBJ_SI';
5606     l_class_tbl(23) := 'SAL_ERN_KIND_SUBJ_EI';
5607     l_class_tbl(24) := 'SAL_ERN_KIND_TXBL_NRES';
5608     l_class_tbl(25) := 'SAL_SI_WPF_PREM';
5609     l_class_tbl(26) := 'SAL_SI_WP_PREM';
5610     l_class_tbl(27) := 'SAL_SI_HI_PREM';
5611     l_class_tbl(28) := 'YEA_ITX';
5612     l_class_tbl(29) := 'SAL_ERN_MONEY_TXBL';
5613     l_class_tbl(30) := 'SAL_ERN_MONEY_SUBJ_EI';
5614     l_class_tbl(31) := 'SAL_ERN_MONEY_SUBJ_LI';
5615     l_class_tbl(32) := 'SAL_ERN_MONEY_TXBL_NRES';
5616     l_class_tbl(33) := 'SAL_ERN_MONEY_SUBJ_SI';
5617     l_class_tbl(34) := 'BON_ERN_KIND_SUBJ_WAI';
5618     l_class_tbl(35) := 'BON_ERN_KIND_TXBL_NRES';
5619     l_class_tbl(36) := 'BON_ERN_KIND_SUBJ_EI';
5620     l_class_tbl(37) := 'BON_ERN_KIND_TXBL';
5621     l_class_tbl(38) := 'BON_ERN_KIND_SUBJ_SI';
5622     l_class_tbl(39) := 'SAL_ERN_KIND_TXBL';
5623     l_class_tbl(40) := 'SAL_ERN_KIND_SUBJ_WAI';
5624     l_class_tbl(41) := 'SAL_SI';
5625     l_class_tbl(42) := 'SAL_ERN_KIND';
5626     l_class_tbl(43) := 'BON_ERN_KIND';
5627     l_class_tbl(44) := 'SAL_ERN_MONEY';
5628     l_class_tbl(45) := 'YEA';
5629     l_class_tbl(46) := 'BON_DCT';
5630     l_class_tbl(47) := 'SAN';
5631     l_class_tbl(48) := 'SAL_SI_SMALL_COMPANY_MUTUAL_AID_PREM';
5632     l_class_tbl(49) := 'SAL_SI_EI_PREM';
5633     l_class_tbl(50) := 'BON_SI_NRES_EI_PREM';
5634     l_class_tbl(51) := 'SAL_DCT';
5635     l_class_tbl(52) := 'BON_SI_NRES';
5636     l_class_tbl(53) := 'SAL_SI_NRES';
5637     l_class_tbl(54) := 'BON_ERN_MONEY';
5638     l_class_tbl(55) := 'BON_SI';
5639     l_class_tbl(56) := 'GEP';
5640     l_class_tbl(57) := 'TRM_ERN_KIND';
5641     l_class_tbl(58) := 'TRM_INFO';
5642     l_class_tbl(59) := 'TRM_DCT';
5643     l_class_tbl(60) := 'TRM_PROC_INFO';
5644     l_class_tbl(61) := 'SAL_PROC_INFO';
5645     l_class_tbl(62) := 'BON_INFO';
5646     l_class_tbl(63) := 'BON_PROC_INFO';
5647     l_class_tbl(64) := 'YEA_INFO';
5648     l_class_tbl(65) := 'ER_CHARGE';
5649     l_class_tbl(66) := 'SAL_INFO';
5650     l_class_tbl(67) := 'TRM_ERN_MONEY';
5651     l_class_tbl(68) := 'TRM_PRE_TAX_DCT';
5652     l_class_tbl(69) := 'SPB_ERN_KIND';
5653     l_class_tbl(70) := 'SPB_INFO';
5654     l_class_tbl(71) := 'SPB_DCT';
5655     l_class_tbl(72) := 'SPB_SI';
5656     l_class_tbl(73) := 'SPB_SI_NRES';
5657     l_class_tbl(74) := 'SPB_PROC_INFO';
5658     l_class_tbl(75) := 'SPB_ERN_MONEY';
5659     l_class_tbl(76) := 'BON_SI_SMALL_COMPANY_MUTUAL_AID_PREM';
5660     l_class_tbl(77) := 'BON_SI_WPF_PREM';
5661     l_class_tbl(78) := 'BON_ERN_MONEY_SUBJ_SI';
5662     l_class_tbl(79) := 'BON_ERN_MONEY_SUBJ_EI';
5663     l_class_tbl(80) := 'BON_ERN_MONEY_SUBJ_WAI';
5664     l_class_tbl(81) := 'BON_ERN_MONEY_TXBL_NRES';
5665     l_class_tbl(82) := 'BON_ERN_MONEY_TXBL';
5666     l_class_tbl(83) := 'SAL_SI_NRES_SMALL_COMPANY_MUTUAL_AID_PREM';
5667     l_class_tbl(84) := 'SAL_SI_NRES_WPF_PREM';
5668     l_class_tbl(85) := 'SAL_SI_NRES_EI_PREM';
5669     l_class_tbl(86) := 'SAL_SI_NRES_WP_PREM';
5670     l_class_tbl(87) := 'SAL_SI_NRES_HI_PREM';
5671     l_class_tbl(88) := 'BON_SI_NRES_WPF_PREM';
5672     l_class_tbl(89) := 'BON_SI_NRES_SMALL_COMPANY_MUTUAL_AID_PREM';
5673     l_class_tbl(90) := 'BON_SI_NRES_HI_PREM';
5674     l_class_tbl(91) := 'BON_SI_NRES_WP_PREM';
5675     l_class_tbl(92) := 'BASIC_INFO';
5676   --
5677   -- for debug purpose
5678   --
5679   --  l_dummy_cnt := 0;
5680   ----
5681   --  for l_class_ind in 1..l_class_tbl.count loop
5682   --  --
5683   --    begin
5684   --    --
5685   --      l_dummy := null;
5686   --    --
5687   --      select pec.classification_name
5688   --      into   l_dummy
5689   --      from   pay_element_classifications pec
5690   --      where  pec.classification_name = l_class_tbl(l_class_ind)
5691   --      and    pec.legislation_code = 'JP';
5692   --    --
5693   --      if (g_dbg) then
5694   --        hr_utility.trace('fix_hr_corrupt, update class : '||l_dummy);
5695   --      end if;
5696   --    --
5697   --      if l_dummy is null then
5698   --      --
5699   --        if (g_dbg) then
5700   --          hr_utility.trace('fix_hr_corrupt, no update class: '||l_class_tbl(l_class_ind));
5701   --        end if;
5702   --      --
5703   --      else
5704   --      --
5705   --        l_dummy_cnt := l_dummy_cnt + 1;
5706   --      --
5707   --      end if;
5708   --    --
5709   --    exception
5710   --    when others then
5711   --    --
5712   --      if (g_dbg) then
5713   --        hr_utility.trace('fix_hr_corrupt, no update class err : '||l_class_tbl(l_class_ind));
5714   --      end if;
5715   --    --
5716   --    end;
5717   --  --
5718   --  end loop;
5719   ----
5720   --  if (g_dbg) then
5721   --    hr_utility.trace('fix_hr_corrupt l_dummy_cnt : '||to_char(l_dummy_cnt));
5722   --  end if;
5723   --
5724     -- use bulk collect
5725     forall l_class_ind in 1..l_class_tbl.count
5726     update pay_element_classifications
5727     set classification_name = substrb(classification_name,1,80-4)||'_OBS',
5728         description = substrb(description,1,80-11)||' (Obsolete)'
5729     where classification_name = l_class_tbl(l_class_ind)
5730     and   legislation_code = 'JP';
5731   --
5732   end if;
5733 --
5734   if (g_dbg) then
5735     hr_utility.set_location(l_proc,20);
5736   end if;
5737 --
5738   -- ---------------------------------------------
5739   -- balance
5740   -- ---------------------------------------------
5741 --
5742   open csr_bal_cnt;
5743   fetch csr_bal_cnt into l_bal_cnt;
5744   close csr_bal_cnt;
5745 --
5746   if (g_dbg) then
5747     hr_utility.trace('fix_hr_corrupt l_bal_cnt : '||to_char(l_bal_cnt));
5748   end if;
5749 --
5750   if l_bal_cnt > 0 then
5751   --
5752   -- target only bal which are listed in rename by pay_jp_data_migration_pkg.migrate_balance_types
5753   --
5754     l_bal_tbl(1)   := 'B_COM_WP_PREM';
5755     l_bal_tbl(2)   := 'B_GEP_FIXED_WAGE';
5756     l_bal_tbl(3)   := 'B_COM_SAN_GEP_SP_BON_ERN_KIND';
5757     l_bal_tbl(4)   := 'B_TRM_TXBL_ERN_KIND';
5758     l_bal_tbl(5)   := 'B_YEA_ANNUAL_TAX';
5759     l_bal_tbl(6)   := 'B_TRM_LTX_SP_WITHHOLD_TAX';
5760     l_bal_tbl(7)   := 'B_SPB_AMT_AFTER_SI_PREM_DCT';
5761     l_bal_tbl(8)   := 'B_YEA_TAX_PAY';
5762     l_bal_tbl(9)   := 'B_SAL_TXBL_ERN_KIND_NRES';
5763     l_bal_tbl(10)  := 'B_SAL_TXBL_ERN_MONEY_NRES';
5764     l_bal_tbl(11)  := 'B_BON_TXBL_ERN_KIND_NRES';
5765     l_bal_tbl(12)  := 'B_BON_TXBL_ERN_MONEY_NRES';
5766     l_bal_tbl(13)  := 'B_TRM_TXBL_ERN_KIND_NRES';
5767     l_bal_tbl(14)  := 'B_TRM_TXBL_ERN_MONEY_NRES';
5768     l_bal_tbl(15)  := 'B_SPB_TXBL_ERN_KIND_NRES';
5769     l_bal_tbl(16)  := 'B_SPB_TXBL_ERN_MONEY_NRES';
5770     l_bal_tbl(17)  := 'B_YEA_INCOME_EXM';
5771     l_bal_tbl(18)  := 'B_TRM_INCOME_EXM';
5772     l_bal_tbl(19)  := 'B_BON_ERN_SUBJ_EI';
5773     l_bal_tbl(20)  := 'B_BON_ERN_SUBJ_WAI';
5774     l_bal_tbl(21)  := 'B_BON_ERN';
5775     l_bal_tbl(22)  := 'B_BON_ITX';
5776     l_bal_tbl(23)  := 'B_BON_NET_PAY';
5777     l_bal_tbl(24)  := 'B_BON_TXBL_ERN_MONEY';
5778     l_bal_tbl(25)  := 'B_BON_AMT_AFTER_SI_PREM_DCT';
5779     l_bal_tbl(26)  := 'B_BON_TXBL_ERN_KIND';
5780     l_bal_tbl(27)  := 'B_BON_DCT';
5781     l_bal_tbl(28)  := 'B_BON_SI_PREM';
5782     l_bal_tbl(29)  := 'B_BON_EI_PREM';
5783     l_bal_tbl(30)  := 'B_NET_PAY';
5784     l_bal_tbl(31)  := 'B_SAL_ERN_SUBJ_EI';
5785     l_bal_tbl(32)  := 'B_SAL_ERN_SUBJ_WAI';
5786     l_bal_tbl(33)  := 'B_SAL_ERN';
5787     l_bal_tbl(34)  := 'B_SAL_HI_PREM';
5788     l_bal_tbl(35)  := 'B_SAL_ITX';
5789     l_bal_tbl(36)  := 'B_SAL_NET_PAY';
5790     l_bal_tbl(37)  := 'B_SAL_TXBL_ERN_MONEY';
5791     l_bal_tbl(38)  := 'B_SAL_AMT_AFTER_SI_PREM_DCT';
5792     l_bal_tbl(39)  := 'B_SAL_TXBL_ERN_KIND';
5793     l_bal_tbl(40)  := 'B_SAL_DCT';
5794     l_bal_tbl(41)  := 'B_SAL_SI_PREM';
5795     l_bal_tbl(42)  := 'B_SAL_EI_PREM';
5796     l_bal_tbl(43)  := 'B_SAL_WP_PREM';
5797     l_bal_tbl(44)  := 'B_SPB_ERN_SUBJ_EI';
5798     l_bal_tbl(45)  := 'B_SPB_ERN_SUBJ_WAI';
5799     l_bal_tbl(46)  := 'B_SPB_ERN';
5800     l_bal_tbl(47)  := 'B_SPB_ITX';
5801     l_bal_tbl(48)  := 'B_SPB_NET_PAY';
5802     l_bal_tbl(49)  := 'B_SPB_TXBL_ERN_MONEY';
5803     l_bal_tbl(50)  := 'B_SPB_TXBL_ERN_KIND';
5804     l_bal_tbl(51)  := 'B_SPB_DCT';
5805     l_bal_tbl(52)  := 'B_SPB_EI_PREM';
5806     l_bal_tbl(53)  := 'B_COM_SAN_GEP_PAY_BASE_DAYS';
5807     l_bal_tbl(54)  := 'B_COM_SAN_GEP_SAL_ERN_KIND';
5808     l_bal_tbl(55)  := 'B_COM_SAN_GEP_SAL_ERN_MONEY';
5809     l_bal_tbl(56)  := 'B_COM_SAN_GEP_SP_BON_ERN_MONEY';
5810     l_bal_tbl(57)  := 'B_TRM_ERN';
5811     l_bal_tbl(58)  := 'B_TRM_NET_PAY';
5812     l_bal_tbl(59)  := 'B_TRM_TXBL_ERN_MONEY';
5813     l_bal_tbl(60)  := 'B_TRM_DCT';
5814     l_bal_tbl(61)  := 'B_YEA_NET_ANNUAL_TAX';
5815     l_bal_tbl(62)  := 'B_YEA_NET_TXBL_INCOME';
5816     l_bal_tbl(63)  := 'B_COM_HI_PREM';
5817     l_bal_tbl(64)  := 'B_YEA_WITHHOLD_ITX';
5818     l_bal_tbl(65)  := 'B_YEA_SAL_DCT_LIFE_INS_PREM';
5819     l_bal_tbl(66)  := 'B_YEA_SAL_DCT_LONG_TERM_NONLIFE_INS_PREM';
5820     l_bal_tbl(67)  := 'B_YEA_SAL_DCT_INDIVIDUAL_PENSION_PREM';
5821     l_bal_tbl(68)  := 'B_YEA_AMT_AFTER_EMP_INCOME_DCT';
5822     l_bal_tbl(69)  := 'B_YEA_SAL_DCT_SHORT_TERM_NONLIFE_INS_PREM';
5823     l_bal_tbl(70)  := 'B_YEA_TXBL_ERN_MONEY';
5824     l_bal_tbl(71)  := 'B_YEA_TXBL_ERN_KIND';
5825     l_bal_tbl(72)  := 'B_COM_EI_PREM';
5826     l_bal_tbl(73)  := 'B_SAL_ITX_CALC_BASE_DAYS';
5827     l_bal_tbl(74)  := 'B_SAL_LTX';
5828     l_bal_tbl(75)  := 'B_COM_TXBL_ERN_KIND';
5829     l_bal_tbl(76)  := 'B_COM_ERN_SUBJ_EI';
5830     l_bal_tbl(77)  := 'B_COM_TXBL_ERN_MONEY';
5831     l_bal_tbl(78)  := 'B_COM_LTX_LUMP_SUM_WITHHOLD';
5832     l_bal_tbl(79)  := 'B_COM_ITX';
5833     l_bal_tbl(80)  := 'B_COM_ERN_SUBJ_WAI';
5834     l_bal_tbl(81)  := 'B_TRM_LTX_SP_WITHHOLD_MUNICIPAL_TAX';
5835     l_bal_tbl(82)  := 'B_COM_TXBL_ERN_KIND_NRES';
5836     l_bal_tbl(83)  := 'B_TRM_LTX_SP_WITHHOLD_TRM_INCOME';
5837     l_bal_tbl(84)  := 'B_TRM_LTX_SP_WITHHOLD_PREFECTURAL_TAX';
5838     l_bal_tbl(85)  := 'B_SAL_WPF_PREM';
5839     l_bal_tbl(86)  := 'B_YEA_SAL_DCT_SI_PREM';
5840     l_bal_tbl(87)  := 'B_COM_TXBL_ERN_MONEY_NRES';
5841     l_bal_tbl(88)  := 'B_COM_HI_PREM_ER';
5842     l_bal_tbl(89)  := 'B_COM_WPF_PREM_ER';
5843     l_bal_tbl(90)  := 'B_COM_WP_PREM_ER';
5844     l_bal_tbl(91)  := 'B_YEA_PREV_EMP_INCOME';
5845     l_bal_tbl(92)  := 'B_YEA_PREV_EMP_SI_PREM';
5846     l_bal_tbl(93)  := 'B_YEA_PREV_EMP_ITX';
5847     l_bal_tbl(94)  := 'B_YEA_TYPE';
5848     l_bal_tbl(95)  := 'B_TRM_ITX';
5849     l_bal_tbl(96)  := 'B_COM_ITX_1999_SAL_SP_DCT_WITHHOLD_TAX';
5850     l_bal_tbl(97)  := 'B_COM_ITX_1999_SAL_SP_DCT';
5851     l_bal_tbl(98)  := 'B_COM_ITX_1999_SAL_SP_DCT_TAKEN';
5852     l_bal_tbl(99)  := 'B_COM_ITX_1999_SAL_SP_DCT_UNTAKEN';
5853     l_bal_tbl(100) := 'B_YEA_GRACE_ITX';
5854     l_bal_tbl(101) := 'B_SAL_SMALL_COMPANY_MUTUAL_AID_PREM';
5855     l_bal_tbl(102) := 'B_BON_SMALL_COMPANY_MUTUAL_AID_PREM';
5856     l_bal_tbl(103) := 'B_SPB_SMALL_COMPANY_MUTUAL_AID_PREM';
5857     l_bal_tbl(104) := 'B_YEA_SAL_DCT_SMALL_COMPANY_MUTUAL_AID_PREM';
5858     l_bal_tbl(105) := 'B_YEA_PREV_EMP_SMALL_COMPANY_MUTUAL_AID_PREM';
5859     l_bal_tbl(106) := 'B_YEA_ERN';
5860     l_bal_tbl(107) := 'B_BON_ERN_SUBJ_SI';
5861     l_bal_tbl(108) := 'B_BON_WPF_PREM';
5862     l_bal_tbl(109) := 'B_BON_ERN_MONEY_SUBJ_SI';
5863     l_bal_tbl(110) := 'B_BON_ERN_KIND_SUBJ_SI';
5864     l_bal_tbl(111) := 'B_BON_HI_PREM';
5865     l_bal_tbl(112) := 'B_BON_WP_PREM';
5866     l_bal_tbl(113) := 'B_BON_HI_ERN_MONEY_SUBJ_SI_ACMLT';
5867     l_bal_tbl(114) := 'B_BON_HI_ERN_KIND_SUBJ_SI_ACMLT';
5868     l_bal_tbl(115) := 'B_BON_WP_ERN_MONEY_SUBJ_SI_ACMLT';
5869     l_bal_tbl(116) := 'B_BON_WP_ERN_KIND_SUBJ_SI_ACMLT';
5870     l_bal_tbl(117) := 'B_BON_HI_PREM_EE_ACMLT';
5871     l_bal_tbl(118) := 'B_BON_HI_PREM_ER_ACMLT';
5872     l_bal_tbl(119) := 'B_BON_CI_PREM_EE_ACMLT';
5873     l_bal_tbl(120) := 'B_BON_CI_PREM_ER_ACMLT';
5874     l_bal_tbl(121) := 'B_BON_WP_PREM_EE_ACMLT';
5875     l_bal_tbl(122) := 'B_BON_WP_PREM_ER_ACMLT';
5876     l_bal_tbl(123) := 'B_BON_WPF_PREM_EE_ACMLT';
5877     l_bal_tbl(124) := 'B_BON_WPF_PREM_ER_ACMLT';
5878     l_bal_tbl(125) := 'B_SAL_CMA_MTHLY_ERN_SUB_EI_ADJ';
5879     l_bal_tbl(126) := 'B_YEA_SAL_DCT_EARTHQUAKE_INS_PREM';
5880   --
5881   -- for debug purpose
5882   --
5883   --  l_dummy_cnt := 0;
5884   ----
5885   --  for l_bal_ind in 1..l_bal_tbl.count loop
5886   --  --
5887   --    begin
5888   --    --
5889   --      l_dummy := null;
5890   --    --
5891   --      select pbt.balance_name
5892   --      into   l_dummy
5893   --      from   pay_balance_types pbt
5894   --      where  pbt.balance_name = l_bal_tbl(l_bal_ind)
5895   --      and    pbt.legislation_code = 'JP';
5896   --    --
5897   --      if (g_dbg) then
5898   --        hr_utility.trace('fix_hr_corrupt, update bal : '||l_dummy);
5899   --      end if;
5900   --    --
5901   --      if l_dummy is null then
5902   --      --
5903   --        if (g_dbg) then
5904   --          hr_utility.trace('fix_hr_corrupt, no update bal : '||l_bal_tbl(l_bal_ind));
5905   --        end if;
5906   --      --
5907   --      else
5908   --      --
5909   --        l_dummy_cnt := l_dummy_cnt + 1;
5910   --      --
5911   --      end if;
5912   --    --
5913   --    exception
5914   --    when others then
5915   --    --
5916   --      if (g_dbg) then
5917   --        hr_utility.trace('fix_hr_corrupt, no update bal err : '||l_bal_tbl(l_bal_ind));
5918   --      end if;
5919   --    --
5920   --    end;
5921   --  --
5922   --  end loop;
5923   ----
5924   --  if (g_dbg) then
5925   --    hr_utility.trace('fix_hr_corrupt l_dummy_cnt : '||to_char(l_dummy_cnt));
5926   --  end if;
5927   --
5928     -- use bulk collect
5929     forall l_bal_ind in 1..l_bal_tbl.count
5930     update pay_balance_types
5931     set balance_name = substrb(balance_name,1,80-4)||'_OBS',
5932         reporting_name = substrb(reporting_name,1,80-11)||' (Obsolete)'
5933     where balance_name = l_bal_tbl(l_bal_ind)
5934     and   legislation_code = 'JP';
5935   --
5936   end if;
5937 --
5938   if (g_dbg) then
5939     hr_utility.set_location(l_proc,30);
5940   end if;
5941 --
5942   -- ---------------------------------------------
5943   -- dimension
5944   -- ---------------------------------------------
5945 --
5946   open csr_dim_cnt;
5947   fetch csr_dim_cnt into l_dim_cnt;
5948   close csr_dim_cnt;
5949 --
5950   if (g_dbg) then
5951     hr_utility.trace('fix_hr_corrupt l_dim_cnt : '||to_char(l_dim_cnt));
5952   end if;
5953 --
5954   if l_dim_cnt > 0 then
5955   --
5956   -- target only dim which are listed in rename by pay_jp_data_migration_pkg.migrate_bal_dimensions
5957   --
5958     l_dim_tbl(1)  := '_ASG_RUN';
5959     l_dim_tbl(2)  := '_ASG_LTD';
5960     l_dim_tbl(3)  := '_PAYMENTS';
5961     l_dim_tbl(4)  := '_ELM_LTD';
5962     l_dim_tbl(5)  := '_ASG_MTD                      EFFECTIVE_DATE 01-01 RESET 12';
5963     l_dim_tbl(6)  := '_ASG_YTD                      EFFECTIVE_DATE 01-01 RESET 01';
5964     l_dim_tbl(7)  := '_ASG_AUGTD                    EFFECTIVE_DATE 01-08 RESET 01';
5965     l_dim_tbl(8)  := '_ASG_RETRO_RUN';
5966     l_dim_tbl(9)  := '_ASG_PTD';
5967     l_dim_tbl(10) := '_ELM_PTD';
5968     l_dim_tbl(11) := '_ASG_FYTD                     DATE_EARNED          RESET 01';
5969     l_dim_tbl(12) := '_ASG_JULTD                    EFFECTIVE_DATE 01-07 RESET 01';
5970     l_dim_tbl(13) := '_ASG_BYTD';
5971   --
5972   -- for debug purpose
5973   --
5974   --  l_dummy_cnt := 0;
5975   ----
5976   --  for l_dim_ind in 1..l_dim_tbl.count loop
5977   --  --
5978   --    begin
5979   --    --
5980   --      l_dummy := null;
5981   --    --
5982   --      select pbd.dimension_name
5983   --      into   l_dummy
5984   --      from   pay_balance_dimensions pbd
5985   --      where  pbd.dimension_name = l_dim_tbl(l_dim_ind)
5986   --      and    pbd.legislation_code = 'JP';
5987   --    --
5988   --      if (g_dbg) then
5989   --        hr_utility.trace('fix_hr_corrupt, update dim : '||l_dummy);
5990   --      end if;
5991   --    --
5992   --      if l_dummy is null then
5993   --      --
5994   --        if (g_dbg) then
5995   --          hr_utility.trace('fix_hr_corrupt, no update dim : '||l_dim_tbl(l_dim_ind));
5996   --        end if;
5997   --      --
5998   --      else
5999   --      --
6000   --        l_dummy_cnt := l_dummy_cnt + 1;
6001   --      --
6002   --      end if;
6003   --    --
6004   --    exception
6005   --    when others then
6006   --    --
6007   --      if (g_dbg) then
6008   --        hr_utility.trace('fix_hr_corrupt, no update dim err : '||l_dim_tbl(l_dim_ind));
6009   --      end if;
6010   --    --
6011   --    end;
6012   --  --
6013   --  end loop;
6014   ----
6015   --  if (g_dbg) then
6016   --    hr_utility.trace('fix_hr_corrupt l_dummy_cnt : '||to_char(l_dummy_cnt));
6017   --  end if;
6018   --
6019     -- use bulk collect
6020     forall l_dim_ind in 1..l_dim_tbl.count
6021     update pay_balance_dimensions
6022     set dimension_name = substrb(dimension_name,1,80-4)||'_OBS',
6023         database_item_suffix = substrb(database_item_suffix,1,80-4)||'_OBS',
6024         description = substrb(description,1,240-11)||' (Obsolete)'
6025     where dimension_name = l_dim_tbl(l_dim_ind)
6026     and   legislation_code = 'JP';
6027   --
6028   end if;
6029 --
6030   if (g_dbg) then
6031     hr_utility.set_location(l_proc,40);
6032   end if;
6033 --
6034   -- ---------------------------------------------
6035   -- element set
6036   -- ---------------------------------------------
6037 --
6038   open csr_eset_cnt;
6039   fetch csr_eset_cnt into l_eset_cnt;
6040   close csr_eset_cnt;
6041 --
6042   if (g_dbg) then
6043     hr_utility.trace('fix_hr_corrupt l_eset_cnt : '||to_char(l_eset_cnt));
6044   end if;
6045 --
6046   if l_eset_cnt > 0 then
6047   --
6048   -- target only eset which are listed in rename by pay_jp_data_migration_pkg.migrate_element_sets
6049   --
6050     l_eset_tbl(1) := 'BON';
6051     l_eset_tbl(2) := 'SAN';
6052     l_eset_tbl(3) := 'SAL';
6053     l_eset_tbl(4) := 'GEP';
6054     l_eset_tbl(5) := 'TRM';
6055     l_eset_tbl(6) := 'YEA';
6056     l_eset_tbl(7) := 'SPB';
6057     l_eset_tbl(8) := 'REY';
6058     l_eset_tbl(9) := 'IKU';
6059   --
6060   -- for debug purpose
6061   --
6062   --  l_dummy_cnt := 0;
6063   ----
6064   --  for l_eset_ind in 1..l_eset_tbl.count loop
6065   --  --
6066   --    begin
6067   --    --
6068   --      l_dummy := null;
6069   --    --
6070   --      select pes.element_set_name
6071   --      into   l_dummy
6072   --      from   pay_element_sets pes
6073   --      where  pes.element_set_name = l_eset_tbl(l_eset_ind)
6074   --      and    pes.legislation_code = 'JP';
6075   --    --
6076   --      if (g_dbg) then
6077   --        hr_utility.trace('fix_hr_corrupt, update eset : '||l_dummy);
6078   --      end if;
6079   --    --
6080   --      if l_dummy is null then
6081   --      --
6082   --        if (g_dbg) then
6083   --          hr_utility.trace('fix_hr_corrupt, no update eset : '||l_eset_tbl(l_eset_ind));
6084   --        end if;
6085   --      --
6086   --      else
6087   --      --
6088   --        l_dummy_cnt := l_dummy_cnt + 1;
6089   --      --
6090   --      end if;
6091   --    --
6092   --    exception
6093   --    when others then
6094   --    --
6095   --      if (g_dbg) then
6096   --        hr_utility.trace('fix_hr_corrupt, no update eset err : '||l_eset_tbl(l_eset_ind));
6097   --      end if;
6098   --    --
6099   --    end;
6100   --  --
6101   --  end loop;
6102   ----
6103   --  if (g_dbg) then
6104   --    hr_utility.trace('fix_hr_corrupt l_dummy_cnt : '||to_char(l_dummy_cnt));
6105   --  end if;
6106   --
6107     -- use bulk collect
6108     forall l_eset_ind in 1..l_eset_tbl.count
6109     update pay_element_sets
6110     set element_set_name = substrb(element_set_name,1,80-4)||'_OBS'
6111     where element_set_name = l_eset_tbl(l_eset_ind)
6112     and   legislation_code = 'JP';
6113   --
6114   end if;
6115 --
6116   if (g_dbg) then
6117     hr_utility.set_location(l_proc,50);
6118   end if;
6119 --
6120   -- ---------------------------------------------
6121   -- global value
6122   -- ---------------------------------------------
6123 --
6124   open csr_glb_cnt;
6125   fetch csr_glb_cnt into l_glb_cnt;
6126   close csr_glb_cnt;
6127 --
6128   if (g_dbg) then
6129     hr_utility.trace('fix_hr_corrupt l_glb_cnt : '||to_char(l_glb_cnt));
6130   end if;
6131 --
6132   if l_glb_cnt > 0 then
6133   --
6134   -- target only glb which are listed in rename by pay_jp_data_migration_pkg.migrate_globals
6135   --
6136     l_glb_tbl(1)  := 'G_COM_ITX_TBL_NUM_OF_DEP_MAX';
6137     l_glb_tbl(2)  := 'G_SAL_HI_PREM_RATE_EE';
6138     l_glb_tbl(3)  := 'G_SAL_HI_PREM_RATE';
6139     l_glb_tbl(4)  := 'G_TRM_UNDECLARE_ITX_RATE';
6140     l_glb_tbl(5)  := 'G_COM_EI_PREM_RATE_GEN_BUSINESS';
6141     l_glb_tbl(6)  := 'G_COM_EI_PREM_RATE_AGRICULTURE';
6142     l_glb_tbl(7)  := 'G_COM_EI_PREM_RATE_CONSTRUCTION';
6143     l_glb_tbl(8)  := 'G_SAL_WP_PREM_RATE_EE';
6144     l_glb_tbl(9)  := 'G_SAL_WP_PREM_RATE';
6145     l_glb_tbl(10) := 'G_SAL_WPF_PREM_RATE';
6146     l_glb_tbl(11) := 'G_SAL_WPF_PREM_RATE_EE';
6147     l_glb_tbl(12) := 'G_COM_PAY_BASE_DAYS_MIN';
6148     l_glb_tbl(13) := 'G_SAN_PAY_BASE_DAYS_SHORT_TIME_WORKER_MIN';
6149     l_glb_tbl(14) := 'G_COM_ITX_RATE_NRES';
6150     l_glb_tbl(15) := 'G_SAL_CI_PREM_RATE';
6151     l_glb_tbl(16) := 'G_SAL_CI_PREM_RATE_EE';
6152     l_glb_tbl(17) := 'G_BON_HI_STD_BON_MAX';
6153     l_glb_tbl(18) := 'G_BON_WP_STD_BON_MAX';
6154     l_glb_tbl(19) := 'G_SAL_CMA_PUBLIC_TRANSPORT_NTXBL_ERN_MAX';
6155     l_glb_tbl(20) := 'G_YEA_PROPORTIONAL_TAX_CREDIT_RATE';
6156     l_glb_tbl(21) := 'G_YEA_PROPORTIONAL_TAX_CREDIT_MAX';
6157     l_glb_tbl(22) := 'G_TRM_LTX_SP_WITHHOLD_MUNICIPAL_TAX_RATE';
6158     l_glb_tbl(23) := 'G_TRM_LTX_SP_WITHHOLD_PREFECTURAL_TAX_RATE';
6159     l_glb_tbl(24) := 'G_TRM_LTX_SP_WITHHOLD_DCTBL_RATE';
6160   --
6161   -- for debug purpose
6162   --
6163   --  l_dummy_cnt := 0;
6164   ----
6165   --  for l_glb_ind in 1..l_glb_tbl.count loop
6166   --  --
6167   --    begin
6168   --    --
6169   --      l_dummy := null;
6170   --    --
6171   --      select fg.global_name
6172   --      into   l_dummy
6173   --      from   ff_globals_f fg
6174   --      where  fg.global_name = l_glb_tbl(l_glb_ind)
6175   --      and    fg.legislation_code = 'JP'
6176   --      and    fg.effective_start_date = (
6177   --        select max(fg2.effective_start_date)
6178   --        from   ff_globals_f fg2
6179   --        where  fg2.global_id = fg.global_id);
6180   --    --
6181   --      if (g_dbg) then
6182   --        hr_utility.trace('fix_hr_corrupt, update glb : '||l_dummy);
6183   --      end if;
6184   --    --
6185   --      if l_dummy is null then
6186   --      --
6187   --        if (g_dbg) then
6188   --          hr_utility.trace('fix_hr_corrupt, no update glb : '||l_glb_tbl(l_glb_ind));
6189   --        end if;
6190   --      --
6191   --      else
6192   --      --
6193   --        l_dummy_cnt := l_dummy_cnt + 1;
6194   --      --
6195   --      end if;
6196   --    --
6197   --    exception
6198   --    when others then
6199   --    --
6200   --      if (g_dbg) then
6201   --        hr_utility.trace('fix_hr_corrupt, no update glb err : '||l_glb_tbl(l_glb_ind));
6202   --      end if;
6203   --    --
6204   --    end;
6205   --  --
6206   --  end loop;
6207   ----
6208   --  if (g_dbg) then
6209   --    hr_utility.trace('fix_hr_corrupt l_dummy_cnt : '||to_char(l_dummy_cnt));
6210   --  end if;
6211   --
6212     l_status_mode := hr_general.g_data_migrator_mode;
6213   --
6214     if nvl(l_status_mode,'N') <> 'Y' then
6215     --
6216       -- this is required to set for FF_GLOBALS_F_BRU trigger
6217       -- FF_GLOBALS_F_MNT_TL_ARU also will be disabled
6218     --
6219       hr_general.g_data_migrator_mode := 'Y';
6220     --
6221     end if;
6222   --
6223     -- use bulk collect
6224     forall l_glb_ind in 1..l_glb_tbl.count
6225     update ff_globals_f
6226     set global_name = substrb(global_name,1,80-4)||'_OBS',
6227         global_description = substrb(global_description,1,240-11)||' (Obsolete)'
6228     where global_name = l_glb_tbl(l_glb_ind)
6229     and   legislation_code = 'JP';
6230   --
6231     -- unset for subsequent procedure to enable trigger
6232     hr_general.g_data_migrator_mode := l_status_mode;
6233   --
6234     if (g_dbg) then
6235       hr_utility.set_location(l_proc,55);
6236     end if;
6237   --
6238     for l_glb_tl_ind in 1..l_glb_tbl.count loop
6239     --
6240       l_glb_id := null;
6241       l_glb_name := null;
6242       l_glb_desc := null;
6243     --
6244       open csr_glb(l_glb_tbl(l_glb_tl_ind));
6245       fetch csr_glb into l_glb_id,l_glb_name,l_glb_desc;
6246       close csr_glb;
6247     --
6248       if l_glb_id is not null then
6249       --
6250         ff_fgt_upd.upd_tl(
6251           p_language_code      => userenv('LANG'),
6252           p_global_id          => l_glb_id,
6253           p_global_name        => l_glb_name,
6254           p_global_description => l_glb_desc);
6255       --
6256       end if;
6257     --
6258     end loop;
6259   --
6260   end if;
6261 --
6262   if (g_dbg) then
6263     hr_utility.set_location(l_proc,60);
6264   end if;
6265 --
6266   -- ---------------------------------------------
6267   -- formula
6268   -- ---------------------------------------------
6269 --
6270   open csr_ff_cnt;
6271   fetch csr_ff_cnt into l_ff_cnt;
6272   close csr_ff_cnt;
6273 --
6274   if (g_dbg) then
6275     hr_utility.trace('fix_hr_corrupt l_ff_cnt : '||to_char(l_ff_cnt));
6276   end if;
6277 --
6278   if l_ff_cnt > 0 then
6279   --
6280   -- target only ff which are listed in rename by pay_jp_data_migration_pkg.migrate_formulas
6281   --
6282     l_ff_tbl(1)  := 'GEP_MR_PROC';
6283     l_ff_tbl(2)  := 'SAN_MR_PROC';
6284     l_ff_tbl(3)  := 'GEP_MR_PROC_SKIP';
6285     l_ff_tbl(4)  := 'LTX_MUNICIPAL_CODE_VALIDATION';
6286     l_ff_tbl(5)  := 'DATE_YYYYMM_VALIDATION';
6287     l_ff_tbl(6)  := 'LTX_WITHHOLD_AGENT_NUM_VALIDATION';
6288     l_ff_tbl(7)  := 'SAN_MR_PROC_SKIP';
6289     l_ff_tbl(8)  := 'SAL_HI_PREM_PROC';
6290     l_ff_tbl(9)  := 'SAL_EI_PREM_PROC';
6291     l_ff_tbl(10) := 'SAL_WP_PREM_PROC';
6292     l_ff_tbl(11) := 'SAL_ITX_PROC';
6293     l_ff_tbl(12) := 'SAL_LTX';
6294     l_ff_tbl(13) := 'SAL_ITX_NRES';
6295     l_ff_tbl(14) := 'COM_LTX_LUMP_SUM_WITHHOLD_PROC';
6296     l_ff_tbl(15) := 'YEA_DEP_EXM_PROC';
6297     l_ff_tbl(16) := 'REY_ITX';
6298     l_ff_tbl(17) := 'BON_EI_PREM_PROC';
6299     l_ff_tbl(18) := 'BON_ITX_PROC';
6300     l_ff_tbl(19) := 'BON_ITX_NRES';
6301     l_ff_tbl(20) := 'TRM_LTX_SP_WITHHOLD_PROC';
6302     l_ff_tbl(21) := 'TRM_INCOME_DCT_PROC';
6303     l_ff_tbl(22) := 'TRM_ITX';
6304     l_ff_tbl(23) := 'SPB_EI_PREM_PROC';
6305     l_ff_tbl(24) := 'SPB_ITX_PROC';
6306     l_ff_tbl(25) := 'SPB_ITX_NRES';
6307     l_ff_tbl(26) := 'YEA_TAX';
6308     l_ff_tbl(27) := 'YEA_AMT_AFTER_EMP_INCOME_DCT_PROC';
6309     l_ff_tbl(28) := 'YEA_INS_PREM_SPOUSE_SP_EXM_PROC';
6310     l_ff_tbl(29) := 'YEA_NET_ANNUAL_TAX_PROC';
6311     l_ff_tbl(30) := 'YEA_ANNUAL_TAX';
6312     l_ff_tbl(31) := 'SAL_LTX_SKIP';
6313     l_ff_tbl(32) := 'COM_ITX_NRES_SKIP';
6314     l_ff_tbl(33) := 'COM_LTX_LUMP_SUM_WITHHOLD_PROC_SKIP';
6315     l_ff_tbl(34) := 'BON_ITX_PROC_SKIP';
6316     l_ff_tbl(35) := 'BON_EI_PREM_PROC_SKIP';
6317     l_ff_tbl(36) := 'SAL_HI_PREM_PROC_SKIP';
6318     l_ff_tbl(37) := 'SAL_WP_PREM_PROC_SKIP';
6319     l_ff_tbl(38) := 'SAL_ITX_PROC_SKIP';
6320     l_ff_tbl(39) := 'SAL_EI_PREM_PROC_SKIP';
6321     l_ff_tbl(40) := 'TRM_INCOME_DCT_PROC_SKIP';
6322     l_ff_tbl(41) := 'YEA_DEP_EXM_PROC_SKIP';
6323     l_ff_tbl(42) := 'SPB_EI_PREM_PROC_SKIP';
6324     l_ff_tbl(43) := 'WPF_LOCATION_VALIDATION';
6325     l_ff_tbl(44) := 'WP_LOCATION_VALIDATION';
6326     l_ff_tbl(45) := 'LTX_WITHHOLD_AGENT_VALIDATION';
6327     l_ff_tbl(46) := 'ITX_WITHHOLD_AGENT_VALIDATION';
6328     l_ff_tbl(47) := 'HI_LOCATION_VALIDATION';
6329     l_ff_tbl(48) := 'WP_SERIAL_NUM_VALIDATION';
6330     l_ff_tbl(49) := 'HI_CARD_NUM_VALIDATION';
6331     l_ff_tbl(50) := 'EI_NUM_VALIDATION';
6332     l_ff_tbl(51) := 'BASIC_PENSION_NUM_VALIDATION';
6333     l_ff_tbl(52) := 'JBA_SAL_EFILE_RECEIVE_BANK_BODY_PAYMENT';
6334     l_ff_tbl(53) := 'JBA_SAL_EFILE_SEND_BANK_FOOTER_PAYMENT';
6335     l_ff_tbl(54) := 'JBA_SAL_EFILE_SEND_BANK_HEADER_PAYMENT';
6336     l_ff_tbl(55) := 'JBA_SAL_EFILE_RECEIVE_BANK_FOOTER_PAYMENT';
6337     l_ff_tbl(56) := 'JBA_SAL_EFILE_RECEIVE_BANK_HEADER_PAYMENT';
6338     l_ff_tbl(57) := 'LI_LOCATION_VALIDATION';
6339     l_ff_tbl(58) := 'COM_ITX_1999_SAL_SP_DCT_INFO_SKIP';
6340     l_ff_tbl(59) := 'COM_ITX_1999_SAL_SP_DCT_SKIP';
6341     l_ff_tbl(60) := 'COM_ITX_1999_SAL_SP_DCT';
6342     l_ff_tbl(61) := 'KANA_VALIDATION';
6343     l_ff_tbl(62) := 'INS_PREM_ROUNDING_VALIDATION';
6344     l_ff_tbl(63) := 'LTX_EFILE_WITHHOLD_AGENT_HEADER_PAYMENT';
6345     l_ff_tbl(64) := 'LTX_EFILE_LTX_HEADER_PAYMENT';
6346     l_ff_tbl(65) := 'LTX_EFILE_LTX_FOOTER_PAYMENT';
6347     l_ff_tbl(66) := 'LTX_EFILE_LTX_BODY_PAYMENT';
6348     l_ff_tbl(67) := 'LTX_EFILE_WITHHOLD_AGENT_FOOTER_PAYMENT';
6349     l_ff_tbl(68) := 'LTX_EFILE_END_PAYMENT';
6350     l_ff_tbl(69) := 'BON_HI_PREM_PROC_SKIP';
6351     l_ff_tbl(70) := 'BON_WP_PREM_PROC_SKIP';
6352     l_ff_tbl(71) := 'BON_HI_PREM_PROC';
6353     l_ff_tbl(72) := 'BON_WP_PREM_PROC';
6354     l_ff_tbl(73) := 'HI_REVISED_SMR_VALIDATION';
6355     l_ff_tbl(74) := 'WP_REVISED_SMR_VALIDATION';
6356     l_ff_tbl(75) := 'VEHICLE_INFO_VALIDATION';
6357     l_ff_tbl(76) := 'SAL_CMA_PROC';
6358     l_ff_tbl(77) := 'HI_PRIOR_SMR_VALIDATION';
6359     l_ff_tbl(78) := 'WP_PRIOR_SMR_VALIDATION';
6360     l_ff_tbl(79) := 'YEA_ITX';
6361     l_ff_tbl(80) := 'IKU_MR_PROC_SKIP';
6362     l_ff_tbl(81) := 'IKU_MR_PROC';
6363     l_ff_tbl(82) := 'LIFE_INS_GIP_PREM_TEMPLATE';
6364     l_ff_tbl(83) := 'LIFE_INS_LINC_PREM_TEMPLATE';
6365     l_ff_tbl(84) := 'ACCIDENT_INS_PREM_TEMPLATE';
6366   --
6367   -- for debug purpose
6368   --
6369   --  l_dummy_cnt := 0;
6370   ----
6371   --  for l_ff_ind in 1..l_ff_tbl.count loop
6372   --  --
6373   --    begin
6374   --    --
6375   --      l_dummy := null;
6376   --    --
6377   --      select ff.formula_name
6378   --      into   l_dummy
6379   --      from   ff_formulas_f ff
6380   --      where  ff.formula_name = l_ff_tbl(l_ff_ind)
6381   --      and    ff.legislation_code = 'JP'
6382   --      and    ff.effective_start_date = (
6383   --        select max(ff2.effective_start_date)
6384   --        from   ff_formulas_f ff2
6385   --        where  ff2.formula_id = ff.formula_id);
6386   --    --
6387   --      if (g_dbg) then
6388   --        hr_utility.trace('fix_hr_corrupt, update ff : '||l_dummy);
6389   --      end if;
6390   --    --
6391   --      if l_dummy is null then
6392   --      --
6393   --        if (g_dbg) then
6394   --          hr_utility.trace('fix_hr_corrupt, no update ff : '||l_ff_tbl(l_ff_ind));
6395   --        end if;
6396   --      --
6397   --      else
6398   --      --
6399   --        l_dummy_cnt := l_dummy_cnt + 1;
6400   --      --
6401   --      end if;
6402   --    --
6403   --    exception
6404   --    when others then
6405   --    --
6406   --      if (g_dbg) then
6407   --        hr_utility.trace('fix_hr_corrupt, no update ff err : '||l_ff_tbl(l_ff_ind));
6408   --      end if;
6409   --    --
6410   --    end;
6411   --  --
6412   --  end loop;
6413   ----
6414   --  if (g_dbg) then
6415   --    hr_utility.trace('fix_hr_corrupt l_dummy_cnt : '||to_char(l_dummy_cnt));
6416   --  end if;
6417   --
6418     -- use bulk collect
6419     forall l_ff_ind in 1..l_ff_tbl.count
6420     update ff_formulas_f
6421     set formula_name = substrb(formula_name,1,80-4)||'_OBS',
6422         description = substrb(description,1,240-11)||' (Obsolete)'
6423     where formula_name = l_ff_tbl(l_ff_ind)
6424     and   legislation_code = 'JP';
6425   --
6426   end if;
6427 --
6428   if (g_dbg) then
6429     hr_utility.set_location(l_proc,70);
6430   end if;
6431 --
6432   -- ---------------------------------------------
6433   -- monetary unit
6434   -- ---------------------------------------------
6435 --
6436   open csr_mon_cnt;
6437   fetch csr_mon_cnt into l_mon_cnt;
6438   close csr_mon_cnt;
6439 --
6440   if (g_dbg) then
6441     hr_utility.trace('fix_hr_corrupt l_mon_cnt : '||to_char(l_mon_cnt));
6442   end if;
6443 --
6444   if l_mon_cnt > 0 then
6445   --
6446   -- target only mon which are listed in rename by pay_jp_data_migration_pkg.migrate_monetary_units
6447   --
6448     l_mon_tbl(1)  := 'TEN_THOUSAND_YEN';
6449     l_mon_tbl(2)  := 'ONE_THOUSAND_YEN';
6450     l_mon_tbl(3)  := 'ONE_HUNDRED_YEN';
6451     l_mon_tbl(4)  := 'TEN_YEN';
6452     l_mon_tbl(5)  := 'ONE_YEN';
6453     l_mon_tbl(6)  := 'TWO_THOUSAND_YEN';
6454     l_mon_tbl(7)  := 'FIVE_THOUSAND_YEN';
6455     l_mon_tbl(8)  := 'FIVE_HUNDRED_YEN';
6456     l_mon_tbl(9)  := 'FIFTY_YEN';
6457     l_mon_tbl(10) := 'FIVE_YEN';
6458   --
6459   -- for debug purpose
6460   --
6461   --  l_dummy_cnt := 0;
6462   ----
6463   --  for l_mon_ind in 1..l_mon_tbl.count loop
6464   --  --
6465   --    begin
6466   --    --
6467   --      l_dummy := null;
6468   --    --
6469   --      select pmu.monetary_unit_name
6470   --      into   l_dummy
6471   --      from   pay_monetary_units pmu
6472   --      where  pmu.monetary_unit_name = l_mon_tbl(l_mon_ind)
6473   --      and    pmu.legislation_code = 'JP';
6474   --    --
6475   --      if (g_dbg) then
6476   --        hr_utility.trace('fix_hr_corrupt, update mon : '||l_dummy);
6477   --      end if;
6478   --    --
6479   --      if l_dummy is null then
6480   --      --
6481   --        if (g_dbg) then
6482   --          hr_utility.trace('fix_hr_corrupt, no update mon : '||l_mon_tbl(l_mon_ind));
6483   --        end if;
6484   --      --
6485   --      else
6486   --      --
6487   --        l_dummy_cnt := l_dummy_cnt + 1;
6488   --      --
6489   --      end if;
6490   --    --
6491   --    exception
6492   --    when others then
6493   --    --
6494   --      if (g_dbg) then
6495   --        hr_utility.trace('fix_hr_corrupt, no update mon err : '||l_mon_tbl(l_mon_ind));
6496   --      end if;
6497   --    --
6498   --    end;
6499   --  --
6500   --  end loop;
6501   ----
6502   --  if (g_dbg) then
6503   --    hr_utility.trace('fix_hr_corrupt l_dummy_cnt : '||to_char(l_dummy_cnt));
6504   --  end if;
6505   --
6506     -- use bulk collect
6507     forall l_mon_ind in 1..l_mon_tbl.count
6508     update pay_monetary_units
6509     set monetary_unit_name = substrb(monetary_unit_name,1,80-4)||'_OBS'
6510     where monetary_unit_name = l_mon_tbl(l_mon_ind)
6511     and   legislation_code = 'JP';
6512   --
6513   end if;
6514 --
6515   if (g_dbg) then
6516     hr_utility.set_location(l_proc,80);
6517   end if;
6518 --
6519   -- ---------------------------------------------
6520   -- udt
6521   -- ---------------------------------------------
6522 --
6523   open csr_udt_cnt;
6524   fetch csr_udt_cnt into l_udt_cnt;
6525   close csr_udt_cnt;
6526 --
6527   if (g_dbg) then
6528     hr_utility.trace('fix_hr_corrupt l_udt_cnt : '||to_char(l_udt_cnt));
6529   end if;
6530 --
6531   if l_udt_cnt > 0 then
6532   --
6533   -- target only udt which are listed in rename by pay_jp_data_migration_pkg.migrate_user_tables
6534   --
6535     l_udt_tbl(1)  := 'T_YEA_INDIVIDUAL_PENSION_INS_EXM';
6536     l_udt_tbl(2)  := 'T_YEA_AMT_AFTER_EMP_INCOME_DCT1';
6537     l_udt_tbl(3)  := 'T_YEA_AMT_AFTER_EMP_INCOME_DCT2';
6538     l_udt_tbl(4)  := 'T_YEA_LIFE_INS_EXM';
6539     l_udt_tbl(5)  := 'T_YEA_LONG_NONLIFE_INS_EXM';
6540     l_udt_tbl(6)  := 'T_YEA_SHORT_NONLIFE_INS_EXM';
6541     l_udt_tbl(7)  := 'T_YEA_SPOUSE_SP_EXM_RECKONER';
6542     l_udt_tbl(8)  := 'T_YEA_INCOME_EXM';
6543     l_udt_tbl(9)  := 'T_YEA_MAX_AMT';
6544     l_udt_tbl(10) := 'T_YEA_ITX_RAPID_CALC';
6545     l_udt_tbl(11) := 'T_COM_SMR';
6546     l_udt_tbl(12) := 'T_COM_ITX_MTH_KOU_APPENDIX1';
6547     l_udt_tbl(13) := 'T_COM_ITX_MTH_KOU_APPENDIX2';
6548     l_udt_tbl(14) := 'T_COM_ITX_MTH_KOU_APPENDIX3';
6549     l_udt_tbl(15) := 'T_SAL_ITX_MTH_OTSU1';
6550     l_udt_tbl(16) := 'T_SAL_ITX_MTH_OTSU2';
6551     l_udt_tbl(17) := 'T_SAL_ITX_DAY1';
6552     l_udt_tbl(18) := 'T_SAL_ITX_DAY2';
6553     l_udt_tbl(19) := 'T_BON_ITX_RATE_KOU0';
6554     l_udt_tbl(20) := 'T_BON_ITX_RATE_KOU1';
6555     l_udt_tbl(21) := 'T_BON_ITX_RATE_KOU2';
6556     l_udt_tbl(22) := 'T_BON_ITX_RATE_KOU3';
6557     l_udt_tbl(23) := 'T_BON_ITX_RATE_KOU4';
6558     l_udt_tbl(24) := 'T_BON_ITX_RATE_KOU5';
6559     l_udt_tbl(25) := 'T_BON_ITX_RATE_KOU6';
6560     l_udt_tbl(26) := 'T_BON_ITX_RATE_KOU7';
6561     l_udt_tbl(27) := 'T_BON_ITX_RATE_OTSU';
6562     l_udt_tbl(28) := 'T_TRM_INCOME_EXM';
6563     l_udt_tbl(29) := 'T_TRM_LTX1';
6564     l_udt_tbl(30) := 'T_TRM_LTX2';
6565     l_udt_tbl(31) := 'T_TRM_ITX_RAPID_CALC';
6566     l_udt_tbl(32) := 'T_COM_BASE_AMT';
6567     l_udt_tbl(33) := 'T_HI_WP_PREM_RATE';
6568     l_udt_tbl(34) := 'T_SAL_CMA_PRIVATE_TRANSPORT_NTXBL_ERN_MAX';
6569     l_udt_tbl(35) := 'T_SAL_CMA_METHOD_INFO';
6570   --
6571   -- for debug purpose
6572   --
6573   --  l_dummy_cnt := 0;
6574   ----
6575   --  for l_udt_ind in 1..l_udt_tbl.count loop
6576   --  --
6577   --    begin
6578   --    --
6579   --      l_dummy := null;
6580   --    --
6581   --      select put.user_table_name
6582   --      into   l_dummy
6583   --      from   pay_user_tables put
6584   --      where  put.user_table_name = l_udt_tbl(l_udt_ind)
6585   --      and    put.legislation_code = 'JP';
6586   --    --
6587   --     if (g_dbg) then
6588   --       hr_utility.trace('fix_hr_corrupt, update udt : '||l_dummy);
6589   --     end if;
6590   --    --
6591   --      if l_dummy is null then
6592   --      --
6593   --        if (g_dbg) then
6594   --          hr_utility.trace('fix_hr_corrupt, no update udt : '||l_udt_tbl(l_udt_ind));
6595   --        end if;
6596   --      --
6597   --      else
6598   --      --
6599   --        l_dummy_cnt := l_dummy_cnt + 1;
6600   --      --
6601   --      end if;
6602   --    --
6603   --    exception
6604   --    when others then
6605   --    --
6606   --      if (g_dbg) then
6607   --        hr_utility.trace('fix_hr_corrupt, no update udt err : '||l_udt_tbl(l_udt_ind));
6608   --      end if;
6609   --    --
6610   --    end;
6611   --  --
6612   --  end loop;
6613   ----
6614   --  if (g_dbg) then
6615   --    hr_utility.trace('fix_hr_corrupt l_dummy_cnt : '||to_char(l_dummy_cnt));
6616   --  end if;
6617   --
6618     -- use bulk collect
6619     forall l_udt_ind in 1..l_udt_tbl.count
6620     update pay_user_tables
6621     set user_table_name = substrb(user_table_name,1,80-4)||'_OBS',
6622         user_row_title = substrb(user_row_title,1,80-4)||'_OBS'
6623     where user_table_name = l_udt_tbl(l_udt_ind)
6624     and   legislation_code = 'JP';
6625   --
6626   end if;
6627 --
6628   if (g_dbg) then
6629     hr_utility.set_location(l_proc,1000);
6630   end if;
6631 --
6632 end fix_hr_corrupt;
6633 --
6634 -- ----------------------------------------------------------------------------
6635 -- chk_dbi_corrupt
6636 -- ----------------------------------------------------------------------------
6637 -- this should be call after delete_dbi because patch_status is required
6638 function chk_dbi_corrupt
6639 return varchar2
6640 is
6641 --
6642   l_proc varchar2(60) := g_pkg||'.chk_dbi_corrupt';
6643 --
6644   o_dbi_corrupt varchar2(1) := 'N';
6645 --
6646   l_pay_install varchar2(1);
6647   l_run_script varchar2(1);
6648   l_process_type pay_patch_status.process_type%type;
6649 --
6650   cursor csr_pay_install
6651   is
6652   select 'Y'
6653   from   hr_legislation_installations hli
6654   where  hli.application_short_name = 'PAY'
6655   and    hli.legislation_code = 'JP'
6656   and    nvl(hli.status,'X') = 'I';
6657 --
6658   cursor csr_run_script
6659   is
6660   select 'Y' run_status,
6661          process_type
6662   from   pay_patch_status
6663   where  patch_number = 5758299
6664   and    patch_name = 'JP_UPGRADE_R12'
6665   and    phase = 'C'
6666   and    legislation_code = 'JP';
6667 --
6668 begin
6669 --
6670   if (g_dbg) then
6671     hr_utility.set_location(l_proc,0);
6672   end if;
6673 --
6674   open csr_pay_install;
6675   fetch csr_pay_install into l_pay_install;
6676   close csr_pay_install;
6677 --
6678   if (g_dbg) then
6679     hr_utility.trace('chk_dbi_corrupt l_pay_install : '||l_pay_install);
6680   end if;
6681 --
6682   if l_pay_install is not null
6683   and l_pay_install = 'Y' then
6684   --
6685     open csr_run_script;
6686     fetch csr_run_script into l_run_script, l_process_type;
6687     close csr_run_script;
6688   --
6689     if (g_dbg) then
6690       hr_utility.trace('chk_dbi_corrupt l_run_script : '||l_run_script);
6691       hr_utility.trace('chk_dbi_corrupt l_process_type : '||l_process_type);
6692     end if;
6693   --
6694     if l_run_script is not null
6695     and l_run_script = 'Y' then
6696     --
6697       -- there is potential even if 9737155 because PAYDYNDBIGEN run before 9737155 hrglobal
6698       -- so all should be checked at least once
6699       -- exclude fresh install by this pkg version
6700       if instr(nvl(l_process_type,'X'),'12566233') = 0 then
6701       --
6702         o_dbi_corrupt := 'Y';
6703       --
6704       end if;
6705     --
6706     end if;
6707   --
6708   end if;
6709 --
6710   if (g_dbg) then
6711     hr_utility.trace('chk_dbi_corrupt o_dbi_corrupt : '||o_dbi_corrupt);
6712     hr_utility.set_location(l_proc,1000);
6713   end if;
6714 --
6715 return o_dbi_corrupt;
6716 end chk_dbi_corrupt;
6717 --
6718 -- ----------------------------------------------------------------------------
6719 -- fix_dbi_corrupt
6720 -- ----------------------------------------------------------------------------
6721 procedure fix_dbi_corrupt
6722 is
6723 --
6724   l_proc varchar2(60) := g_pkg||'.fix_dbi_corrupt';
6725 --
6726   l_status_mode varchar2(1);
6727 --
6728   l_corrupt_dbi_tl_cnt number;
6729 --
6730   cursor csr_corrupt_dbi_tl
6731   is
6732   select /*+ ORDERED */
6733          count(fdit.user_name)
6734   from   ff_user_entities fue,
6735          ff_database_items fdi,
6736          ff_database_items_tl fdit
6737   where  (fue.user_entity_name like 'T_SAL_ITX_DAY1_KOU%'
6738          or fue.user_entity_name like 'T_SAL_ITX_DAY2_KOU%BASIC%')
6739   and    fue.legislation_code = 'JP'
6740   and    fdi.user_entity_id = fue.user_entity_id
6741   and    fdit.user_entity_id = fdi.user_entity_id
6742   and    fdit.user_name = fdi.user_name
6743   and    fdit.language = 'JA'
6744   and    ascii(substr(fdit.translated_user_name,3,1)) > 127
6745   and    nvl(to_single_byte(replace(replace(replace(replace(replace(fue.user_entity_name,
6746            'T_SAL_ITX_DAY1_KOU',''),
6747            'T_SAL_ITX_DAY2_KOU',''),
6748            '_BASIC_ITX_E2',''),
6749            '_ITX_E2',''),
6750            '_BASIC_AMT_E2','')),-1)
6751          <> nvl(to_single_byte(replace(replace(replace(replace(replace(replace(replace(replace(fdit.translated_user_name,
6752            hr_jp_standard_pkg.sjhextochar('5481518B8B81518CB990F292A58EFB90C58A7A955C815193FA8A7A955C315F8D629793'),''),
6753            hr_jp_standard_pkg.sjhextochar('5481518B8B81518CB990F292A58EFB90C58A7A955C815193FA8A7A955C325F8D629793'),''),
6754            hr_jp_standard_pkg.sjhextochar('906C81518AEE8F8090C58A7A5F8DC58FAC'),''),
6755            hr_jp_standard_pkg.sjhextochar('906C81518AEE8F8090C58A7A5F8DC591E5'),''),
6756            hr_jp_standard_pkg.sjhextochar('906C815190C58A7A5F8DC58FAC'),''),
6757            hr_jp_standard_pkg.sjhextochar('906C815190C58A7A5F8DC591E5'),''),
6758            hr_jp_standard_pkg.sjhextochar('81518AEE8F808A7A5F8DC58FAC'),''),
6759            hr_jp_standard_pkg.sjhextochar('81518AEE8F808A7A5F8DC591E5'),'')),-1);
6760 --
6761 begin
6762 --
6763   if (g_dbg) then
6764     hr_utility.set_location(l_proc,0);
6765   end if;
6766 --
6767   -- ---------------------------------------------
6768   -- corrupt dbi tl by mismatch ja udt col
6769   -- ---------------------------------------------
6770   -- synchronize JA with BASE data
6771   -- PAYDYNDBIGEN conc run is required after this plus HRGLOBAL NLS
6772 --
6773   open csr_corrupt_dbi_tl;
6774   fetch csr_corrupt_dbi_tl into l_corrupt_dbi_tl_cnt;
6775   close csr_corrupt_dbi_tl;
6776 --
6777   if (g_dbg) then
6778     hr_utility.trace('fix_dbi_corrupt l_corrupt_dbi_tl_cnt : '||to_char(l_corrupt_dbi_tl_cnt));
6779   end if;
6780 --
6781   if l_corrupt_dbi_tl_cnt > 0 then
6782   --
6783     l_status_mode := hr_general.g_data_migrator_mode;
6784   --
6785     -- for unset FF_DATABASE_ITEMS_TL084714_WHO
6786     if nvl(l_status_mode,'N') <> 'Y' then
6787     --
6788       hr_general.g_data_migrator_mode := 'Y';
6789     --
6790     end if;
6791   --
6792     update ff_database_items_tl ufdit
6793     set    ufdit.translated_user_name = ufdit.user_name,
6794            ufdit.last_updated_by = -1,
6795            ufdit.last_update_login = -1,
6796            ufdit.last_update_date = sysdate
6797     where  ufdit.rowid in (
6798       select /*+ ORDERD */
6799              fdit.rowid
6800       from   ff_user_entities fue,
6801              ff_database_items fdi,
6802              ff_database_items_tl fdit
6803       where  (fue.user_entity_name like 'T_SAL_ITX_DAY1_KOU%'
6804              or fue.user_entity_name like 'T_SAL_ITX_DAY2_KOU%BASIC%')
6805       and    fue.legislation_code = 'JP'
6806       and    fdi.user_entity_id = fue.user_entity_id
6807       and    fdit.user_entity_id = fdi.user_entity_id
6808       and    fdit.user_name = fdi.user_name
6809       and    fdit.language = 'JA'
6810       and    ascii(substr(fdit.translated_user_name,3,1)) > 127
6811       and    nvl(to_single_byte(replace(replace(replace(replace(replace(fue.user_entity_name,
6812                'T_SAL_ITX_DAY1_KOU',''),
6813                'T_SAL_ITX_DAY2_KOU',''),
6814                '_BASIC_ITX_E2',''),
6815                '_ITX_E2',''),
6816                '_BASIC_AMT_E2','')),-1)
6817              <> nvl(to_single_byte(replace(replace(replace(replace(replace(replace(replace(replace(fdit.translated_user_name,
6818                hr_jp_standard_pkg.sjhextochar('5481518B8B81518CB990F292A58EFB90C58A7A955C815193FA8A7A955C315F8D629793'),''),
6819                hr_jp_standard_pkg.sjhextochar('5481518B8B81518CB990F292A58EFB90C58A7A955C815193FA8A7A955C325F8D629793'),''),
6820                hr_jp_standard_pkg.sjhextochar('906C81518AEE8F8090C58A7A5F8DC58FAC'),''),
6821                hr_jp_standard_pkg.sjhextochar('906C81518AEE8F8090C58A7A5F8DC591E5'),''),
6822                hr_jp_standard_pkg.sjhextochar('906C815190C58A7A5F8DC58FAC'),''),
6823                hr_jp_standard_pkg.sjhextochar('906C815190C58A7A5F8DC591E5'),''),
6824                hr_jp_standard_pkg.sjhextochar('81518AEE8F808A7A5F8DC58FAC'),''),
6825                hr_jp_standard_pkg.sjhextochar('81518AEE8F808A7A5F8DC591E5'),'')),-1));
6826   --
6827     -- unset for subsequent procedure to enable trigger
6828     hr_general.g_data_migrator_mode := l_status_mode;
6829   --
6830   end if;
6831 --
6832   if (g_dbg) then
6833     hr_utility.set_location(l_proc,10);
6834   end if;
6835 --
6836   update pay_patch_status
6837   set process_type = decode(nvl(process_type,'X'),'X',null,process_type||',')||'12566233'
6838   where patch_number = 5758299
6839   and   patch_name = 'JP_UPGRADE_R12'
6840   and   phase = 'C'
6841   and   legislation_code = 'JP';
6842 --
6843   if (g_dbg) then
6844     hr_utility.set_location(l_proc,1000);
6845   end if;
6846 --
6847 end fix_dbi_corrupt;
6848 --
6849 -- |-------------------------------------------------------------------|
6850 -- |-----------------------< migrate_data >----------------------------|
6851 -- |-------------------------------------------------------------------|
6852 --
6853 procedure migrate_data is
6854 --
6855   l_count NUMBER(4);
6856 --
6857   l_proc  VARCHAR2(50) := g_pkg||'.migrate_data';
6858 --
6859 BEGIN
6860 --
6861   hr_utility.set_location(l_proc,0);
6862 --
6863   -- this corrupt data fix routine is required here before rename
6864   --
6865   if chk_hr_corrupt = 'Y' then
6866   --
6867     hr_utility.trace('chk_hr_corrupt true');
6868   --
6869     fix_hr_corrupt;
6870   --
6871     hr_utility.set_location(l_proc,5);
6872   --
6873   end if;
6874 --
6875   hr_utility.set_location(l_proc,10);
6876 --
6877   SELECT COUNT(1)
6878   INTO   l_count
6879   FROM   pay_input_values_f
6880   WHERE  legislation_code = 'JP'
6881   AND    ( ASCII(name) > 127 OR SUBSTR(name,1,1) = '2');
6882 
6883   IF (l_count > 0) THEN
6884     migrate_input_values;
6885   END IF;
6886 
6887   hr_utility.set_location(l_proc, 20);
6888 
6889   SELECT COUNT(1)
6890   INTO   l_count
6891   FROM   pay_element_types_f
6892   WHERE  legislation_code = 'JP'
6893   AND    ASCII(element_name) > 127
6894   AND    description NOT LIKE '%Obsoleted';
6895 
6896   IF (l_count > 0) THEN
6897     migrate_element_types;
6898   END IF;
6899 
6900   hr_utility.set_location(l_proc, 30);
6901 
6902   SELECT COUNT(1)
6903   INTO   l_count
6904   FROM   pay_element_classifications
6905   WHERE  legislation_code = 'JP'
6906   AND    ASCII(SUBSTR(classification_name,8,1)) > 127;
6907 
6908   IF (l_count > 0) THEN
6909     migrate_element_class;
6910   END IF;
6911 
6912   hr_utility.set_location(l_proc, 40);
6913 
6914   SELECT COUNT(1)
6915   INTO   l_count
6916   FROM   pay_balance_types
6917   WHERE  legislation_code = 'JP'
6918   AND    ASCII(SUBSTR(balance_name,3,1)) > 127
6919   AND    reporting_name NOT LIKE '%Obsoleted';
6920 
6921   IF (l_count > 0) THEN
6922     migrate_balance_types;
6923   END IF;
6924 
6925   hr_utility.set_location(l_proc, 50);
6926 
6927   SELECT COUNT(1)
6928   INTO   l_count
6929   FROM   pay_balance_dimensions
6930   WHERE  legislation_code = 'JP'
6931   AND    ASCII(SUBSTR(dimension_name,3,1)) > 127;
6932 
6933   IF (l_count > 0) THEN
6934     migrate_bal_dimensions;
6935   END IF;
6936 
6937   hr_utility.set_location(l_proc, 60);
6938 
6939   SELECT COUNT(1)
6940   INTO   l_count
6941   FROM   pay_element_sets
6942   WHERE  legislation_code = 'JP'
6943   AND    ASCII(element_set_name) > 127;
6944 
6945   IF (l_count > 0) THEN
6946     migrate_element_sets;
6947   END IF;
6948 
6949   hr_utility.set_location(l_proc, 70);
6950 
6951   SELECT COUNT(1)
6952   INTO   l_count
6953   FROM   ff_globals_f
6954   WHERE  legislation_code = 'JP'
6955   AND    ASCII(SUBSTR(global_name,3,1)) > 127
6956   AND    global_description NOT LIKE '%Obsoleted';
6957 
6958   IF (l_count > 0) THEN
6959     migrate_globals;
6960   END IF;
6961 
6962   hr_utility.set_location(l_proc, 80);
6963 
6964   SELECT COUNT(1)
6965   INTO   l_count
6966   FROM   ff_formulas_f
6967   WHERE  legislation_code = 'JP'
6968   AND    ASCII(SUBSTR(formula_name,3,1)) > 127
6969   AND    description NOT LIKE '%Obsoleted';
6970 
6971   IF (l_count > 0) THEN
6972     migrate_formulas;
6973   END IF;
6974 
6975   hr_utility.set_location(l_proc, 90);
6976 
6977   SELECT COUNT(1)
6978   INTO   l_count
6979   FROM   pay_monetary_units
6980   WHERE  legislation_code = 'JP'
6981   AND    ASCII(SUBSTR(monetary_unit_name,LENGTH(monetary_unit_name),1)) > 127;
6982 
6983   IF (l_count > 0) THEN
6984     migrate_monetary_units;
6985   END IF;
6986 
6987   hr_utility.set_location(l_proc, 100);
6988 
6989   SELECT COUNT(1)
6990   INTO   l_count
6991   FROM   pay_user_columns
6992   WHERE  legislation_code = 'JP'
6993   AND    ASCII(user_column_name) > 127;
6994 
6995   IF (l_count > 0) THEN
6996     migrate_user_columns;
6997   END IF;
6998 
6999   hr_utility.set_location(l_proc, 110);
7000 
7001   SELECT COUNT(1)
7002   INTO   l_count
7003   FROM   pay_user_rows_f
7004   WHERE  legislation_code = 'JP'
7005   AND    ASCII(row_low_range_or_name) > 127;
7006 
7007   IF (l_count > 0) THEN
7008     migrate_user_rows;
7009   END IF;
7010 
7011   hr_utility.set_location(l_proc, 120);
7012 
7013   SELECT COUNT(1)
7014   INTO   l_count
7015   FROM   pay_user_tables
7016   WHERE  legislation_code = 'JP'
7017   AND    ASCII(SUBSTR(user_table_name,3,1)) > 127;
7018 
7019   IF (l_count > 0) THEN
7020     migrate_user_tables;
7021   END IF;
7022 
7023   hr_utility.set_location(l_proc, 130);
7024 
7025   -- To delete JP Char DBI's
7026   delete_dbi;
7027 
7028   hr_utility.set_location(l_proc, 140);
7029 --
7030   migrate_li_ff;
7031 --
7032   hr_utility.set_location(l_proc, 150);
7033 --
7034   -- this corrupt data fix routine is required here after delete_dbi
7035   --
7036   if chk_dbi_corrupt = 'Y' then
7037   --
7038     hr_utility.trace('chk_dbi_corrupt true');
7039   --
7040     fix_dbi_corrupt;
7041   --
7042     hr_utility.set_location(l_proc,155);
7043   --
7044   end if;
7045 --
7046   hr_utility.set_location('Successful completion of ' || l_proc, 160);
7047 --
7048 EXCEPTION
7049 
7050   WHEN OTHERS THEN
7051 
7052     hr_utility.set_location(l_proc, 160);
7053 
7054     raise;
7055 
7056 END migrate_data;
7057 --
7058 END pay_jp_data_migration_pkg;