139: FND_FILE.PUT_LINE(FND_FILE.LOG,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWD_GRP'),35) || ' :'||p_grp_code);
140: FND_FILE.PUT_LINE(FND_FILE.LOG,RPAD(l1_person_number,35) || ' :'||lv_desc);
141: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
142:
143: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PROC_AWD');
144: FND_MESSAGE.SET_TOKEN('AWD_YR',l_alternate_code);
145: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
146:
147: tgroup_rule(l_ci_cal_type ,
140: FND_FILE.PUT_LINE(FND_FILE.LOG,RPAD(l1_person_number,35) || ' :'||lv_desc);
141: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
142:
143: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PROC_AWD');
144: FND_MESSAGE.SET_TOKEN('AWD_YR',l_alternate_code);
145: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
146:
147: tgroup_rule(l_ci_cal_type ,
148: l_ci_sequence_NUMBER ,
141: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
142:
143: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PROC_AWD');
144: FND_MESSAGE.SET_TOKEN('AWD_YR',l_alternate_code);
145: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
146:
147: tgroup_rule(l_ci_cal_type ,
148: l_ci_sequence_NUMBER ,
149: p_pergrp_id ,
280: ELSE
281: l_stud_proc := TRUE ;
282: OPEN get_grp_desc(p_pergrp_id);
283: FETCH get_grp_desc into lv_desc;
284: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PERSON_ID_GROUP');
285: FND_MESSAGE.SET_TOKEN('P_PER_GRP',lv_desc);
286: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
287: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
288: CLOSE get_grp_desc;
281: l_stud_proc := TRUE ;
282: OPEN get_grp_desc(p_pergrp_id);
283: FETCH get_grp_desc into lv_desc;
284: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PERSON_ID_GROUP');
285: FND_MESSAGE.SET_TOKEN('P_PER_GRP',lv_desc);
286: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
287: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
288: CLOSE get_grp_desc;
289: END IF;
282: OPEN get_grp_desc(p_pergrp_id);
283: FETCH get_grp_desc into lv_desc;
284: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PERSON_ID_GROUP');
285: FND_MESSAGE.SET_TOKEN('P_PER_GRP',lv_desc);
286: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
287: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
288: CLOSE get_grp_desc;
289: END IF;
290:
313: IF l_stud_proc THEN
314:
315: FETCH c_stud INTO l_stud ;
316: IF c_stud%NOTFOUND AND c_stud%ROWCOUNT = 0 THEN
317: FND_MESSAGE.SET_NAME('IGF','IGF_DB_NO_PER_GRP');
318: FND_FILE.PUT_LINE(fnd_file.log,fnd_message.get());
319: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
320: CLOSE c_stud;
321: RETURN ;
314:
315: FETCH c_stud INTO l_stud ;
316: IF c_stud%NOTFOUND AND c_stud%ROWCOUNT = 0 THEN
317: FND_MESSAGE.SET_NAME('IGF','IGF_DB_NO_PER_GRP');
318: FND_FILE.PUT_LINE(fnd_file.log,fnd_message.get());
319: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
320: CLOSE c_stud;
321: RETURN ;
322: ELSE
331: OPEN c_alternate_code(p_ci_cal_type,p_ci_sequence_number);
332: FETCH c_alternate_code INTO l_alternate_code;
333: CLOSE c_alternate_code;
334:
335: FND_MESSAGE.SET_NAME('IGF','IGF_GR_LI_PER_INVALID');
336: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_stud.party_number);
337: FND_MESSAGE.SET_TOKEN('AWD_YR',l_alternate_code);
338: FND_FILE.PUT_LINE(fnd_file.log,fnd_message.get());
339: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
332: FETCH c_alternate_code INTO l_alternate_code;
333: CLOSE c_alternate_code;
334:
335: FND_MESSAGE.SET_NAME('IGF','IGF_GR_LI_PER_INVALID');
336: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_stud.party_number);
337: FND_MESSAGE.SET_TOKEN('AWD_YR',l_alternate_code);
338: FND_FILE.PUT_LINE(fnd_file.log,fnd_message.get());
339: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
340:
333: CLOSE c_alternate_code;
334:
335: FND_MESSAGE.SET_NAME('IGF','IGF_GR_LI_PER_INVALID');
336: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_stud.party_number);
337: FND_MESSAGE.SET_TOKEN('AWD_YR',l_alternate_code);
338: FND_FILE.PUT_LINE(fnd_file.log,fnd_message.get());
339: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
340:
341: ln_counter := 1;
334:
335: FND_MESSAGE.SET_NAME('IGF','IGF_GR_LI_PER_INVALID');
336: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_stud.party_number);
337: FND_MESSAGE.SET_TOKEN('AWD_YR',l_alternate_code);
338: FND_FILE.PUT_LINE(fnd_file.log,fnd_message.get());
339: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
340:
341: ln_counter := 1;
342: END IF;
378: FETCH c_check_group INTO l_check_group;
379: CLOSE c_check_group;
380:
381: IF l_check_group.target_group = p_grp_code THEN
382: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PROC_GRP_CD_ALRDY_ASGND');
383: FND_MESSAGE.SET_TOKEN('GRP_CODE',p_grp_code);
384: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
385: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
386: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
379: CLOSE c_check_group;
380:
381: IF l_check_group.target_group = p_grp_code THEN
382: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PROC_GRP_CD_ALRDY_ASGND');
383: FND_MESSAGE.SET_TOKEN('GRP_CODE',p_grp_code);
384: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
385: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
386: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
387: ELSE
380:
381: IF l_check_group.target_group = p_grp_code THEN
382: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PROC_GRP_CD_ALRDY_ASGND');
383: FND_MESSAGE.SET_TOKEN('GRP_CODE',p_grp_code);
384: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
385: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
386: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
387: ELSE
388: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PROCESS_GRP_CODE');
381: IF l_check_group.target_group = p_grp_code THEN
382: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PROC_GRP_CD_ALRDY_ASGND');
383: FND_MESSAGE.SET_TOKEN('GRP_CODE',p_grp_code);
384: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
385: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
386: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
387: ELSE
388: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PROCESS_GRP_CODE');
389: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
384: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
385: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
386: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
387: ELSE
388: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PROCESS_GRP_CODE');
389: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
390: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
391:
392: IF NVL(l_fabase.lock_awd_flag,'N') = 'N' THEN
385: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
386: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
387: ELSE
388: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PROCESS_GRP_CODE');
389: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
390: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
391:
392: IF NVL(l_fabase.lock_awd_flag,'N') = 'N' THEN
393: igf_ap_fa_base_rec_pkg.update_row(
386: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
387: ELSE
388: FND_MESSAGE.SET_NAME('IGF','IGF_AW_PROCESS_GRP_CODE');
389: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
390: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
391:
392: IF NVL(l_fabase.lock_awd_flag,'N') = 'N' THEN
393: igf_ap_fa_base_rec_pkg.update_row(
394: x_rowid => l_fabase.row_id,
505: x_lock_awd_flag => l_fabase.lock_awd_flag,
506: x_lock_coa_flag => l_fabase.lock_coa_flag
507: );
508:
509: FND_MESSAGE.SET_NAME('IGF','IGF_AW_GRP_ASSIGN_STUD');
510: FND_MESSAGE.SET_TOKEN('GRP_CODE',p_grp_code);
511: FND_MESSAGE.SET_TOKEN('PERSON',l_person_number);
512: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
513:
506: x_lock_coa_flag => l_fabase.lock_coa_flag
507: );
508:
509: FND_MESSAGE.SET_NAME('IGF','IGF_AW_GRP_ASSIGN_STUD');
510: FND_MESSAGE.SET_TOKEN('GRP_CODE',p_grp_code);
511: FND_MESSAGE.SET_TOKEN('PERSON',l_person_number);
512: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
513:
514: FND_MESSAGE.SET_NAME('IGF','IGF_AW_GRP_ASSIGN_COMP');
507: );
508:
509: FND_MESSAGE.SET_NAME('IGF','IGF_AW_GRP_ASSIGN_STUD');
510: FND_MESSAGE.SET_TOKEN('GRP_CODE',p_grp_code);
511: FND_MESSAGE.SET_TOKEN('PERSON',l_person_number);
512: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
513:
514: FND_MESSAGE.SET_NAME('IGF','IGF_AW_GRP_ASSIGN_COMP');
515: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
508:
509: FND_MESSAGE.SET_NAME('IGF','IGF_AW_GRP_ASSIGN_STUD');
510: FND_MESSAGE.SET_TOKEN('GRP_CODE',p_grp_code);
511: FND_MESSAGE.SET_TOKEN('PERSON',l_person_number);
512: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
513:
514: FND_MESSAGE.SET_NAME('IGF','IGF_AW_GRP_ASSIGN_COMP');
515: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
516: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
510: FND_MESSAGE.SET_TOKEN('GRP_CODE',p_grp_code);
511: FND_MESSAGE.SET_TOKEN('PERSON',l_person_number);
512: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
513:
514: FND_MESSAGE.SET_NAME('IGF','IGF_AW_GRP_ASSIGN_COMP');
515: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
516: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
517: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
518: ELSE
511: FND_MESSAGE.SET_TOKEN('PERSON',l_person_number);
512: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
513:
514: FND_MESSAGE.SET_NAME('IGF','IGF_AW_GRP_ASSIGN_COMP');
515: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
516: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
517: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
518: ELSE
519: FND_MESSAGE.SET_NAME('IGF','IGF_AW_LOCK');
512: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
513:
514: FND_MESSAGE.SET_NAME('IGF','IGF_AW_GRP_ASSIGN_COMP');
515: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
516: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
517: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
518: ELSE
519: FND_MESSAGE.SET_NAME('IGF','IGF_AW_LOCK');
520: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
515: FND_MESSAGE.SET_TOKEN('PERSON_NUMBER',l_person_number);
516: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
517: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
518: ELSE
519: FND_MESSAGE.SET_NAME('IGF','IGF_AW_LOCK');
520: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
521: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
522: END IF;
523: END IF;
516: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
517: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
518: ELSE
519: FND_MESSAGE.SET_NAME('IGF','IGF_AW_LOCK');
520: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
521: FND_FILE.PUT_LINE(FND_FILE.LOG,'');
522: END IF;
523: END IF;
524:
539: END IF;
540:
541: EXCEPTION
542: WHEN OTHERS THEN
543: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
544: FND_MESSAGE.SET_TOKEN('NAME','IGF_AW_RULE.tgroup_rule' || SQLERRM);
545: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
546: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_aw_rule.tgroup_rule.exception','sql error:'||SQLERRM);
547: END IF;
540:
541: EXCEPTION
542: WHEN OTHERS THEN
543: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
544: FND_MESSAGE.SET_TOKEN('NAME','IGF_AW_RULE.tgroup_rule' || SQLERRM);
545: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
546: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_aw_rule.tgroup_rule.exception','sql error:'||SQLERRM);
547: END IF;
548: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
544: FND_MESSAGE.SET_TOKEN('NAME','IGF_AW_RULE.tgroup_rule' || SQLERRM);
545: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
546: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_aw_rule.tgroup_rule.exception','sql error:'||SQLERRM);
547: END IF;
548: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
549:
550: END tgroup_rule ;
551: END IGF_AW_RULE;