DBA Data[Home] [Help]

APPS.PER_SUCC_MGMT_MIGRATION_PKG dependencies on FND_FILE

Line 16: fnd_file.put_line(fnd_file.log,'Oracle Succession Management is not licensed. No need of running the migration program. Exiting.');

12: AND pei.information_type = 'PER_SUCCESSION_PLANNING');
13: l_data_exist VARCHAR2(10);
14: BEGIN
15: IF NVL(fnd_profile.value('HR_SUCCESSION_MGMT_LICENSED'),'N') = 'N' THEN
16: fnd_file.put_line(fnd_file.log,'Oracle Succession Management is not licensed. No need of running the migration program. Exiting.');
17: retcode := 2;
18: END IF;
19: OPEN csr_chk_eit(p_business_group_id);
20: FETCH csr_chk_eit INTO l_data_exist;

Line 22: fnd_file.put_line(fnd_file.log,'Data Exist in EIT PER_SUCCESSION_PLANNING. Continue with migration');

18: END IF;
19: OPEN csr_chk_eit(p_business_group_id);
20: FETCH csr_chk_eit INTO l_data_exist;
21: IF csr_chk_eit%FOUND THEN
22: fnd_file.put_line(fnd_file.log,'Data Exist in EIT PER_SUCCESSION_PLANNING. Continue with migration');
23: ELSE
24: fnd_file.put_line(fnd_file.log,'No data is entered in the EIT PER_SUCCESSION_PLANNING. Nothing to migrate.Exiting.');
25: retcode := 1;
26: END IF;

Line 24: fnd_file.put_line(fnd_file.log,'No data is entered in the EIT PER_SUCCESSION_PLANNING. Nothing to migrate.Exiting.');

20: FETCH csr_chk_eit INTO l_data_exist;
21: IF csr_chk_eit%FOUND THEN
22: fnd_file.put_line(fnd_file.log,'Data Exist in EIT PER_SUCCESSION_PLANNING. Continue with migration');
23: ELSE
24: fnd_file.put_line(fnd_file.log,'No data is entered in the EIT PER_SUCCESSION_PLANNING. Nothing to migrate.Exiting.');
25: retcode := 1;
26: END IF;
27: CLOSE csr_chk_eit;
28: END check_migration_required;

Line 72: fnd_file.put_line(fnd_file.log,'Lookup codes not mapped from PER_SUCC_PLAN_POTENTIAL to READINESS_LEVEL are listed below.');

68: FOR i IN csr_suc_potential(p_business_group_id)
69: LOOP
70: retcode := 1;
71: IF counter = 0 THEN
72: fnd_file.put_line(fnd_file.log,'Lookup codes not mapped from PER_SUCC_PLAN_POTENTIAL to READINESS_LEVEL are listed below.');
73: fnd_file.put_line(fnd_file.log,'-----------------------------------------------------------------------------------------');
74: END IF;
75: fnd_file.put_line(fnd_file.log, i.lookup_code||'-'||i.meaning);
76: counter := counter +1;

Line 73: fnd_file.put_line(fnd_file.log,'-----------------------------------------------------------------------------------------');

69: LOOP
70: retcode := 1;
71: IF counter = 0 THEN
72: fnd_file.put_line(fnd_file.log,'Lookup codes not mapped from PER_SUCC_PLAN_POTENTIAL to READINESS_LEVEL are listed below.');
73: fnd_file.put_line(fnd_file.log,'-----------------------------------------------------------------------------------------');
74: END IF;
75: fnd_file.put_line(fnd_file.log, i.lookup_code||'-'||i.meaning);
76: counter := counter +1;
77: END LOOP;

Line 75: fnd_file.put_line(fnd_file.log, i.lookup_code||'-'||i.meaning);

71: IF counter = 0 THEN
72: fnd_file.put_line(fnd_file.log,'Lookup codes not mapped from PER_SUCC_PLAN_POTENTIAL to READINESS_LEVEL are listed below.');
73: fnd_file.put_line(fnd_file.log,'-----------------------------------------------------------------------------------------');
74: END IF;
75: fnd_file.put_line(fnd_file.log, i.lookup_code||'-'||i.meaning);
76: counter := counter +1;
77: END LOOP;
78: fnd_file.put_line(fnd_file.log,'-----------------------------------------------------------------------------------------');
79: counter := 0;

Line 78: fnd_file.put_line(fnd_file.log,'-----------------------------------------------------------------------------------------');

