DBA Data[Home] [Help]

APPS.PER_FR_MEDICAL_EXAMS_UPG_PKG dependencies on PER_FR_UPGRADE_DATA_PKG

Line 43: per_fr_upgrade_data_pkg.write_log(p_medical_exam.employee_number);

39: ********************************************************************************/
40: procedure write_medical_exam_to_log(p_medical_exam in csr_medic_exam%ROWTYPE)
41: IS
42: BEGIN
43: per_fr_upgrade_data_pkg.write_log(p_medical_exam.employee_number);
44: /* added script to print all medical assessment information to log*/
45: per_fr_upgrade_data_pkg.write_log(p_medical_exam.full_name);
46: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION1);
47: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION2);

Line 45: per_fr_upgrade_data_pkg.write_log(p_medical_exam.full_name);

41: IS
42: BEGIN
43: per_fr_upgrade_data_pkg.write_log(p_medical_exam.employee_number);
44: /* added script to print all medical assessment information to log*/
45: per_fr_upgrade_data_pkg.write_log(p_medical_exam.full_name);
46: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION1);
47: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION2);
48: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION3);
49: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION4);

Line 46: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION1);

42: BEGIN
43: per_fr_upgrade_data_pkg.write_log(p_medical_exam.employee_number);
44: /* added script to print all medical assessment information to log*/
45: per_fr_upgrade_data_pkg.write_log(p_medical_exam.full_name);
46: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION1);
47: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION2);
48: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION3);
49: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION4);
50: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION5);

Line 47: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION2);

43: per_fr_upgrade_data_pkg.write_log(p_medical_exam.employee_number);
44: /* added script to print all medical assessment information to log*/
45: per_fr_upgrade_data_pkg.write_log(p_medical_exam.full_name);
46: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION1);
47: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION2);
48: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION3);
49: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION4);
50: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION5);
51: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION6);

Line 48: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION3);

44: /* added script to print all medical assessment information to log*/
45: per_fr_upgrade_data_pkg.write_log(p_medical_exam.full_name);
46: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION1);
47: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION2);
48: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION3);
49: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION4);
50: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION5);
51: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION6);
52: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION7);

Line 49: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION4);

45: per_fr_upgrade_data_pkg.write_log(p_medical_exam.full_name);
46: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION1);
47: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION2);
48: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION3);
49: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION4);
50: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION5);
51: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION6);
52: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION7);
53: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION8);

Line 50: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION5);

46: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION1);
47: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION2);
48: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION3);
49: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION4);
50: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION5);
51: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION6);
52: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION7);
53: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION8);
54:

Line 51: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION6);

47: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION2);
48: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION3);
49: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION4);
50: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION5);
51: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION6);
52: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION7);
53: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION8);
54:
55: END write_medical_exam_to_log;

Line 52: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION7);

48: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION3);
49: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION4);
50: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION5);
51: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION6);
52: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION7);
53: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION8);
54:
55: END write_medical_exam_to_log;
56:

Line 53: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION8);

49: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION4);
50: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION5);
51: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION6);
52: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION7);
53: per_fr_upgrade_data_pkg.write_log(p_medical_exam.PEI_INFORMATION8);
54:
55: END write_medical_exam_to_log;
56:
57: /***********************************************************************

Line 86: per_fr_upgrade_data_pkg.write_log_message(p_message_name => 'PER_74996_MED_DATE_DFLT',

82:
83: WHILE csr_medic_exam%FOUND LOOP
84:
85: if l_medical_exam.PEI_INFORMATION1 is NULL then
86: per_fr_upgrade_data_pkg.write_log_message(p_message_name => 'PER_74996_MED_DATE_DFLT',
87: p_token1 => 'EMPLOYEE:'|| l_medical_exam.employee_number);
88: l_consultation_date :=to_date('01010001','DDMMYYYY');
89: if l_run_status = 0 THEN /* only change status if not 1 or 2 already */
90: l_run_status := 1; -- Set status of run to warning.

