1319: p_return_status := fnd_api.g_ret_sts_success;
1320: EXCEPTION
1321: WHEN DIVIDE_BY_ZERO THEN
1322: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', ' DETERMINE_ENC_AMOUNT ');
1323: fnd_file.put_line(fnd_file.log, fnd_number.number_to_canonical(l_proc_step) || ': ' || l_proc_name);
1324: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ' || l_proc_name);
1325: p_return_status := fnd_api.g_ret_sts_unexp_error;
1326: WHEN OTHERS THEN
1327: IF (g_error_message IS NULL) THEN
1320: EXCEPTION
1321: WHEN DIVIDE_BY_ZERO THEN
1322: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', ' DETERMINE_ENC_AMOUNT ');
1323: fnd_file.put_line(fnd_file.log, fnd_number.number_to_canonical(l_proc_step) || ': ' || l_proc_name);
1324: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ' || l_proc_name);
1325: p_return_status := fnd_api.g_ret_sts_unexp_error;
1326: WHEN OTHERS THEN
1327: IF (g_error_message IS NULL) THEN
1328: g_error_message := l_proc_name || ': ' || SQLERRM;
1327: IF (g_error_message IS NULL) THEN
1328: g_error_message := l_proc_name || ': ' || SQLERRM;
1329: END IF;
1330: fnd_msg_pub.add_exc_msg('PSP', 'DETERMINE_ENC_AMOUNT');
1331: fnd_file.put_line(fnd_file.log, fnd_number.number_to_canonical(l_proc_step) || ': ' || l_proc_name);
1332: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ' || l_proc_name);
1333: p_return_status := fnd_api.g_ret_sts_unexp_error;
1334: END determine_enc_amount;
1335: -- End of changes for bug fix 3488734
1328: g_error_message := l_proc_name || ': ' || SQLERRM;
1329: END IF;
1330: fnd_msg_pub.add_exc_msg('PSP', 'DETERMINE_ENC_AMOUNT');
1331: fnd_file.put_line(fnd_file.log, fnd_number.number_to_canonical(l_proc_step) || ': ' || l_proc_name);
1332: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ' || l_proc_name);
1333: p_return_status := fnd_api.g_ret_sts_unexp_error;
1334: END determine_enc_amount;
1335: -- End of changes for bug fix 3488734
1336:
1759: fnd_message.set_token('END_DATE', t_poeta_gl_hier_array(i).r_enc_end_date);
1760: fnd_message.set_token('EFFECTIVE_DATE', l_poeta_end_date);
1761: END IF;
1762: g_error_message := fnd_message.get;
1763: fnd_file.put_line(fnd_file.log, g_error_message);
1764: RAISE SUSPENSE_AC_INVALID;
1765: END IF;
1766:
1767: IF ((t_poeta_gl_hier_array(I).r_enc_start_date <= g_enc_org_end_date) AND
1950: fnd_message.set_token('END_DATE', t_poeta_gl_hier_array(i).r_enc_end_date);
1951: fnd_message.set_token('EFFECTIVE_DATE', l_poeta_end_date);
1952: END IF;
1953: g_error_message := fnd_message.get;
1954: fnd_file.put_line(fnd_file.log, g_error_message);
1955: RAISE SUSPENSE_AC_INVALID;
1956: END IF;
1957:
1958: IF ((t_poeta_gl_hier_array(I).r_enc_start_date <= g_enc_org_end_date) AND
3135: EXCEPTION
3136: WHEN suspense_autopop_failed THEN
3137: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'CREATE_LINES ');
3138: p_return_status := fnd_api.g_ret_sts_unexp_error;
3139: fnd_file.put_line(fnd_file.log, 'l_reason_code: ' || l_reason_code);
3140: fnd_file.put_line(fnd_file.log, fnd_number.number_to_canonical(l_proc_step) || ': ' || l_proc_name);
3141: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ' || l_proc_name);
3142: WHEN OTHERS THEN
3143: IF (g_error_message IS NULL) THEN
3136: WHEN suspense_autopop_failed THEN
3137: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'CREATE_LINES ');
3138: p_return_status := fnd_api.g_ret_sts_unexp_error;
3139: fnd_file.put_line(fnd_file.log, 'l_reason_code: ' || l_reason_code);
3140: fnd_file.put_line(fnd_file.log, fnd_number.number_to_canonical(l_proc_step) || ': ' || l_proc_name);
3141: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ' || l_proc_name);
3142: WHEN OTHERS THEN
3143: IF (g_error_message IS NULL) THEN
3144: g_error_message := l_proc_name || ': ' || SQLERRM;
3137: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'CREATE_LINES ');
3138: p_return_status := fnd_api.g_ret_sts_unexp_error;
3139: fnd_file.put_line(fnd_file.log, 'l_reason_code: ' || l_reason_code);
3140: fnd_file.put_line(fnd_file.log, fnd_number.number_to_canonical(l_proc_step) || ': ' || l_proc_name);
3141: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ' || l_proc_name);
3142: WHEN OTHERS THEN
3143: IF (g_error_message IS NULL) THEN
3144: g_error_message := l_proc_name || ': ' || SQLERRM;
3145: END IF;
3144: g_error_message := l_proc_name || ': ' || SQLERRM;
3145: END IF;
3146: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'CREATE_LINES');
3147: p_return_status := fnd_api.g_ret_sts_unexp_error;
3148: fnd_file.put_line(fnd_file.log, fnd_number.number_to_canonical(l_proc_step) || ': ' || l_proc_name);
3149: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ' || l_proc_name);
3150: END create_lines;
3151:
3152: ---------------------- I N S E R T S T A T E M E N T ------------------------------------
3145: END IF;
3146: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'CREATE_LINES');
3147: p_return_status := fnd_api.g_ret_sts_unexp_error;
3148: fnd_file.put_line(fnd_file.log, fnd_number.number_to_canonical(l_proc_step) || ': ' || l_proc_name);
3149: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ' || l_proc_name);
3150: END create_lines;
3151:
3152: ---------------------- I N S E R T S T A T E M E N T ------------------------------------
3153: PROCEDURE insert_into_enc_lines(
6340: END IF;
6341: g_error_api_path := SUBSTR(' SUB_SLICE_ASG_CHUNK:'||g_error_api_path,1,230);
6342: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', ' SUB_SLICE_ASG_CHUNK');
6343: p_return_status := fnd_api.g_ret_sts_unexp_error;
6344: fnd_file.put_line(fnd_file.log, fnd_number.number_to_canonical(l_proc_step) || ': ' || l_proc_name);
6345: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ' || l_proc_name);
6346: END sub_slice_asg_chunk;
6347: -- End of bug fix 3462452
6348:
6341: g_error_api_path := SUBSTR(' SUB_SLICE_ASG_CHUNK:'||g_error_api_path,1,230);
6342: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', ' SUB_SLICE_ASG_CHUNK');
6343: p_return_status := fnd_api.g_ret_sts_unexp_error;
6344: fnd_file.put_line(fnd_file.log, fnd_number.number_to_canonical(l_proc_step) || ': ' || l_proc_name);
6345: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ' || l_proc_name);
6346: END sub_slice_asg_chunk;
6347: -- End of bug fix 3462452
6348:
6349: PROCEDURE cel_init(p_payroll_action_id IN NUMBER) IS
6353: -- spc_track_cel('Init', NULL, 'End');
6354: EXCEPTION
6355: WHEN OTHERS THEN
6356: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'CEL_INIT: SQLCODE: ' || fnd_number.number_to_canonical(SQLCODE) || ' SQLERRM: ' || SQLERRM);
6357: psp_message_s.print_error(p_mode => FND_FILE.LOG,
6358: p_print_header => FND_API.G_TRUE);
6359: END cel_init;
6360:
6361: PROCEDURE cel_range_code (pactid IN NUMBER,
6461:
6462: IF (SQL%ROWCOUNT = 0) THEN
6463: fnd_message.set_name('PSP', 'PSP_ENC_NO_LIN_UPD');
6464: g_warning_message := fnd_message.get;
6465: fnd_file.put_line(fnd_file.log, g_warning_message);
6466: psp_general.add_report_error
6467: (p_request_id => l_request_id,
6468: p_message_level => 'N',
6469: p_source_id => NULL,
6477: hr_utility.trace(fnd_date.date_to_canonical(SYSDATE) || ' sqlstr: ' || sqlstr);
6478: hr_utility.trace(fnd_date.date_to_canonical(SYSDATE) || ' Leaving CEL_RANGE_CODE pactid: ' || pactid);
6479: EXCEPTION
6480: WHEN NO_UPDATE_REC_FOUND THEN
6481: psp_message_s.print_error (p_mode => FND_FILE.LOG, p_print_header => FND_API.G_FALSE);
6482: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving CEL_RANGE_CODE pactid: ' || pactid);
6483: WHEN OTHERS THEN
6484: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'CEL_RANGE_CODE: SQLCODE: ' || fnd_number.number_to_canonical(SQLCODE) || ' SQLERRM: ' || SQLERRM);
6485: psp_message_s.print_error(p_mode => FND_FILE.LOG,
6478: hr_utility.trace(fnd_date.date_to_canonical(SYSDATE) || ' Leaving CEL_RANGE_CODE pactid: ' || pactid);
6479: EXCEPTION
6480: WHEN NO_UPDATE_REC_FOUND THEN
6481: psp_message_s.print_error (p_mode => FND_FILE.LOG, p_print_header => FND_API.G_FALSE);
6482: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving CEL_RANGE_CODE pactid: ' || pactid);
6483: WHEN OTHERS THEN
6484: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'CEL_RANGE_CODE: SQLCODE: ' || fnd_number.number_to_canonical(SQLCODE) || ' SQLERRM: ' || SQLERRM);
6485: psp_message_s.print_error(p_mode => FND_FILE.LOG,
6486: p_print_header => FND_API.G_TRUE);
6481: psp_message_s.print_error (p_mode => FND_FILE.LOG, p_print_header => FND_API.G_FALSE);
6482: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving CEL_RANGE_CODE pactid: ' || pactid);
6483: WHEN OTHERS THEN
6484: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'CEL_RANGE_CODE: SQLCODE: ' || fnd_number.number_to_canonical(SQLCODE) || ' SQLERRM: ' || SQLERRM);
6485: psp_message_s.print_error(p_mode => FND_FILE.LOG,
6486: p_print_header => FND_API.G_TRUE);
6487: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving CEL_RANGE_CODE pactid: ' || pactid);
6488: END cel_range_code;
6489:
6483: WHEN OTHERS THEN
6484: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'CEL_RANGE_CODE: SQLCODE: ' || fnd_number.number_to_canonical(SQLCODE) || ' SQLERRM: ' || SQLERRM);
6485: psp_message_s.print_error(p_mode => FND_FILE.LOG,
6486: p_print_header => FND_API.G_TRUE);
6487: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving CEL_RANGE_CODE pactid: ' || pactid);
6488: END cel_range_code;
6489:
6490: PROCEDURE cel_asg_action_code (p_pactid IN NUMBER,
6491: start_asg IN NUMBER,
6961: cel_warnings.percent.DELETE;
6962: END log_cel_warnings;
6963: BEGIN
6964: SAVEPOINT CEL_ARCHIVE;
6965: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Entering CEL_ARCHIVE (payroll_action_id: ' || p_payroll_action_id || ' chunk_number: ' || p_chunk_number ||')');
6966:
6967: l_set_of_books_id := FND_PROFILE.VALUE('GL_SET_OF_BKS_ID');
6968: l_business_group_id := FND_PROFILE.VALUE('PER_BUSINESS_GROUP_ID');
6969: g_set_of_books_id := l_set_of_books_id;
7047: OPEN get_payroll_asg_cur;
7048: FETCH get_payroll_asg_cur BULK COLLECT INTO t_assignments.payroll_array, t_assignments.asg_array, t_assignments.term_date_array;
7049: CLOSE get_payroll_asg_cur;
7050:
7051: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' t_assignments.asg_array.COUNT: ' || t_assignments.asg_array.COUNT);
7052: FOR recno IN 1 ..t_assignments.asg_array.COUNT
7053: LOOP
7054: l_assignment_id := t_assignments.asg_array(recno);
7055: l_payroll_id := t_assignments.payroll_array(recno);
7133: p_return_status => l_return_status);
7134: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7135: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7136: END IF;
7137: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Completed create_lines for l_assignment_id: ' || l_assignment_id || ' payroll_id: ' || l_payroll_id || ' element_type_id: ' || l_element_type_id);
7138: log_cel_warnings;
7139: END IF;
7140: END IF;
7141: IF (g_employee_hours = 'Y') THEN
7182: p_return_status => l_return_status);
7183: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7184: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7185: END IF;
7186: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Completed create_lines for l_assignment_id: ' || l_assignment_id || ' payroll_id: ' || l_payroll_id || ' element_type_id: ' || l_element_type_id);
7187: log_cel_warnings;
7188: END IF;
7189: END IF;
7190: END IF;
7191:
7192: END LOOP;
7193:
7194: IF (earnings_element_cur%ROWCOUNT = 0) THEN
7195: fnd_file.put_line(fnd_file.log, 'No element found for encumbrance.');
7196: END IF;
7197: CLOSE earnings_element_cur;
7198:
7199: hr_utility.trace(fnd_date.date_to_canonical(SYSDATE) || ' t_enc_lines_array.r_enc_element_type_id.COUNT: ' || t_enc_lines_array.r_enc_element_type_id.COUNT);
7350:
7351: t_assignments.payroll_array.delete;
7352: t_assignments.asg_array.delete;
7353:
7354: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving CEL_ARCHIVE (payroll_action_id: ' || p_payroll_action_id || ' chunk_number: ' || p_chunk_number ||')');
7355: EXCEPTION
7356: WHEN OTHERS THEN
7357: log_cel_warnings;
7358: IF (g_error_message IS NOT NULL) THEN
7408: p_return_status => l_return_status);
7409: END IF;
7410: END IF;
7411: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'CEL_ARCHIVE: SQLCODE: ' || fnd_number.number_to_canonical(SQLCODE) || ' SQLERRM: ' || SQLERRM);
7412: psp_message_s.print_error(p_mode => FND_FILE.LOG, p_print_header => FND_API.G_TRUE);
7413: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving CEL_ARCHIVE (payroll_action_id: ' || p_payroll_action_id || ' chunk_number: ' || p_chunk_number ||')');
7414: ROLLBACK TO CEL_ARCHIVE;
7415: RAISE;
7416: END cel_archive;
7409: END IF;
7410: END IF;
7411: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'CEL_ARCHIVE: SQLCODE: ' || fnd_number.number_to_canonical(SQLCODE) || ' SQLERRM: ' || SQLERRM);
7412: psp_message_s.print_error(p_mode => FND_FILE.LOG, p_print_header => FND_API.G_TRUE);
7413: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving CEL_ARCHIVE (payroll_action_id: ' || p_payroll_action_id || ' chunk_number: ' || p_chunk_number ||')');
7414: ROLLBACK TO CEL_ARCHIVE;
7415: RAISE;
7416: END cel_archive;
7417:
7459: FROM psp_enc_summary_lines
7460: WHERE payroll_action_id = p_payroll_action_id
7461: AND status_code = 'N';
7462: BEGIN
7463: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Entering CEL_DEINIT payroll_action_id: ' || p_payroll_action_id);
7464: l_last_update_date := SYSDATE;
7465: l_last_updated_by:= NVL(FND_GLOBAL.USER_ID, -1);
7466: l_request_id := fnd_global.conc_request_id;
7467:
7479: FETCH error_check_cur INTO l_error_count;
7480: CLOSE error_check_cur;
7481:
7482: IF (l_error_count > 0) THEN
7483: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Create and Update Encumbrance process has errors. Please review the Run Results Report for more details.');
7484: l_business_group_id := fnd_profile.value('PER_BUSINESS_GROUP_ID');
7485: l_set_of_books_id := fnd_profile.value('GL_SET_OF_BKS_ID');
7486: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Before submitting Encumbrance Run Results Report');
7487: l_xml_layout := fnd_request.add_layout('PSP','PSPENRSRTF','en','US','PDF');
7482: IF (l_error_count > 0) THEN
7483: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Create and Update Encumbrance process has errors. Please review the Run Results Report for more details.');
7484: l_business_group_id := fnd_profile.value('PER_BUSINESS_GROUP_ID');
7485: l_set_of_books_id := fnd_profile.value('GL_SET_OF_BKS_ID');
7486: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Before submitting Encumbrance Run Results Report');
7487: l_xml_layout := fnd_request.add_layout('PSP','PSPENRSRTF','en','US','PDF');
7488: l_request_id := fnd_request.submit_request('PSP',
7489: 'PSPENRSLT',
7490: '',
7495: TO_CHAR(l_business_group_id),
7496: TO_CHAR(l_set_of_books_id));
7497:
7498: IF l_request_id = 0 THEN
7499: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Encumbrance Run Results Report submission failed');
7500: fnd_message.set_name('PSP','PSP_TR_GL_IMP_FAILED');
7501: fnd_msg_pub.add;
7502: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7503: END IF;
7539:
7540: fnd_stats.gather_table_stats('PSP', 'PSP_ENC_CONTROLS');
7541: fnd_stats.gather_table_stats('PSP', 'PSP_ENC_LINES');
7542: fnd_stats.gather_table_stats('PSP', 'PSP_ENC_SUMMARY_LINES');
7543: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Completed Gather Statistics');
7544:
7545: DELETE FROM psp_enc_controls pec
7546: WHERE pec.payroll_action_id = p_payroll_action_id
7547: AND NOT EXISTS (SELECT 1
7546: WHERE pec.payroll_action_id = p_payroll_action_id
7547: AND NOT EXISTS (SELECT 1
7548: FROM psp_enc_lines pel
7549: WHERE pel.enc_control_id = pec.enc_control_id);
7550: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted lines in psp_enc_controls which doesnt have a line in psp_enc_lines');
7551:
7552: UPDATE psp_enc_controls pec
7553: SET (action_code,
7554: number_of_dr, number_of_cr,
7564: SUM(fnd_number.canonical_to_number(DECODE(pel.gl_project_flag, 'P', DECODE(pel.dr_cr_flag, 'C', pel.encumbrance_amount, 0), 0)))
7565: FROM psp_enc_lines pel
7566: WHERE pel.enc_control_id = pec.enc_control_id)
7567: WHERE payroll_action_id = p_payroll_action_id;
7568: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Updated summary columns in psp_enc_controls');
7569:
7570: IF (l_process_mode = 'TERMINATE') THEN
7571: UPDATE psp_enc_changed_assignments peca
7572: SET payroll_action_id = p_payroll_action_id
7583: 'U', l_last_updated_by, l_last_update_date, NULL, NVL(peca.reference_id, 0),
7584: NVL(peca.action_type, 'U'), p_payroll_action_id, change_date
7585: FROM psp_enc_changed_assignments peca
7586: WHERE payroll_action_id = p_payroll_action_id;
7587: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Copied change assignment records to psp_enc_changed_asg_history');
7588:
7589: DELETE psp_enc_changed_assignments peca
7590: WHERE peca.payroll_action_id = p_payroll_action_id;
7591: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted processed change assignment records in psp_enc_change_assignments');
7587: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Copied change assignment records to psp_enc_changed_asg_history');
7588:
7589: DELETE psp_enc_changed_assignments peca
7590: WHERE peca.payroll_action_id = p_payroll_action_id;
7591: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted processed change assignment records in psp_enc_change_assignments');
7592:
7593: UPDATE psp_enc_processes
7594: SET process_status = 'P'
7595: WHERE payroll_action_id = p_payroll_action_id;
7592:
7593: UPDATE psp_enc_processes
7594: SET process_status = 'P'
7595: WHERE payroll_action_id = p_payroll_action_id;
7596: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Updated process_status in psp_enc_processes');
7597:
7598: UPDATE psp_enc_processes
7599: SET process_status = 'B',
7600: process_phase = 'no_summarize_transfer'
7620: FROM psp_enc_summary_lines pesl
7621: WHERE pesl.payroll_action_id = p_payroll_action_id
7622: AND pesl.status_code = 'N'
7623: AND pesl.superceded_line_id is NOT NULL);
7624: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Updated process_phase in psp_enc_processes');
7625: END IF;
7626:
7627: l_business_group_id := fnd_profile.value('PER_BUSINESS_GROUP_ID');
7628: l_set_of_books_id := fnd_profile.value('GL_SET_OF_BKS_ID');
7625: END IF;
7626:
7627: l_business_group_id := fnd_profile.value('PER_BUSINESS_GROUP_ID');
7628: l_set_of_books_id := fnd_profile.value('GL_SET_OF_BKS_ID');
7629: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Before submitting Encumbrance Run Results Report');
7630: l_xml_layout := fnd_request.add_layout('PSP','PSPENRSRTF','en','US','PDF');
7631: l_request_id := fnd_request.submit_request('PSP',
7632: 'PSPENRSLT',
7633: '',
7638: TO_CHAR(l_business_group_id),
7639: TO_CHAR(l_set_of_books_id));
7640:
7641: IF l_request_id = 0 THEN
7642: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Encumbrance Run Results Report submission failed');
7643: fnd_message.set_name('PSP','PSP_TR_GL_IMP_FAILED');
7644: fnd_msg_pub.add;
7645: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7646: END IF;
7654: IF (l_st_count > 0) THEN
7655: l_business_group_id := fnd_profile.value('PER_BUSINESS_GROUP_ID');
7656: l_set_of_books_id := fnd_profile.value('GL_SET_OF_BKS_ID');
7657:
7658: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Before submitting Encumbrance Summarize and Transfer');
7659: l_request_id := fnd_request.submit_request('PSP',
7660: 'PSPENSTR',
7661: '',
7662: '',
7665: TO_CHAR(l_business_group_id),
7666: TO_CHAR(l_set_of_books_id));
7667:
7668: IF l_request_id = 0 THEN
7669: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Encumbrance Summarize and Transfer submission failed');
7670: fnd_message.set_name('PSP','PSP_TR_GL_IMP_FAILED');
7671: fnd_msg_pub.add;
7672: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7673: END IF;
7675: UPDATE psp_enc_processes
7676: SET process_phase = 'deinit_st'
7677: WHERE payroll_action_id = p_payroll_action_id
7678: AND process_code = 'ST';
7679: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Updated process_phase in psp_enc_processes');
7680:
7681: COMMIT;
7682:
7683: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Waiting for Encumbrance Summarize and Transfer request to complete');
7679: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Updated process_phase in psp_enc_processes');
7680:
7681: COMMIT;
7682:
7683: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Waiting for Encumbrance Summarize and Transfer request to complete');
7684: call_status := fnd_concurrent.wait_for_request(l_request_id, 10, 0, rphase, rstatus, dphase, dstatus, message);
7685:
7686: IF call_status = FALSE THEN
7687: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Encumbrance Summarize and Transfer failed');
7683: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Waiting for Encumbrance Summarize and Transfer request to complete');
7684: call_status := fnd_concurrent.wait_for_request(l_request_id, 10, 0, rphase, rstatus, dphase, dstatus, message);
7685:
7686: IF call_status = FALSE THEN
7687: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Encumbrance Summarize and Transfer failed');
7688: fnd_message.set_name('PSP','PSP_ENC_STR_FAILED');
7689: fnd_msg_pub.add;
7690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7691: END IF;
7688: fnd_message.set_name('PSP','PSP_ENC_STR_FAILED');
7689: fnd_msg_pub.add;
7690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7691: END IF;
7692: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Encumbrance Summarize and Transfer completed');
7693: ELSE
7694: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Encumbrance Summarize and Transfer not required as there arent any new summary lines');
7695: END IF;
7696: END IF;
7690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7691: END IF;
7692: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Encumbrance Summarize and Transfer completed');
7693: ELSE
7694: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Encumbrance Summarize and Transfer not required as there arent any new summary lines');
7695: END IF;
7696: END IF;
7697:
7698: COMMIT;
7695: END IF;
7696: END IF;
7697:
7698: COMMIT;
7699: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving CEL_DEINIT payroll_action_id: ' || p_payroll_action_id);
7700: END cel_deinit;
7701:
7702: PROCEDURE verify_changes(p_payroll_id IN NUMBER,
7703: p_assignment_id IN NUMBER,
8142: END IF;
8143: g_error_api_path := SUBSTR('VERIFY_CHANGES:' || g_error_api_path,1,230);
8144: fnd_msg_pub.add_exc_msg('PSP_ENC_UPDATE_LINES', 'VERIFY_CHANGES');
8145: l_retcode := fnd_api.g_ret_sts_unexp_error;
8146: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving verify_changes
8147: p_payroll_id: ' || p_payroll_id || '
8148: p_assignment_id: ' || p_assignment_id || '
8149: p_business_group_id: ' || p_business_group_id || '
8150: p_set_of_books_id: ' || p_set_of_books_id || '
9430: IF (g_error_message IS NULL) THEN
9431: g_error_message := 'PSP_ENC_PROCESS: ' || SQLERRM;
9432: END IF;
9433: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'ENC_PRE_PROCESS: SQLCODE: ' || fnd_number.number_to_canonical(SQLCODE) || ' SQLERRM: ' || SQLERRM);
9434: psp_message_s.print_error(p_mode => FND_FILE.LOG, p_print_header => FND_API.G_TRUE);
9435: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ENC_PRE_PROCESS
9436: p_payroll_action_id: ' || p_payroll_action_id || '
9437: p_payroll_id: ' || p_payroll_id || '
9438: p_process_mode: ' || p_process_mode);
9431: g_error_message := 'PSP_ENC_PROCESS: ' || SQLERRM;
9432: END IF;
9433: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'ENC_PRE_PROCESS: SQLCODE: ' || fnd_number.number_to_canonical(SQLCODE) || ' SQLERRM: ' || SQLERRM);
9434: psp_message_s.print_error(p_mode => FND_FILE.LOG, p_print_header => FND_API.G_TRUE);
9435: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ENC_PRE_PROCESS
9436: p_payroll_action_id: ' || p_payroll_action_id || '
9437: p_payroll_id: ' || p_payroll_id || '
9438: p_process_mode: ' || p_process_mode);
9439: p_return_status := fnd_api.g_ret_sts_unexp_error;
9483: AND assignment_id = p_assignment_id;
9484:
9485: l_request_id NUMBER(15);
9486: BEGIN
9487: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Entering ROLLBACK_CEL p_payroll_action_id: ' || p_payroll_action_id);
9488: l_request_id := fnd_global.conc_request_id;
9489:
9490: IF (p_person_id1 IS NULL) THEN
9491: OPEN superceded_line_cur(NULL);
9495: FORALL recno IN 1..t_superceded_lines.enc_summary_line_id.COUNT
9496: UPDATE psp_enc_lines_history
9497: SET change_flag = 'N'
9498: WHERE enc_summary_line_id = t_superceded_lines.enc_summary_line_id(recno);
9499: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Reverted respective superceded lines in psp_enc_lines_history');
9500:
9501: DELETE psp_enc_summary_lines
9502: WHERE payroll_action_id = p_payroll_action_id;
9503: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_enc_summary_lines');
9499: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Reverted respective superceded lines in psp_enc_lines_history');
9500:
9501: DELETE psp_enc_summary_lines
9502: WHERE payroll_action_id = p_payroll_action_id;
9503: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_enc_summary_lines');
9504:
9505: DELETE psp_enc_lines
9506: WHERE payroll_action_id = p_payroll_action_id;
9507: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_enc_lines');
9503: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_enc_summary_lines');
9504:
9505: DELETE psp_enc_lines
9506: WHERE payroll_action_id = p_payroll_action_id;
9507: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_enc_lines');
9508:
9509: DELETE psp_enc_controls
9510: WHERE payroll_action_id = p_payroll_action_id;
9511: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_enc_controls');
9507: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_enc_lines');
9508:
9509: DELETE psp_enc_controls
9510: WHERE payroll_action_id = p_payroll_action_id;
9511: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_enc_controls');
9512:
9513: DELETE psp_report_errors
9514: WHERE payroll_action_id = p_payroll_action_id;
9515: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_report_errors');
9511: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_enc_controls');
9512:
9513: DELETE psp_report_errors
9514: WHERE payroll_action_id = p_payroll_action_id;
9515: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_report_errors');
9516:
9517: UPDATE psp_enc_processes
9518: SET process_status = 'B',
9519: process_phase = 'rollback'
9517: UPDATE psp_enc_processes
9518: SET process_status = 'B',
9519: process_phase = 'rollback'
9520: WHERE payroll_action_id = p_payroll_action_id;
9521: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Updated process status to ''Rollback'' in psp_enc_processes');
9522:
9523: UPDATE psp_enc_process_assignments
9524: SET assignment_status = 'B'
9525: WHERE payroll_action_id = p_payroll_action_id;
9522:
9523: UPDATE psp_enc_process_assignments
9524: SET assignment_status = 'B'
9525: WHERE payroll_action_id = p_payroll_action_id;
9526: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Updated process status to ''Rollback'' in psp_enc_process_assignments');
9527:
9528: UPDATE psp_enc_changed_assignments
9529: SET payroll_action_id = NULL
9530: WHERE payroll_action_id = p_payroll_action_id;
9527:
9528: UPDATE psp_enc_changed_assignments
9529: SET payroll_action_id = NULL
9530: WHERE payroll_action_id = p_payroll_action_id;
9531: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Updated payroll_action_id in psp_enc_changed_assignments');
9532:
9533: INSERT INTO psp_enc_changed_assignments
9534: (request_id, assignment_id, payroll_id, change_type,
9535: processed_flag, reference_id, action_type, change_date)
9537: NULL, NVL(pecah.reference_id, 0), pecah.action_type, change_date
9538: FROM psp_enc_changed_asg_history pecah
9539: WHERE payroll_action_id = p_payroll_action_id
9540: AND action_type NOT IN ('CR', 'LQ', 'TR');
9541: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Copied change assignment records to psp_enc_changed_assignments');
9542:
9543: DELETE psp_enc_changed_asg_history
9544: WHERE payroll_action_id = p_payroll_action_id;
9545: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Copied change assignment records to psp_enc_changed_assignments');
9541: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Copied change assignment records to psp_enc_changed_assignments');
9542:
9543: DELETE psp_enc_changed_asg_history
9544: WHERE payroll_action_id = p_payroll_action_id;
9545: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Copied change assignment records to psp_enc_changed_assignments');
9546: ELSE
9547: OPEN asg_cur(p_person_id1, p_assignment_id1);
9548: FETCH asg_cur BULK COLLECT INTO l_assignments;
9549: CLOSE asg_cur;
9613: FORALL recno IN 1..t_superceded_lines.enc_summary_line_id.COUNT
9614: UPDATE psp_enc_lines_history
9615: SET change_flag = 'N'
9616: WHERE enc_summary_line_id = t_superceded_lines.enc_summary_line_id(recno);
9617: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Reverted respective superceded lines in psp_enc_lines_history');
9618:
9619: DELETE psp_enc_summary_lines
9620: WHERE payroll_action_id = p_payroll_action_id
9621: AND assignment_id = l_assignments(recno);
9618:
9619: DELETE psp_enc_summary_lines
9620: WHERE payroll_action_id = p_payroll_action_id
9621: AND assignment_id = l_assignments(recno);
9622: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_enc_summary_lines');
9623:
9624: DELETE psp_enc_lines
9625: WHERE payroll_action_id = p_payroll_action_id
9626: AND assignment_id = l_assignments(recno);
9623:
9624: DELETE psp_enc_lines
9625: WHERE payroll_action_id = p_payroll_action_id
9626: AND assignment_id = l_assignments(recno);
9627: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_enc_lines');
9628:
9629: DELETE psp_enc_controls pec
9630: WHERE payroll_action_id = p_payroll_action_id
9631: AND NOT EXISTS (SELECT 1
9631: AND NOT EXISTS (SELECT 1
9632: FROM psp_enc_lines pel
9633: WHERE payroll_action_id = p_payroll_action_id
9634: AND pel.enc_control_id = pec.enc_control_id);
9635: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_enc_controls');
9636:
9637: DELETE psp_report_errors
9638: WHERE payroll_action_id = p_payroll_action_id
9639: AND source_id = l_assignments(recno);
9636:
9637: DELETE psp_report_errors
9638: WHERE payroll_action_id = p_payroll_action_id
9639: AND source_id = l_assignments(recno);
9640: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Deleted respective lines in psp_report_errors');
9641:
9642: UPDATE psp_enc_process_assignments
9643: SET assignment_status = 'B'
9644: WHERE payroll_action_id = p_payroll_action_id
9642: UPDATE psp_enc_process_assignments
9643: SET assignment_status = 'B'
9644: WHERE payroll_action_id = p_payroll_action_id
9645: AND assignment_id = l_assignments(recno);
9646: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Updated assignment status to ''Rollback'' in psp_enc_process_assignments');
9647:
9648: UPDATE psp_enc_changed_assignments
9649: SET payroll_action_id = NULL
9650: WHERE payroll_action_id = p_payroll_action_id
9648: UPDATE psp_enc_changed_assignments
9649: SET payroll_action_id = NULL
9650: WHERE payroll_action_id = p_payroll_action_id
9651: AND assignment_id = l_assignments(recno);
9652: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Updated payroll_action_id in psp_enc_changed_assignments');
9653:
9654: INSERT INTO psp_enc_changed_assignments
9655: (request_id, assignment_id, payroll_id, change_type,
9656: processed_flag, reference_id, action_type, change_date)
9659: FROM psp_enc_changed_asg_history pecah
9660: WHERE payroll_action_id = p_payroll_action_id
9661: AND assignment_id = l_assignments(recno)
9662: AND action_type NOT IN ('CR', 'LQ', 'TR');
9663: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Copied change assignment records to psp_enc_changed_assignments');
9664:
9665: DELETE psp_enc_changed_asg_history
9666: WHERE payroll_action_id = p_payroll_action_id
9667: AND assignment_id = l_assignments(recno);
9664:
9665: DELETE psp_enc_changed_asg_history
9666: WHERE payroll_action_id = p_payroll_action_id
9667: AND assignment_id = l_assignments(recno);
9668: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Copied change assignment records to psp_enc_changed_assignments');
9669: END LOOP;
9670:
9671: UPDATE psp_enc_processes
9672: SET process_status = 'B',
9674: WHERE payroll_action_id = p_payroll_action_id
9675: AND NOT EXISTS (SELECT 1
9676: FROM psp_enc_summary_lines
9677: WHERE payroll_action_id = p_payroll_action_id);
9678: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Updated process status to ''Rollback'' in psp_enc_processes');
9679: END IF;
9680:
9681: COMMIT;
9682: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ROLLBACK_CEL p_payroll_action_id: ' || p_payroll_action_id);
9678: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Updated process status to ''Rollback'' in psp_enc_processes');
9679: END IF;
9680:
9681: COMMIT;
9682: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ROLLBACK_CEL p_payroll_action_id: ' || p_payroll_action_id);
9683: retcode := fnd_api.g_ret_sts_success;
9684: EXCEPTION
9685: WHEN OTHERS THEN
9686: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'ROLLBACK_CEL: SQLCODE: ' || fnd_number.number_to_canonical(SQLCODE) || ' SQLERRM: ' || SQLERRM);
9683: retcode := fnd_api.g_ret_sts_success;
9684: EXCEPTION
9685: WHEN OTHERS THEN
9686: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'ROLLBACK_CEL: SQLCODE: ' || fnd_number.number_to_canonical(SQLCODE) || ' SQLERRM: ' || SQLERRM);
9687: psp_message_s.print_error(p_mode => FND_FILE.LOG, p_print_header => FND_API.G_TRUE);
9688: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ROLLBACK_CEL p_payroll_action_id: ' || p_payroll_action_id);
9689: retcode := fnd_api.g_ret_sts_unexp_error;
9690: END rollback_cel;
9691:
9684: EXCEPTION
9685: WHEN OTHERS THEN
9686: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', 'ROLLBACK_CEL: SQLCODE: ' || fnd_number.number_to_canonical(SQLCODE) || ' SQLERRM: ' || SQLERRM);
9687: psp_message_s.print_error(p_mode => FND_FILE.LOG, p_print_header => FND_API.G_TRUE);
9688: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving ROLLBACK_CEL p_payroll_action_id: ' || p_payroll_action_id);
9689: retcode := fnd_api.g_ret_sts_unexp_error;
9690: END rollback_cel;
9691:
9692: PROCEDURE load_sch_hierarchy (p_assignment_id IN NUMBER,
10939: END IF;
10940: g_error_api_path := SUBSTR(' LOAD_SCH_HIERARCHY:'||g_error_api_path,1,230);
10941: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', ' LOAD_SCH_HIERARCHY');
10942: p_return_status := fnd_api.g_ret_sts_unexp_error;
10943: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' ' || fnd_number.number_to_canonical(l_proc_step) || ': LOAD_SCH_HIERARCHY');
10944: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving LOAD_SCH_HIERARCHY');
10945: END load_sch_hierarchy;
10946:
10947: PROCEDURE add_cel_warnings(p_start_date IN DATE DEFAULT NULL,
10940: g_error_api_path := SUBSTR(' LOAD_SCH_HIERARCHY:'||g_error_api_path,1,230);
10941: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', ' LOAD_SCH_HIERARCHY');
10942: p_return_status := fnd_api.g_ret_sts_unexp_error;
10943: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' ' || fnd_number.number_to_canonical(l_proc_step) || ': LOAD_SCH_HIERARCHY');
10944: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving LOAD_SCH_HIERARCHY');
10945: END load_sch_hierarchy;
10946:
10947: PROCEDURE add_cel_warnings(p_start_date IN DATE DEFAULT NULL,
10948: p_end_date IN DATE DEFAULT NULL,
11509: END IF;
11510: g_error_api_path := SUBSTR(' UPDATE_HIERARCHY_DATES:'||g_error_api_path,1,230);
11511: fnd_msg_pub.add_exc_msg('PSP_ENC_CREATE_LINES', ' UPDATE_HIERARCHY_DATES');
11512: p_return_status := fnd_api.g_ret_sts_unexp_error;
11513: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' Leaving UPDATE_HIERARCHY_DATES');
11514: END update_hierarchy_dates;
11515:
11516: PROCEDURE clear_sch_hierarchy IS
11517: BEGIN