74: END IF;
75: fnd_file.put_line(fnd_file.log, i.lookup_code||'-'||i.meaning);
76: counter := counter +1;
77: END LOOP;
78: fnd_file.put_line(fnd_file.log,'-----------------------------------------------------------------------------------------');
79: counter := 0;
80: FOR i IN csr_risk_of_loss(p_business_group_id)
81: LOOP
82: retcode := 1;

Line 84: fnd_file.put_line(fnd_file.log,'Lookup codes not mapped from PER_SUCC_PLAN_RISK_LEVEL to PER_RETENTION_POTENTIAL are listed below.');

80: FOR i IN csr_risk_of_loss(p_business_group_id)
81: LOOP
82: retcode := 1;
83: IF counter = 0 THEN
84: fnd_file.put_line(fnd_file.log,'Lookup codes not mapped from PER_SUCC_PLAN_RISK_LEVEL to PER_RETENTION_POTENTIAL are listed below.');
85: fnd_file.put_line(fnd_file.log,'-----------------------------------------------------------------------------------------');
86: END IF;
87: fnd_file.put_line(fnd_file.log, i.lookup_code||'-'||i.meaning);
88: counter := counter +1;

Line 85: fnd_file.put_line(fnd_file.log,'-----------------------------------------------------------------------------------------');

81: LOOP
82: retcode := 1;
83: IF counter = 0 THEN
84: fnd_file.put_line(fnd_file.log,'Lookup codes not mapped from PER_SUCC_PLAN_RISK_LEVEL to PER_RETENTION_POTENTIAL are listed below.');
85: fnd_file.put_line(fnd_file.log,'-----------------------------------------------------------------------------------------');
86: END IF;
87: fnd_file.put_line(fnd_file.log, i.lookup_code||'-'||i.meaning);
88: counter := counter +1;
89: END LOOP;

Line 87: fnd_file.put_line(fnd_file.log, i.lookup_code||'-'||i.meaning);

83: IF counter = 0 THEN
84: fnd_file.put_line(fnd_file.log,'Lookup codes not mapped from PER_SUCC_PLAN_RISK_LEVEL to PER_RETENTION_POTENTIAL are listed below.');
85: fnd_file.put_line(fnd_file.log,'-----------------------------------------------------------------------------------------');
86: END IF;
87: fnd_file.put_line(fnd_file.log, i.lookup_code||'-'||i.meaning);
88: counter := counter +1;
89: END LOOP;
90: fnd_file.put_line(fnd_file.log,'-----------------------------------------------------------------------------------------');
91: END check_lookup_mappings;

Line 90: fnd_file.put_line(fnd_file.log,'-----------------------------------------------------------------------------------------');

86: END IF;
87: fnd_file.put_line(fnd_file.log, i.lookup_code||'-'||i.meaning);
88: counter := counter +1;
89: END LOOP;
90: fnd_file.put_line(fnd_file.log,'-----------------------------------------------------------------------------------------');
91: END check_lookup_mappings;
92: --
93: --
94: PROCEDURE migrate_lookup_data(p_business_group_id IN NUMBER) IS

Line 131: fnd_file.put_line(fnd_file.log,'Error while migrating the data to new EIT Structure');

127: ,p_person_extra_info_id => l_person_extra_info_id
128: ,p_object_version_number => l_ovn);
129: END LOOP;
130: EXCEPTION WHEN OTHERS THEN
131: fnd_file.put_line(fnd_file.log,'Error while migrating the data to new EIT Structure');
132: rollback;
133: RAISE;
134: END migrate_lookup_data;
135: --

Line 153: fnd_file.put_line(fnd_file.log,'Error while completing the migation of EIT Data for Succession Management');

149: EXCEPTION
150: WHEN OTHERS THEN
151: Rollback;
152: retcode := 2;
153: fnd_file.put_line(fnd_file.log,'Error while completing the migation of EIT Data for Succession Management');
154: fnd_file.put_line(fnd_file.log,'ERROR: '||SQLERRM);
155: END migrate_succ_plan_eit;
156: END per_succ_mgmt_migration_pkg;

Line 154: fnd_file.put_line(fnd_file.log,'ERROR: '||SQLERRM);

150: WHEN OTHERS THEN
151: Rollback;
152: retcode := 2;
153: fnd_file.put_line(fnd_file.log,'Error while completing the migation of EIT Data for Succession Management');
154: fnd_file.put_line(fnd_file.log,'ERROR: '||SQLERRM);
155: END migrate_succ_plan_eit;
156: END per_succ_mgmt_migration_pkg;