DBA Data[Home] [Help]

APPS.PAY_US_RETRO_OVERLAP dependencies on FND_FILE

Line 144: fnd_file.put_line(fnd_file.log,'Entering ' || gv_package_name || lv_procedure_name);

140:
141: BEGIN
142:
143: lv_procedure_name := '.enable_retro_overlap';
144: fnd_file.put_line(fnd_file.log,'Entering ' || gv_package_name || lv_procedure_name);
145: lv_legislation_code := 'US';
146:
147: -- These are the legislation rules to check whether Enhanced Retropay is enabled or not
148: ltt_rule_type(1) := 'RETRO_DELETE';

Line 167: fnd_file.put_line(fnd_file.log,'Retro Overlap upgrade not performed when '||ltt_rule_type(i)||' legislation rule is not set to '||ltt_rule_mode(i));

163: THEN
164: lv_qualified := 'Y';
165: ELSE
166: lv_qualified := 'N';
167: fnd_file.put_line(fnd_file.log,'Retro Overlap upgrade not performed when '||ltt_rule_type(i)||' legislation rule is not set to '||ltt_rule_mode(i));
168: fnd_file.put_line(fnd_file.log,'Enhanced RetroPay is not enabled');
169: exit;
170: END IF;
171:

Line 168: fnd_file.put_line(fnd_file.log,'Enhanced RetroPay is not enabled');

164: lv_qualified := 'Y';
165: ELSE
166: lv_qualified := 'N';
167: fnd_file.put_line(fnd_file.log,'Retro Overlap upgrade not performed when '||ltt_rule_type(i)||' legislation rule is not set to '||ltt_rule_mode(i));
168: fnd_file.put_line(fnd_file.log,'Enhanced RetroPay is not enabled');
169: exit;
170: END IF;
171:
172: CLOSE c_retro_rule_check;

Line 207: fnd_file.put_line(fnd_file.log,'Retro Overlap is already Enabled');

203: IF c_retro_rule_check%FOUND
204: THEN
205: IF (ltt_rule_mode(3)= ln_exists)
206: THEN
207: fnd_file.put_line(fnd_file.log,'Retro Overlap is already Enabled');
208: ELSE
209: -- Updating Rero Ovelap rule mode to N
210: UPDATE pay_legislation_rules
211: SET RULE_MODE = ltt_rule_mode(3)

Line 214: fnd_file.put_line(fnd_file.log,'Retro Overlap Enabled successfully');

210: UPDATE pay_legislation_rules
211: SET RULE_MODE = ltt_rule_mode(3)
212: WHERE legislation_code = lv_legislation_code
213: AND rule_type = ltt_rule_type(3);
214: fnd_file.put_line(fnd_file.log,'Retro Overlap Enabled successfully');
215: END IF;
216:
217: ELSE
218: --If Retro Overlap is not enabled inserting new legislation rule

Line 221: fnd_file.put_line(fnd_file.log,'Retro Overlap Enabled successfully');

217: ELSE
218: --If Retro Overlap is not enabled inserting new legislation rule
219: INSERT INTO pay_legislation_rules(legislation_code,rule_type,rule_mode)
220: VALUES( lv_legislation_code,ltt_rule_type(3),ltt_rule_mode(3));
221: fnd_file.put_line(fnd_file.log,'Retro Overlap Enabled successfully');
222: END IF;
223:
224: CLOSE c_retro_rule_check; */
225:

Line 236: fnd_file.put_line(fnd_file.log,'Upgrade process of Enhanced RetroPay has Errored' );

232: If it doesn't exists set the flag to 'Y' so that retro over lap
233: legislation rule can be inserted */
234:
235: IF(c_upgrade_status%FOUND) THEN
236: fnd_file.put_line(fnd_file.log,'Upgrade process of Enhanced RetroPay has Errored' );
237: fnd_file.put_line(fnd_file.log,'The status of Enhanced RetroPay must be C in pay_upgrade_status table');
238: l_enro_flag := 'N';
239: END IF;
240: --

