DBA Data[Home] [Help]

APPS.PAY_JP_ZENGIN_TAPE dependencies on HR_UTILITY

Line 118: hr_utility.set_location('bacsmgtp.get_formula_id',1);

114: --
115: FUNCTION get_formula_id(p_formula_name IN VARCHAR2) RETURN INTEGER IS
116: p_formula_id INTEGER;
117: BEGIN
118: hr_utility.set_location('bacsmgtp.get_formula_id',1);
119: SELECT DISTINCT formula_id
120: INTO p_formula_id
121: FROM ff_formulas_f
122: WHERE formula_name = p_formula_name;

Line 123: hr_utility.set_location('bacsmgtp.formula_id',p_formula_id);

119: SELECT DISTINCT formula_id
120: INTO p_formula_id
121: FROM ff_formulas_f
122: WHERE formula_name = p_formula_name;
123: hr_utility.set_location('bacsmgtp.formula_id',p_formula_id);
124: --
125: RETURN p_formula_id;
126: --
127: END get_formula_id;

Line 132: hr_utility.set_location('bacsmgtp.get_todays_date',1);

128: --
129: FUNCTION get_todays_date RETURN VARCHAR2 IS
130: todays_date VARCHAR2(11);
131: BEGIN
132: hr_utility.set_location('bacsmgtp.get_todays_date',1);
133: todays_date := to_char(sysdate,'YYDDD');
134: RETURN todays_date;
135: END get_todays_date;
136: --

Line 140: hr_utility.set_location('bacsmgtp.get_session_date',1);

136: --
137: FUNCTION get_session_date RETURN VARCHAR2 IS
138: p_session_date VARCHAR2(11);
139: BEGIN
140: hr_utility.set_location('bacsmgtp.get_session_date',1);
141: -- FlexDate Change
142: -- SELECT to_char(effective_date,'DD-MON-YYYY')
143: SELECT fnd_date.date_to_canonical(effective_date)
144: INTO p_session_date

Line 156: hr_utility.set_location('bacsmgtp.get_expiration_date',1);

