1: package body pay_us_userra as
2: /* $Header: pyususer.pkb 120.1.12000000.3 2007/08/23 07:18:22 sudedas noship $*/
3:
4: /********* logging message cover for hr_utility *********/
5:
6: PROCEDURE plog ( p_message IN varchar2 ) is
7:
8: /* output a message to the process log file */
6: PROCEDURE plog ( p_message IN varchar2 ) is
7:
8: /* output a message to the process log file */
9: BEGIN
10: hr_utility.trace(p_message);
11: END plog;
12:
13: PROCEDURE insert_userra_balances(errbuf out nocopy varchar2,
14: retcode out nocopy number,
74: where organization_id = cp_business_group_id;
75:
76: BEGIN
77:
78: --hr_utility.trace_on (null, 'USERRA');
79: ln_step := 10;
80:
81:
82: /* Initialize variables */
129: lv_archive_dbi := 'A_'||lv_live_dbi ;
130: ln_step := 40;
131: end if;
132:
133: hr_utility.trace('lv_balance ='||lv_balance);
134: hr_utility.trace('lv_lookup_code ='||lv_lookup_code);
135: hr_utility.trace('lv_live_dbi ='||lv_live_dbi);
136: hr_utility.trace('lv_archive_dbi ='||lv_archive_dbi);
137: hr_utility.trace('lv_year ='||lv_year);
130: ln_step := 40;
131: end if;
132:
133: hr_utility.trace('lv_balance ='||lv_balance);
134: hr_utility.trace('lv_lookup_code ='||lv_lookup_code);
135: hr_utility.trace('lv_live_dbi ='||lv_live_dbi);
136: hr_utility.trace('lv_archive_dbi ='||lv_archive_dbi);
137: hr_utility.trace('lv_year ='||lv_year);
138: hr_utility.trace('lv_short_year ='||lv_short_year);
131: end if;
132:
133: hr_utility.trace('lv_balance ='||lv_balance);
134: hr_utility.trace('lv_lookup_code ='||lv_lookup_code);
135: hr_utility.trace('lv_live_dbi ='||lv_live_dbi);
136: hr_utility.trace('lv_archive_dbi ='||lv_archive_dbi);
137: hr_utility.trace('lv_year ='||lv_year);
138: hr_utility.trace('lv_short_year ='||lv_short_year);
139: hr_utility.trace('ld_year ='||to_char(ld_year));
132:
133: hr_utility.trace('lv_balance ='||lv_balance);
134: hr_utility.trace('lv_lookup_code ='||lv_lookup_code);
135: hr_utility.trace('lv_live_dbi ='||lv_live_dbi);
136: hr_utility.trace('lv_archive_dbi ='||lv_archive_dbi);
137: hr_utility.trace('lv_year ='||lv_year);
138: hr_utility.trace('lv_short_year ='||lv_short_year);
139: hr_utility.trace('ld_year ='||to_char(ld_year));
140: hr_utility.trace('Checking existence of lookup_code');
133: hr_utility.trace('lv_balance ='||lv_balance);
134: hr_utility.trace('lv_lookup_code ='||lv_lookup_code);
135: hr_utility.trace('lv_live_dbi ='||lv_live_dbi);
136: hr_utility.trace('lv_archive_dbi ='||lv_archive_dbi);
137: hr_utility.trace('lv_year ='||lv_year);
138: hr_utility.trace('lv_short_year ='||lv_short_year);
139: hr_utility.trace('ld_year ='||to_char(ld_year));
140: hr_utility.trace('Checking existence of lookup_code');
141:
134: hr_utility.trace('lv_lookup_code ='||lv_lookup_code);
135: hr_utility.trace('lv_live_dbi ='||lv_live_dbi);
136: hr_utility.trace('lv_archive_dbi ='||lv_archive_dbi);
137: hr_utility.trace('lv_year ='||lv_year);
138: hr_utility.trace('lv_short_year ='||lv_short_year);
139: hr_utility.trace('ld_year ='||to_char(ld_year));
140: hr_utility.trace('Checking existence of lookup_code');
141:
142:
135: hr_utility.trace('lv_live_dbi ='||lv_live_dbi);
136: hr_utility.trace('lv_archive_dbi ='||lv_archive_dbi);
137: hr_utility.trace('lv_year ='||lv_year);
138: hr_utility.trace('lv_short_year ='||lv_short_year);
139: hr_utility.trace('ld_year ='||to_char(ld_year));
140: hr_utility.trace('Checking existence of lookup_code');
141:
142:
143: ln_step := 35;
136: hr_utility.trace('lv_archive_dbi ='||lv_archive_dbi);
137: hr_utility.trace('lv_year ='||lv_year);
138: hr_utility.trace('lv_short_year ='||lv_short_year);
139: hr_utility.trace('ld_year ='||to_char(ld_year));
140: hr_utility.trace('Checking existence of lookup_code');
141:
142:
143: ln_step := 35;
144: open c_get_business_group(p_business_group_id);
145:
146: fetch c_get_business_group INTO lv_business_group_name;
147:
148: if c_get_business_group%NOTFOUND THEN
149: hr_utility.raise_error;
150: end if;
151: close c_get_business_group;
152:
153: ln_step := 40;
152:
153: ln_step := 40;
154:
155:
156: hr_utility.trace('lv_business_group_name ='||lv_business_group_name);
157:
158: open c_get_lookup_code(lv_lookup_type,
159: lv_lookup_code,
160: ln_application_id);
161: ln_step := 40;
162:
163: fetch c_get_lookup_code into lv_exists;
164:
165: hr_utility.trace('Fetched c_get_lookup_code ');
166:
167: if c_get_lookup_code%NOTFOUND then
168:
169: ln_step := 50;
233:
234: /************************************************************
235: ** Create Defined Balance Id
236: ************************************************************/
237: hr_utility.trace('ln_bal_type_id = '||to_char(ln_bal_type_id));
238: hr_utility.trace('lv_dimension ='||lv_dimension);
239:
240: SELECT count(0)
241: INTO ln_exists
234: /************************************************************
235: ** Create Defined Balance Id
236: ************************************************************/
237: hr_utility.trace('ln_bal_type_id = '||to_char(ln_bal_type_id));
238: hr_utility.trace('lv_dimension ='||lv_dimension);
239:
240: SELECT count(0)
241: INTO ln_exists
242: FROM pay_defined_balances db,
267:
268: /************************************************************
269: ** Create archive database item
270: ************************************************************/
271: hr_utility.trace('Checking existence of archive_dbi');
272: lv_exists := null;
273: open c_get_archive_dbi(lv_archive_dbi);
274: ln_step := 120;
275:
275:
276: fetch c_get_archive_dbi into lv_exists;
277: if c_get_archive_dbi%NOTFOUND then
278: ln_step := 130;
279: hr_utility.trace('Archive dbi not found');
280: py_w2_dbitems.create_eoy_archive_dbi(lv_archive_dbi);
281:
282: plog('Created Archive Database Item '||lv_archive_dbi);
283:
286: commit;
287:
288: EXCEPTION
289: when others then
290: hr_utility.trace('Error in inserting USERRA data at step '
291: ||to_char(ln_step)|| ' - '|| to_char(sqlcode));
292: raise_application_error(-20001,'Error in create USERRA data at step '
293: ||to_char(ln_step)||' - '||to_char(sqlcode) || '-' || sqlerrm);
294: END; /*insert userra balances */