Line 237: fnd_file.put_line(fnd_file.log,'The status of Enhanced RetroPay must be C in pay_upgrade_status table');

233: legislation rule can be inserted */
234:
235: IF(c_upgrade_status%FOUND) THEN
236: fnd_file.put_line(fnd_file.log,'Upgrade process of Enhanced RetroPay has Errored' );
237: fnd_file.put_line(fnd_file.log,'The status of Enhanced RetroPay must be C in pay_upgrade_status table');
238: l_enro_flag := 'N';
239: END IF;
240: --
241: IF(c_upgrade_status%NOTFOUND) THEN

Line 247: fnd_file.put_line(fnd_file.log,'Retro Pay by Element payroll process has been run.' );

243: FETCH c_check_retro_pay_element INTO l_retro_elem_chk_flag;
244: IF (c_check_retro_pay_element%NOTFOUND) THEN
245: l_enro_flag := 'Y';
246: ELSE
247: fnd_file.put_line(fnd_file.log,'Retro Pay by Element payroll process has been run.' );
248: fnd_file.put_line(fnd_file.log,'Upgrade process of Enhanced Retropay is not run ');
249: fnd_file.put_line(fnd_file.log,'There is no entries found in pay_upgrade_status table for Enhanced RetroPay');
250: l_enro_flag := 'N';
251: END IF;

Line 248: fnd_file.put_line(fnd_file.log,'Upgrade process of Enhanced Retropay is not run ');

244: IF (c_check_retro_pay_element%NOTFOUND) THEN
245: l_enro_flag := 'Y';
246: ELSE
247: fnd_file.put_line(fnd_file.log,'Retro Pay by Element payroll process has been run.' );
248: fnd_file.put_line(fnd_file.log,'Upgrade process of Enhanced Retropay is not run ');
249: fnd_file.put_line(fnd_file.log,'There is no entries found in pay_upgrade_status table for Enhanced RetroPay');
250: l_enro_flag := 'N';
251: END IF;
252: CLOSE c_check_retro_pay_element; */

Line 249: fnd_file.put_line(fnd_file.log,'There is no entries found in pay_upgrade_status table for Enhanced RetroPay');

