DBA Data[Home] [Help]

APPS.PAY_AU_RETRO_UPGRADE dependencies on FND_FILE

Line 1650: fnd_file.put_line( FND_FILE.LOG,'WARNING: User Defined Element ' ||l_retro_element_name || ' already exist, cannot upgrade '|| l_upg_element_name || ' (Element Type ID: ' || p_element_type_id || ').'); /* 5461629 */

1646: FETCH upgraded_element_check INTO l_upgraded_element;
1647: CLOSE upgraded_element_check;
1648: -- GT12,LT12 elements were not created by upgrade process
1649: if l_upgraded_element <> 'Y' then
1650: fnd_file.put_line( FND_FILE.LOG,'WARNING: User Defined Element ' ||l_retro_element_name || ' already exist, cannot upgrade '|| l_upg_element_name || ' (Element Type ID: ' || p_element_type_id || ').'); /* 5461629 */
1651: l_user_element_exist :='Y';
1652: l_upgrade_element_exist := 'N';
1653: exit;
1654: else

Line 1923: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Element ' || lv_element_name || ' (Element Type ID: ' || p_object_id|| ')'|| ' does not require upgrade as not included in a Retro Element set.');

1919: /* Bug 5731490 - Moved statement outside IF Block */
1920: if ((lv_classification_name = 'Earnings' AND (lv_label = 'Standard' OR lv_label = 'Spread' OR lv_label = 'Leave Loading' OR lv_label = 'Additional')) /* 7665727,8765082 Spread, Leave Loading, 13362286 Additional */
1921: OR lv_classification_name = 'Pre Tax Deductions'
1922: OR ln_retro_summ_ele_id IS NOT NULL) and lv_qualified ='N' and ln_element_set_exist = TRUE then
1923: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Element ' || lv_element_name || ' (Element Type ID: ' || p_object_id|| ')'|| ' does not require upgrade as not included in a Retro Element set.');
1924: elsif NOT ((lv_classification_name = 'Earnings' AND (lv_label = 'Standard' OR lv_label = 'Spread' OR lv_label = 'Leave Loading' OR lv_label = 'Additional')) /* 7665727,8765082 Spread, Leave Loading, 13362286 Additional */
1925: OR lv_classification_name = 'Pre Tax Deductions'
1926: OR ln_retro_summ_ele_id IS NOT NULL) and ln_element_set_exist = TRUE then
1927: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Element ' || lv_element_name || ' (Element Type ID: ' || p_object_id|| ')'|| ' with classification ' ||lv_classification_name||' '||lv_label||' does not require upgrade.');

Line 1927: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Element ' || lv_element_name || ' (Element Type ID: ' || p_object_id|| ')'|| ' with classification ' ||lv_classification_name||' '||lv_label||' does not require upgrade.');

1923: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Element ' || lv_element_name || ' (Element Type ID: ' || p_object_id|| ')'|| ' does not require upgrade as not included in a Retro Element set.');
1924: elsif NOT ((lv_classification_name = 'Earnings' AND (lv_label = 'Standard' OR lv_label = 'Spread' OR lv_label = 'Leave Loading' OR lv_label = 'Additional')) /* 7665727,8765082 Spread, Leave Loading, 13362286 Additional */
1925: OR lv_classification_name = 'Pre Tax Deductions'
1926: OR ln_retro_summ_ele_id IS NOT NULL) and ln_element_set_exist = TRUE then
1927: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Element ' || lv_element_name || ' (Element Type ID: ' || p_object_id|| ')'|| ' with classification ' ||lv_classification_name||' '||lv_label||' does not require upgrade.');
1928: end if;
1929:
1930: IF g_debug THEN
1931: hr_utility.trace('Leaving ' || gv_package_name || lv_procedure_name);

Line 2146: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Retro Component already exist for Element ' || lv_element_name || ' (Element Type ID: ' || p_element_type_id || ').' );

2142: FETCH c_get_retro_components INTO ln_retro_comp_exists;
2143: CLOSE c_get_retro_components;
2144:
2145: if ln_retro_comp_exists <> 0 then /* 5461629 */
2146: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Retro Component already exist for Element ' || lv_element_name || ' (Element Type ID: ' || p_element_type_id || ').' );
2147: end if;
2148: /* Bug#5583165 */
2149: if ln_retro_comp_exists = 0 then
2150: -- Procedure sets p_user_element_exist to 'Y' if GT12,LT12 elements of retro element were created by user

Line 2421: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Successfully upgraded Element ' || lv_element_name || ' (Element Type ID: ' || p_element_type_id || ').');

2417: insert_event_group(ln_ele_business_group_id
2418: ,p_element_type_id
2419: ,ln_event_group_id);
2420:
2421: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Successfully upgraded Element ' || lv_element_name || ' (Element Type ID: ' || p_element_type_id || ').');
2422:
2423: END IF;
2424:
2425: close c_retro_info;