152: FUNCTION get_expiration_date(p_payroll_action_id IN VARCHAR2)
153: RETURN VARCHAR2 is
154: p_expiration_date VARCHAR2(11);
155: BEGIN
156: hr_utility.set_location('bacsmgtp.get_expiration_date',1);
157: select nvl(substr(LEGISLATIVE_PARAMETERS,
158: decode(instr(LEGISLATIVE_PARAMETERS,'EXPIRATION_DATE='),
159: '0', null,
160: instr(LEGISLATIVE_PARAMETERS,'EXPIRATION_DATE='))+16,11),

Line 175: hr_utility.set_location('bacsmgtp.get_submission_number',1);

171: FUNCTION get_submission_number(p_payroll_action_id IN VARCHAR2)
172: RETURN VARCHAR2 is
173: p_submission_number VARCHAR2(6);
174: BEGIN
175: hr_utility.set_location('bacsmgtp.get_submission_number',1);
176: select
177: nvl(substr(LEGISLATIVE_PARAMETERS,
178: decode(instr(LEGISLATIVE_PARAMETERS,'SUBMISSION_NUMBER='),
179: '0', null,

Line 186: hr_utility.set_location('bacsmgtp.get_submission_number',2);

182: into p_submission_number
183: from pay_payroll_actions
184: where PAYROLL_ACTION_ID = p_payroll_action_id;
185: --
186: hr_utility.set_location('bacsmgtp.get_submission_number',2);
187: RETURN p_submission_number;
188: --
189: END get_submission_number;
190: --

Line 196: hr_utility.set_location('bacsmgtp.get_process_date',1);

192: FUNCTION get_process_date(p_payroll_action_id IN VARCHAR2)
193: RETURN VARCHAR2 is
194: p_process_date VARCHAR2(11);
195: BEGIN
196: hr_utility.set_location('bacsmgtp.get_process_date',1);
197: hr_utility.trace('payroll_action_id='||p_payroll_action_id);
198: BEGIN
199: select
200: -- substr(to_char(OVERRIDING_DD_DATE ,'DD-MON-YYYY'),1,11) effdate

Line 197: hr_utility.trace('payroll_action_id='||p_payroll_action_id);

193: RETURN VARCHAR2 is
194: p_process_date VARCHAR2(11);
195: BEGIN
196: hr_utility.set_location('bacsmgtp.get_process_date',1);
197: hr_utility.trace('payroll_action_id='||p_payroll_action_id);
198: BEGIN
199: select
200: -- substr(to_char(OVERRIDING_DD_DATE ,'DD-MON-YYYY'),1,11) effdate
201: substr(fnd_date.date_to_canonical(OVERRIDING_DD_DATE),1,11) effdate

Line 207: hr_utility.set_message(801, 'Other error in get_process_date f');

203: from pay_payroll_actions
204: where PAYROLL_ACTION_ID = p_payroll_action_id;
205: --
206: EXCEPTION when others then
207: hr_utility.set_message(801, 'Other error in get_process_date f');
208: hr_utility.raise_error;
209: END;
210: --
211: hr_utility.set_location('bacsmgtp.get_process_date'||p_process_date,2);

Line 208: hr_utility.raise_error;

204: where PAYROLL_ACTION_ID = p_payroll_action_id;
205: --
206: EXCEPTION when others then
207: hr_utility.set_message(801, 'Other error in get_process_date f');
208: hr_utility.raise_error;
209: END;
210: --
211: hr_utility.set_location('bacsmgtp.get_process_date'||p_process_date,2);
212: RETURN p_process_date;

Line 211: hr_utility.set_location('bacsmgtp.get_process_date'||p_process_date,2);

207: hr_utility.set_message(801, 'Other error in get_process_date f');
208: hr_utility.raise_error;
209: END;
210: --
211: hr_utility.set_location('bacsmgtp.get_process_date'||p_process_date,2);
212: RETURN p_process_date;
213: --
214: END get_process_date;
215: --

Line 222: hr_utility.set_location('bacsmgtp.get_org_context',1);

218: -- one row.
219: FUNCTION get_org_context(p_payroll_action_id IN NUMBER) RETURN INTEGER IS
220: p_org_payment_method_id INTEGER;
221: BEGIN
222: hr_utility.set_location('bacsmgtp.get_org_context',1);
223: SELECT ppp.org_payment_method_id
224: INTO p_org_payment_method_id
225: FROM pay_assignment_actions paa, pay_pre_payments ppp
226: WHERE paa.payroll_action_id = p_payroll_action_id

Line 230: hr_utility.set_location('org_context',p_org_payment_method_id);

226: WHERE paa.payroll_action_id = p_payroll_action_id
227: AND ppp.pre_payment_id = paa.pre_payment_id
228: AND ROWNUM = 1
229: ORDER BY ppp.org_payment_method_id;
230: hr_utility.set_location('org_context',p_org_payment_method_id);
231: RETURN p_org_payment_method_id;
232: END get_org_context;
233: --
234: BEGIN

Line 237: --hr_utility.trace_on;

233: --
234: BEGIN
235: -- temporary trace AS set trace on and delay for a while to set up pipemon
236: --IF NOT bacs_assignments %ISOPEN THEN
237: --hr_utility.trace_on;
238: -- declare loop_counter number;
239: --begin
240: --loop_counter := 1;
241: --while loop_counter < 500000 LOOP

Line 258: hr_utility.set_location('bacsmgtp.new_formula',1);

254: pay_mag_tape.internal_cxt_values(1) := 1;
255: --
256: --
257: IF NOT bacs_assignments %ISOPEN THEN -- New file
258: hr_utility.set_location('bacsmgtp.new_formula',1);
259: --
260: total_body_count := 0; -- Initial value
261: total_contra_count := 0;
262: count_for_block := 0;

Line 279: hr_utility.set_location('bacsmgtp.payroll_action_id',p_payroll_action_id);

275: if pay_mag_tape.internal_prm_names(3) = 'PAYROLL_ACTION_ID'
276: then p_payroll_action_id := to_number(
277: pay_mag_tape.internal_prm_values(3));
278: end if;
279: hr_utility.set_location('bacsmgtp.payroll_action_id',p_payroll_action_id);
280: --
281: expiration_date := get_expiration_date(p_payroll_action_id);
282: submission_number := get_submission_number(p_payroll_action_id);
283: process_date := get_process_date(p_payroll_action_id);

Line 306: hr_utility.set_location('bacsmgtp.new_formula',2);

302: --
303: OPEN bacs_assignments ( p_payroll_action_id);
304: --
305: ELSE
306: hr_utility.set_location('bacsmgtp.new_formula',2);
307: --
308: IF fetch_required = TRUE then
309: FETCH bacs_assignments INTO
310: p_org_payment_method_id,

Line 320: hr_utility.set_location('bacsmgtp.new_formula',3);

316: --
317: IF bacs_assignments %FOUND THEN
318: IF p_org_payment_method_id = p_previous_payment_id
319: THEN
320: hr_utility.set_location('bacsmgtp.new_formula',3);
321: pay_mag_tape.internal_prm_values(1) := 4;
322: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_BODY');
323: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
324: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_VALUE' ;

Line 345: hr_utility.set_location('bacsmgtp.new_formula',4);

341: --
342: -- Check for the block size
343: --
344: IF count_for_block = 20 then
345: hr_utility.set_location('bacsmgtp.new_formula',4);
346: block_count := block_count + 1;
347: count_for_block := 1;
348: ELSE count_for_block := count_for_block + 1;
349: hr_utility.set_location('bacsmgtp.new_formula',5);

Line 349: hr_utility.set_location('bacsmgtp.new_formula',5);

345: hr_utility.set_location('bacsmgtp.new_formula',4);
346: block_count := block_count + 1;
347: count_for_block := 1;
348: ELSE count_for_block := count_for_block + 1;
349: hr_utility.set_location('bacsmgtp.new_formula',5);
350: END IF;
351: --
352: ELSE
353: hr_utility.set_location('bacsmgtp.new_formula',6);

Line 353: hr_utility.set_location('bacsmgtp.new_formula',6);

349: hr_utility.set_location('bacsmgtp.new_formula',5);
350: END IF;
351: --
352: ELSE
353: hr_utility.set_location('bacsmgtp.new_formula',6);
354: pay_mag_tape.internal_prm_values(1) := 5;
355: pay_mag_tape.internal_prm_values(2) := get_formula_id('BACS_CONTRA');
356: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
357: pay_mag_tape.internal_prm_names(3) := 'TRANSFER_TOTAL_PAYMENT';

Line 399: hr_utility.set_location('bacsmgtp.new_formula',8);

395: total_contra_count := total_contra_count + 1;
396: count_for_block :=count_for_block + 1;
397: final_contra :=TRUE;
398: ELSE
399: hr_utility.set_location('bacsmgtp.new_formula',8);
400: IF count_for_block < 20 then
401: hr_utility.set_location('bacsmgtp.new_formula',9);
402: pay_mag_tape.internal_prm_values(1) :=2;
403: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';

Line 401: hr_utility.set_location('bacsmgtp.new_formula',9);

397: final_contra :=TRUE;
398: ELSE
399: hr_utility.set_location('bacsmgtp.new_formula',8);
400: IF count_for_block < 20 then
401: hr_utility.set_location('bacsmgtp.new_formula',9);
402: pay_mag_tape.internal_prm_values(1) :=2;
403: pay_mag_tape.internal_prm_names(2) := 'NEW_FORMULA_ID';
404: pay_mag_tape.internal_prm_values(2) :=
405: get_formula_id('BACS_PADDING');

Line 410: hr_utility.set_location('bacsmgtp.new_formula',10);

406: count_for_block:= count_for_block + 1;
407: ELSE
408: -- Padding finished - Now write footer,
409: --
410: hr_utility.set_location('bacsmgtp.new_formula',10);
411: pay_mag_tape.internal_cxt_values(1) := 3;
412: pay_mag_tape.internal_cxt_names(2) := 'ORG_PAY_METHOD_ID';
413: pay_mag_tape.internal_cxt_values(2) := p_org_payment_method_id;
414: pay_mag_tape.internal_cxt_names(3) := 'DATE_EARNED';