DBA Data[Home] [Help]

APPS.IGF_GR_GEN_XML dependencies on FND_FILE

Line 258: fnd_file.put_line(fnd_file.log,l_msg_str_1);

254:
255: -- show award year
256: l_msg_str_1 := RPAD(igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','AWARD_YEAR'),30) ||
257: RPAD(igf_gr_gen.get_alt_code(l_ci_cal_type,l_ci_sequence_number),20);
258: fnd_file.put_line(fnd_file.log,l_msg_str_1);
259:
260: -- show source entity id
261: l_msg_str_2 := RPAD(igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS', 'SOURCE_ENTITY_ID'),30) || p_source_entity_id;
262: fnd_file.put_line(fnd_file.log,l_msg_str_2);

Line 262: fnd_file.put_line(fnd_file.log,l_msg_str_2);

258: fnd_file.put_line(fnd_file.log,l_msg_str_1);
259:
260: -- show source entity id
261: l_msg_str_2 := RPAD(igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS', 'SOURCE_ENTITY_ID'),30) || p_source_entity_id;
262: fnd_file.put_line(fnd_file.log,l_msg_str_2);
263:
264: -- show reporting entity
265: IF (p_report_entity_id IS NOT NULL) THEN
266: l_msg_str_3 := RPAD(igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS', 'REPORT_ENTITY_ID'),30) || p_report_entity_id;

Line 267: fnd_file.put_line(fnd_file.log,l_msg_str_3);

263:
264: -- show reporting entity
265: IF (p_report_entity_id IS NOT NULL) THEN
266: l_msg_str_3 := RPAD(igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS', 'REPORT_ENTITY_ID'),30) || p_report_entity_id;
267: fnd_file.put_line(fnd_file.log,l_msg_str_3);
268: END IF;
269:
270: -- show attending entity
271: IF (p_attend_entity_id IS NOT NULL) THEN

Line 273: fnd_file.put_line(fnd_file.log,l_msg_str_4);

269:
270: -- show attending entity
271: IF (p_attend_entity_id IS NOT NULL) THEN
272: l_msg_str_4 := RPAD(igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS', 'ATTEND_ENTITY_ID'),30) || p_attend_entity_id;
273: fnd_file.put_line(fnd_file.log,l_msg_str_4);
274: END IF;
275:
276: -- show person number
277: IF (p_base_id IS NOT NULL) THEN

Line 280: fnd_file.put_line(fnd_file.log,l_msg_str_5);

276: -- show person number
277: IF (p_base_id IS NOT NULL) THEN
278: l_msg_str_5 := RPAD(igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','BASE_ID'),30) ||
279: RPAD(igf_gr_gen.get_per_num(p_base_id),20);
280: fnd_file.put_line(fnd_file.log,l_msg_str_5);
281: END IF;
282:
283: -- show persond id group
284: IF (p_persid_grp IS NOT NULL) THEN

Line 289: fnd_file.put_line(fnd_file.log,l_msg_str_6);

285: OPEN cur_person_group(p_persid_grp);
286: FETCH cur_person_group INTO rec_person_group;
287: CLOSE cur_person_group;
288: l_msg_str_6 := RPAD(igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS', 'PERSON_ID_GROUP'),30) || rec_person_group.group_name;
289: fnd_file.put_line(fnd_file.log,l_msg_str_6);
290: END IF;
291:
292: EXCEPTION
293: WHEN OTHERS THEN

Line 408: fnd_file.put_line(fnd_file.log, fnd_message.get);

404: IF p_award_year IS NULL OR l_ci_cal_type IS NULL OR l_ci_sequence_number IS NULL THEN
405: l_params_status := FALSE;
406: fnd_message.set_name('IGF', 'IGF_SL_COD_REQ_PARAM');
407: fnd_message.set_token('PARAM', igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','AWARD_YEAR'));
408: fnd_file.put_line(fnd_file.log, fnd_message.get);
409: fnd_file.new_line(fnd_file.log, 1);
410: END IF;
411:
412: -- Source entity id is mandatory parameter

Line 409: fnd_file.new_line(fnd_file.log, 1);

405: l_params_status := FALSE;
406: fnd_message.set_name('IGF', 'IGF_SL_COD_REQ_PARAM');
407: fnd_message.set_token('PARAM', igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','AWARD_YEAR'));
408: fnd_file.put_line(fnd_file.log, fnd_message.get);
409: fnd_file.new_line(fnd_file.log, 1);
410: END IF;
411:
412: -- Source entity id is mandatory parameter
413: IF TRIM(p_source_entity_id) IS NULL THEN

Line 417: fnd_file.put_line(fnd_file.log, fnd_message.get);

413: IF TRIM(p_source_entity_id) IS NULL THEN
414: l_params_status := FALSE;
415: fnd_message.set_name('IGF', 'IGF_SL_COD_REQ_PARAM');
416: fnd_message.set_token('PARAM', igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS', 'SOURCE_ENTITY_ID'));
417: fnd_file.put_line(fnd_file.log, fnd_message.get);
418: fnd_file.new_line(fnd_file.log, 1);
419: ELSIF is_alpha_numeric(p_source_entity_id) OR LENGTH(TRIM(p_source_entity_id)) > 8 THEN
420: -- bvisvana BUg # 4124839
421: l_params_status := FALSE;

Line 418: fnd_file.new_line(fnd_file.log, 1);

414: l_params_status := FALSE;
415: fnd_message.set_name('IGF', 'IGF_SL_COD_REQ_PARAM');
416: fnd_message.set_token('PARAM', igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS', 'SOURCE_ENTITY_ID'));
417: fnd_file.put_line(fnd_file.log, fnd_message.get);
418: fnd_file.new_line(fnd_file.log, 1);
419: ELSIF is_alpha_numeric(p_source_entity_id) OR LENGTH(TRIM(p_source_entity_id)) > 8 THEN
420: -- bvisvana BUg # 4124839
421: l_params_status := FALSE;
422: fnd_message.set_name('IGF','IGF_SL_COD_INVL_SOURCE_ID');

Line 423: fnd_file.put_line(fnd_file.log, fnd_message.get);

419: ELSIF is_alpha_numeric(p_source_entity_id) OR LENGTH(TRIM(p_source_entity_id)) > 8 THEN
420: -- bvisvana BUg # 4124839
421: l_params_status := FALSE;
422: fnd_message.set_name('IGF','IGF_SL_COD_INVL_SOURCE_ID');
423: fnd_file.put_line(fnd_file.log, fnd_message.get);
424: fnd_file.new_line(fnd_file.log, 1);
425: END IF;
426:
427: -- validating person number and person group are mutually exclusive or not.

Line 424: fnd_file.new_line(fnd_file.log, 1);

420: -- bvisvana BUg # 4124839
421: l_params_status := FALSE;
422: fnd_message.set_name('IGF','IGF_SL_COD_INVL_SOURCE_ID');
423: fnd_file.put_line(fnd_file.log, fnd_message.get);
424: fnd_file.new_line(fnd_file.log, 1);
425: END IF;
426:
427: -- validating person number and person group are mutually exclusive or not.
428: IF ( (p_base_id IS NOT NULL) AND (p_persid_grp IS NOT NULL) ) THEN

Line 433: fnd_file.put_line(fnd_file.log, fnd_message.get);

429: l_params_status := FALSE;
430: fnd_message.set_name('IGF', 'IGF_SL_COD_INV_PARAM');
431: fnd_message.set_token('PARAM1', igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS', 'BASE_ID'));
432: fnd_message.set_token('PARAM2', igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS', 'PERSON_ID_GROUP'));
433: fnd_file.put_line(fnd_file.log, fnd_message.get);
434: fnd_file.new_line(fnd_file.log, 1);
435: END IF;
436:
437: -- Validating attributes for COD support.

Line 434: fnd_file.new_line(fnd_file.log, 1);

430: fnd_message.set_name('IGF', 'IGF_SL_COD_INV_PARAM');
431: fnd_message.set_token('PARAM1', igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS', 'BASE_ID'));
432: fnd_message.set_token('PARAM2', igf_aw_gen.lookup_desc('IGF_GE_PARAMETERS', 'PERSON_ID_GROUP'));
433: fnd_file.put_line(fnd_file.log, fnd_message.get);
434: fnd_file.new_line(fnd_file.log, 1);
435: END IF;
436:
437: -- Validating attributes for COD support.
438: IF p_award_year IS NOT NULL THEN

Line 449: fnd_file.put_line(fnd_file.log, fnd_message.get);

445: THEN
446: -- ie award year is not setup at System Award Year Mappings Form.
447: l_params_status := FALSE;
448: fnd_message.set_name('IGF', 'IGF_SL_COD_INV_AWD_YR');
449: fnd_file.put_line(fnd_file.log, fnd_message.get);
450: fnd_file.new_line(fnd_file.log, 1);
451: ELSE
452: -- check award year is Open award year or not.
453: IF (rec_awd_year.award_year_status_code <> 'O') THEN

Line 450: fnd_file.new_line(fnd_file.log, 1);

446: -- ie award year is not setup at System Award Year Mappings Form.
447: l_params_status := FALSE;
448: fnd_message.set_name('IGF', 'IGF_SL_COD_INV_AWD_YR');
449: fnd_file.put_line(fnd_file.log, fnd_message.get);
450: fnd_file.new_line(fnd_file.log, 1);
451: ELSE
452: -- check award year is Open award year or not.
453: IF (rec_awd_year.award_year_status_code <> 'O') THEN
454: l_params_status := FALSE;

Line 456: fnd_file.put_line(fnd_file.log, fnd_message.get);

452: -- check award year is Open award year or not.
453: IF (rec_awd_year.award_year_status_code <> 'O') THEN
454: l_params_status := FALSE;
455: fnd_message.set_name('IGF', 'IGF_GR_COD_AWDYR_OPEN');
456: fnd_file.put_line(fnd_file.log, fnd_message.get);
457: fnd_file.new_line(fnd_file.log, 1);
458: END IF;
459:
460: -- check pell participation is Full or not.

Line 457: fnd_file.new_line(fnd_file.log, 1);

453: IF (rec_awd_year.award_year_status_code <> 'O') THEN
454: l_params_status := FALSE;
455: fnd_message.set_name('IGF', 'IGF_GR_COD_AWDYR_OPEN');
456: fnd_file.put_line(fnd_file.log, fnd_message.get);
457: fnd_file.new_line(fnd_file.log, 1);
458: END IF;
459:
460: -- check pell participation is Full or not.
461: IF (rec_awd_year.pell_participant_code <> 'FULL_PARTICIPANT') THEN

Line 464: fnd_file.put_line(fnd_file.log, fnd_message.get);

460: -- check pell participation is Full or not.
461: IF (rec_awd_year.pell_participant_code <> 'FULL_PARTICIPANT') THEN
462: l_params_status := FALSE;
463: fnd_message.set_name('IGF', 'IGF_GR_COD_AWDYR_FULL');
464: fnd_file.put_line(fnd_file.log, fnd_message.get);
465: fnd_file.new_line(fnd_file.log, 1);
466: END IF;
467:
468: -- check wether the award year is before 04-05.

Line 465: fnd_file.new_line(fnd_file.log, 1);

461: IF (rec_awd_year.pell_participant_code <> 'FULL_PARTICIPANT') THEN
462: l_params_status := FALSE;
463: fnd_message.set_name('IGF', 'IGF_GR_COD_AWDYR_FULL');
464: fnd_file.put_line(fnd_file.log, fnd_message.get);
465: fnd_file.new_line(fnd_file.log, 1);
466: END IF;
467:
468: -- check wether the award year is before 04-05.
469: IF (rec_awd_year.sys_award_year < '0405') THEN

Line 472: fnd_file.put_line(fnd_file.log, fnd_message.get);

468: -- check wether the award year is before 04-05.
469: IF (rec_awd_year.sys_award_year < '0405') THEN
470: l_params_status := FALSE;
471: fnd_message.set_name('IGF', 'IGF_SL_COD_XML_SUPPORT');
472: fnd_file.put_line(fnd_file.log, fnd_message.get);
473: fnd_file.new_line(fnd_file.log, 1);
474: END IF;
475: END IF;
476: CLOSE cur_awd_year;

Line 473: fnd_file.new_line(fnd_file.log, 1);

469: IF (rec_awd_year.sys_award_year < '0405') THEN
470: l_params_status := FALSE;
471: fnd_message.set_name('IGF', 'IGF_SL_COD_XML_SUPPORT');
472: fnd_file.put_line(fnd_file.log, fnd_message.get);
473: fnd_file.new_line(fnd_file.log, 1);
474: END IF;
475: END IF;
476: CLOSE cur_awd_year;
477: END IF;

Line 487: fnd_file.put_line(fnd_file.log, fnd_message.get);

483: IF cur_source_entity%NOTFOUND THEN
484: -- Not a valid source entity id.
485: l_params_status := FALSE;
486: fnd_message.set_name('IGF', 'IGF_SL_COD_INV_SRC_ID');
487: fnd_file.put_line(fnd_file.log, fnd_message.get);
488: fnd_file.new_line(fnd_file.log, 1);
489: END IF;
490: CLOSE cur_source_entity;
491: END IF;

Line 488: fnd_file.new_line(fnd_file.log, 1);

484: -- Not a valid source entity id.
485: l_params_status := FALSE;
486: fnd_message.set_name('IGF', 'IGF_SL_COD_INV_SRC_ID');
487: fnd_file.put_line(fnd_file.log, fnd_message.get);
488: fnd_file.new_line(fnd_file.log, 1);
489: END IF;
490: CLOSE cur_source_entity;
491: END IF;
492:

Line 502: fnd_file.put_line(fnd_file.log, fnd_message.get);

498: -- No origination records to process.
499: l_params_status := FALSE;
500: fnd_message.set_name('IGF', 'IGF_GR_COD_INV_REP_ID');
501: fnd_message.set_token('REPORTING_ID', p_report_entity_id);
502: fnd_file.put_line(fnd_file.log, fnd_message.get);
503: fnd_file.new_line(fnd_file.log, 1);
504: END IF;
505: CLOSE cur_rep_entity;
506: END IF;

Line 503: fnd_file.new_line(fnd_file.log, 1);

499: l_params_status := FALSE;
500: fnd_message.set_name('IGF', 'IGF_GR_COD_INV_REP_ID');
501: fnd_message.set_token('REPORTING_ID', p_report_entity_id);
502: fnd_file.put_line(fnd_file.log, fnd_message.get);
503: fnd_file.new_line(fnd_file.log, 1);
504: END IF;
505: CLOSE cur_rep_entity;
506: END IF;
507:

Line 512: fnd_file.put_line(fnd_file.log, fnd_message.get);

508: -- Validate attending entity id. Is it present without reporting entity id.
509: IF (p_attend_entity_id IS NOT NULL AND p_report_entity_id IS NULL) THEN
510: l_params_status := FALSE;
511: fnd_message.set_name('IGF', 'IGF_SL_COD_INV_ATD_PARAM');
512: fnd_file.put_line(fnd_file.log, fnd_message.get);
513: fnd_file.new_line(fnd_file.log, 1);
514: END IF;
515:
516: -- Validate Attending Entity ID. Records with report and attend entity id exists or not.

Line 513: fnd_file.new_line(fnd_file.log, 1);

509: IF (p_attend_entity_id IS NOT NULL AND p_report_entity_id IS NULL) THEN
510: l_params_status := FALSE;
511: fnd_message.set_name('IGF', 'IGF_SL_COD_INV_ATD_PARAM');
512: fnd_file.put_line(fnd_file.log, fnd_message.get);
513: fnd_file.new_line(fnd_file.log, 1);
514: END IF;
515:
516: -- Validate Attending Entity ID. Records with report and attend entity id exists or not.
517: IF (p_attend_entity_id IS NOT NULL AND p_report_entity_id IS NOT NULL) THEN

Line 526: fnd_file.put_line(fnd_file.log, fnd_message.get);

522: l_params_status := FALSE;
523: fnd_message.set_name('IGF', 'IGF_GR_COD_INV_ATD_ID');
524: fnd_message.set_token('REPORTING_ID', p_report_entity_id);
525: fnd_message.set_token('ATTENDING_ID', p_attend_entity_id);
526: fnd_file.put_line(fnd_file.log, fnd_message.get);
527: fnd_file.new_line(fnd_file.log, 1);
528: END IF;
529: CLOSE cur_attd_entity;
530: END IF;

Line 527: fnd_file.new_line(fnd_file.log, 1);

523: fnd_message.set_name('IGF', 'IGF_GR_COD_INV_ATD_ID');
524: fnd_message.set_token('REPORTING_ID', p_report_entity_id);
525: fnd_message.set_token('ATTENDING_ID', p_attend_entity_id);
526: fnd_file.put_line(fnd_file.log, fnd_message.get);
527: fnd_file.new_line(fnd_file.log, 1);
528: END IF;
529: CLOSE cur_attd_entity;
530: END IF;
531:

Line 538: fnd_file.put_line(fnd_file.log, fnd_message.get);

534: -- check fa base record exists or not.
535: IF NOT check_fa_rec(p_base_id, l_ci_cal_type, l_ci_sequence_number) THEN
536: l_params_status := FALSE;
537: fnd_message.set_name('IGF', 'IGF_SP_NO_FA_BASE_REC');
538: fnd_file.put_line(fnd_file.log, fnd_message.get);
539: fnd_file.new_line(fnd_file.log, 1);
540: ELSE
541: -- check wether this person has any pell origination records or not.
542: OPEN cur_person_number(l_ci_cal_type, l_ci_sequence_number, p_base_id);

Line 539: fnd_file.new_line(fnd_file.log, 1);

535: IF NOT check_fa_rec(p_base_id, l_ci_cal_type, l_ci_sequence_number) THEN
536: l_params_status := FALSE;
537: fnd_message.set_name('IGF', 'IGF_SP_NO_FA_BASE_REC');
538: fnd_file.put_line(fnd_file.log, fnd_message.get);
539: fnd_file.new_line(fnd_file.log, 1);
540: ELSE
541: -- check wether this person has any pell origination records or not.
542: OPEN cur_person_number(l_ci_cal_type, l_ci_sequence_number, p_base_id);
543: FETCH cur_person_number INTO lv_dummy;

Line 549: fnd_file.put_line(fnd_file.log, fnd_message.get);

545: -- no pell origination records for this person.
546: l_params_status := FALSE;
547: fnd_message.set_name('IGF', 'IGF_GR_COD_NO_ORIG_REC');
548: fnd_message.set_token('PERSON_NUMBER', igf_gr_gen.get_per_num(p_base_id));
549: fnd_file.put_line(fnd_file.log, fnd_message.get);
550: fnd_file.new_line(fnd_file.log, 1);
551: END IF;
552: CLOSE cur_person_number;
553: END IF;

Line 550: fnd_file.new_line(fnd_file.log, 1);

546: l_params_status := FALSE;
547: fnd_message.set_name('IGF', 'IGF_GR_COD_NO_ORIG_REC');
548: fnd_message.set_token('PERSON_NUMBER', igf_gr_gen.get_per_num(p_base_id));
549: fnd_file.put_line(fnd_file.log, fnd_message.get);
550: fnd_file.new_line(fnd_file.log, 1);
551: END IF;
552: CLOSE cur_person_number;
553: END IF;
554: END IF;

Line 564: fnd_file.put_line(fnd_file.log, fnd_message.get);

560: IF cur_person_group%NOTFOUND THEN
561: -- Invalid person id group.
562: l_params_status := FALSE;
563: fnd_message.set_name('IGF', 'IGF_SL_COD_PERSID_GRP_INV');
564: fnd_file.put_line(fnd_file.log, fnd_message.get);
565: fnd_file.new_line(fnd_file.log, 1);
566: END IF;
567: CLOSE cur_person_group;
568: END IF;

Line 565: fnd_file.new_line(fnd_file.log, 1);

561: -- Invalid person id group.
562: l_params_status := FALSE;
563: fnd_message.set_name('IGF', 'IGF_SL_COD_PERSID_GRP_INV');
564: fnd_file.put_line(fnd_file.log, fnd_message.get);
565: fnd_file.new_line(fnd_file.log, 1);
566: END IF;
567: CLOSE cur_person_group;
568: END IF;
569:

Line 651: fnd_file.put_line(fnd_file.log, fnd_message.get);

647: lv_complete := FALSE;
648: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
649: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_COD_XML_TAGS','FULL_RESP_CD'));
650: fnd_message.set_token('FIELD_VALUE',p_rfms_rec.full_resp_code);
651: fnd_file.put_line(fnd_file.log, fnd_message.get);
652: END IF;
653:
654: -- validating student's date of birth
655: IF g_ver_num = '2004-2005' THEN

Line 661: fnd_file.put_line(fnd_file.log, fnd_message.get);

657: lv_complete := FALSE;
658: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
659: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_LOAN_FIELDS','S_DATE_OF_BIRTH'));
660: fnd_message.set_token('FIELD_VALUE',p_rfms_rec.birth_dt);
661: fnd_file.put_line(fnd_file.log, fnd_message.get);
662: END IF;
663: END IF;
664: IF g_ver_num = '2005-2006' THEN
665: IF ( (student_dtl_rec.p_date_of_birth < TO_DATE('01011906', 'DDMMYYYY')) OR (student_dtl_rec.p_date_of_birth > TO_DATE('31121997', 'DDMMYYYY')) ) THEN

Line 670: fnd_file.put_line(fnd_file.log, fnd_message.get);

666: lv_complete := FALSE;
667: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
668: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_LOAN_FIELDS','S_DATE_OF_BIRTH'));
669: fnd_message.set_token('FIELD_VALUE',p_rfms_rec.birth_dt);
670: fnd_file.put_line(fnd_file.log, fnd_message.get);
671: END IF;
672: END IF;
673: IF g_ver_num = '2006-2007' THEN -- check made as part of FA162(COD Reg Updates R12 porting)
674: IF ( (student_dtl_rec.p_date_of_birth < TO_DATE('01011907', 'DDMMYYYY')) OR (student_dtl_rec.p_date_of_birth > TO_DATE('31121998', 'DDMMYYYY')) ) THEN

Line 679: fnd_file.put_line(fnd_file.log, fnd_message.get);

675: lv_complete := FALSE;
676: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
677: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_LOAN_FIELDS','S_DATE_OF_BIRTH'));
678: fnd_message.set_token('FIELD_VALUE',p_rfms_rec.birth_dt);
679: fnd_file.put_line(fnd_file.log, fnd_message.get);
680: END IF;
681: END IF;
682:
683: -- validating student's SSN

Line 689: fnd_file.put_line(fnd_file.log, fnd_message.get);

685: lv_complete := FALSE;
686: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
687: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_LOAN_FIELDS','S_SSN'));
688: fnd_message.set_token('FIELD_VALUE',student_dtl_rec.p_ssn);
689: fnd_file.put_line(fnd_file.log, fnd_message.get);
690: END IF;
691:
692: -- validating student's first name
693: IF ( LENGTH(student_dtl_rec.p_first_name) > 12) THEN

Line 698: fnd_file.put_line(fnd_file.log, fnd_message.get);

694: lv_complete := FALSE;
695: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
696: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_LOAN_FIELDS','S_FIRST_NAME'));
697: fnd_message.set_token('FIELD_VALUE',student_dtl_rec.p_first_name);
698: fnd_file.put_line(fnd_file.log, fnd_message.get);
699: END IF;
700:
701: -- validating student's last name
702: IF ( LENGTH(student_dtl_rec.p_last_name) > 35) THEN

Line 707: fnd_file.put_line(fnd_file.log, fnd_message.get);

703: lv_complete := FALSE;
704: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
705: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_LOAN_FIELDS','S_LAST_NAME'));
706: fnd_message.set_token('FIELD_VALUE',student_dtl_rec.p_last_name);
707: fnd_file.put_line(fnd_file.log, fnd_message.get);
708: END IF;
709:
710: -- validating student's middle name
711: IF ( LENGTH(student_dtl_rec.p_middle_name) > 1) THEN

Line 716: fnd_file.put_line(fnd_file.log, fnd_message.get);

712: lv_complete := FALSE;
713: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
714: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_LOAN_FIELDS','S_MIDDLE_NAME'));
715: fnd_message.set_token('FIELD_VALUE',student_dtl_rec.p_middle_name);
716: fnd_file.put_line(fnd_file.log, fnd_message.get);
717: END IF;
718:
719: -- validating student's driver licencse state
720: IF ( (LENGTH(student_dtl_rec.p_license_state) < 2) OR (LENGTH(student_dtl_rec.p_license_state) > 3) )THEN

Line 725: fnd_file.put_line(fnd_file.log, fnd_message.get);

721: lv_complete := FALSE;
722: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
723: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','P_LICENSE_STATE'));
724: fnd_message.set_token('FIELD_VALUE',student_dtl_rec.p_license_state);
725: fnd_file.put_line(fnd_file.log, fnd_message.get);
726: END IF;
727:
728: -- validating student's driver licencse number
729: IF ( LENGTH(student_dtl_rec.p_license_num) > 20) THEN

Line 734: fnd_file.put_line(fnd_file.log, fnd_message.get);

730: lv_complete := FALSE;
731: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
732: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_LOAN_FIELDS','S_LICENSE_NUM'));
733: fnd_message.set_token('FIELD_VALUE',student_dtl_rec.p_license_num);
734: fnd_file.put_line(fnd_file.log, fnd_message.get);
735: END IF;
736:
737: -- validating student's citizenship status code
738: IF ( (LENGTH(student_dtl_rec.p_citizenship_status) > 1) OR (student_dtl_rec.p_citizenship_status NOT IN ('1', '2', '3')) ) THEN

Line 743: fnd_file.put_line(fnd_file.log, fnd_message.get);

739: lv_complete := FALSE;
740: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
741: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_LOAN_FIELDS','S_CITIZENSHIP_STATUS'));
742: fnd_message.set_token('FIELD_VALUE',student_dtl_rec.p_citizenship_status);
743: fnd_file.put_line(fnd_file.log, fnd_message.get);
744: END IF;
745:
746: -- validating note message
747: IF ( LENGTH(p_rfms_rec.note_message) > 20) THEN

Line 752: fnd_file.put_line(fnd_file.log, fnd_message.get);

748: lv_complete := FALSE;
749: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
750: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','NOTE_MESSAGE'));
751: fnd_message.set_token('FIELD_VALUE',p_rfms_rec.note_message);
752: fnd_file.put_line(fnd_file.log, fnd_message.get);
753: END IF;
754:
755: -- validating student's low_tution_fee
756: IF ( (LENGTH(p_rfms_rec.low_tution_fee) > 1) OR (p_rfms_rec.low_tution_fee NOT IN ('1', '2', '3', '4')) ) THEN

Line 761: fnd_file.put_line(fnd_file.log, fnd_message.get);

757: lv_complete := FALSE;
758: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
759: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','LOW_TUTION_FEE'));
760: fnd_message.set_token('FIELD_VALUE',p_rfms_rec.low_tution_fee);
761: fnd_file.put_line(fnd_file.log, fnd_message.get);
762: END IF;
763:
764: -- validating transaction number
765: IF ( (LENGTH(p_rfms_rec.transaction_num) < '01') OR (LENGTH(p_rfms_rec.transaction_num) > '99') ) THEN

Line 770: fnd_file.put_line(fnd_file.log, fnd_message.get);

766: lv_complete := FALSE;
767: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
768: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','TRANSACTION_NUMBER'));
769: fnd_message.set_token('FIELD_VALUE',p_rfms_rec.transaction_num);
770: fnd_file.put_line(fnd_file.log, fnd_message.get);
771: END IF;
772:
773: -- validating enrollment date
774: IF g_ver_num = '2004-2005' THEN

Line 780: fnd_file.put_line(fnd_file.log, fnd_message.get);

776: lv_complete := FALSE;
777: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
778: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','ENROLLMENT_DT'));
779: fnd_message.set_token('FIELD_VALUE',p_rfms_rec.enrollment_dt);
780: fnd_file.put_line(fnd_file.log, fnd_message.get);
781: END IF;
782: END IF;
783: IF g_ver_num = '2005-2006' THEN
784: IF ( (p_rfms_rec.enrollment_dt < TO_DATE('01012005', 'DDMMYYYY')) OR (p_rfms_rec.enrollment_dt > TO_DATE('30062006', 'DDMMYYYY')) ) THEN

Line 789: fnd_file.put_line(fnd_file.log, fnd_message.get);

785: lv_complete := FALSE;
786: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
787: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','ENROLLMENT_DT'));
788: fnd_message.set_token('FIELD_VALUE',p_rfms_rec.enrollment_dt);
789: fnd_file.put_line(fnd_file.log, fnd_message.get);
790: END IF;
791: END IF;
792: IF g_ver_num = '2006-2007' THEN -- check made as part of FA162(COD Reg Updates R12 porting)
793: IF ( (p_rfms_rec.enrollment_dt < TO_DATE('01012006', 'DDMMYYYY')) OR (p_rfms_rec.enrollment_dt > TO_DATE('30062007', 'DDMMYYYY')) ) THEN

Line 798: fnd_file.put_line(fnd_file.log, fnd_message.get);

794: lv_complete := FALSE;
795: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
796: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','ENROLLMENT_DT'));
797: fnd_message.set_token('FIELD_VALUE',p_rfms_rec.enrollment_dt);
798: fnd_file.put_line(fnd_file.log, fnd_message.get);
799: END IF;
800: END IF;
801:
802: -- validating secondary efc

Line 808: fnd_file.put_line(fnd_file.log, fnd_message.get);

804: lv_complete := FALSE;
805: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
806: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_AP_AWARDING_FC_TYPE','2'));
807: fnd_message.set_token('FIELD_VALUE',p_rfms_rec.secondary_efc);
808: fnd_file.put_line(fnd_file.log, fnd_message.get);
809: END IF;
810:
811: -- validating verification status code
812: IF ( (LENGTH(p_rfms_rec.ver_status_code) > 1) OR (p_rfms_rec.ver_status_code NOT IN ('W', 'V', 'S')) ) THEN

Line 817: fnd_file.put_line(fnd_file.log, fnd_message.get);

813: lv_complete := FALSE;
814: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
815: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_COD_XML_TAGS','SYS_VAL_VER'));
816: fnd_message.set_token('FIELD_VALUE',p_rfms_rec.ver_status_code);
817: fnd_file.put_line(fnd_file.log, fnd_message.get);
818: END IF;
819:
820: -- validating incarcerated status.
821: IF ( p_rfms_rec.incrcd_fed_pell_rcp_cd IS NOT NULL AND ((LENGTH(p_rfms_rec.incrcd_fed_pell_rcp_cd) > 1) OR (p_rfms_rec.incrcd_fed_pell_rcp_cd NOT IN ('Y', 'N'))) ) THEN

Line 826: fnd_file.put_line(fnd_file.log, fnd_message.get);

822: lv_complete := FALSE;
823: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
824: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_COD_XML_TAGS','INCRCD_FED_PELL_RCP_CD'));
825: fnd_message.set_token('FIELD_VALUE',p_rfms_rec.incrcd_fed_pell_rcp_cd);
826: fnd_file.put_line(fnd_file.log, fnd_message.get);
827: END IF;
828:
829: IF ( p_rfms_rec.pell_amount >= 999999999.99) THEN
830: lv_complete := FALSE;

Line 834: fnd_file.put_line(fnd_file.log, fnd_message.get);

830: lv_complete := FALSE;
831: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
832: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_COD_XML_TAGS','SYS_VAL_PELL'));
833: fnd_message.set_token('FIELD_VALUE',p_rfms_rec.pell_amount);
834: fnd_file.put_line(fnd_file.log, fnd_message.get);
835: END IF;
836:
837: -- validating disbursement data from the IGF_AW_DB_CHG_DTLS table
838: l_award_id := p_rfms_rec.award_id;

Line 846: fnd_file.put_line(fnd_file.log, fnd_message.get);

842: lv_complete := FALSE;
843: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
844: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_COD_XML_TAGS','SYS_VAL_DB_AMT'));
845: fnd_message.set_token('FIELD_VALUE',rec_disb_chg_dtls.disb_accepted_amt);
846: fnd_file.put_line(fnd_file.log, fnd_message.get);
847: END IF;
848:
849: -- validating disbursement number
850: IF ( rec_disb_chg_dtls.disb_num >= 60) THEN

Line 855: fnd_file.put_line(fnd_file.log, fnd_message.get);

851: lv_complete := FALSE;
852: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
853: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_AW_LOOKUPS_MSG','DISB_NUM'));
854: fnd_message.set_token('FIELD_VALUE',rec_disb_chg_dtls.disb_num);
855: fnd_file.put_line(fnd_file.log, fnd_message.get);
856: END IF;
857:
858: -- validating disbursement sequence number
859: IF ( rec_disb_chg_dtls.disb_seq_num >= 99) THEN

Line 864: fnd_file.put_line(fnd_file.log, fnd_message.get);

860: lv_complete := FALSE;
861: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
862: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_LOAN_FIELDS','DISB_SEQ_NUM'));
863: fnd_message.set_token('FIELD_VALUE',rec_disb_chg_dtls.disb_seq_num);
864: fnd_file.put_line(fnd_file.log, fnd_message.get);
865: END IF;
866:
867: -- validating disbursement date
868: IF g_ver_num = '2004-2005' THEN

Line 874: fnd_file.put_line(fnd_file.log, fnd_message.get);

870: lv_complete := FALSE;
871: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
872: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_CL_CHANGE_FIELDS','DISB_DATE'));
873: fnd_message.set_token('FIELD_VALUE',rec_disb_chg_dtls.disb_date);
874: fnd_file.put_line(fnd_file.log, fnd_message.get);
875: END IF;
876: END IF;
877: IF g_ver_num = '2005-2006' THEN
878: IF ( (rec_disb_chg_dtls.disb_date < TO_DATE('22062004', 'DDMMYYYY')) OR (rec_disb_chg_dtls.disb_date > TO_DATE('27102007', 'DDMMYYYY')) ) THEN

Line 883: fnd_file.put_line(fnd_file.log, fnd_message.get);

879: lv_complete := FALSE;
880: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
881: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_CL_CHANGE_FIELDS','DISB_DATE'));
882: fnd_message.set_token('FIELD_VALUE',rec_disb_chg_dtls.disb_date);
883: fnd_file.put_line(fnd_file.log, fnd_message.get);
884: END IF;
885: END IF;
886: IF g_ver_num = '2006-2007' THEN -- check made as part of FA162(COD Reg Updates R12 porting)
887: IF ( (rec_disb_chg_dtls.disb_date < TO_DATE('01072006', 'DDMMYYYY')) OR (rec_disb_chg_dtls.disb_date > TO_DATE('27102009', 'DDMMYYYY')) ) THEN

Line 892: fnd_file.put_line(fnd_file.log, fnd_message.get);

888: lv_complete := FALSE;
889: fnd_message.set_name('IGF','IGF_GR_COD_INVALID_VALUE');
890: fnd_message.set_token('FIELD_NAME',igf_aw_gen.lookup_desc('IGF_SL_CL_CHANGE_FIELDS','DISB_DATE'));
891: fnd_message.set_token('FIELD_VALUE',rec_disb_chg_dtls.disb_date);
892: fnd_file.put_line(fnd_file.log, fnd_message.get);
893: END IF;
894: END IF;
895: END LOOP;
896:

Line 1198: fnd_file.put_line(fnd_file.log,fnd_message.get);

1194:
1195: fnd_message.set_name('IGF','IGF_GR_PROCESS_STUD');
1196: fnd_message.set_token('PER_NUM',igf_gr_gen.get_per_num(p_rfms_rec.base_id));
1197: fnd_message.set_token('ORIG_ID',p_rfms_rec.origination_id);
1198: fnd_file.put_line(fnd_file.log,fnd_message.get);
1199:
1200: -- validate general validations
1201:
1202: -- check if attending entity id is a child of reporting entity id.

Line 1211: fnd_file.put_line(fnd_file.log, fnd_message.get);

1207: -- No attending pell child record exists. Do not process this record
1208: CLOSE cur_attending_entity;
1209: fnd_message.set_name('IGF','IGF_GR_ATD_ENTITY_NOT_SETUP');
1210: fnd_message.set_token('ATD_ENTITY', p_rfms_rec.atd_entity_id_txt);
1211: fnd_file.put_line(fnd_file.log, fnd_message.get);
1212: RETURN;
1213: ELSE
1214: -- attending pell child record exists. Proceed further...
1215: CLOSE cur_attending_entity;

Line 1230: fnd_file.put_line(fnd_file.log,fnd_message.get);

1226: CLOSE cur_pymnt_isir;
1227:
1228: IF NOT l_isir_present THEN
1229: fnd_message.set_name('IGF','IGF_AP_NO_PAYMENT_ISIR');
1230: fnd_file.put_line(fnd_file.log,fnd_message.get);
1231:
1232: -- If the Transaction Number being reported does not match do not Originate
1233: ELSIF p_rfms_rec.transaction_num <> NVL(cur_pymnt_isir_rec.transaction_num,-1) THEN
1234: fnd_message.set_name('IGF','IGF_GR_PYMNT_ISIR_MISMATCH');

Line 1235: fnd_file.put_line(fnd_file.log,fnd_message.get);

1231:
1232: -- If the Transaction Number being reported does not match do not Originate
1233: ELSIF p_rfms_rec.transaction_num <> NVL(cur_pymnt_isir_rec.transaction_num,-1) THEN
1234: fnd_message.set_name('IGF','IGF_GR_PYMNT_ISIR_MISMATCH');
1235: fnd_file.put_line(fnd_file.log,fnd_message.get);
1236: RETURN;
1237: END IF;
1238:
1239: -- Get disbursements amounts total

Line 1250: fnd_file.put_line(fnd_file.log,fnd_message.get);

1246: IF (p_rfms_rec.pell_amount < rec_disb_amt_tot.disb_amt_tot) THEN
1247: fnd_message.set_name('IGF','IGF_GR_PELL_DIFF_AMTS');
1248: fnd_message.set_token('DISB_AMT', TO_CHAR(rec_disb_amt_tot.disb_amt_tot));
1249: fnd_message.set_token('PELL_TOT', TO_CHAR(p_rfms_rec.pell_amount));
1250: fnd_file.put_line(fnd_file.log,fnd_message.get);
1251: RETURN;
1252: END IF;
1253:
1254: -- If Student's verification status is 'W' then we can send only one disbursment with

Line 1265: fnd_file.put_line(fnd_file.log, fnd_message.get);

1261: CLOSE cur_get_num_of_disb;
1262:
1263: IF ln_num_disb_with_relflag_true > 1 THEN
1264: fnd_message.set_name('IGF','IGF_GR_COD_VERF_STAT_W');
1265: fnd_file.put_line(fnd_file.log, fnd_message.get);
1266: RETURN;
1267: END IF;
1268: END IF;
1269:

Line 1281: fnd_file.put_line(fnd_file.log, l_return_mesg_text);

1277: cp_return_status => l_return_status,
1278: cp_message => l_return_mesg_text
1279: );
1280: IF (l_return_status = 'E') THEN
1281: fnd_file.put_line(fnd_file.log, l_return_mesg_text);
1282: RETURN;
1283: ELSE
1284: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
1285: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_gr_gen_xml.process_rfms_record.debug','l_pell_amt = ' || l_pell_amt || 'and l_ft_pell_amt = ' || l_ft_pell_amt);

Line 1291: fnd_file.put_line(fnd_file.log, fnd_message.get);

1287: IF p_rfms_rec.pell_amount > l_ft_pell_amt THEN
1288: fnd_message.set_name('IGF','IGF_GR_LIMIT_EXC');
1289: fnd_message.set_token('PEL_AMT',l_ft_pell_amt);
1290: fnd_message.set_token('AWD_AMT',p_rfms_rec.pell_amount);
1291: fnd_file.put_line(fnd_file.log, fnd_message.get);
1292: RETURN;
1293: END IF;
1294: END IF;
1295:

Line 1301: fnd_file.put_line(fnd_file.log, fnd_message.get);

1297: -- Attendance Cost tag is mandatory when processing a Pell Grant anticipated/actual disbursement.
1298: -- Check wether the attendance cost value is NULL or not. If NULL, then log a message.
1299: IF p_rfms_rec.coa_amount IS NULL THEN
1300: fnd_message.set_name('IGF','IGF_GR_NO_COA_NULL');
1301: fnd_file.put_line(fnd_file.log, fnd_message.get);
1302: RETURN;
1303: END IF;
1304:
1305: -- xml boundary validations.

Line 1323: fnd_file.put_line(fnd_file.log,fnd_message.get);

1319: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_gr_gen_xml.process_rfms_record.exception','Exception:'||SQLERRM);
1320: END IF;
1321: fnd_message.set_name('IGF','IGF_GR_XML_INSERT_EXC');
1322: fnd_message.set_token('ORIGINATION_ID',p_rfms_rec.origination_id);
1323: fnd_file.put_line(fnd_file.log,fnd_message.get);
1324: fnd_file.put_line(fnd_file.log,SQLERRM);
1325: IF lb_spoint_est THEN
1326: lb_spoint_est := FALSE;
1327: ROLLBACK TO IGFGR12B_PROCESS_RFMS_REC;

Line 1324: fnd_file.put_line(fnd_file.log,SQLERRM);

1320: END IF;
1321: fnd_message.set_name('IGF','IGF_GR_XML_INSERT_EXC');
1322: fnd_message.set_token('ORIGINATION_ID',p_rfms_rec.origination_id);
1323: fnd_file.put_line(fnd_file.log,fnd_message.get);
1324: fnd_file.put_line(fnd_file.log,SQLERRM);
1325: IF lb_spoint_est THEN
1326: lb_spoint_est := FALSE;
1327: ROLLBACK TO IGFGR12B_PROCESS_RFMS_REC;
1328: END IF;

Line 1402: fnd_file.put_line(fnd_file.log,fnd_message.get);

1398: p_parameters => l_parameter_list);
1399:
1400: fnd_message.set_name('IGF','IGF_GR_COD_RAISE_EVENT');
1401: fnd_message.set_token('EVENT_KEY_VALUE',l_event_key);
1402: fnd_file.put_line(fnd_file.log,fnd_message.get);
1403: fnd_file.new_line(fnd_file.log,1);
1404:
1405: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1406: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_gr_gen_xml.submit_xml_event','raised event ');

Line 1403: fnd_file.new_line(fnd_file.log,1);

1399:
1400: fnd_message.set_name('IGF','IGF_GR_COD_RAISE_EVENT');
1401: fnd_message.set_token('EVENT_KEY_VALUE',l_event_key);
1402: fnd_file.put_line(fnd_file.log,fnd_message.get);
1403: fnd_file.new_line(fnd_file.log,1);
1404:
1405: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1406: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_gr_gen_xml.submit_xml_event','raised event ');
1407: END IF;

Line 1506: fnd_file.put_line(fnd_file.log, fnd_message.get);

1502: FETCH cur_full_resp_code INTO rec_full_resp_code;
1503: IF cur_full_resp_code%NOTFOUND THEN
1504: -- print error message;
1505: fnd_message.set_name('IGF','IGF_GR_NO_RESP_OPT_SRC_ENTITY');
1506: fnd_file.put_line(fnd_file.log, fnd_message.get);
1507: CLOSE cur_full_resp_code;
1508: RETURN;
1509: ELSE
1510: g_full_resp_code := rec_full_resp_code.response_option_code;

Line 1519: fnd_file.put_line(fnd_file.log, fnd_message.get);

1515: -- Processing when base_id is given.
1516: IF p_base_id IS NOT NULL THEN
1517: fnd_message.set_name('IGF','IGF_AW_PROC_STUD');
1518: fnd_message.set_token('STDNT',igf_gr_gen.get_per_num(p_base_id));
1519: fnd_file.put_line(fnd_file.log, fnd_message.get);
1520:
1521: lb_record_exist := FALSE;
1522: FOR rec IN cur_rfms (l_ci_cal_type, l_ci_sequence_number, p_report_entity_id, p_attend_entity_id, p_base_id)
1523: LOOP

Line 1533: fnd_file.put_line(fnd_file.log, fnd_message.get);

1529:
1530: IF NOT lb_record_exist THEN
1531: fnd_message.set_name('IGF','IGF_GR_COD_NO_STDNT_RFMS_REC');
1532: fnd_message.set_token('PER_NUM',igf_gr_gen.get_per_num(p_base_id));
1533: fnd_file.put_line(fnd_file.log, fnd_message.get);
1534: fnd_file.new_line(fnd_file.log, 1);
1535: RETURN;
1536: END IF;
1537: END IF;

Line 1534: fnd_file.new_line(fnd_file.log, 1);

1530: IF NOT lb_record_exist THEN
1531: fnd_message.set_name('IGF','IGF_GR_COD_NO_STDNT_RFMS_REC');
1532: fnd_message.set_token('PER_NUM',igf_gr_gen.get_per_num(p_base_id));
1533: fnd_file.put_line(fnd_file.log, fnd_message.get);
1534: fnd_file.new_line(fnd_file.log, 1);
1535: RETURN;
1536: END IF;
1537: END IF;
1538:

Line 1543: fnd_file.new_line(fnd_file.log, 1);

1539: -- Processing when person id group is given.
1540: IF p_persid_grp IS NOT NULL THEN
1541: fnd_message.set_name('IGF','IGF_AW_PERSON_ID_GROUP');
1542: fnd_message.set_token('P_PER_GRP',get_grp_name(p_persid_grp));
1543: fnd_file.new_line(fnd_file.log, 1);
1544: fnd_file.put_line(fnd_file.log, fnd_message.get);
1545:
1546: --Bug #5021084
1547: l_list := igf_ap_ss_pkg.get_pid(p_persid_grp,lv_status,lv_group_type);

Line 1544: fnd_file.put_line(fnd_file.log, fnd_message.get);

1540: IF p_persid_grp IS NOT NULL THEN
1541: fnd_message.set_name('IGF','IGF_AW_PERSON_ID_GROUP');
1542: fnd_message.set_token('P_PER_GRP',get_grp_name(p_persid_grp));
1543: fnd_file.new_line(fnd_file.log, 1);
1544: fnd_file.put_line(fnd_file.log, fnd_message.get);
1545:
1546: --Bug #5021084
1547: l_list := igf_ap_ss_pkg.get_pid(p_persid_grp,lv_status,lv_group_type);
1548:

Line 1565: fnd_file.put_line(fnd_file.log,fnd_message.get);

1561:
1562: IF cur_per_grp%NOTFOUND THEN
1563: CLOSE cur_per_grp;
1564: fnd_message.set_name('IGF','IGF_DB_NO_PER_GRP');
1565: fnd_file.put_line(fnd_file.log,fnd_message.get);
1566: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1567: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_gr_gen_xml.main.debug','No persons in group '||p_persid_grp);
1568: END IF;
1569: ELSE

Line 1580: fnd_file.put_line(fnd_file.log, fnd_message.get);

1576: IF lv_person_number IS NOT NULL THEN
1577: IF ln_base_id IS NOT NULL THEN
1578: fnd_message.set_name('IGF','IGF_AW_PROC_STUD');
1579: fnd_message.set_token('STDNT',lv_person_number);
1580: fnd_file.put_line(fnd_file.log, fnd_message.get);
1581:
1582: lb_record_exist_stdnt := FALSE;
1583: FOR rec IN cur_rfms (l_ci_cal_type, l_ci_sequence_number, p_report_entity_id, p_attend_entity_id, ln_base_id)
1584: LOOP

Line 1597: fnd_file.put_line(fnd_file.log, fnd_message.get);

1593:
1594: IF NOT lb_record_exist_stdnt THEN
1595: fnd_message.set_name('IGF','IGF_GR_COD_NO_STDNT_RFMS_REC');
1596: fnd_message.set_token('PER_NUM',igf_gr_gen.get_per_num(p_base_id));
1597: fnd_file.put_line(fnd_file.log, fnd_message.get);
1598: fnd_file.new_line(fnd_file.log, 1);
1599: END IF;
1600: ELSE -- log a message and skip this person, base id not found
1601: fnd_message.set_name('IGF','IGF_GR_LI_PER_INVALID');

Line 1598: fnd_file.new_line(fnd_file.log, 1);

1594: IF NOT lb_record_exist_stdnt THEN
1595: fnd_message.set_name('IGF','IGF_GR_COD_NO_STDNT_RFMS_REC');
1596: fnd_message.set_token('PER_NUM',igf_gr_gen.get_per_num(p_base_id));
1597: fnd_file.put_line(fnd_file.log, fnd_message.get);
1598: fnd_file.new_line(fnd_file.log, 1);
1599: END IF;
1600: ELSE -- log a message and skip this person, base id not found
1601: fnd_message.set_name('IGF','IGF_GR_LI_PER_INVALID');
1602: fnd_message.set_token('PERSON_NUMBER',lv_person_number);

Line 1604: fnd_file.put_line(fnd_file.log,fnd_message.get);

1600: ELSE -- log a message and skip this person, base id not found
1601: fnd_message.set_name('IGF','IGF_GR_LI_PER_INVALID');
1602: fnd_message.set_token('PERSON_NUMBER',lv_person_number);
1603: fnd_message.set_token('AWD_YR',igf_gr_gen.get_alt_code(l_ci_cal_type,l_ci_sequence_number));
1604: fnd_file.put_line(fnd_file.log,fnd_message.get);
1605: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1606: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_gr_gen_xml.main.debug',igf_gr_gen.get_per_num_oss(l_person_id) || ' not in FA');
1607: END IF;
1608: END IF; -- base id not found

Line 1611: fnd_file.put_line(fnd_file.log,RPAD(' ',5) ||fnd_message.get);

1607: END IF;
1608: END IF; -- base id not found
1609: ELSE
1610: fnd_message.set_name('IGF','IGF_AP_PE_NOT_EXIST');
1611: fnd_file.put_line(fnd_file.log,RPAD(' ',5) ||fnd_message.get);
1612: END IF; -- person number not null
1613:
1614: FETCH cur_per_grp INTO l_person_id;
1615: EXIT WHEN cur_per_grp%NOTFOUND;

Line 1620: fnd_file.put_line(fnd_file.log, fnd_message.get);

1616: END LOOP;
1617: CLOSE cur_per_grp;
1618: IF NOT lb_record_exist THEN
1619: fnd_message.set_name('IGF','IGF_GR_NO_RFMS_ORIG');
1620: fnd_file.put_line(fnd_file.log, fnd_message.get);
1621: fnd_file.new_line(fnd_file.log, 1);
1622: END IF;
1623: END IF; -- group found
1624: END IF;

Line 1621: fnd_file.new_line(fnd_file.log, 1);

1617: CLOSE cur_per_grp;
1618: IF NOT lb_record_exist THEN
1619: fnd_message.set_name('IGF','IGF_GR_NO_RFMS_ORIG');
1620: fnd_file.put_line(fnd_file.log, fnd_message.get);
1621: fnd_file.new_line(fnd_file.log, 1);
1622: END IF;
1623: END IF; -- group found
1624: END IF;
1625: END IF;

Line 1643: fnd_file.put_line(fnd_file.log, fnd_message.get);

1639: END IF;
1640: END LOOP;
1641: IF NOT lb_record_exist THEN
1642: fnd_message.set_name('IGF','IGF_GR_NO_RFMS_ORIG');
1643: fnd_file.put_line(fnd_file.log, fnd_message.get);
1644: fnd_file.new_line(fnd_file.log, 1);
1645: END IF;
1646: END IF;
1647: -- End of Step 3.

Line 1644: fnd_file.new_line(fnd_file.log, 1);

1640: END LOOP;
1641: IF NOT lb_record_exist THEN
1642: fnd_message.set_name('IGF','IGF_GR_NO_RFMS_ORIG');
1643: fnd_file.put_line(fnd_file.log, fnd_message.get);
1644: fnd_file.new_line(fnd_file.log, 1);
1645: END IF;
1646: END IF;
1647: -- End of Step 3.
1648:

Line 1660: fnd_file.put_line(fnd_file.log,fnd_message.get);

1656: END IF;
1657:
1658: IF cod_dtls_rec.document_id_txt IS NULL THEN
1659: fnd_message.set_name('IGF','IGF_GR_COD_NO_REC');
1660: fnd_file.put_line(fnd_file.log,fnd_message.get);
1661: RETURN;
1662: ELSE
1663: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
1664: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_gr_gen_xml.main.debug',' before submit event ');

Line 1679: fnd_file.put_line(fnd_file.log,SQLERRM);

1675: WHEN OTHERS THEN
1676: ROLLBACK;
1677: retcode := 2;
1678: errbuf := fnd_message.get_string('IGS','IGS_GE_UNHANDLED_EXCEPTION');
1679: fnd_file.put_line(fnd_file.log,SQLERRM);
1680: igs_ge_msg_stack.conc_exception_hndl;
1681: END main;
1682:
1683: PROCEDURE store_xml ( itemtype IN VARCHAR2,

Line 2019: fnd_file.new_line(fnd_file.log,1);

2015: END IF;
2016: END LOOP;
2017: CLOSE c_get_parameters;
2018:
2019: fnd_file.new_line(fnd_file.log,1);
2020: fnd_file.put_line(fnd_file.log, lv_parameter_pass); --------------Parameters Passed--------------
2021: fnd_file.new_line(fnd_file.log,1);
2022:
2023: fnd_file.put_line(fnd_file.log, RPAD(lv_document_id,40) || ' : '|| p_document_id);

Line 2020: fnd_file.put_line(fnd_file.log, lv_parameter_pass); --------------Parameters Passed--------------

2016: END LOOP;
2017: CLOSE c_get_parameters;
2018:
2019: fnd_file.new_line(fnd_file.log,1);
2020: fnd_file.put_line(fnd_file.log, lv_parameter_pass); --------------Parameters Passed--------------
2021: fnd_file.new_line(fnd_file.log,1);
2022:
2023: fnd_file.put_line(fnd_file.log, RPAD(lv_document_id,40) || ' : '|| p_document_id);
2024:

Line 2021: fnd_file.new_line(fnd_file.log,1);

2017: CLOSE c_get_parameters;
2018:
2019: fnd_file.new_line(fnd_file.log,1);
2020: fnd_file.put_line(fnd_file.log, lv_parameter_pass); --------------Parameters Passed--------------
2021: fnd_file.new_line(fnd_file.log,1);
2022:
2023: fnd_file.put_line(fnd_file.log, RPAD(lv_document_id,40) || ' : '|| p_document_id);
2024:
2025: fnd_file.new_line(fnd_file.log,1);

Line 2023: fnd_file.put_line(fnd_file.log, RPAD(lv_document_id,40) || ' : '|| p_document_id);

2019: fnd_file.new_line(fnd_file.log,1);
2020: fnd_file.put_line(fnd_file.log, lv_parameter_pass); --------------Parameters Passed--------------
2021: fnd_file.new_line(fnd_file.log,1);
2022:
2023: fnd_file.put_line(fnd_file.log, RPAD(lv_document_id,40) || ' : '|| p_document_id);
2024:
2025: fnd_file.new_line(fnd_file.log,1);
2026: fnd_file.put_line(fnd_file.log, '--------------------------------------------------------');
2027: fnd_file.new_line(fnd_file.log,1);

Line 2025: fnd_file.new_line(fnd_file.log,1);

2021: fnd_file.new_line(fnd_file.log,1);
2022:
2023: fnd_file.put_line(fnd_file.log, RPAD(lv_document_id,40) || ' : '|| p_document_id);
2024:
2025: fnd_file.new_line(fnd_file.log,1);
2026: fnd_file.put_line(fnd_file.log, '--------------------------------------------------------');
2027: fnd_file.new_line(fnd_file.log,1);
2028:
2029: igf_sl_dl_gen_xml.edit_clob(p_document_id,lc_newxmldoc,lv_rowid);

Line 2026: fnd_file.put_line(fnd_file.log, '--------------------------------------------------------');

2022:
2023: fnd_file.put_line(fnd_file.log, RPAD(lv_document_id,40) || ' : '|| p_document_id);
2024:
2025: fnd_file.new_line(fnd_file.log,1);
2026: fnd_file.put_line(fnd_file.log, '--------------------------------------------------------');
2027: fnd_file.new_line(fnd_file.log,1);
2028:
2029: igf_sl_dl_gen_xml.edit_clob(p_document_id,lc_newxmldoc,lv_rowid);
2030:

Line 2027: fnd_file.new_line(fnd_file.log,1);

2023: fnd_file.put_line(fnd_file.log, RPAD(lv_document_id,40) || ' : '|| p_document_id);
2024:
2025: fnd_file.new_line(fnd_file.log,1);
2026: fnd_file.put_line(fnd_file.log, '--------------------------------------------------------');
2027: fnd_file.new_line(fnd_file.log,1);
2028:
2029: igf_sl_dl_gen_xml.edit_clob(p_document_id,lc_newxmldoc,lv_rowid);
2030:
2031: -- update the modified clob in DOC_DTLS table

Line 2062: fnd_file.put_line(fnd_file.log,SQLERRM);

2058: WHEN OTHERS THEN
2059: ROLLBACK;
2060: retcode := 2;
2061: errbuf := fnd_message.get_string('IGS','IGS_GE_UNHANDLED_EXCEPTION');
2062: fnd_file.put_line(fnd_file.log,SQLERRM);
2063: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
2064: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_gr_gen_xml.print_xml.debug','OTHERS exception raised in print_xml: ' || SQLERRM);
2065: END IF;
2066: igs_ge_msg_stack.conc_exception_hndl;