Line 2485: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Successfully upgraded Element ' || lv_element_name || ' (Element Type ID: ' || p_element_type_id || ').');

2481: insert_event_group(ln_ele_business_group_id
2482: ,p_element_type_id
2483: ,ln_event_group_id);
2484:
2485: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Successfully upgraded Element ' || lv_element_name || ' (Element Type ID: ' || p_element_type_id || ').');
2486:
2487: END IF;
2488: CLOSE c_retro_info;
2489:

Line 3685: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Enhanced Retropay Rule Enabled ');

3681: l_leg_rule := pay_au_retro_upgrade.set_retro_leg_rule(p_calling_form => 'UPGRADE');
3682:
3683: IF ( l_leg_rule = 'Y')
3684: THEN
3685: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Enhanced Retropay Rule Enabled ');
3686: pay_au_retro_upgrade.create_enhanced_retro_defn;
3687: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Enhanced Retropay Retro Definitions Created ');
3688: pay_au_retro_upgrade.set_enh_retro_request_group;
3689: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Request Group - programs for Enhanced Retropay added ');

Line 3687: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Enhanced Retropay Retro Definitions Created ');

3683: IF ( l_leg_rule = 'Y')
3684: THEN
3685: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Enhanced Retropay Rule Enabled ');
3686: pay_au_retro_upgrade.create_enhanced_retro_defn;
3687: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Enhanced Retropay Retro Definitions Created ');
3688: pay_au_retro_upgrade.set_enh_retro_request_group;
3689: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Request Group - programs for Enhanced Retropay added ');
3690: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Enhanced Retropay is enabled for the following Australian Business Groups :');
3691:

Line 3689: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Request Group - programs for Enhanced Retropay added ');

3685: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Enhanced Retropay Rule Enabled ');
3686: pay_au_retro_upgrade.create_enhanced_retro_defn;
3687: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Enhanced Retropay Retro Definitions Created ');
3688: pay_au_retro_upgrade.set_enh_retro_request_group;
3689: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Request Group - programs for Enhanced Retropay added ');
3690: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Enhanced Retropay is enabled for the following Australian Business Groups :');
3691:
3692: FOR i IN csr_get_business_group_name /*Bug 5879422 */
3693: LOOP

Line 3690: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Enhanced Retropay is enabled for the following Australian Business Groups :');

3686: pay_au_retro_upgrade.create_enhanced_retro_defn;
3687: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Enhanced Retropay Retro Definitions Created ');
3688: pay_au_retro_upgrade.set_enh_retro_request_group;
3689: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Request Group - programs for Enhanced Retropay added ');
3690: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Enhanced Retropay is enabled for the following Australian Business Groups :');
3691:
3692: FOR i IN csr_get_business_group_name /*Bug 5879422 */
3693: LOOP
3694: fnd_file.put_line(FND_FILE.LOG,' '||to_char(i.ROW_NUM)||') '||i.BUS_GROUP_NAME);

Line 3694: fnd_file.put_line(FND_FILE.LOG,' '||to_char(i.ROW_NUM)||') '||i.BUS_GROUP_NAME);

3690: fnd_file.put_line(FND_FILE.LOG,' MESSAGE: Enhanced Retropay is enabled for the following Australian Business Groups :');
3691:
3692: FOR i IN csr_get_business_group_name /*Bug 5879422 */
3693: LOOP
3694: fnd_file.put_line(FND_FILE.LOG,' '||to_char(i.ROW_NUM)||') '||i.BUS_GROUP_NAME);
3695: END LOOP; /*Bug 5879422 */
3696:
3697: fnd_file.put_line(FND_FILE.LOG,' WARNING: Customers who have enabled Enhanced Retro Pay should note that Retro Pay by Element should no longer be used and should be removed from all customer menus.');/*Bug 5879422 */
3698: ELSE

Line 3697: fnd_file.put_line(FND_FILE.LOG,' WARNING: Customers who have enabled Enhanced Retro Pay should note that Retro Pay by Element should no longer be used and should be removed from all customer menus.');/*Bug 5879422 */

3693: LOOP
3694: fnd_file.put_line(FND_FILE.LOG,' '||to_char(i.ROW_NUM)||') '||i.BUS_GROUP_NAME);
3695: END LOOP; /*Bug 5879422 */
3696:
3697: fnd_file.put_line(FND_FILE.LOG,' WARNING: Customers who have enabled Enhanced Retro Pay should note that Retro Pay by Element should no longer be used and should be removed from all customer menus.');/*Bug 5879422 */
3698: ELSE
3699: fnd_file.put_line(fnd_file.output,' MESSAGE: Enhanced Retropay Rule NOT Enabled ');
3700: END IF;
3701:

Line 3699: fnd_file.put_line(fnd_file.output,' MESSAGE: Enhanced Retropay Rule NOT Enabled ');

3695: END LOOP; /*Bug 5879422 */
3696:
3697: fnd_file.put_line(FND_FILE.LOG,' WARNING: Customers who have enabled Enhanced Retro Pay should note that Retro Pay by Element should no longer be used and should be removed from all customer menus.');/*Bug 5879422 */
3698: ELSE
3699: fnd_file.put_line(fnd_file.output,' MESSAGE: Enhanced Retropay Rule NOT Enabled ');
3700: END IF;
3701:
3702: END enable_au_enhanced_retro;
3703:

Line 3766: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Retro Overlap Rule is enabled.');

3762: FETCH c_retro_rule_check into l_retro_overlap_rule;
3763: CLOSE c_retro_rule_check;
3764:
3765: IF NVL(l_retro_overlap_rule,'Y') = 'N' THEN
3766: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Retro Overlap Rule is enabled.');
3767: ELSE
3768: OPEN csr_exists;
3769: FETCH csr_exists INTO l_exists;
3770: CLOSE csr_exists;

Line 3787: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Retro Overlap Rule is enabled.');

3783: SET RULE_MODE = 'N'
3784: WHERE legislation_code = g_legislation_code
3785: AND rule_type = 'RETRO_OVERLAP';
3786: END IF;
3787: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Retro Overlap Rule is enabled.');
3788: END IF;
3789:
3790: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Retro Overlap Rule is enabled for all AU Business Groups.');
3791: FOR i IN csr_get_business_group_name LOOP

Line 3790: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Retro Overlap Rule is enabled for all AU Business Groups.');

3786: END IF;
3787: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Retro Overlap Rule is enabled.');
3788: END IF;
3789:
3790: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Retro Overlap Rule is enabled for all AU Business Groups.');
3791: FOR i IN csr_get_business_group_name LOOP
3792: fnd_file.put_line(FND_FILE.LOG,' '||to_char(i.ROW_NUM)||') '||i.BG_NAME);
3793: END LOOP;
3794: ELSE

Line 3792: fnd_file.put_line(FND_FILE.LOG,' '||to_char(i.ROW_NUM)||') '||i.BG_NAME);

3788: END IF;
3789:
3790: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Retro Overlap Rule is enabled for all AU Business Groups.');
3791: FOR i IN csr_get_business_group_name LOOP
3792: fnd_file.put_line(FND_FILE.LOG,' '||to_char(i.ROW_NUM)||') '||i.BG_NAME);
3793: END LOOP;
3794: ELSE
3795: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Retro Overlap Rule is NOT enabled. Enhanced Retropay rule must be enabled before Retro Overlap upgrade.');
3796: END IF;

Line 3795: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Retro Overlap Rule is NOT enabled. Enhanced Retropay rule must be enabled before Retro Overlap upgrade.');

3791: FOR i IN csr_get_business_group_name LOOP
3792: fnd_file.put_line(FND_FILE.LOG,' '||to_char(i.ROW_NUM)||') '||i.BG_NAME);
3793: END LOOP;
3794: ELSE
3795: fnd_file.put_line(FND_FILE.LOG,'MESSAGE: Retro Overlap Rule is NOT enabled. Enhanced Retropay rule must be enabled before Retro Overlap upgrade.');
3796: END IF;
3797:
3798: IF g_debug THEN
3799: hr_utility.trace('Leaving '||gv_package_name||lv_procedure_name);

Line 3803: fnd_file.put_line(FND_FILE.LOG,gv_package_name||lv_procedure_name);

3799: hr_utility.trace('Leaving '||gv_package_name||lv_procedure_name);
3800: END IF;
3801:
3802: EXCEPTION WHEN others THEN
3803: fnd_file.put_line(FND_FILE.LOG,gv_package_name||lv_procedure_name);
3804: fnd_file.put_line(FND_FILE.LOG,'ERROR:' || sqlcode ||'-'|| substr(sqlerrm,1,80));
3805: RAISE;
3806:
3807: END enable_au_retro_overlap;

Line 3804: fnd_file.put_line(FND_FILE.LOG,'ERROR:' || sqlcode ||'-'|| substr(sqlerrm,1,80));

3800: END IF;
3801:
3802: EXCEPTION WHEN others THEN
3803: fnd_file.put_line(FND_FILE.LOG,gv_package_name||lv_procedure_name);
3804: fnd_file.put_line(FND_FILE.LOG,'ERROR:' || sqlcode ||'-'|| substr(sqlerrm,1,80));
3805: RAISE;
3806:
3807: END enable_au_retro_overlap;
3808: