241:
242: e_skip EXCEPTION;
243:
244: BEGIN
245: igf_aw_gen.set_org_id(NULL);
246: retcode := 0 ;
247:
248: log_to_fnd(p_v_module => 'create_file',
249: p_v_string => ' Entered Procedure create_file: The input parameters are '||
276: p_v_string => ' Start of Parameter logging'
277: );
278:
279: fnd_file.new_line(fnd_file.log,1);
280: fnd_file.put(fnd_file.log,igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PARAMETER_PASS'));
281: fnd_file.new_line(fnd_file.log,1);
282:
283: OPEN c_igf_aw_fund_mast (cp_n_fund_id => l_n_fund_id);
284: FETCH c_igf_aw_fund_mast INTO rec_c_igf_aw_fund_mast;
299: OPEN c_school_opeid (cp_v_school_id => l_v_school_id);
300: FETCH c_school_opeid INTO l_v_meaning;
301: CLOSE c_school_opeid ;
302:
303: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWARD_YEAR'),40),
304: p_v_param_val => l_v_alt_code
305: );
306: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_TYPE'),40),
307: p_v_param_val => l_v_fund_desc
302:
303: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWARD_YEAR'),40),
304: p_v_param_val => l_v_alt_code
305: );
306: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_TYPE'),40),
307: p_v_param_val => l_v_fund_desc
308: );
309: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER'),40),
310: p_v_param_val => igf_gr_gen.get_per_num(l_n_base_id)
305: );
306: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_TYPE'),40),
307: p_v_param_val => l_v_fund_desc
308: );
309: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER'),40),
310: p_v_param_val => igf_gr_gen.get_per_num(l_n_base_id)
311: );
312: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_NUMBER'),40),
313: p_v_param_val => l_v_loan_number
308: );
309: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER'),40),
310: p_v_param_val => igf_gr_gen.get_per_num(l_n_base_id)
311: );
312: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_NUMBER'),40),
313: p_v_param_val => l_v_loan_number
314: );
315: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_ID_GROUP'),40),
316: p_v_param_val => l_v_group_cd
311: );
312: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_NUMBER'),40),
313: p_v_param_val => l_v_loan_number
314: );
315: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_ID_GROUP'),40),
316: p_v_param_val => l_v_group_cd
317: );
318:
319: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','MEDIA_TYPE'),40),
315: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_ID_GROUP'),40),
316: p_v_param_val => l_v_group_cd
317: );
318:
319: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','MEDIA_TYPE'),40),
320: p_v_param_val => igf_aw_gen.lookup_desc('IGF_SL_MEDIA_TYPE',l_v_media_type)
321: );
322:
323: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','SCHOOL_ID'),40),
316: p_v_param_val => l_v_group_cd
317: );
318:
319: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','MEDIA_TYPE'),40),
320: p_v_param_val => igf_aw_gen.lookup_desc('IGF_SL_MEDIA_TYPE',l_v_media_type)
321: );
322:
323: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','SCHOOL_ID'),40),
324: p_v_param_val => l_v_meaning
319: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','MEDIA_TYPE'),40),
320: p_v_param_val => igf_aw_gen.lookup_desc('IGF_SL_MEDIA_TYPE',l_v_media_type)
321: );
322:
323: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','SCHOOL_ID'),40),
324: p_v_param_val => l_v_meaning
325: );
326:
327: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','SCH_NON_ED_BRANCH'),40),
323: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','SCHOOL_ID'),40),
324: p_v_param_val => l_v_meaning
325: );
326:
327: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','SCH_NON_ED_BRANCH'),40),
328: p_v_param_val => l_v_sch_non_ed_branch
329: );
330:
331: fnd_file.new_line(fnd_file.log,1);
341: p_v_string => ' Validation of Required parameters'
342: );
343: IF p_v_award_year IS NULL THEN
344: fnd_message.set_name('IGF','IGF_SL_COD_REQ_PARAM');
345: fnd_message.set_token('PARAM',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','AWARD_YEAR'));
346: fnd_file.put_line(fnd_file.log, fnd_message.get);
347: fnd_file.new_line(fnd_file.log, 1);
348: retcode := 2;
349: RETURN;
350: END IF;
351:
352: IF l_v_media_type IS NULL THEN
353: fnd_message.set_name('IGF','IGF_SL_COD_REQ_PARAM');
354: fnd_message.set_token('PARAM',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','MEDIA_TYPE'));
355: fnd_file.put_line(fnd_file.log, fnd_message.get);
356: fnd_file.new_line(fnd_file.log, 1);
357: retcode := 2;
358: RETURN;
359: END IF;
360:
361: IF l_v_school_id IS NULL THEN
362: fnd_message.set_name('IGF','IGF_SL_COD_REQ_PARAM');
363: fnd_message.set_token('PARAM',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','SCHOOL_ID'));
364: fnd_file.put_line(fnd_file.log, fnd_message.get);
365: fnd_file.new_line(fnd_file.log, 1);
366: retcode := 2;
367: RETURN;
406: -- person id and person group id are mutually exclusive. Hence if both are
407: -- provided error out of the process
408: IF l_n_person_id_grp IS NOT NULL AND l_n_base_id IS NOT NULL THEN
409: fnd_message.set_name('IGF','IGF_SL_COD_INV_PARAM');
410: fnd_message.set_token('PARAM1',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_ID_GROUP'));
411: fnd_message.set_token('PARAM2',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER'));
412: fnd_file.put_line(fnd_file.log, fnd_message.get);
413: fnd_file.new_line(fnd_file.log, 1);
414: retcode := 2;
407: -- provided error out of the process
408: IF l_n_person_id_grp IS NOT NULL AND l_n_base_id IS NOT NULL THEN
409: fnd_message.set_name('IGF','IGF_SL_COD_INV_PARAM');
410: fnd_message.set_token('PARAM1',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_ID_GROUP'));
411: fnd_message.set_token('PARAM2',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER'));
412: fnd_file.put_line(fnd_file.log, fnd_message.get);
413: fnd_file.new_line(fnd_file.log, 1);
414: retcode := 2;
415: RETURN;
418: -- loan id and person group id are mutually exclusive. Hence if both are
419: -- provided error out of the process
420: IF l_n_person_id_grp IS NOT NULL AND l_n_loan_id IS NOT NULL THEN
421: fnd_message.set_name('IGF','IGF_SL_COD_INV_PARAM');
422: fnd_message.set_token('PARAM1',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_ID_GROUP'));
423: fnd_message.set_token('PARAM2',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_NUMBER'));
424: fnd_file.put_line(fnd_file.log, fnd_message.get);
425: fnd_file.new_line(fnd_file.log, 1);
426: retcode := 2;
419: -- provided error out of the process
420: IF l_n_person_id_grp IS NOT NULL AND l_n_loan_id IS NOT NULL THEN
421: fnd_message.set_name('IGF','IGF_SL_COD_INV_PARAM');
422: fnd_message.set_token('PARAM1',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_ID_GROUP'));
423: fnd_message.set_token('PARAM2',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_NUMBER'));
424: fnd_file.put_line(fnd_file.log, fnd_message.get);
425: fnd_file.new_line(fnd_file.log, 1);
426: retcode := 2;
427: RETURN;
430: -- validate if the person group if passed is a valid person group
431: IF l_n_person_id_grp IS NOT NULL THEN
432: IF l_v_group_cd IS NULL THEN
433: fnd_message.set_name('IGS','IGS_FI_INVALID_PARAMETER');
434: fnd_message.set_token('PARAMETER',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_ID_GROUP'));
435: fnd_file.put_line(fnd_file.log, fnd_message.get);
436: retcode := 2;
437: RETURN;
438: END IF;
447:
448: FETCH c_aw_lookups_view INTO l_v_meaning;
449: IF c_aw_lookups_view%NOTFOUND THEN
450: fnd_message.set_name('IGS','IGS_FI_INVALID_PARAMETER');
451: fnd_message.set_token('PARAMETER',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','MEDIA_TYPE'));
452: fnd_file.put_line(fnd_file.log, fnd_message.get);
453: retcode := 2;
454: RETURN;
455: END IF;
460: FETCH c_school_codes INTO rec_c_school_codes;
461: IF c_school_codes%NOTFOUND THEN
462: CLOSE c_school_codes;
463: fnd_message.set_name('IGS','IGS_FI_INVALID_PARAMETER');
464: fnd_message.set_token('PARAMETER',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','SCHOOL_ID'));
465: fnd_file.put_line(fnd_file.log, fnd_message.get);
466: retcode := 2;
467: RETURN;
468: END IF;
477: FETCH c_sch_non_ed_branch INTO l_c_flag;
478: IF c_sch_non_ed_branch%NOTFOUND THEN
479: CLOSE c_sch_non_ed_branch;
480: fnd_message.set_name('IGS','IGS_FI_INVALID_PARAMETER');
481: fnd_message.set_token('PARAMETER',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','SCH_NON_ED_BRANCH'));
482: fnd_file.put_line(fnd_file.log, fnd_message.get);
483: retcode := 2;
484: RETURN;
485: END IF;
532: BEGIN
533: --Capture the person id into a local variable l_n_person_id.
534: FETCH c_dyn_person_grp INTO l_n_person_id;
535: EXIT WHEN c_dyn_person_grp%NOTFOUND;
536: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER'),40),
537: p_v_param_val => get_person_number (p_n_person_id => l_n_person_id)
538: );
539: log_to_fnd(p_v_module => 'create_file',
540: p_v_string => ' processing for Person number '||get_person_number (p_n_person_id => l_n_person_id)
851:
852: -- Verify if the fund is dicontinued or not
853: IF l_rec_lorlar.discontinue_fund = 'Y' THEN
854: fnd_message.set_name('IGS','IGS_FI_INVALID_PARAMETER');
855: fnd_message.set_token('PARAMETER',igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_TYPE'));
856: fnd_file.put_line(fnd_file.log, fnd_message.get);
857: RETURN FALSE;
858: END IF;
859:
1087: )
1088: LOOP
1089: BEGIN
1090: fnd_file.new_line(fnd_file.log,1);
1091: fnd_file.put(fnd_file.log,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PROCESSING'),40));
1092: fnd_file.new_line(fnd_file.log,1);
1093:
1094: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_NUMBER'),40),
1095: p_v_param_val => rec_c_lor_lar.loan_number
1090: fnd_file.new_line(fnd_file.log,1);
1091: fnd_file.put(fnd_file.log,RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PROCESSING'),40));
1092: fnd_file.new_line(fnd_file.log,1);
1093:
1094: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_NUMBER'),40),
1095: p_v_param_val => rec_c_lor_lar.loan_number
1096: );
1097: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_TYPE'),40),
1098: p_v_param_val => igf_aw_gen.lookup_desc('IGF_AW_FED_FUND',rec_c_lor_lar.fed_fund_code)
1093:
1094: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_NUMBER'),40),
1095: p_v_param_val => rec_c_lor_lar.loan_number
1096: );
1097: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_TYPE'),40),
1098: p_v_param_val => igf_aw_gen.lookup_desc('IGF_AW_FED_FUND',rec_c_lor_lar.fed_fund_code)
1099: );
1100:
1101: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_STATUS'),40),
1094: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_NUMBER'),40),
1095: p_v_param_val => rec_c_lor_lar.loan_number
1096: );
1097: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_TYPE'),40),
1098: p_v_param_val => igf_aw_gen.lookup_desc('IGF_AW_FED_FUND',rec_c_lor_lar.fed_fund_code)
1099: );
1100:
1101: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_STATUS'),40),
1102: p_v_param_val => igf_aw_gen.lookup_desc('IGF_SL_LOAN_STATUS',rec_c_lor_lar.loan_status)
1097: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_TYPE'),40),
1098: p_v_param_val => igf_aw_gen.lookup_desc('IGF_AW_FED_FUND',rec_c_lor_lar.fed_fund_code)
1099: );
1100:
1101: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_STATUS'),40),
1102: p_v_param_val => igf_aw_gen.lookup_desc('IGF_SL_LOAN_STATUS',rec_c_lor_lar.loan_status)
1103: );
1104:
1105: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER'),40),
1098: p_v_param_val => igf_aw_gen.lookup_desc('IGF_AW_FED_FUND',rec_c_lor_lar.fed_fund_code)
1099: );
1100:
1101: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_STATUS'),40),
1102: p_v_param_val => igf_aw_gen.lookup_desc('IGF_SL_LOAN_STATUS',rec_c_lor_lar.loan_status)
1103: );
1104:
1105: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER'),40),
1106: p_v_param_val => igf_gr_gen.get_per_num(rec_c_lor_lar.base_id)
1101: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','LOAN_STATUS'),40),
1102: p_v_param_val => igf_aw_gen.lookup_desc('IGF_SL_LOAN_STATUS',rec_c_lor_lar.loan_status)
1103: );
1104:
1105: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER'),40),
1106: p_v_param_val => igf_gr_gen.get_per_num(rec_c_lor_lar.base_id)
1107: );
1108: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','FUND_CODE'),40),
1109: p_v_param_val => rec_c_lor_lar.fund_code
1104:
1105: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PERSON_NUMBER'),40),
1106: p_v_param_val => igf_gr_gen.get_per_num(rec_c_lor_lar.base_id)
1107: );
1108: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','FUND_CODE'),40),
1109: p_v_param_val => rec_c_lor_lar.fund_code
1110: );
1111:
1112: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PROCESSING_TYPE'),40),
1108: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','FUND_CODE'),40),
1109: p_v_param_val => rec_c_lor_lar.fund_code
1110: );
1111:
1112: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PROCESSING_TYPE'),40),
1113: p_v_param_val => igf_aw_gen.lookup_desc('IGF_SL_PRC_TYPE_CODE',rec_c_lor_lar.prc_type_code)
1114: );
1115:
1116: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','CL_VERSION'),40),
1109: p_v_param_val => rec_c_lor_lar.fund_code
1110: );
1111:
1112: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PROCESSING_TYPE'),40),
1113: p_v_param_val => igf_aw_gen.lookup_desc('IGF_SL_PRC_TYPE_CODE',rec_c_lor_lar.prc_type_code)
1114: );
1115:
1116: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','CL_VERSION'),40),
1117: p_v_param_val => igf_aw_gen.lookup_desc('IGF_SL_CL_VERSION',rec_c_lor_lar.cl_version)
1112: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','PROCESSING_TYPE'),40),
1113: p_v_param_val => igf_aw_gen.lookup_desc('IGF_SL_PRC_TYPE_CODE',rec_c_lor_lar.prc_type_code)
1114: );
1115:
1116: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','CL_VERSION'),40),
1117: p_v_param_val => igf_aw_gen.lookup_desc('IGF_SL_CL_VERSION',rec_c_lor_lar.cl_version)
1118: );
1119: fnd_file.new_line(fnd_file.log,1);
1120:
1113: p_v_param_val => igf_aw_gen.lookup_desc('IGF_SL_PRC_TYPE_CODE',rec_c_lor_lar.prc_type_code)
1114: );
1115:
1116: log_parameters ( p_v_param_typ => RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS','CL_VERSION'),40),
1117: p_v_param_val => igf_aw_gen.lookup_desc('IGF_SL_CL_VERSION',rec_c_lor_lar.cl_version)
1118: );
1119: fnd_file.new_line(fnd_file.log,1);
1120:
1121: -- Assigning to record type variable
1764: l_n_efc_f NUMBER;
1765: l_n_ctr_disb NUMBER;
1766: BEGIN
1767:
1768: igf_aw_gen.set_org_id(NULL);
1769: retcode := 0 ;
1770: SAVEPOINT sub_create_file;
1771: log_to_fnd(p_v_module => 'sub_create_file',
1772: p_v_string => ' Entered Procedure sub_create_file: The input parameters are '||