245: l_enro_flag := 'Y';
246: ELSE
247: fnd_file.put_line(fnd_file.log,'Retro Pay by Element payroll process has been run.' );
248: fnd_file.put_line(fnd_file.log,'Upgrade process of Enhanced Retropay is not run ');
249: fnd_file.put_line(fnd_file.log,'There is no entries found in pay_upgrade_status table for Enhanced RetroPay');
250: l_enro_flag := 'N';
251: END IF;
252: CLOSE c_check_retro_pay_element; */
253: /* Retro Enhanced and Retro Pay by element share same action type 'L'

Line 285: fnd_file.put_line(fnd_file.log,'some the business group has Retro pay by element Process ');

281: IF l_bg_count = l_adv_ret_bg_count THEN
282: l_enro_flag := 'Y';
283: ELSE
284: l_enro_flag := 'N';
285: fnd_file.put_line(fnd_file.log,'some the business group has Retro pay by element Process ');
286: fnd_file.put_line(fnd_file.log,'Need to Run the Upgrade process of Enhanced Retropay ');
287: END IF;
288: END IF;
289: END IF;

Line 286: fnd_file.put_line(fnd_file.log,'Need to Run the Upgrade process of Enhanced Retropay ');

282: l_enro_flag := 'Y';
283: ELSE
284: l_enro_flag := 'N';
285: fnd_file.put_line(fnd_file.log,'some the business group has Retro pay by element Process ');
286: fnd_file.put_line(fnd_file.log,'Need to Run the Upgrade process of Enhanced Retropay ');
287: END IF;
288: END IF;
289: END IF;
290:

Line 293: fnd_file.put_line(fnd_file.log,'Upgrade process of Enhanced Retropay has not completed ');

289: END IF;
290:
291: CLOSE c_upgrade_status;
292: ELSE
293: fnd_file.put_line(fnd_file.log,'Upgrade process of Enhanced Retropay has not completed ');
294: fnd_file.put_line(fnd_file.log,'There is no entries found in pay_upgrade_definitions table for Enhanced RetroPay');
295: l_enro_flag := 'N';
296: END IF;
297:

Line 294: fnd_file.put_line(fnd_file.log,'There is no entries found in pay_upgrade_definitions table for Enhanced RetroPay');

290:
291: CLOSE c_upgrade_status;
292: ELSE
293: fnd_file.put_line(fnd_file.log,'Upgrade process of Enhanced Retropay has not completed ');
294: fnd_file.put_line(fnd_file.log,'There is no entries found in pay_upgrade_definitions table for Enhanced RetroPay');
295: l_enro_flag := 'N';
296: END IF;
297:
298: --

Line 310: fnd_file.put_line(fnd_file.log,'Retro Overlap is already Enabled');

306: IF c_retro_rule_check%FOUND
307: THEN
308: IF (ltt_rule_mode(3)= ln_exists)
309: THEN
310: fnd_file.put_line(fnd_file.log,'Retro Overlap is already Enabled');
311: ELSE
312: -- Updating Rero Ovelap rule mode to N
313: UPDATE pay_legislation_rules
314: SET RULE_MODE = ltt_rule_mode(3)

Line 317: fnd_file.put_line(fnd_file.log,'Retro Overlap Enabled successfully');

313: UPDATE pay_legislation_rules
314: SET RULE_MODE = ltt_rule_mode(3)
315: WHERE legislation_code = lv_legislation_code
316: AND rule_type = ltt_rule_type(3);
317: fnd_file.put_line(fnd_file.log,'Retro Overlap Enabled successfully');
318: END IF;
319: ELSE
320: --If Retro Overlap is not enabled inserting new legislation rule
321: INSERT INTO pay_legislation_rules(legislation_code,rule_type,rule_mode)

Line 323: fnd_file.put_line(fnd_file.log,'Retro Overlap Enabled successfully');

319: ELSE
320: --If Retro Overlap is not enabled inserting new legislation rule
321: INSERT INTO pay_legislation_rules(legislation_code,rule_type,rule_mode)
322: VALUES( lv_legislation_code,ltt_rule_type(3),ltt_rule_mode(3));
323: fnd_file.put_line(fnd_file.log,'Retro Overlap Enabled successfully');
324: END IF;
325:
326: CLOSE c_retro_rule_check;
327: END IF;

Line 331: fnd_file.put_line(fnd_file.log,'Leaving ' || gv_package_name || lv_procedure_name);

327: END IF;
328: CLOSE c_upgrade_definitions;
329: END IF;
330:
331: fnd_file.put_line(fnd_file.log,'Leaving ' || gv_package_name || lv_procedure_name);
332:
333: EXCEPTION
334: WHEN others
335: THEN

Line 336: fnd_file.put_line(fnd_file.log,gv_package_name || lv_procedure_name);

332:
333: EXCEPTION
334: WHEN others
335: THEN
336: fnd_file.put_line(fnd_file.log,gv_package_name || lv_procedure_name);
337: fnd_file.put_line(fnd_file.log,'ERROR:' || sqlcode ||'-'|| substr(sqlerrm,1,80));
338: RAISE;
339: END enable_retro_overlap;
340:

Line 337: fnd_file.put_line(fnd_file.log,'ERROR:' || sqlcode ||'-'|| substr(sqlerrm,1,80));

333: EXCEPTION
334: WHEN others
335: THEN
336: fnd_file.put_line(fnd_file.log,gv_package_name || lv_procedure_name);
337: fnd_file.put_line(fnd_file.log,'ERROR:' || sqlcode ||'-'|| substr(sqlerrm,1,80));
338: RAISE;
339: END enable_retro_overlap;
340:
341: BEGIN