[Home] [Help]
36: -- Added manual_disb_hold in FA Base update
37: -- smadathi 14-Jun-2002 Bug 2413695. write_log_file_head modified.
38: -- | gvarapra 14-sep-2004 FA138 - ISIR Enhancements |
39: -- | Changed arguments in call to |
40: -- | IGF_AP_FA_BASE_RECORD_PKG. |
41: -------------------------------------------------------------------------------------
42:
43: PROCEDURE log_parameter (
44: p_c_param_name IN VARCHAR2,
96: --bvisvana 31-Aug-2005 FA 157 - Bug # 4382371 - Dynamic person Id Inclusion.
97: -- Removed the normal cursor c_person_id and made it as REF CURSOR
98: --rasahoo 17-NOV-2003 FA 128 - ISIR update 2004-05
99: -- added new parameter award_fmly_contribution_type to
100: -- igf_ap_fa_base_rec_pkg.update_row
101: --vvutukur 18-Jul-2003 Enh#3038511.FICR106 Build. Added call to generic procedure
102: -- igs_fi_crdapi_util.get_award_year_status to validate Award Year Status.
103: --shtatiko 25-MAR-2003 Bug# 2772277, Added parameter logging for PERSON, NAME, STATUS and REASON
104: -- Removed write_log_file and write_log_file_head.
112: l_cal_type igs_ca_inst.cal_type%TYPE;
113: l_sequence_number igs_ca_inst.sequence_number%TYPE;
114: l_message VARCHAR2(4000);
115: l_status BOOLEAN;
116: l_base_id igf_ap_fa_base_rec.base_id%TYPE;
117: l_count NUMBER(1) := 0;
118: l_v_awd_yr_status_cd igf_ap_batch_aw_map.award_year_status_code%TYPE;
119: l_v_message_name fnd_new_messages.message_name%TYPE;
120:
351: FUNCTION create_fa_base_record
352: (p_cal_type IN igs_ca_inst.cal_type%TYPE,
353: p_sequence_number IN igs_ca_inst.sequence_number%TYPE,
354: p_person_id IN igs_pe_person.person_id%TYPE,
355: p_base_id OUT NOCOPY igf_ap_fa_base_rec.base_id%TYPE,
356: p_message OUT NOCOPY VARCHAR2)
357: RETURN BOOLEAN
358: AS
359: ------------------------------------------------------------------------------------
384: -- prior to logging the message. Used fnd_message.get to log the message.
385: --rajagupt 06-Oct-2005 Bug#4068548 - added a new cursor ssn_cur
386: --vchappid 26-Feb-2003 Bug#2747335, Base ID will be returned when there exists Base ID for
387: -- the Award Calendar Instance
388: -- shtatiko 24-JAN-2003 Bug# 2584853, Added message IGF_AP_FA_BASE_REC_ALL
389: -- masehgal 25-Sep-2002 FA 104 - To Do Enhancements
390: -- Added manual_disb_hold in FA Base update
391: -------------------------------------------------------------------------------------
392: l_rowid igf_ap_fa_base_rec.ROW_ID%TYPE;
388: -- shtatiko 24-JAN-2003 Bug# 2584853, Added message IGF_AP_FA_BASE_REC_ALL
389: -- masehgal 25-Sep-2002 FA 104 - To Do Enhancements
390: -- Added manual_disb_hold in FA Base update
391: -------------------------------------------------------------------------------------
392: l_rowid igf_ap_fa_base_rec.ROW_ID%TYPE;
393: l_base_id igf_ap_fa_base_rec.BASE_ID%TYPE;
394: /*
395: cursor to see whether the FA records for the passsed in person id exists or not
396: */
389: -- masehgal 25-Sep-2002 FA 104 - To Do Enhancements
390: -- Added manual_disb_hold in FA Base update
391: -------------------------------------------------------------------------------------
392: l_rowid igf_ap_fa_base_rec.ROW_ID%TYPE;
393: l_base_id igf_ap_fa_base_rec.BASE_ID%TYPE;
394: /*
395: cursor to see whether the FA records for the passsed in person id exists or not
396: */
397: CURSOR c_exists (cp_person_id igs_pe_person.person_id%TYPE,
397: CURSOR c_exists (cp_person_id igs_pe_person.person_id%TYPE,
398: cp_cal_type igs_ca_inst.cal_type%TYPE,
399: cp_sequence_number igs_ca_inst.sequence_number%TYPE) IS
400: SELECT base_id
401: FROM igf_ap_fa_base_rec
402: WHERE person_id = cp_person_id
403: AND ci_cal_type = cp_cal_type
404: AND ci_sequence_number = cp_sequence_number;
405:
447: END IF;
448:
449: END IF;
450:
451: igf_ap_fa_base_rec_pkg.insert_row (
452: X_ROWID => l_rowid ,
453: X_BASE_ID => l_base_id ,
454: X_CI_CAL_TYPE => p_cal_type ,
455: X_PERSON_ID => p_person_id ,