113: lv_lock_award_flag := 'Y';
114: lv_publish_in_ss_flag := lc_awd.publish_in_ss_flag;
115: lv_awd_proc_status_code := lc_awd.awd_proc_status_code;
116:
117: fnd_message.set_name('IGF','IGF_AW_LOCK_STUD');
118: fnd_message.set_token('FUND',lc_awd.fund_code);
119: fnd_message.set_token('AWARD',p_award_id);
120: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
121:
114: lv_publish_in_ss_flag := lc_awd.publish_in_ss_flag;
115: lv_awd_proc_status_code := lc_awd.awd_proc_status_code;
116:
117: fnd_message.set_name('IGF','IGF_AW_LOCK_STUD');
118: fnd_message.set_token('FUND',lc_awd.fund_code);
119: fnd_message.set_token('AWARD',p_award_id);
120: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
121:
122: ELSIF p_run_mode = 'U' THEN
115: lv_awd_proc_status_code := lc_awd.awd_proc_status_code;
116:
117: fnd_message.set_name('IGF','IGF_AW_LOCK_STUD');
118: fnd_message.set_token('FUND',lc_awd.fund_code);
119: fnd_message.set_token('AWARD',p_award_id);
120: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
121:
122: ELSIF p_run_mode = 'U' THEN
123: lv_lock_award_flag := 'N';
116:
117: fnd_message.set_name('IGF','IGF_AW_LOCK_STUD');
118: fnd_message.set_token('FUND',lc_awd.fund_code);
119: fnd_message.set_token('AWARD',p_award_id);
120: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
121:
122: ELSIF p_run_mode = 'U' THEN
123: lv_lock_award_flag := 'N';
124: lv_publish_in_ss_flag := lc_awd.publish_in_ss_flag;
123: lv_lock_award_flag := 'N';
124: lv_publish_in_ss_flag := lc_awd.publish_in_ss_flag;
125: lv_awd_proc_status_code := lc_awd.awd_proc_status_code;
126:
127: fnd_message.set_name('IGF','IGF_AW_UNLOCK_STUD');
128: fnd_message.set_token('FUND',lc_awd.fund_code);
129: fnd_message.set_token('AWARD',p_award_id);
130: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
131:
124: lv_publish_in_ss_flag := lc_awd.publish_in_ss_flag;
125: lv_awd_proc_status_code := lc_awd.awd_proc_status_code;
126:
127: fnd_message.set_name('IGF','IGF_AW_UNLOCK_STUD');
128: fnd_message.set_token('FUND',lc_awd.fund_code);
129: fnd_message.set_token('AWARD',p_award_id);
130: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
131:
132: ELSIF p_run_mode = 'PB' THEN
125: lv_awd_proc_status_code := lc_awd.awd_proc_status_code;
126:
127: fnd_message.set_name('IGF','IGF_AW_UNLOCK_STUD');
128: fnd_message.set_token('FUND',lc_awd.fund_code);
129: fnd_message.set_token('AWARD',p_award_id);
130: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
131:
132: ELSIF p_run_mode = 'PB' THEN
133: lv_lock_award_flag := lc_awd.lock_award_flag;
126:
127: fnd_message.set_name('IGF','IGF_AW_UNLOCK_STUD');
128: fnd_message.set_token('FUND',lc_awd.fund_code);
129: fnd_message.set_token('AWARD',p_award_id);
130: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
131:
132: ELSIF p_run_mode = 'PB' THEN
133: lv_lock_award_flag := lc_awd.lock_award_flag;
134: lv_publish_in_ss_flag := 'Y';
133: lv_lock_award_flag := lc_awd.lock_award_flag;
134: lv_publish_in_ss_flag := 'Y';
135: lv_awd_proc_status_code := lc_awd.awd_proc_status_code;
136:
137: fnd_message.set_name('IGF','IGF_AW_AWD_PUBLISH');
138: fnd_message.set_token('FUNDCODE',lc_awd.fund_code);
139: fnd_message.set_token('AWDID',p_award_id);
140: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
141:
134: lv_publish_in_ss_flag := 'Y';
135: lv_awd_proc_status_code := lc_awd.awd_proc_status_code;
136:
137: fnd_message.set_name('IGF','IGF_AW_AWD_PUBLISH');
138: fnd_message.set_token('FUNDCODE',lc_awd.fund_code);
139: fnd_message.set_token('AWDID',p_award_id);
140: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
141:
142: ELSIF p_run_mode = 'UP' THEN
135: lv_awd_proc_status_code := lc_awd.awd_proc_status_code;
136:
137: fnd_message.set_name('IGF','IGF_AW_AWD_PUBLISH');
138: fnd_message.set_token('FUNDCODE',lc_awd.fund_code);
139: fnd_message.set_token('AWDID',p_award_id);
140: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
141:
142: ELSIF p_run_mode = 'UP' THEN
143: lv_lock_award_flag := lc_awd.lock_award_flag;
136:
137: fnd_message.set_name('IGF','IGF_AW_AWD_PUBLISH');
138: fnd_message.set_token('FUNDCODE',lc_awd.fund_code);
139: fnd_message.set_token('AWDID',p_award_id);
140: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
141:
142: ELSIF p_run_mode = 'UP' THEN
143: lv_lock_award_flag := lc_awd.lock_award_flag;
144: lv_publish_in_ss_flag := 'N';
143: lv_lock_award_flag := lc_awd.lock_award_flag;
144: lv_publish_in_ss_flag := 'N';
145: lv_awd_proc_status_code := lc_awd.awd_proc_status_code;
146:
147: fnd_message.set_name('IGF','IGF_AW_AWD_UNPUBLISH');
148: fnd_message.set_token('FUNDCODE',lc_awd.fund_code);
149: fnd_message.set_token('AWDID',p_award_id);
150: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
151:
144: lv_publish_in_ss_flag := 'N';
145: lv_awd_proc_status_code := lc_awd.awd_proc_status_code;
146:
147: fnd_message.set_name('IGF','IGF_AW_AWD_UNPUBLISH');
148: fnd_message.set_token('FUNDCODE',lc_awd.fund_code);
149: fnd_message.set_token('AWDID',p_award_id);
150: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
151:
152: ELSIF p_run_mode = 'S' THEN
145: lv_awd_proc_status_code := lc_awd.awd_proc_status_code;
146:
147: fnd_message.set_name('IGF','IGF_AW_AWD_UNPUBLISH');
148: fnd_message.set_token('FUNDCODE',lc_awd.fund_code);
149: fnd_message.set_token('AWDID',p_award_id);
150: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
151:
152: ELSIF p_run_mode = 'S' THEN
153: lv_lock_award_flag := lc_awd.lock_award_flag;
146:
147: fnd_message.set_name('IGF','IGF_AW_AWD_UNPUBLISH');
148: fnd_message.set_token('FUNDCODE',lc_awd.fund_code);
149: fnd_message.set_token('AWDID',p_award_id);
150: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
151:
152: ELSIF p_run_mode = 'S' THEN
153: lv_lock_award_flag := lc_awd.lock_award_flag;
154: lv_publish_in_ss_flag := lc_awd.publish_in_ss_flag;
208: x_publish_in_ss_flag => lv_publish_in_ss_flag
209: );
210:
211: IF p_run_mode = 'S' THEN
212: fnd_message.set_name('IGF','IGF_AW_AWD_PROC');
213: fnd_message.set_token('PROC_STATUS',p_awd_proc_status);
214: fnd_message.set_token('AWARD',p_award_id);
215: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
216: END IF;
209: );
210:
211: IF p_run_mode = 'S' THEN
212: fnd_message.set_name('IGF','IGF_AW_AWD_PROC');
213: fnd_message.set_token('PROC_STATUS',p_awd_proc_status);
214: fnd_message.set_token('AWARD',p_award_id);
215: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
216: END IF;
217:
210:
211: IF p_run_mode = 'S' THEN
212: fnd_message.set_name('IGF','IGF_AW_AWD_PROC');
213: fnd_message.set_token('PROC_STATUS',p_awd_proc_status);
214: fnd_message.set_token('AWARD',p_award_id);
215: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
216: END IF;
217:
218: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
211: IF p_run_mode = 'S' THEN
212: fnd_message.set_name('IGF','IGF_AW_AWD_PROC');
213: fnd_message.set_token('PROC_STATUS',p_awd_proc_status);
214: fnd_message.set_token('AWARD',p_award_id);
215: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
216: END IF;
217:
218: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
219: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_manage_awd.process_award.debug','End of Update');
224: END IF;
225:
226: EXCEPTION
227: WHEN OTHERS THEN
228: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
229: fnd_message.set_token('NAME','IGF_AW_MANAGE_AWD.PROCESS_AWARD :' || SQLERRM);
230: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
231: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_aw_manage_awd.process_award.exception','sql error:'||SQLERRM);
232: END IF;
225:
226: EXCEPTION
227: WHEN OTHERS THEN
228: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
229: fnd_message.set_token('NAME','IGF_AW_MANAGE_AWD.PROCESS_AWARD :' || SQLERRM);
230: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
231: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_aw_manage_awd.process_award.exception','sql error:'||SQLERRM);
232: END IF;
233: igs_ge_msg_stack.conc_exception_hndl;
283: CLOSE cur_upd_base;
284:
285: IF p_run_mode = 'L' THEN
286: lv_lock_award_flag := 'Y';
287: fnd_message.set_name('IGF','IGF_AW_LOCK_STUD_LVL');
288: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
289:
290: ELSIF p_run_mode = 'U' THEN
291: lv_lock_award_flag := 'N';
284:
285: IF p_run_mode = 'L' THEN
286: lv_lock_award_flag := 'Y';
287: fnd_message.set_name('IGF','IGF_AW_LOCK_STUD_LVL');
288: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
289:
290: ELSIF p_run_mode = 'U' THEN
291: lv_lock_award_flag := 'N';
292: fnd_message.set_name('IGF','IGF_AW_UNLOCK_STUD_LVL');
288: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
289:
290: ELSIF p_run_mode = 'U' THEN
291: lv_lock_award_flag := 'N';
292: fnd_message.set_name('IGF','IGF_AW_UNLOCK_STUD_LVL');
293: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
294: END IF;
295:
296: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
289:
290: ELSIF p_run_mode = 'U' THEN
291: lv_lock_award_flag := 'N';
292: fnd_message.set_name('IGF','IGF_AW_UNLOCK_STUD_LVL');
293: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
294: END IF;
295:
296: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
297: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_manage_awd.lock_unlock_stud.debug','Updating igf_ap_fa_base_rec_all with lock='||lv_lock_award_flag);
422: END IF;
423:
424: EXCEPTION
425: WHEN OTHERS THEN
426: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
427: fnd_message.set_token('NAME','IGF_AW_MANAGE_AWD.LOCK_UNLOCK_STUD :' || SQLERRM);
428: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
429: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_aw_manage_awd.lock_unlock_stud.exception','sql error:'||SQLERRM);
430: END IF;
423:
424: EXCEPTION
425: WHEN OTHERS THEN
426: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
427: fnd_message.set_token('NAME','IGF_AW_MANAGE_AWD.LOCK_UNLOCK_STUD :' || SQLERRM);
428: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
429: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_aw_manage_awd.lock_unlock_stud.exception','sql error:'||SQLERRM);
430: END IF;
431: igs_ge_msg_stack.conc_exception_hndl;
635:
636: --If person selection is for all persons in the Person ID Group and
637: --Person ID Group is NULL then log error with exception
638: ELSIF p_run_type = 'P' AND p_pid_group IS NULL THEN
639: fnd_message.set_name('IGF','IGF_AW_COA_PARAM_EX_P');
640: fnd_file.put_line(fnd_file.log,fnd_message.get);
641: RAISE param_exception;
642:
643: --If person selection is for a single person and
636: --If person selection is for all persons in the Person ID Group and
637: --Person ID Group is NULL then log error with exception
638: ELSIF p_run_type = 'P' AND p_pid_group IS NULL THEN
639: fnd_message.set_name('IGF','IGF_AW_COA_PARAM_EX_P');
640: fnd_file.put_line(fnd_file.log,fnd_message.get);
641: RAISE param_exception;
642:
643: --If person selection is for a single person and
644: --Base ID is NULL then log error with exception
642:
643: --If person selection is for a single person and
644: --Base ID is NULL then log error with exception
645: ELSIF p_run_type = 'S' AND p_base_id IS NULL THEN
646: fnd_message.set_name('IGF','IGF_AW_COA_PARAM_EX_S');
647: fnd_file.put_line(fnd_file.log,fnd_message.get);
648: RAISE param_exception;
649:
650: --If the Run Mode is 'Set Award Process Status' and
643: --If person selection is for a single person and
644: --Base ID is NULL then log error with exception
645: ELSIF p_run_type = 'S' AND p_base_id IS NULL THEN
646: fnd_message.set_name('IGF','IGF_AW_COA_PARAM_EX_S');
647: fnd_file.put_line(fnd_file.log,fnd_message.get);
648: RAISE param_exception;
649:
650: --If the Run Mode is 'Set Award Process Status' and
651: --Fund ID is NOT NULL then log error with exception
649:
650: --If the Run Mode is 'Set Award Process Status' and
651: --Fund ID is NOT NULL then log error with exception
652: ELSIF p_run_mode = 'S' AND p_fund_id IS NOT NULL THEN
653: fnd_message.set_name('IGF','IGF_AW_MANG_AW_FUND_ERR');
654: fnd_file.put_line(fnd_file.log,fnd_message.get);
655: RAISE param_exception;
656: END IF;
657:
650: --If the Run Mode is 'Set Award Process Status' and
651: --Fund ID is NOT NULL then log error with exception
652: ELSIF p_run_mode = 'S' AND p_fund_id IS NOT NULL THEN
653: fnd_message.set_name('IGF','IGF_AW_MANG_AW_FUND_ERR');
654: fnd_file.put_line(fnd_file.log,fnd_message.get);
655: RAISE param_exception;
656: END IF;
657:
658: fnd_file.put_line(fnd_file.log,'-------------------------------------------------------');
660: --COMPUTATION ONLY IF PERSON NUMBER IS PRESENT
661: IF p_run_type = 'S' AND (p_pid_group IS NULL) AND (p_base_id IS NOT NULL) THEN
662:
663: fnd_file.new_line(fnd_file.log,1);
664: fnd_message.set_name('IGF','IGF_AW_PROC_STUD');
665: fnd_message.set_token('STDNT',igf_gr_gen.get_per_num(p_base_id));
666: fnd_file.put_line(fnd_file.log,fnd_message.get);
667:
668: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
661: IF p_run_type = 'S' AND (p_pid_group IS NULL) AND (p_base_id IS NOT NULL) THEN
662:
663: fnd_file.new_line(fnd_file.log,1);
664: fnd_message.set_name('IGF','IGF_AW_PROC_STUD');
665: fnd_message.set_token('STDNT',igf_gr_gen.get_per_num(p_base_id));
666: fnd_file.put_line(fnd_file.log,fnd_message.get);
667:
668: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
669: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_manage_awd.run.debug','Starting Run_Type=S with base_id:'||p_base_id);
662:
663: fnd_file.new_line(fnd_file.log,1);
664: fnd_message.set_name('IGF','IGF_AW_PROC_STUD');
665: fnd_message.set_token('STDNT',igf_gr_gen.get_per_num(p_base_id));
666: fnd_file.put_line(fnd_file.log,fnd_message.get);
667:
668: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
669: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_manage_awd.run.debug','Starting Run_Type=S with base_id:'||p_base_id);
670: END IF;
703: ELSIF p_run_type = 'Y' AND (p_pid_group IS NULL) AND (p_base_id IS NULL) THEN
704: FOR l_per_awd_rec IN c_per_awd_yr(lv_ci_cal_type,ln_ci_sequence_number)
705: LOOP
706: fnd_file.new_line(fnd_file.log,1);
707: fnd_message.set_name('IGF','IGF_AW_PROC_STUD');
708: fnd_message.set_token('STDNT',igf_gr_gen.get_per_num(l_per_awd_rec.base_id));
709: fnd_file.put_line(fnd_file.log,fnd_message.get);
710:
711: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
704: FOR l_per_awd_rec IN c_per_awd_yr(lv_ci_cal_type,ln_ci_sequence_number)
705: LOOP
706: fnd_file.new_line(fnd_file.log,1);
707: fnd_message.set_name('IGF','IGF_AW_PROC_STUD');
708: fnd_message.set_token('STDNT',igf_gr_gen.get_per_num(l_per_awd_rec.base_id));
709: fnd_file.put_line(fnd_file.log,fnd_message.get);
710:
711: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
712: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_manage_awd.run.debug','Starting Run_Type=Y with base_id:'||l_per_awd_rec.base_id);
705: LOOP
706: fnd_file.new_line(fnd_file.log,1);
707: fnd_message.set_name('IGF','IGF_AW_PROC_STUD');
708: fnd_message.set_token('STDNT',igf_gr_gen.get_per_num(l_per_awd_rec.base_id));
709: fnd_file.put_line(fnd_file.log,fnd_message.get);
710:
711: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
712: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_manage_awd.run.debug','Starting Run_Type=Y with base_id:'||l_per_awd_rec.base_id);
713: END IF;
765:
766: FETCH cur_per_grp INTO per_grp_rec;
767:
768: IF (cur_per_grp%NOTFOUND) THEN
769: fnd_message.set_name('IGF','IGF_DB_NO_PER_GRP');
770: fnd_file.put_line(fnd_file.log,fnd_message.get);
771: ELSE
772: LOOP
773: -- check if person has a fa base record
766: FETCH cur_per_grp INTO per_grp_rec;
767:
768: IF (cur_per_grp%NOTFOUND) THEN
769: fnd_message.set_name('IGF','IGF_DB_NO_PER_GRP');
770: fnd_file.put_line(fnd_file.log,fnd_message.get);
771: ELSE
772: LOOP
773: -- check if person has a fa base record
774: ln_base_id := NULL;
783: );
784:
785: IF lv_err_msg = 'NULL' THEN
786: fnd_file.new_line(fnd_file.log,1);
787: fnd_message.set_name('IGF','IGF_AW_PROC_STUD');
788: fnd_message.set_token('STDNT',igf_gr_gen.get_per_num(ln_base_id));
789: fnd_file.put_line(fnd_file.log,fnd_message.get);
790:
791: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
784:
785: IF lv_err_msg = 'NULL' THEN
786: fnd_file.new_line(fnd_file.log,1);
787: fnd_message.set_name('IGF','IGF_AW_PROC_STUD');
788: fnd_message.set_token('STDNT',igf_gr_gen.get_per_num(ln_base_id));
789: fnd_file.put_line(fnd_file.log,fnd_message.get);
790:
791: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
792: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_manage_awd.run.debug','Starting Run_Type=P with base_id:'||ln_base_id);
785: IF lv_err_msg = 'NULL' THEN
786: fnd_file.new_line(fnd_file.log,1);
787: fnd_message.set_name('IGF','IGF_AW_PROC_STUD');
788: fnd_message.set_token('STDNT',igf_gr_gen.get_per_num(ln_base_id));
789: fnd_file.put_line(fnd_file.log,fnd_message.get);
790:
791: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
792: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_manage_awd.run.debug','Starting Run_Type=P with base_id:'||ln_base_id);
793: END IF;
826: OPEN c_person_no(per_grp_rec.person_id);
827: FETCH c_person_no INTO l_person_no;
828: CLOSE c_person_no;
829:
830: fnd_message.set_name('IGF','IGF_AP_NO_BASEREC');
831: fnd_message.set_token('STUD',l_person_no.party_number);
832: fnd_file.new_line(fnd_file.log,1);
833: fnd_file.put_line(fnd_file.log,fnd_message.get);
834: END IF;
827: FETCH c_person_no INTO l_person_no;
828: CLOSE c_person_no;
829:
830: fnd_message.set_name('IGF','IGF_AP_NO_BASEREC');
831: fnd_message.set_token('STUD',l_person_no.party_number);
832: fnd_file.new_line(fnd_file.log,1);
833: fnd_file.put_line(fnd_file.log,fnd_message.get);
834: END IF;
835:
829:
830: fnd_message.set_name('IGF','IGF_AP_NO_BASEREC');
831: fnd_message.set_token('STUD',l_person_no.party_number);
832: fnd_file.new_line(fnd_file.log,1);
833: fnd_file.put_line(fnd_file.log,fnd_message.get);
834: END IF;
835:
836: FETCH cur_per_grp INTO per_grp_rec;
837: EXIT WHEN cur_per_grp%NOTFOUND;
850:
851: EXCEPTION
852: WHEN param_exception THEN
853: retcode:=2;
854: fnd_message.set_name('IGF','IGF_AW_PARAM_ERR');
855: igs_ge_msg_stack.add;
856: errbuf := fnd_message.get;
857:
858: WHEN app_exception.record_lock_exception THEN
852: WHEN param_exception THEN
853: retcode:=2;
854: fnd_message.set_name('IGF','IGF_AW_PARAM_ERR');
855: igs_ge_msg_stack.add;
856: errbuf := fnd_message.get;
857:
858: WHEN app_exception.record_lock_exception THEN
859: ROLLBACK;
860: retcode:=2;
857:
858: WHEN app_exception.record_lock_exception THEN
859: ROLLBACK;
860: retcode:=2;
861: fnd_message.set_name('IGF','IGF_GE_LOCK_ERROR');
862: igs_ge_msg_stack.add;
863: errbuf := fnd_message.get;
864:
865: WHEN OTHERS THEN
859: ROLLBACK;
860: retcode:=2;
861: fnd_message.set_name('IGF','IGF_GE_LOCK_ERROR');
862: igs_ge_msg_stack.add;
863: errbuf := fnd_message.get;
864:
865: WHEN OTHERS THEN
866: ROLLBACK;
867: retcode:=2;
864:
865: WHEN OTHERS THEN
866: ROLLBACK;
867: retcode:=2;
868: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXCEPTION');
869: igs_ge_msg_stack.add;
870: errbuf := fnd_message.get || SQLERRM;
871: END run;
872:
866: ROLLBACK;
867: retcode:=2;
868: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXCEPTION');
869: igs_ge_msg_stack.add;
870: errbuf := fnd_message.get || SQLERRM;
871: END run;
872:
873: END igf_aw_manage_awd;