[Home] [Help]
163: ELSE
164: l_num := 0;
165: fnd_message.set_name('IGS', 'IGS_UC_INVALID_CHOICE');
166: fnd_message.set_token('CHOICE',p_char);
167: fnd_file.put_line( fnd_file.log, fnd_message.get());
168: igs_ge_msg_stack.add;
169: app_exception.raise_exception;
170: END IF;
171:
233: -- log a message displaying the system and the section number being processed.
234: fnd_message.set_name('IGS', 'IGS_UC_MV_PROC_SEQ');
235: fnd_message.set_token('SYSTEM', cyc_defaults_rec.name);
236: fnd_message.set_token('SEQ', p_curr_seq_num);
237: fnd_file.put_line(fnd_file.log, fnd_message.get());
238:
239: --Update the Marvin file seq number in the setup table.
240: igs_uc_cyc_defaults_pkg.update_row (
241: x_rowid => cyc_defaults_rec.rowid,
321: IF c_cyc_defaults%NOTFOUND THEN
322: CLOSE c_cyc_defaults;
323: fnd_message.set_name('IGS', 'IGS_UC_MV_SYSTEM_NOT_CONFIG');
324: fnd_message.set_token('SYSTEM', ae_trans_rec.file_type );
325: fnd_file.put_line( fnd_file.log, fnd_message.get());
326: l_valid := FALSE ;
327: ELSE
328: CLOSE c_cyc_defaults;
329: END IF;
333: fnd_message.set_name('IGS', 'IGS_UC_MV_FILE_NOT_SEQ');
334: fnd_message.set_token('SYSTEM', cyc_defaults_rec.name);
335: fnd_message.set_token('OLDSEQ', NVL(cyc_defaults_rec.marvin_seq,0));
336: fnd_message.set_token('CURSEQ', l_curr_seq_num);
337: fnd_file.put_line(fnd_file.log, fnd_message.get());
338: l_valid := FALSE ;
339: END IF;
340:
341: END IF;
434:
435: fnd_message.set_name('IGS', 'IGS_UC_TRAN_PROC_APP');
436: fnd_message.set_token('TTYPE','*A ');
437: fnd_message.set_token('APPNO', ln_appno);
438: fnd_file.put_line( fnd_file.log, fnd_message.get());
439:
440: -- Obsolete matching records in interface table with status N
441: UPDATE igs_uc_istara_ints SET record_status = 'O'
442: WHERE record_status = 'N' AND appno = ln_appno ;
495: EXCEPTION
496: WHEN VALUE_ERROR THEN
497: fnd_message.set_name('IGS', 'IGS_UC_NON_NUMERIC_DATA');
498: fnd_message.set_token('TTYPE',p_trans_type);
499: fnd_file.put_line( fnd_file.log, fnd_message.get());
500: igs_ge_msg_stack.add;
501: app_exception.raise_exception;
502:
503: WHEN OTHERS THEN
553: fnd_message.set_name('IGS', 'IGS_UC_TRAN_PROC_APPCH');
554: fnd_message.set_token('TTYPE','*C ');
555: fnd_message.set_token('APPNO', ln_appno);
556: fnd_message.set_token('CHOICENO', l_char_choice);
557: fnd_file.put_line( fnd_file.log, fnd_message.get());
558:
559: --Added as part of UCFD02 build for GTTR system.
560: --If the incoming CHOICE No. is Alphabetic then it has to be converted to appropriate Number and used.
561: -- i.e. if the incoming Choice No = 'A' then Choice No = 10, If it is 'F' then Choice = 15 etc.
707: EXCEPTION
708: WHEN VALUE_ERROR THEN
709: fnd_message.set_name('IGS', 'IGS_UC_NON_NUMERIC_DATA');
710: fnd_message.set_token('TTYPE',p_trans_type);
711: fnd_file.put_line( fnd_file.log, fnd_message.get());
712: igs_ge_msg_stack.add;
713: app_exception.raise_exception;
714:
715: WHEN OTHERS THEN
748: fnd_message.set_name('IGS', 'IGS_UC_TRAN_PROC_APPCH');
749: fnd_message.set_token('TTYPE','*G ');
750: fnd_message.set_token('APPNO', ln_appno);
751: fnd_message.set_token('CHOICENO', l_char_choice);
752: fnd_file.put_line( fnd_file.log, fnd_message.get());
753:
754: --Added as part of UCFD02 build for GTTR system.
755: --If the incoming CHOICE No. is Alphabetic then it has to be converted to appropriate Number and used.
756: -- i.e. if the incoming Choice No = 'A' then Choice No = 10, If it is 'F' then Choice = 15 etc.
829: EXCEPTION
830: WHEN VALUE_ERROR THEN
831: fnd_message.set_name('IGS', 'IGS_UC_NON_NUMERIC_DATA');
832: fnd_message.set_token('TTYPE',p_trans_type);
833: fnd_file.put_line( fnd_file.log, fnd_message.get());
834: igs_ge_msg_stack.add;
835: app_exception.raise_exception;
836:
837: WHEN OTHERS THEN
870:
871: fnd_message.set_name('IGS', 'IGS_UC_TRAN_PROC_APP');
872: fnd_message.set_token('TTYPE','*H ');
873: fnd_message.set_token('APPNO', ln_appno);
874: fnd_file.put_line( fnd_file.log, fnd_message.get());
875:
876: -- Obsolete matching records in interface table with status N
877: UPDATE igs_uc_istarh_ints SET record_status = 'O'
878: WHERE record_status = 'N' AND appno = ln_appno ;
917: EXCEPTION
918: WHEN VALUE_ERROR THEN
919: fnd_message.set_name('IGS', 'IGS_UC_NON_NUMERIC_DATA');
920: fnd_message.set_token('TTYPE',p_trans_type);
921: fnd_file.put_line( fnd_file.log, fnd_message.get());
922: igs_ge_msg_stack.add;
923: app_exception.raise_exception;
924:
925: WHEN OTHERS THEN
995:
996: fnd_message.set_name('IGS', 'IGS_UC_TRAN_PROC_APP');
997: fnd_message.set_token('TTYPE','*K ');
998: fnd_message.set_token('APPNO', ln_appno);
999: fnd_file.put_line( fnd_file.log, fnd_message.get());
1000:
1001: -- If the value stored in the 69th position is Numeric then the data goes into
1002: -- Regno column else data goes into scn column
1003: IF is_numeric(TRIM(SUBSTR(p_record_data,69,1))) THEN
1257: EXCEPTION
1258: WHEN VALUE_ERROR THEN
1259: fnd_message.set_name('IGS', 'IGS_UC_NON_NUMERIC_DATA');
1260: fnd_message.set_token('TTYPE',p_trans_type);
1261: fnd_file.put_line( fnd_file.log, fnd_message.get());
1262: igs_ge_msg_stack.add;
1263: app_exception.raise_exception;
1264:
1265: WHEN OTHERS THEN
1332:
1333: fnd_message.set_name('IGS', 'IGS_UC_TRAN_PROC_APP');
1334: fnd_message.set_token('TTYPE','*N');
1335: fnd_message.set_token('APPNO', ln_appno);
1336: fnd_file.put_line( fnd_file.log, fnd_message.get());
1337:
1338: -- initialising variables
1339: l_k_data := NULL ;
1340: l_birthdate := NULL;
1431: EXCEPTION
1432: WHEN VALUE_ERROR THEN
1433: fnd_message.set_name('IGS', 'IGS_UC_NON_NUMERIC_DATA');
1434: fnd_message.set_token('TTYPE',p_trans_type);
1435: fnd_file.put_line( fnd_file.log, fnd_message.get());
1436: igs_ge_msg_stack.add;
1437: app_exception.raise_exception;
1438:
1439: WHEN OTHERS THEN
1485:
1486: fnd_message.set_name('IGS', 'IGS_UC_TRAN_PROC_APP');
1487: fnd_message.set_token('TTYPE','*PQR');
1488: fnd_message.set_token('APPNO', ln_appno);
1489: fnd_file.put_line( fnd_file.log, fnd_message.get());
1490:
1491: -- update all records in interface table for the current applicant ,marvin type with status L
1492: -- to status D,i.e processed for this applicant
1493: UPDATE igs_uc_istrpqr_ints SET record_status = 'D'
1592: EXCEPTION
1593: WHEN VALUE_ERROR THEN
1594: fnd_message.set_name('IGS', 'IGS_UC_NON_NUMERIC_DATA');
1595: fnd_message.set_token('TTYPE',p_trans_type);
1596: fnd_file.put_line( fnd_file.log, fnd_message.get());
1597: igs_ge_msg_stack.add;
1598: app_exception.raise_exception;
1599:
1600: WHEN OTHERS THEN
1630:
1631: fnd_message.set_name('IGS', 'IGS_UC_TRAN_PROC_APP');
1632: fnd_message.set_token('TTYPE','*T');
1633: fnd_message.set_token('APPNO', ln_appno);
1634: fnd_file.put_line( fnd_file.log, fnd_message.get());
1635:
1636: -- Obsolete matching records in interface table with status N
1637: UPDATE igs_uc_istart_ints SET record_status = 'O'
1638: WHERE record_status = 'N' AND appno = ln_appno ;
1669: EXCEPTION
1670: WHEN VALUE_ERROR THEN
1671: fnd_message.set_name('IGS', 'IGS_UC_NON_NUMERIC_DATA');
1672: fnd_message.set_token('TTYPE',p_trans_type);
1673: fnd_file.put_line( fnd_file.log, fnd_message.get());
1674: igs_ge_msg_stack.add;
1675: app_exception.raise_exception;
1676:
1677: WHEN OTHERS THEN
1710:
1711: fnd_message.set_name('IGS', 'IGS_UC_TRAN_PROC_APP');
1712: fnd_message.set_token('TTYPE','*W');
1713: fnd_message.set_token('APPNO', ln_appno);
1714: fnd_file.put_line( fnd_file.log, fnd_message.get());
1715:
1716: -- Obsolete matching records in interface table with status N
1717: UPDATE igs_uc_istarw_ints SET record_status = 'O'
1718: WHERE record_status = 'N' AND appno = ln_appno ;
1759: EXCEPTION
1760: WHEN VALUE_ERROR THEN
1761: fnd_message.set_name('IGS', 'IGS_UC_NON_NUMERIC_DATA');
1762: fnd_message.set_token('TTYPE',p_trans_type);
1763: fnd_file.put_line( fnd_file.log, fnd_message.get());
1764: igs_ge_msg_stack.add;
1765: app_exception.raise_exception;
1766:
1767: WHEN OTHERS THEN
1800:
1801: fnd_message.set_name('IGS', 'IGS_UC_TRAN_PROC_APP');
1802: fnd_message.set_token('TTYPE','*X');
1803: fnd_message.set_token('APPNO', ln_appno);
1804: fnd_file.put_line( fnd_file.log, fnd_message.get());
1805:
1806: -- Obsolete matching records in interface table with status N
1807: UPDATE igs_uc_istarx_ints SET record_status = 'O'
1808: WHERE record_status = 'N' AND appno = ln_appno ;
1846: EXCEPTION
1847: WHEN VALUE_ERROR THEN
1848: fnd_message.set_name('IGS', 'IGS_UC_NON_NUMERIC_DATA');
1849: fnd_message.set_token('TTYPE',p_trans_type);
1850: fnd_file.put_line( fnd_file.log, fnd_message.get());
1851: igs_ge_msg_stack.add;
1852: app_exception.raise_exception;
1853:
1854: WHEN OTHERS THEN
1885:
1886: fnd_message.set_name('IGS', 'IGS_UC_TRAN_PROC_APP');
1887: fnd_message.set_token('TTYPE','*Z');
1888: fnd_message.set_token('APPNO', ln_appno);
1889: fnd_file.put_line( fnd_file.log, fnd_message.get());
1890:
1891: -- Result column contains 'A' if the Institution and course columns has the values
1892: IF (TRIM(SUBSTR(p_record_data,20,4)) IS NOT NULL) OR
1893: (TRIM(SUBSTR(p_record_data,24,6)) IS NOT NULL) THEN
1982: EXCEPTION
1983: WHEN VALUE_ERROR THEN
1984: fnd_message.set_name('IGS', 'IGS_UC_NON_NUMERIC_DATA');
1985: fnd_message.set_token('TTYPE',p_trans_type);
1986: fnd_file.put_line( fnd_file.log, fnd_message.get());
1987: igs_ge_msg_stack.add;
1988: app_exception.raise_exception;
1989:
1990: WHEN OTHERS THEN
2047: EXCEPTION
2048: WHEN VALUE_ERROR THEN
2049: fnd_message.set_name('IGS', 'IGS_UC_NON_NUMERIC_DATA');
2050: fnd_message.set_token('TTYPE',p_trans_type);
2051: fnd_file.put_line( fnd_file.log, fnd_message.get());
2052: igs_ge_msg_stack.add;
2053: app_exception.raise_exception;
2054:
2055: WHEN OTHERS THEN
2170: EXCEPTION
2171: WHEN VALUE_ERROR THEN
2172: fnd_message.set_name('IGS', 'IGS_UC_NON_NUMERIC_DATA');
2173: fnd_message.set_token('TTYPE',p_trans_type);
2174: fnd_file.put_line( fnd_file.log, fnd_message.get());
2175: igs_ge_msg_stack.add;
2176: app_exception.raise_exception;
2177:
2178: WHEN OTHERS THEN
2270: fnd_message.set_name('IGS', 'IGS_UC_TRAN_PROC_APPCH');
2271: fnd_message.set_token('TTYPE',p_trans_type);
2272: fnd_message.set_token('APPNO', ln_appno);
2273: fnd_message.set_token('CHOICENO', l_char_choice);
2274: fnd_file.put_line( fnd_file.log, fnd_message.get());
2275:
2276: --Added as part of UCFD02 build for GTTR system.
2277: --If the incoming CHOICE No. is Alphabetic then it has to be converted to appropriate Number and used.
2278: -- i.e. if the incoming Choice No = 'A' then Choice No = 10, If it is 'F' then Choice = 15 etc.
2293: fnd_message.set_name('IGS', 'IGS_UC_MV_NO_TRANIN');
2294: fnd_message.set_token('TTYPE',p_trans_type);
2295: fnd_message.set_token('APPNO',ln_appno);
2296: fnd_message.set_token('CHCNO',ln_choiceno);
2297: fnd_file.put_line( fnd_file.log, fnd_message.get());
2298: igs_ge_msg_stack.add;
2299: app_exception.raise_exception;
2300:
2301: ELSE
2342: EXCEPTION
2343: WHEN VALUE_ERROR THEN
2344: fnd_message.set_name('IGS', 'IGS_UC_NON_NUMERIC_DATA');
2345: fnd_message.set_token('TTYPE',p_trans_type);
2346: fnd_file.put_line( fnd_file.log, fnd_message.get());
2347: igs_ge_msg_stack.add;
2348: app_exception.raise_exception;
2349:
2350: WHEN OTHERS THEN
2421: CLOSE c_interface ;
2422: l_valid := FALSE ;
2423: fnd_message.set_name('IGS', 'IGS_UC_MV_SYSTEM_NOT_CONFIG');
2424: fnd_message.set_token('SYSTEM', chk_file_type_rec.file_type ) ;
2425: fnd_file.put_line( fnd_file.log, fnd_message.get());
2426: ELSE
2427: CLOSE c_interface ;
2428: -- check for Marvin or Hercules Interface.
2429: -- Load Marvin data only if the profile value is Marvin.
2430: IF c_interface_rec.ucas_interface <> 'M' THEN
2431: l_valid := FALSE ;
2432: fnd_message.set_name('IGS', 'IGS_UC_SYS_NOT_MARV');
2433: fnd_message.set_token('SYSTEM_CODE' ,chk_file_type_rec.file_type) ;
2434: fnd_file.put_line( fnd_file.log, fnd_message.get());
2435: END IF ;
2436: END IF;
2437: END LOOP ;
2438:
2438:
2439: ELSE
2440: l_valid := FALSE ;
2441: fnd_message.set_name('IGS', 'IGS_UC_MV_DATA_SEC_WRNG');
2442: fnd_file.put_line( fnd_file.log, fnd_message.get());
2443: END IF;
2444:
2445: RETURN l_valid ;
2446:
2616: l_valid_rec := FALSE;
2617: fnd_message.set_name('IGS', 'IGS_UC_INVLD_APPNO');
2618: fnd_message.set_token('APPNO',SUBSTR(rec_cur_ucas.record_data,1,8));
2619: fnd_message.set_token('TTYPE',rec_cur_ucas.trans_type);
2620: fnd_file.put_line(fnd_file.log,fnd_message.get );
2621: END IF;
2622:
2623: ELSE
2624: -- if trans type = 'AE' then it carries the file seq num which needs to be validated that the flat files are being processed in sequence.
2711: END IF ;
2712:
2713: EXCEPTION
2714: WHEN OTHERS THEN
2715: fnd_file.put_line( fnd_file.log, 'TRANSACTION: ' ||l_trans_type || ' DATA : ' || l_curr_rec_data);
2716: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
2717: fnd_message.set_token('NAME','IGS_UC_MV_DATA_UPLD.TRANSFER_DATA - '||SQLERRM);
2718: igs_ge_msg_stack.add;
2719: app_exception.raise_exception;
2748:
2749: --anwest 18-JAN-2006 Bug# 4950285 R12 Disable OSS Mandate
2750: IGS_GE_GEN_003.SET_ORG_ID;
2751:
2752: fnd_file.put_line( fnd_file.log, ' ');
2753: retcode := 0;
2754: -- Set the global values, which are used to set the WHO Columns.
2755: g_record_cnt := 0;
2756: g_success_cnt := 0;
2762: CLOSE c_cycles ;
2763: IF g_c_cycles.configured_cycle IS NULL OR g_c_cycles.current_cycle IS NULL THEN
2764: fnd_message.set_name('IGS','IGS_UC_CYCLE_NOT_FOUND');
2765: errbuf := fnd_message.get;
2766: fnd_file.put_line(fnd_file.log, errbuf);
2767: retcode := 2 ;
2768: RETURN ;
2769: END IF ;
2770:
2779: fnd_message.set_token('UCAS_CYCLE',LTRIM(SUBSTR(g_c_cycles.configured_cycle,3,2) ) );
2780: fnd_message.set_token('HERC_CYCLE',NVL(c_ucas_cycle_rec.entry_year,0 ) );
2781: fnd_message.set_token('SYSTEM_CODE','UCAS');
2782: errbuf := fnd_message.get ;
2783: fnd_file.put_line(fnd_file.log,errbuf );
2784: retcode := 2 ;
2785: RETURN ;
2786: END IF ;
2787:
2787:
2788: -- show the configured cycle information , because the other messages donot show its value
2789: fnd_message.set_name('IGS','IGS_UC_CYC_INFO');
2790: fnd_message.set_token('CONF_CYCLE',g_c_cycles.configured_cycle );
2791: fnd_file.put_line(fnd_file.log, fnd_message.get );
2792: fnd_file.put_line( fnd_file.log, ' ');
2793:
2794: -- Check for the Validity of the file.
2795: -- 1.Number of headers in the data file should equal to number of trailers
2788: -- show the configured cycle information , because the other messages donot show its value
2789: fnd_message.set_name('IGS','IGS_UC_CYC_INFO');
2790: fnd_message.set_token('CONF_CYCLE',g_c_cycles.configured_cycle );
2791: fnd_file.put_line(fnd_file.log, fnd_message.get );
2792: fnd_file.put_line( fnd_file.log, ' ');
2793:
2794: -- Check for the Validity of the file.
2795: -- 1.Number of headers in the data file should equal to number of trailers
2796: -- 2.cycle defaults should be setup for each of the systems present in the flat file
2819: RETURN ;
2820: END IF ;
2821:
2822: -- Print Number of records successfully transferred
2823: fnd_file.put_line( fnd_file.log, ' ');
2824: fnd_message.set_name('IGS', 'IGS_UC_MV_LOAD_SUCCESS');
2825: fnd_message.set_token('CNT', g_success_cnt);
2826: fnd_file.put_line( fnd_file.log, fnd_message.get());
2827:
2822: -- Print Number of records successfully transferred
2823: fnd_file.put_line( fnd_file.log, ' ');
2824: fnd_message.set_name('IGS', 'IGS_UC_MV_LOAD_SUCCESS');
2825: fnd_message.set_token('CNT', g_success_cnt);
2826: fnd_file.put_line( fnd_file.log, fnd_message.get());
2827:
2828: -- commit the data;
2829: COMMIT;
2830: fnd_file.put_line( fnd_file.log, ' ');
2826: fnd_file.put_line( fnd_file.log, fnd_message.get());
2827:
2828: -- commit the data;
2829: COMMIT;
2830: fnd_file.put_line( fnd_file.log, ' ');
2831:
2832: EXCEPTION
2833: WHEN app_exception.record_lock_exception THEN
2834: ROLLBACK;