[Home] [Help]
1: PACKAGE BODY igf_gr_rfms_orig AS
2: /* $Header: IGFGR02B.pls 120.4 2006/02/08 23:45:48 ridas ship $ */
3: ------------------------------------------------------------------------
4: -- bvisvana 07-July-2005 Bug # 4008991 - IGF_GR_BATCH_DOES_NOT_EXIST replaced by IGF_SL_GR_BATCH_DOES_NO_EXIST
5: ------------------------------------------------------------------------
184: x_document_id_txt => p_rfms_rec.document_id_txt );
185: EXCEPTION
186: WHEN OTHERS THEN
187: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
188: fnd_message.set_token('NAME','IGF_GR_RFMS_ORIG.UPDATE_ORIG_REC');
189: igs_ge_msg_stack.add;
190: app_exception.raise_exception;
191:
192: END update_orig_rec;
407: RAISE;
408:
409: WHEN OTHERS THEN
410: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
411: fnd_message.set_token('NAME','IGF_GR_RFMS_ORIG.PREPARE_DATA');
412: igs_ge_msg_stack.add;
413: app_exception.raise_exception;
414:
415: END prepare_data;
416:
417:
418: PROCEDURE log_message
419: (p_batch_id VARCHAR2,
420: p_origination_id igf_gr_rfms.origination_id%TYPE ) IS
421:
422: ---------------------------------------------------------------------
423: --
424: -- Created By : sjadhav
455:
456: EXCEPTION
457: WHEN others THEN
458: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
459: fnd_message.set_token('NAME','IGF_GR_RFMS_ORIG.LOG_MESSAGE');
460: igs_ge_msg_stack.add;
461: app_exception.raise_exception;
462:
463: END log_message;
462:
463: END log_message;
464:
465:
466: PROCEDURE out_message(p_origination_id igf_gr_rfms.origination_id%TYPE) IS
467:
468: ---------------------------------------------------------------------
469: --
470: -- Created By : sjadhav
503:
504: EXCEPTION
505: WHEN others THEN
506: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
507: fnd_message.set_token('NAME','IGF_GR_RFMS_ORIG.LOG_MESSAGE');
508: igs_ge_msg_stack.add;
509: app_exception.raise_exception;
510:
511:
512: END out_message;
513:
514:
515:
516: PROCEDURE log_rej_message(p_origination_id igf_gr_rfms.origination_id%TYPE,
517: p_orig_reject_code igf_gr_rfms.orig_reject_code%TYPE) IS
518:
519: ---------------------------------------------------------------------
520: --
513:
514:
515:
516: PROCEDURE log_rej_message(p_origination_id igf_gr_rfms.origination_id%TYPE,
517: p_orig_reject_code igf_gr_rfms.orig_reject_code%TYPE) IS
518:
519: ---------------------------------------------------------------------
520: --
521: -- Created By : sjadhav
573:
574: EXCEPTION
575: WHEN others THEN
576: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
577: fnd_message.set_token('NAME','IGF_GR_RFMS_ORIG.LOG_MESSAGE');
578: igs_ge_msg_stack.add;
579: app_exception.raise_exception;
580:
581:
1008: WHEN persid_grp_sql_stmt_error THEN
1009: RAISE;
1010: WHEN OTHERS THEN
1011: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
1012: fnd_message.set_token('NAME','IGF_GR_RFMS_ORIG.RFMS_ORIG');
1013: igs_ge_msg_stack.add;
1014: app_exception.raise_exception;
1015:
1016: END rfms_orig;
1093: IF l_number_rec > 0 THEN
1094:
1095: DECLARE
1096: l_actual_rec NUMBER DEFAULT 0;
1097: l_origination_id igf_gr_rfms.origination_id%TYPE;
1098: l_ci_cal_type igf_gr_rfms.ci_cal_type%TYPE;
1099: l_ci_sequence_number igf_gr_rfms.ci_sequence_number%TYPE;
1100:
1101:
1101:
1102: l_chk_flag BOOLEAN DEFAULT FALSE;
1103:
1104:
1105: CURSOR cur_get_pell(l_origination_id igf_gr_rfms.origination_id%TYPE) IS
1106: SELECT rfms.*
1107: FROM
1108: igf_gr_rfms rfms
1109: WHERE
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');
1393: igs_ge_msg_stack.add;
1394: app_exception.raise_exception;
1395: END rfms_ack;
1396:
1714: igs_ge_msg_stack.conc_exception_hndl;
1715:
1716: END main_ack;
1717:
1718: END igf_gr_rfms_orig;