141:
142: CLOSE get_input_value_id;
143: --
144: ELSE
145: -- hr_utility.trace(p_element_name ||' element does not exist');
146: NULL;
147: END IF;
148:
149: CLOSE get_element_type_id;
167: AND legislation_code = 'US';
168:
169: exception
170: when no_data_found then
171: hr_utility.set_location('No Element Found',99);
172:
173: end;
174:
175: update pay_element_types_f
180:
181: EXCEPTION
182: --
183: WHEN NO_DATA_FOUND THEN
184: hr_utility.set_location('Assoc Primary Bal - NO DATA FOUND',99);
185: --
186: WHEN TOO_MANY_ROWS THEN
187: hr_utility.set_location('Assoc Primary Bal - TOO MANY ROWS',99);
188: --
183: WHEN NO_DATA_FOUND THEN
184: hr_utility.set_location('Assoc Primary Bal - NO DATA FOUND',99);
185: --
186: WHEN TOO_MANY_ROWS THEN
187: hr_utility.set_location('Assoc Primary Bal - TOO MANY ROWS',99);
188: --
189:
190: end;
191: --
200: v_ddf_column VARCHAR2(20);
201:
202: BEGIN
203:
204: hr_utility.set_location('pay_assoc_bal.assoc_bal',1);
205: hr_utility.set_location('Element : '||p_element_name,3);
206: hr_utility.set_location('Primary Balance : '||p_balance_name,5);
207: begin
208: SELECT element_type_id
201:
202: BEGIN
203:
204: hr_utility.set_location('pay_assoc_bal.assoc_bal',1);
205: hr_utility.set_location('Element : '||p_element_name,3);
206: hr_utility.set_location('Primary Balance : '||p_balance_name,5);
207: begin
208: SELECT element_type_id
209: INTO v_eletype_id
202: BEGIN
203:
204: hr_utility.set_location('pay_assoc_bal.assoc_bal',1);
205: hr_utility.set_location('Element : '||p_element_name,3);
206: hr_utility.set_location('Primary Balance : '||p_balance_name,5);
207: begin
208: SELECT element_type_id
209: INTO v_eletype_id
210: FROM pay_element_types_f
211: WHERE UPPER(element_name) = UPPER(p_element_name)
212: AND business_group_id IS NULL
213: AND legislation_code = 'US';
214:
215: hr_utility.set_location('pay_assoc_bal.assoc_bal',7);
216: SELECT balance_type_id
217: INTO v_baltype_id
218: FROM pay_balance_types
219: WHERE UPPER(balance_name) = UPPER(p_balance_name)
227: end;
228:
229: IF UPPER(p_association) = 'PRIMARY BALANCE' THEN
230:
231: hr_utility.set_location('pay_assoc_bal.assoc_bal',9);
232: update pay_element_types_f
233: set ELEMENT_INFORMATION10 = v_baltype_id
234: where element_type_id = v_eletype_id
235: and business_group_id is null
236: and legislation_code = 'US';
237:
238: ELSIF UPPER(p_association) IN ('ACCRUED BALANCE', 'GROSS BALANCE') THEN
239:
240: hr_utility.set_location('pay_assoc_bal.assoc_bal',11);
241: update pay_element_types_f
242: set ELEMENT_INFORMATION11 = v_baltype_id
243: where element_type_id = v_eletype_id
244: and business_group_id is null
245: and legislation_code = 'US';
246:
247: ELSIF UPPER(p_association) IN ('ARREARS BALANCE', 'SUBJECT BALANCE', 'HOURS BALANCE') THEN
248:
249: hr_utility.set_location('pay_assoc_bal.assoc_bal',13);
250: update pay_element_types_f
251: set ELEMENT_INFORMATION12 = v_baltype_id
252: where element_type_id = v_eletype_id
253: and business_group_id is null
254: and legislation_code = 'US';
255: --
256: ELSIF UPPER(p_association) IN ('NOT TAKEN BALANCE', 'PRETAX BALANCE') THEN
257: --
258: hr_utility.set_location('pay_assoc_bal.assoc_bal',15);
259: update pay_element_types_f
260: set ELEMENT_INFORMATION13 = v_baltype_id
261: where element_type_id = v_eletype_id
262: and business_group_id is null
263: and legislation_code = 'US';
264: --
265: ELSIF UPPER(p_association) IN ('TOWARD BOND PURCHASE', 'SUBJECT WHABLE') THEN
266: --
267: hr_utility.set_location('pay_assoc_bal.assoc_bal',17);
268: update pay_element_types_f
269: set ELEMENT_INFORMATION14 = v_baltype_id
270: where element_type_id = v_eletype_id
271: and business_group_id is null
272: and legislation_code = 'US';
273: --
274: ELSIF UPPER(p_association) IN ('ABLE BALANCE', 'SUBJECT NOT WHABLE') THEN
275: --
276: hr_utility.set_location('pay_assoc_bal.assoc_bal',19);
277: update pay_element_types_f
278: set ELEMENT_INFORMATION15 = v_baltype_id
279: where element_type_id = v_eletype_id
280: and business_group_id is null
281: and legislation_code = 'US';
282: --
283: ELSIF UPPER(p_association) = 'EXCESS BALANCE' THEN
284: --
285: hr_utility.set_location('pay_assoc_bal.assoc_bal',21);
286: update pay_element_types_f
287: set ELEMENT_INFORMATION16 = v_baltype_id
288: where element_type_id = v_eletype_id
289: and business_group_id is null
290: and legislation_code = 'US';
291: --
292: ELSIF UPPER(p_association) = 'TAXABLE BALANCE' THEN
293: --
294: hr_utility.set_location('pay_assoc_bal.assoc_bal',23);
295: update pay_element_types_f
296: set ELEMENT_INFORMATION17 = v_baltype_id
297: where element_type_id = v_eletype_id
298: and business_group_id is null
299: and legislation_code = 'US';
300: --
301: ELSIF UPPER(p_association) = 'EXEMPT BALANCE' THEN
302: --
303: hr_utility.set_location('pay_assoc_bal.assoc_bal',25);
304: update pay_element_types_f
305: set ELEMENT_INFORMATION18 = v_baltype_id
306: where element_type_id = v_eletype_id
307: and business_group_id is null
308: and legislation_code = 'US';
309: --
310: ELSIF UPPER(p_association) = 'EE OR ER CONTR BALANCE' THEN
311: --
312: hr_utility.set_location('pay_assoc_bal.assoc_bal',27);
313: update pay_element_types_f
314: set ELEMENT_INFORMATION19 = v_baltype_id
315: where element_type_id = v_eletype_id
316: and business_group_id is null
317: and legislation_code = 'US';
318: --
319: ELSIF UPPER(p_association) = 'WITHHELD BALANCE' THEN
320: --
321: hr_utility.set_location('pay_assoc_bal.assoc_bal',29);
322: update pay_element_types_f
323: set ELEMENT_INFORMATION20 = v_baltype_id
324: where element_type_id = v_eletype_id
325: and business_group_id is null
329: --
330: EXCEPTION
331: --
332: WHEN NO_DATA_FOUND THEN
333: hr_utility.set_location('Assoc Primary Bal - NO DATA FOUND',99);
334: --
335: WHEN TOO_MANY_ROWS THEN
336: hr_utility.set_location('Assoc Primary Bal - TOO MANY ROWS',99);
337: --
332: WHEN NO_DATA_FOUND THEN
333: hr_utility.set_location('Assoc Primary Bal - NO DATA FOUND',99);
334: --
335: WHEN TOO_MANY_ROWS THEN
336: hr_utility.set_location('Assoc Primary Bal - TOO MANY ROWS',99);
337: --
338: END assoc_bal;
339:
340: --
1013:
1014:
1015: exception
1016: when no_data_found then
1017: hr_utility.set_location('No Event Group found.',99);
1018:
1019: end;
1020:
1021: retro_element( p_element_name => 'Company Car',