eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IGF_GR_RFMS_ORIG dependencies on IGF_GR_GEN

Line 22: -- passed parameter, in igf_gr_gen.{get_pell_trailer, get_pell_header} procedures.

18: -- ugummall 05-NOV-2003 Bug 3102439. FA 126 Multiple FA Offices.
19: -- 1. Added two extra parameters to main and rfms_orig procedures.
20: -- 2. Modified cursor cur_rfms to include reporting and attending pell ids.
21: -- 3. Removed l_rep_pell_id and its references. Used p_reporting_pell, newly
22: -- passed parameter, in igf_gr_gen.{get_pell_trailer, get_pell_header} procedures.
23: -- 4. New cursor cur_attending_pell to check attending pell is a child of reporting pell or not.
24: -- 5. In rfms_orig prcodure processed only those records for which attending pell is
25: -- a child of reporting pell id.
26: ------------------------------------------------------------------------

Line 28: -- Added two extra parameters to igf_gr_gen.get_pell_header call.

24: -- 5. In rfms_orig prcodure processed only those records for which attending pell is
25: -- a child of reporting pell id.
26: ------------------------------------------------------------------------
27: -- ugummall 03-NOV-2003 Bug 3102439. FA 126 Multiple FA Offices.
28: -- Added two extra parameters to igf_gr_gen.get_pell_header call.
29: ------------------------------------------------------------------------
30: -- cdcruz 15-Aug-2003 Bug BUG FA121-3085558
31: -- Check added to check for Transaction Number
32: -- Match against Payment ISIR.

Line 54: -- use igf_gr_gen.get_pell_efc_code to get

50: -- ft pell amount and pell award amount.
51: -- if pell award amount is more than ft pell
52: -- amount do not send this origination record,
53: -- log a message and skip
54: -- use igf_gr_gen.get_pell_efc_code to get
55: -- value for sec efc code
56: --
57: --------------------------------------------------------------------------
58: -- sjadhav Bug 2383690 added igf_gr_gen.send_orig_disb call

Line 58: -- sjadhav Bug 2383690 added igf_gr_gen.send_orig_disb call

54: -- use igf_gr_gen.get_pell_efc_code to get
55: -- value for sec efc code
56: --
57: --------------------------------------------------------------------------
58: -- sjadhav Bug 2383690 added igf_gr_gen.send_orig_disb call
59: --------------------------------------------------------------------------
60: -- sjadhav Bug 2216956 - FACR007 Removed flag parameter
61: -- Added Award Year parameter to
62: -- main_ack

Line 264: fnd_message.set_token('PER_NUM',igf_gr_gen.get_per_num(p_rfms_rec.base_id));