Line 101: per_fr_upgrade_data_pkg.write_log_message(p_message_name => 'PER_74997_MED_NDATE_DFLT',

97: l_next_consultation_date := fnd_date.canonical_to_date(l_medical_exam.PEI_INFORMATION8);
98:
99: if l_next_consultation_date <= l_consultation_date then
100: -- Next consultation date must be after consultation date. Other set to NULL.
101: per_fr_upgrade_data_pkg.write_log_message(p_message_name => 'PER_74997_MED_NDATE_DFLT',
102: p_token1 => 'EMPLOYEE:'|| l_medical_exam.employee_number);
103: l_next_consultation_date := NULL;
104: if l_run_status = 0 THEN /* only change status if not 1 or 2 already */
105: l_run_status := 1; -- Set status of run to warning.

Line 111: per_fr_upgrade_data_pkg.write_log_message(p_message_name => 'PER_74998_MED_TYPE_DFLT',

107: END IF;
108:
109: if l_medical_exam.PEI_INFORMATION2 IS NULL then
110: l_consultation_type := 'UNKNOWN';
111: per_fr_upgrade_data_pkg.write_log_message(p_message_name => 'PER_74998_MED_TYPE_DFLT',
112: p_token1 => 'EMPLOYEE:'|| l_medical_exam.employee_number);
113: if l_run_status = 0 THEN /* only change status if not 1 or 2 already */
114: l_run_status := 1; -- Set status of run to warning.
115: end if;

Line 147: per_fr_upgrade_data_pkg.write_log_message(p_message_name => 'PER_74999_MED_UPG_FATAL'

143: and PERSON_EXTRA_INFO_ID = l_medical_exam.PERSON_EXTRA_INFO_ID;
144:
145: exception when others then
146: rollback to start_insert;
147: per_fr_upgrade_data_pkg.write_log_message(p_message_name => 'PER_74999_MED_UPG_FATAL'
148: ,p_token1 => 'TOKEN1:10');
149: write_medical_exam_to_log(l_medical_exam);
150: per_fr_upgrade_data_pkg.write_log(sqlcode);
151: per_fr_upgrade_data_pkg.write_log(sqlerrm);

Line 150: per_fr_upgrade_data_pkg.write_log(sqlcode);

146: rollback to start_insert;
147: per_fr_upgrade_data_pkg.write_log_message(p_message_name => 'PER_74999_MED_UPG_FATAL'
148: ,p_token1 => 'TOKEN1:10');
149: write_medical_exam_to_log(l_medical_exam);
150: per_fr_upgrade_data_pkg.write_log(sqlcode);
151: per_fr_upgrade_data_pkg.write_log(sqlerrm);
152: l_run_status := 2; /* Fatal Error */
153: END; -- end of section inserting new medical exam
154:

Line 151: per_fr_upgrade_data_pkg.write_log(sqlerrm);

147: per_fr_upgrade_data_pkg.write_log_message(p_message_name => 'PER_74999_MED_UPG_FATAL'
148: ,p_token1 => 'TOKEN1:10');
149: write_medical_exam_to_log(l_medical_exam);
150: per_fr_upgrade_data_pkg.write_log(sqlcode);
151: per_fr_upgrade_data_pkg.write_log(sqlerrm);
152: l_run_status := 2; /* Fatal Error */
153: END; -- end of section inserting new medical exam
154:
155:

Line 168: per_fr_upgrade_data_pkg.write_log_message(p_message_name => 'PER_74999_MED_UPG_FATAL'

164:
165: exception when others then
166: rollback;
167: CLOSE csr_medic_exam;
168: per_fr_upgrade_data_pkg.write_log_message(p_message_name => 'PER_74999_MED_UPG_FATAL'
169: ,p_token1 => 'TOKEN1:50');
170: per_fr_upgrade_data_pkg.write_log(sqlcode);
171: per_fr_upgrade_data_pkg.write_log(sqlerrm);
172: return 2; /* Fatal Error */

Line 170: per_fr_upgrade_data_pkg.write_log(sqlcode);

166: rollback;
167: CLOSE csr_medic_exam;
168: per_fr_upgrade_data_pkg.write_log_message(p_message_name => 'PER_74999_MED_UPG_FATAL'
169: ,p_token1 => 'TOKEN1:50');
170: per_fr_upgrade_data_pkg.write_log(sqlcode);
171: per_fr_upgrade_data_pkg.write_log(sqlerrm);
172: return 2; /* Fatal Error */
173: END transfer_data;
174:

Line 171: per_fr_upgrade_data_pkg.write_log(sqlerrm);

167: CLOSE csr_medic_exam;
168: per_fr_upgrade_data_pkg.write_log_message(p_message_name => 'PER_74999_MED_UPG_FATAL'
169: ,p_token1 => 'TOKEN1:50');
170: per_fr_upgrade_data_pkg.write_log(sqlcode);
171: per_fr_upgrade_data_pkg.write_log(sqlerrm);
172: return 2; /* Fatal Error */
173: END transfer_data;
174:
175:

Line 179: * per_fr_upgrade_data_pkg.run_upgrade *

175:
176: /***********************************************************************
177: * function RUN_UPGRADE *
178: * This fucntion must be called from *
179: * per_fr_upgrade_data_pkg.run_upgrade *
180: * return = 0 for Status Normal *
181: * return = 1 for Status Warning *
182: * return = 2 for Status Error *
183: ***********************************************************************/

Line 189: l_status := per_fr_upgrade_data_pkg.check_lookups(p_fr_lookup_type => 'FR_MEDICAL_EXAMINATION_TYPE'

185: IS
186: l_status number :=0;
187: l_error_status number :=0;
188: begin
189: l_status := per_fr_upgrade_data_pkg.check_lookups(p_fr_lookup_type => 'FR_MEDICAL_EXAMINATION_TYPE'
190: ,p_core_lookup_type => 'CONSULTATION_TYPE');
191:
192: l_error_status := l_status;
193:

Line 194: l_status := per_fr_upgrade_data_pkg.check_lookups(p_fr_lookup_type => 'FR_MEDICAL_RESULT'

190: ,p_core_lookup_type => 'CONSULTATION_TYPE');
191:
192: l_error_status := l_status;
193:
194: l_status := per_fr_upgrade_data_pkg.check_lookups(p_fr_lookup_type => 'FR_MEDICAL_RESULT'
195: ,p_core_lookup_type => 'CONSULTATION_RESULT');
196:
197: if l_status > 0 then
198: l_error_status := l_status;

Line 202: l_status := per_fr_upgrade_data_pkg.check_dfs(p_df => 'PER_MEDICAL_ASSESSMENTS');

198: l_error_status := l_status;
199: end if;
200:
201: /* Lookups checked, Check for DF*/
202: l_status := per_fr_upgrade_data_pkg.check_dfs(p_df => 'PER_MEDICAL_ASSESSMENTS');
203:
204: if l_status > 0 then
205: l_error_status := l_status;
206: end if;