[Home] [Help]
37: -- knaraset 19-Jun-2003 Modified enrp_prc_sua_blk_trn as per Build ENCR035 - MUS bulk Unit section transfer, bug 2956146
38: -- svenkata 3-Jun-2003 The function ENRP_VAL_COO_CROSS has been removed. All references to this API is removed. Bug# 2829272
39: -- sarakshi 27-Feb-2003 Enh#2797116,modified the procedure enrpl_upd_sca_coo ,added delete_flag check in the where clause
40: -- of the cursor c_coo
41: --ssawhney 17-feb-2003 Bug : 2758856 : Added the parameter x_external_reference in the call to IGS_PE_PERS_ENCUMB_PKG.UPDATE_ROW
42: -- amuthu 27-Jan-2003 Bug# 2750538 changed p_deny_warn_att to NVL(p_deny_warn_att,l_notification_flag)
43: -- in the call to igs_en_elgbl_program.eval_unit_forced_type
44: -- svenkata 7-Jan-2003 Bug#2737263 - Modifications made in enrp_prc_sua_blk_trn to get the Att Typ of the
45: -- Program before the unit is transferred.
81: --nshee 29-Aug-2002 Bug 2395510 added 6 columns in IGS_AD_PS_APPL_INST as part of deferments build
82: --mesriniv 18-sep-2002 Added a new parameter waitlist_manual_ind in TBH calls of IGS_EN_SU_ATTEMPT
83: -- for Bug 2554109 MINI Waitlist Build for Jan 03 Release
84: --pkpatel 3-OCT-2002 Bug No: 2600842
85: -- Added the parameter x_auth_resp_id in the call to IGS_PE_PERS_ENCUMB_PKG.UPDATE_ROW in the procedure Enrp_Set_Pen_Expry
86: -- Added the expiry date synchronization logic for table IGS_PE_FUND_EXCL in the procedure Enrp_Set_Pee_Expry
87: --ssawhney 09-10-2002 Added the parameter x_auth_resp_id in the call to IGS_PE_PERS_ENCUMB_PKG.UPDATE_ROW in the procedure Enrp_Set_Pen_Expry
88: -- Added the expiry date synchronization logic for new table IGS_PE_FUND_EXCL in the procedure Enrp_Set_Pee_Expry
89: --kkillams 03-10-2002 1)Three New p_unit_loc_cd, p_unit_class,p_reason parameters are added to Enrp_Prc_Sua_Blk_E_D procedure.
83: -- for Bug 2554109 MINI Waitlist Build for Jan 03 Release
84: --pkpatel 3-OCT-2002 Bug No: 2600842
85: -- Added the parameter x_auth_resp_id in the call to IGS_PE_PERS_ENCUMB_PKG.UPDATE_ROW in the procedure Enrp_Set_Pen_Expry
86: -- Added the expiry date synchronization logic for table IGS_PE_FUND_EXCL in the procedure Enrp_Set_Pee_Expry
87: --ssawhney 09-10-2002 Added the parameter x_auth_resp_id in the call to IGS_PE_PERS_ENCUMB_PKG.UPDATE_ROW in the procedure Enrp_Set_Pen_Expry
88: -- Added the expiry date synchronization logic for new table IGS_PE_FUND_EXCL in the procedure Enrp_Set_Pee_Expry
89: --kkillams 03-10-2002 1)Three New p_unit_loc_cd, p_unit_class,p_reason parameters are added to Enrp_Prc_Sua_Blk_E_D procedure.
90: -- 2)Three New p_enforce_val,p_enroll_method,p_reason parameters are added to Enrp_Prc_Sua_Blk_Trn procedure.
91: -- w.r.t. build Drop Trasfer workflow notification(Bug no: 2599925)
5702: || Purpose :
5703: || Known limitations, enhancements or remarks :
5704: || Change History :
5705: || Who When What
5706: || ssawhney 17-feb-2003 Bug : 2758856 : Added the parameter x_external_reference in the call to IGS_PE_PERS_ENCUMB_PKG.UPDATE_ROW
5707: || pkpatel 3-OCT-2002 Bug No: 2600842
5708: || Added the parameter x_auth_resp_id in the call to IGS_PE_PERS_ENCUMB_PKG.UPDATE_ROW
5709: || (reverse chronological order - newest change first)
5710: */
5704: || Change History :
5705: || Who When What
5706: || ssawhney 17-feb-2003 Bug : 2758856 : Added the parameter x_external_reference in the call to IGS_PE_PERS_ENCUMB_PKG.UPDATE_ROW
5707: || pkpatel 3-OCT-2002 Bug No: 2600842
5708: || Added the parameter x_auth_resp_id in the call to IGS_PE_PERS_ENCUMB_PKG.UPDATE_ROW
5709: || (reverse chronological order - newest change first)
5710: */
5711: BEGIN -- enrp_set_pen_expry
5712: -- Set the expiry date for parent IGS_PE_PERS_ENCUMB record of
5708: || Added the parameter x_auth_resp_id in the call to IGS_PE_PERS_ENCUMB_PKG.UPDATE_ROW
5709: || (reverse chronological order - newest change first)
5710: */
5711: BEGIN -- enrp_set_pen_expry
5712: -- Set the expiry date for parent IGS_PE_PERS_ENCUMB record of
5713: -- the nominated pee when expiry_dt of the effect is set
5714: -- and no other active effects remain.
5715: DECLARE
5716: e_resource_busy EXCEPTION;
5726: pen_start_dt = p_pen_start_dt AND
5727: sequence_number <> p_sequence_number AND
5728: expiry_dt IS NULL;
5729: CURSOR c_person_encumbrance IS
5730: SELECT rowid, IGS_PE_PERS_ENCUMB.*
5731: FROM IGS_PE_PERS_ENCUMB
5732: WHERE person_id = p_person_id AND
5733: encumbrance_type = p_encumbrance_type AND
5734: start_dt = p_pen_start_dt
5727: sequence_number <> p_sequence_number AND
5728: expiry_dt IS NULL;
5729: CURSOR c_person_encumbrance IS
5730: SELECT rowid, IGS_PE_PERS_ENCUMB.*
5731: FROM IGS_PE_PERS_ENCUMB
5732: WHERE person_id = p_person_id AND
5733: encumbrance_type = p_encumbrance_type AND
5734: start_dt = p_pen_start_dt
5735: FOR UPDATE OF expiry_dt NOWAIT;
5775: END IF;
5776: -- parent can be expired
5777: OPEN c_person_encumbrance;
5778: FETCH c_person_encumbrance INTO v_pe_rec;
5779: IGS_PE_PERS_ENCUMB_PKG.UPDATE_ROW(
5780: X_ROWID => v_pe_rec.ROWID ,
5781: X_PERSON_ID => v_pe_rec.PERSON_ID ,
5782: X_ENCUMBRANCE_TYPE => v_pe_rec.ENCUMBRANCE_TYPE ,
5783: X_START_DT => v_pe_rec.START_DT ,