260: p_rfms_rec.enrollment_dt IS NULL
261: THEN
262: fnd_file.new_line(fnd_file.log,1);
263: fnd_message.set_name('IGF','IGF_GR_ORIG_DATA_REQD');
264: fnd_message.set_token('PER_NUM',igf_gr_gen.get_per_num(p_rfms_rec.base_id));
265: fnd_file.put_line(fnd_file.log,fnd_message.get);
266: fnd_file.new_line(fnd_file.log,1);
267: fnd_file.put_line(fnd_file.log, RPAD(igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','EFC'),50) || ' : ' ||p_rfms_rec.efc);
268: fnd_file.put_line(fnd_file.log, RPAD(igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','PELL_AMOUNT'),50) || ' : ' ||p_rfms_rec.pell_amount);

Line 320: l_person_id := igf_gr_gen.get_person_id( P_BASE_ID => p_rfms_rec.base_id);

316: l_disbursement_dates := l_disbursement_dates || RPAD(NVL(TO_CHAR(rec_disb.disb_dt,'YYYYMMDD'),' '),8);
317: END LOOP;
318:
319: -- Get the person details by calling the procedure
320: l_person_id := igf_gr_gen.get_person_id( P_BASE_ID => p_rfms_rec.base_id);
321:
322: student_dtl_rec := NULL;
323: igf_sl_gen.get_person_details(l_person_id, student_dtl_cur);
324: FETCH student_dtl_cur INTO student_dtl_rec;

Line 370: IF igf_gr_gen.send_orig_disb( p_rfms_rec.origination_id) THEN

366: -- If fed verf stat is W, do not send
367: -- log message
368: --
369:
370: IF igf_gr_gen.send_orig_disb( p_rfms_rec.origination_id) THEN
371: --Print Header for the first time and reset value so that it does not get printed further
372: --Bug 2460904
373: IF g_print_header='Y' THEN
374: fnd_file.put_line(fnd_file.output,UPPER(l_header)||RPAD(' ',200));

Line 406: WHEN igf_gr_gen.no_file_version THEN

402: END IF;
403:
404: EXCEPTION
405:
406: WHEN igf_gr_gen.no_file_version THEN
407: RAISE;
408:
409: WHEN OTHERS THEN
410: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');

Line 636: -- Added two extra parameters to igf_gr_gen.get_pell_header call.

632: -- is a child of reporting pell. If not skipped the record.
633: -- 3. Parameters are shown in log file irrespective of wether cur_rfms
634: -- fetches the records or not. This is done for clarity.
635: -- ugummall 03-NOV-2003 Bug 3102439. FA 126 Multiple FA Offices.
636: -- Added two extra parameters to igf_gr_gen.get_pell_header call.
637: -- rasahoo 16-Oct-2003 FA121-Bug# 3085558 cur_pymnt_isir_rec is initialised to null
638: -- Changed the logic to check the presence of payment ISIR
639: -- and log message if payment isir not present
640: -- cdcruz 15-Sep-03 FA121-Bug# 3085558 New Cursor added cur_pymnt_isir

Line 746: -- igf_gr_gen.get_pell_header will insert a header record which needs to be deleted(rolledback)

742: RAISE no_data_in_table;
743: END IF;
744:
745: -- since the table has data, prepare a header record
746: -- igf_gr_gen.get_pell_header will insert a header record which needs to be deleted(rolledback)
747: -- if no records have been written to output file. This is handled in batch_not_created exception handling
748:
749: l_header := igf_gr_gen.get_pell_header(
750: g_ver_num,

Line 749: l_header := igf_gr_gen.get_pell_header(

745: -- since the table has data, prepare a header record
746: -- igf_gr_gen.get_pell_header will insert a header record which needs to be deleted(rolledback)
747: -- if no records have been written to output file. This is handled in batch_not_created exception handling
748:
749: l_header := igf_gr_gen.get_pell_header(
750: g_ver_num,
751: l_cy_yr,
752: p_reporting_pell,
753: '#O',

Line 808: fnd_message.set_token('PER_NUM',igf_gr_gen.get_per_num(rfms_rec.base_id));

804:
805: IF (lv_persid_flag) THEN -- Is person-id in person-group or not ?
806: fnd_file.new_line(fnd_file.log,1);
807: fnd_message.set_name('IGF','IGF_GR_PROCESS_STUD');
808: fnd_message.set_token('PER_NUM',igf_gr_gen.get_per_num(rfms_rec.base_id));
809: fnd_message.set_token('ORIG_ID',rfms_rec.origination_id);
810: fnd_file.put_line(fnd_file.log,fnd_message.get);
811:
812: -- check if attending pell is a child of reporting pell id.

Line 953: rfms_rec.efc := igf_gr_gen.get_pell_efc(rfms_rec.base_id);

949: IF (p_orig_run_mode = 'MAX_PELL') THEN
950: rfms_rec.efc := 0;
951: rfms_rec.coa_amount := 99999; --Bug 3512319
952: ELSE
953: rfms_rec.efc := igf_gr_gen.get_pell_efc(rfms_rec.base_id);
954: END IF;
955: prepare_data(rfms_rec,l_num_of_rec,p_rfmb_id,l_originated, l_enrl_status_mesgnum);
956:
957: --Bug 2460904

Line 981: l_trailer := igf_gr_gen.get_pell_trailer(g_ver_num,

977: END LOOP;
978: CLOSE cur_rfms;
979:
980: -- since the table has data, prepare a trailer record
981: l_trailer := igf_gr_gen.get_pell_trailer(g_ver_num,
982: l_cy_yr,
983: p_reporting_pell,
984: '#O',
985: l_num_of_rec,

Line 1002: WHEN igf_gr_gen.no_file_version THEN

998: RAISE batch_not_created;
999: END IF;
1000:
1001: EXCEPTION
1002: WHEN igf_gr_gen.no_file_version THEN
1003: RAISE;
1004: WHEN batch_not_created THEN
1005: RAISE;
1006: WHEN no_data_in_table THEN

Line 1064: igf_gr_gen.process_pell_ack ( g_ver_num,

1060: -----
1061:
1062: BEGIN
1063:
1064: igf_gr_gen.process_pell_ack ( g_ver_num,
1065: 'GR_RFMS_ORIG',
1066: l_number_rec,
1067: l_last_gldr_id,
1068: l_batch_id);

Line 1081: igf_gr_gen.match_file_version (g_ver_num, l_batch_id, lv_message);

1077: --
1078: --
1079: -- Check the award year matches with the award year in PELL setup.
1080: --
1081: igf_gr_gen.match_file_version (g_ver_num, l_batch_id, lv_message);
1082:
1083: IF lv_message = 'IGF_GR_VRSN_MISMTCH' THEN
1084: fnd_message.set_name('IGF','IGF_GR_VRSN_MISMTCH');
1085: fnd_message.set_token('CYCL',SUBSTR(l_batch_id,3,4));

Line 1146: RAISE igf_gr_gen.skip_this_record;

1142:
1143: IF cur_get_pell%NOTFOUND THEN
1144: CLOSE cur_get_pell;
1145: log_message(l_batch_id,LTRIM(RTRIM(SUBSTR(rec_data.record_data,1,23))));
1146: RAISE igf_gr_gen.skip_this_record;
1147: END IF;
1148: ----Bug #2938258
1149: IF l_rfmb_id<> get_pell_rec.rfmb_id THEN
1150:

Line 1157: RAISE igf_gr_gen.skip_this_record;

1153: fnd_message.set_token('ORIG_ID',LTRIM(RTRIM(SUBSTR(rec_data.record_data,1,23))));
1154: fnd_file.put_line(fnd_file.log,fnd_message.get);
1155: fnd_file.new_line(fnd_file.log,1);
1156:
1157: RAISE igf_gr_gen.skip_this_record;
1158: END IF;
1159: --Record should be in "Sent" status for acknowledgment processing"
1160: IF get_pell_rec.orig_action_code <> 'S' THEN
1161:

Line 1168: RAISE igf_gr_gen.skip_this_record;

1164: SYSTEM_STATUS := igf_aw_gen.lookup_desc('IGF_GR_ORIG_STATUS',get_pell_rec.orig_action_code);
1165: fnd_message.set_token('SYS_STATUS',SYSTEM_STATUS);
1166: fnd_file.put_line(fnd_file.log,fnd_message.get);
1167: fnd_file.new_line(fnd_file.log,1);
1168: RAISE igf_gr_gen.skip_this_record;
1169: END IF;
1170:
1171: ----end Bug #2938258
1172:

Line 1226: RAISE igf_gr_gen.no_file_version;

1222: l_rfms.last_name := LTRIM(RTRIM(SUBSTR(rec_data.record_data,385,16)));
1223: l_rfms.first_name := LTRIM(RTRIM(SUBSTR(rec_data.record_data,401,12)));
1224: l_rfms.middle_name := LTRIM(RTRIM(SUBSTR(rec_data.record_data,413,1)));
1225: ELSE
1226: RAISE igf_gr_gen.no_file_version;
1227: END IF;
1228:
1229: EXCEPTION
1230: -- The exception caught here will be the data format exceptions

Line 1242: RAISE igf_gr_gen.skip_this_record;

1238: fnd_file.put_line(fnd_file.log,fnd_message.get);
1239: -- Cannot Process Record for Origination ORIG_ID as it contains corrupt data
1240: fnd_file.put_line(fnd_file.log, ' ' );
1241:
1242: RAISE igf_gr_gen.skip_this_record;
1243:
1244: END;
1245: l_rfms.rec_source := get_pell_rec.rec_source;
1246: l_rfms.pell_amount := get_pell_rec.pell_amount; -- compare this amount

Line 1252: igf_gr_gen.insert_sys_holds(get_pell_rec.award_id,NULL,'PELL');

1248: l_rfms.total_pymt_prds := get_pell_rec.total_pymt_prds;
1249: l_rfms.orig_status_dt := TRUNC(SYSDATE);
1250:
1251: IF ln_pell_awd <> get_pell_rec.pell_amount THEN
1252: igf_gr_gen.insert_sys_holds(get_pell_rec.award_id,NULL,'PELL');
1253: fnd_message.set_name('IGF','IGF_GR_DIFF_PELL_AMT');
1254: fnd_message.set_token('ORIG_ID',l_rfms.origination_id);
1255: -- The Reported and Received Pell Award Amount for this Origination Record are different
1256: fnd_file.put_line(fnd_file.log,fnd_message.get);

Line 1342: WHEN igf_gr_gen.skip_this_record THEN

1338: CLOSE cur_get_pell;
1339: END IF;
1340:
1341: EXCEPTION
1342: WHEN igf_gr_gen.skip_this_record THEN
1343: IF cur_get_pell%ISOPEN THEN
1344: CLOSE cur_get_pell;
1345: END IF;
1346: END;

Line 1354: RAISE igf_gr_gen.file_not_loaded;

1350:
1351: IF l_actual_rec <> l_number_rec THEN
1352: fnd_message.set_name('IGF','IGF_GE_RECORD_NUM_NOT_MATCH');
1353: igs_ge_msg_stack.add;
1354: RAISE igf_gr_gen.file_not_loaded;
1355: END IF;
1356: END; -- Inner Begin
1357:
1358: fnd_file.new_line(fnd_file.log,2);

Line 1377: WHEN igf_gr_gen.no_file_version THEN

1373: EXCEPTION
1374:
1375: WHEN invalid_version THEN
1376: RAISE;
1377: WHEN igf_gr_gen.no_file_version THEN
1378: RAISE;
1379: WHEN igf_gr_gen.corrupt_data_file THEN
1380: RAISE;
1381: WHEN no_data_in_table THEN

Line 1379: WHEN igf_gr_gen.corrupt_data_file THEN

1375: WHEN invalid_version THEN
1376: RAISE;
1377: WHEN igf_gr_gen.no_file_version THEN
1378: RAISE;
1379: WHEN igf_gr_gen.corrupt_data_file THEN
1380: RAISE;
1381: WHEN no_data_in_table THEN
1382: RAISE;
1383: WHEN igf_gr_gen.batch_not_in_system THEN

Line 1383: WHEN igf_gr_gen.batch_not_in_system THEN

1379: WHEN igf_gr_gen.corrupt_data_file THEN
1380: RAISE;
1381: WHEN no_data_in_table THEN
1382: RAISE;
1383: WHEN igf_gr_gen.batch_not_in_system THEN
1384: -- Bug # 4008991
1385: fnd_message.set_name('IGF','IGF_SL_GR_BATCH_DOES_NO_EXIST');
1386: fnd_message.set_token('BATCH_ID',l_batch_id);
1387: RAISE;

Line 1388: WHEN igf_gr_gen.file_not_loaded THEN

1384: -- Bug # 4008991
1385: fnd_message.set_name('IGF','IGF_SL_GR_BATCH_DOES_NO_EXIST');
1386: fnd_message.set_token('BATCH_ID',l_batch_id);
1387: RAISE;
1388: WHEN igf_gr_gen.file_not_loaded THEN
1389: RAISE;
1390: WHEN OTHERS THEN
1391: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
1392: fnd_message.set_token('NAME','IGF_GR_RFMS_ORIG.RFMS_ACK');

Line 1485: RPAD(igf_gr_gen.get_alt_code(l_ci_cal_type,l_ci_sequence_number),20);

1481: END IF;
1482:
1483: -- show parameter 1 - award year
1484: l_msg_str_1 := RPAD(igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','AWARD_YEAR'),30) ||
1485: RPAD(igf_gr_gen.get_alt_code(l_ci_cal_type,l_ci_sequence_number),20);
1486: fnd_file.put_line(fnd_file.log,l_msg_str_1);
1487:
1488: -- show parameter 2 - report pell id
1489: l_msg_str_3 := RPAD(igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS', 'REPORT_PELL'),30) || p_reporting_pell;

Line 1501: RPAD(igf_gr_gen.get_per_num(ln_base_id),20);

1497:
1498: -- show parameter 4 - base id
1499: IF (base_id IS NOT NULL) THEN
1500: l_msg_str_2 := RPAD(igf_aw_gen.lookup_desc('IGF_GR_LOOKUPS','BASE_ID'),30) ||
1501: RPAD(igf_gr_gen.get_per_num(ln_base_id),20);
1502: fnd_file.put_line(fnd_file.log,l_msg_str_2);
1503: END IF;
1504:
1505: -- show parameter 5 - Person Id Group

Line 1545: l_cy_yr := igf_gr_gen.get_cycle_year(l_ci_cal_type,l_ci_sequence_number);

1541: -- Get the Flat File Version and then Proceed
1542: g_ver_num := igf_aw_gen.get_ver_num(l_ci_cal_type,l_ci_sequence_number,'P');
1543:
1544: -- Get the Cycle Year
1545: l_cy_yr := igf_gr_gen.get_cycle_year(l_ci_cal_type,l_ci_sequence_number);
1546:
1547: IF (g_ver_num ='NULL') OR (g_ver_num NOT IN ('2002-2003','2003-2004','2004-2005')) THEN
1548: RAISE igf_gr_gen.no_file_version;
1549: ELSE

Line 1548: RAISE igf_gr_gen.no_file_version;

1544: -- Get the Cycle Year
1545: l_cy_yr := igf_gr_gen.get_cycle_year(l_ci_cal_type,l_ci_sequence_number);
1546:
1547: IF (g_ver_num ='NULL') OR (g_ver_num NOT IN ('2002-2003','2003-2004','2004-2005')) THEN
1548: RAISE igf_gr_gen.no_file_version;
1549: ELSE
1550: rfms_orig(l_ci_cal_type,l_ci_sequence_number,
1551: ln_base_id, p_reporting_pell, p_attending_pell,
1552: p_persid_grp, p_orig_run_mode

Line 1559: WHEN igf_gr_gen.no_file_version THEN

1555:
1556: COMMIT;
1557:
1558: EXCEPTION
1559: WHEN igf_gr_gen.no_file_version THEN
1560: ROLLBACK;
1561: retcode := 2;
1562: errbuf := fnd_message.get_string('IGF','IGF_GR_VERSION_NOTFOUND');
1563: fnd_file.put_line(fnd_file.log,errbuf);

Line 1648: g_alt_code := igf_gr_gen.get_alt_code(l_ci_cal_type,l_ci_sequence_number);

1644: --
1645: -- Get the Flat File Version and then Proceed
1646: --
1647: g_ver_num := igf_aw_gen.get_ver_num(l_ci_cal_type,l_ci_sequence_number,'P');
1648: g_alt_code := igf_gr_gen.get_alt_code(l_ci_cal_type,l_ci_sequence_number);
1649: --
1650: -- Get the Cycle Year
1651: --
1652: l_cy_yr := igf_gr_gen.get_cycle_year(l_ci_cal_type,l_ci_sequence_number);

Line 1652: l_cy_yr := igf_gr_gen.get_cycle_year(l_ci_cal_type,l_ci_sequence_number);

1648: g_alt_code := igf_gr_gen.get_alt_code(l_ci_cal_type,l_ci_sequence_number);
1649: --
1650: -- Get the Cycle Year
1651: --
1652: l_cy_yr := igf_gr_gen.get_cycle_year(l_ci_cal_type,l_ci_sequence_number);
1653:
1654: IF g_ver_num ='NULL' THEN
1655: RAISE igf_gr_gen.no_file_version;
1656: ELSE

Line 1655: RAISE igf_gr_gen.no_file_version;

1651: --
1652: l_cy_yr := igf_gr_gen.get_cycle_year(l_ci_cal_type,l_ci_sequence_number);
1653:
1654: IF g_ver_num ='NULL' THEN
1655: RAISE igf_gr_gen.no_file_version;
1656: ELSE
1657: rfms_ack;
1658: END IF;
1659:

Line 1668: WHEN igf_gr_gen.no_file_version THEN

1664: WHEN invalid_version THEN
1665: ROLLBACK;
1666: retcode := 2;
1667:
1668: WHEN igf_gr_gen.no_file_version THEN
1669: ROLLBACK;
1670: retcode := 2;
1671: errbuf := fnd_message.get_string('IGF','IGF_GR_VERSION_NOTFOUND');
1672: fnd_file.put_line(fnd_file.log,errbuf);

Line 1686: WHEN igf_gr_gen.file_not_loaded THEN

1682: retcode := 2;
1683: errbuf := fnd_message.get_string('IGF','IGF_AW_PARAM_ERR');
1684: fnd_file.put_line(fnd_file.log,errbuf);
1685:
1686: WHEN igf_gr_gen.file_not_loaded THEN
1687: ROLLBACK;
1688: retcode := 2;
1689: errbuf := fnd_message.get_string('IGF','IGF_GE_FILE_NOT_LOADED');
1690: fnd_file.put_line(fnd_file.log,errbuf);

Line 1698: WHEN igf_gr_gen.batch_not_in_system THEN

1694: retcode := 2;
1695: errbuf := fnd_message.get_string('IGF','IGF_AP_NO_DATA_FOUND');
1696: fnd_file.put_line(fnd_file.log,errbuf);
1697:
1698: WHEN igf_gr_gen.batch_not_in_system THEN
1699: ROLLBACK;
1700: retcode := 2;
1701: errbuf := fnd_message.get; -- Bug # 4008991
1702: fnd_file.put_line(fnd_file.log,errbuf);

Line 1704: WHEN igf_gr_gen.corrupt_data_file THEN

1700: retcode := 2;
1701: errbuf := fnd_message.get; -- Bug # 4008991
1702: fnd_file.put_line(fnd_file.log,errbuf);
1703:
1704: WHEN igf_gr_gen.corrupt_data_file THEN
1705: ROLLBACK;
1706: retcode := 2;
1707: errbuf := fnd_message.get_string('IGF','IGF_GR_CORRUPT_DATA_FILE');
1708: fnd_file.put_line(fnd_file.log,errbuf);