452: FETCH c_fss INTO v_s_fee_structure_status;
453: IF (c_fss%NOTFOUND) THEN
454: CLOSE c_fss;
455: v_message_name := 'IGS_GE_INVALID_VALUE';
456: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String ('IGS', v_message_name));
457: p_message_name := v_message_name;
458: RETURN FALSE;
459: ELSE
460: IF (v_s_fee_structure_status = 'INACTIVE') THEN
459: ELSE
460: IF (v_s_fee_structure_status = 'INACTIVE') THEN
461: CLOSE c_fss;
462: v_message_name := 'IGS_FI_STATUS_PARAM_INACTIVE';
463: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String ('IGS', v_message_name));
464: p_message_name := v_message_name;
465: RETURN FALSE;
466: END IF;
467: END IF;
476: -- If its NULL then this process should error out by logging message.
477: igs_fi_com_rec_interface.chk_manage_account ( p_v_manage_acc => l_v_manage_accounts,
478: p_v_message_name => l_v_message_name );
479: IF l_v_manage_accounts IS NULL THEN
480: fnd_message.set_name ( 'IGS', l_v_message_name );
481: igs_ge_msg_stack.ADD;
482: RAISE l_e_user_exception;
483: END IF;
484:
496: IF (p_rollover_fee_type_ci_ind <> 'Y' AND p_rollover_fee_cat_ci_ind <> 'Y') THEN
497: -- p_rollover_fee_type_ci_ind is duplicatly checked,
498: -- changed to p_rollover_fee_cat_ci_ind inline with CALLISTA Code
499:
500: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
501: IGS_GE_MSG_STACK.ADD;
502: RAISE l_e_user_exception; -- Raised user_Exception to avoid error 'Unhandled exception' when proper error has been logged
503: END IF;
504:
504:
505: -- Check status parameters
506: IF (p_rollover_fee_type_ci_ind = 'Y' AND p_fee_type_ci_status IS NOT NULL) THEN
507: IF (finpl_chk_fss(p_fee_type_ci_status, v_message_name) = FALSE) THEN
508: Fnd_Message.Set_Name ('IGS', v_message_name);
509: IGS_GE_MSG_STACK.ADD;
510: RAISE l_e_user_exception;
511: END IF;
512: END IF;
513:
514: IF (p_rollover_fee_cat_ci_ind = 'Y') THEN
515: IF (p_fee_cat_ci_status IS NOT NULL) THEN
516: IF (finpl_chk_fss(p_fee_cat_ci_status,v_message_name) = FALSE) THEN
517: Fnd_Message.Set_Name ('IGS', v_message_name);
518: IGS_GE_MSG_STACK.ADD;
519: RAISE l_e_user_exception;
520: END IF;
521: END IF;
521: END IF;
522:
523: IF (p_fee_liability_status IS NOT NULL) THEN
524: IF (finpl_chk_fss(p_fee_liability_status,v_message_name) = FALSE) THEN
525: Fnd_Message.Set_Name ('IGS', v_message_name);
526: IGS_GE_MSG_STACK.ADD;
527: RAISE l_e_user_exception;
528: END IF;
529: END IF;
530: END IF;
531:
532: -- Can only transfer within the same IGS_CA_TYPE
533: IF (p_source_cal_type <> p_dest_cal_type) THEN
534: Fnd_Message.Set_Name ('IGS', 'IGS_FI_ROLLOVER_FEE_STRUCTURE');
535: IGS_GE_MSG_STACK.ADD;
536: RAISE l_e_user_exception;
537: END IF;
538:
540: OPEN c_cat;
541: FETCH c_cat INTO v_cal_type;
542: IF (c_cat%NOTFOUND) THEN
543: CLOSE c_cat;
544: Fnd_Message.Set_Name ('IGS', 'IGS_GE_VAL_DOES_NOT_XS');
545: IGS_GE_MSG_STACK.ADD;
546: RAISE l_e_user_exception;
547: END IF;
548: CLOSE c_cat;
551: OPEN c_ci;
552: FETCH c_ci INTO v_prior_ci_sequence_number;
553: IF (c_ci%NOTFOUND) THEN
554: CLOSE c_ci;
555: Fnd_Message.Set_Name ('IGS', 'IGS_PS_DEST_CAL_INST_NOT_EXIS');
556: IGS_GE_MSG_STACK.ADD;
557: RAISE l_e_user_exception;
558: END IF;
559: CLOSE c_ci;
558: END IF;
559: CLOSE c_ci;
560: -- Validate the destination calendar instance
561: IF (IGS_FI_VAL_FCCI.finp_val_ci_fee(p_dest_cal_type,p_dest_sequence_number,v_message_name) = FALSE) THEN
562: Fnd_Message.Set_Name ('IGS', v_message_name);
563: IGS_GE_MSG_STACK.ADD;
564: RAISE l_e_user_exception;
565: END IF;
566:
567: -- Check destination calendar instance is a
568: -- product of the source calendar instance
569: IF (v_prior_ci_sequence_number IS NULL OR v_prior_ci_sequence_number <> p_source_sequence_number) THEN
570: v_message_name := 'IGS_FI_DEST_CALINST_NOT_ROLLE';
571: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String ('IGS', v_message_name));
572: END IF;
573:
574: --Get value of Alternate Code and put into Global variable.
575: g_v_alternate_code := igs_ca_gen_001.calp_get_alt_cd(p_source_cal_type,
586: p_dest_sequence_number,
587: p_fee_type_ci_status,
588: v_message_name,
589: v_message_warning) = FALSE) THEN
590: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET_STRING('IGS',v_message_name));
591: RETURN;
592: ELSIF (v_message_warning = cst_warning) THEN
593: RETCODE:=1;
594: END IF;
605: p_fee_liability_status,
606: p_fee_type,
607: v_message_name,
608: v_message_warning) = FALSE) THEN
609: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET_STRING('IGS',v_message_name));
610: RETURN;
611: ELSIF (v_message_warning = cst_warning) THEN
612: RETCODE:=1;
613: END IF;
615: fnd_file.put_line( fnd_file.LOG, RPAD('-', 79, '-') );
616:
617: --Added by Nshee on 26-Apr-2001 during Fee Rollvr Testing to put the rollover completed successfully message in the log file
618: fnd_file.put_line( fnd_file.LOG, ' ' );
619: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String ('IGS', 'IGS_FI_ROLLOVER_COMPL_SUCCESS'));
620: --End of Addition by Nshee
621:
622: EXCEPTION
623:
633: -- explicitly rollbacking when the process raises Un-Handled exceptions
634: -- This is incorporated as fix to Bug#1802900
635: ROLLBACK;
636: RETCODE:=2;
637: ERRBUF:=FND_MESSAGE.GET_STRING('IGS','IGS_GE_UNHANDLED_EXCEPTION') || ':' || SQLERRM;
638: fnd_file.put_line(fnd_file.log,SUBSTR(SQLERRM,1,300));
639: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
640: END;
641: END finp_prc_fee_rollvr;
824:
825: -- Rollover of Fee Type Calendar Instance is prevented if
826: -- the Charge Method has not been defined at Fee Type Calendar Instance level.
827: IF v_ftci_fss_rec.s_chg_method_type IS NULL OR v_ftci_fss_rec.rul_sequence_number IS NULL THEN
828: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_NO_ROLL_CHG_METHOD');
829: FND_MESSAGE.SET_TOKEN('FTCI_FCFL',IGS_FI_GEN_GL.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
830: fnd_file.put_line(fnd_file.log,fnd_message.Get);
831: v_process_next_ftci := TRUE;
832: END IF;
825: -- Rollover of Fee Type Calendar Instance is prevented if
826: -- the Charge Method has not been defined at Fee Type Calendar Instance level.
827: IF v_ftci_fss_rec.s_chg_method_type IS NULL OR v_ftci_fss_rec.rul_sequence_number IS NULL THEN
828: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_NO_ROLL_CHG_METHOD');
829: FND_MESSAGE.SET_TOKEN('FTCI_FCFL',IGS_FI_GEN_GL.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
830: fnd_file.put_line(fnd_file.log,fnd_message.Get);
831: v_process_next_ftci := TRUE;
832: END IF;
833: -- Check the fee type IS a liablility of the fee category
826: -- the Charge Method has not been defined at Fee Type Calendar Instance level.
827: IF v_ftci_fss_rec.s_chg_method_type IS NULL OR v_ftci_fss_rec.rul_sequence_number IS NULL THEN
828: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_NO_ROLL_CHG_METHOD');
829: FND_MESSAGE.SET_TOKEN('FTCI_FCFL',IGS_FI_GEN_GL.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
830: fnd_file.put_line(fnd_file.log,fnd_message.Get);
831: v_process_next_ftci := TRUE;
832: END IF;
833: -- Check the fee type IS a liablility of the fee category
834: -- when fee category is specified
847: OPEN c_ft(v_ftci_fss_rec.fee_type);
848: FETCH c_ft INTO v_closed_ind, l_s_fee_type;
849: CLOSE c_ft;
850: IF (v_closed_ind = 'Y') THEN
851: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String ('IGS', 'IGS_FI_FEETYPE_CLOSED'));
852: -- process next IGS_FI_F_TYP_CA_INST
853: v_process_next_ftci := TRUE;
854: END IF;
855: END IF;
862: FETCH c_ftci INTO v_dummy;
863: IF (c_ftci%FOUND) THEN
864: CLOSE c_ftci;
865: l_already_rolled := TRUE;
866: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String ('IGS','IGS_FI_FEETYPE_CALINST_ROLL'));
867:
868: v_ftci_exists_ind := TRUE;
869: v_insert_record := FALSE;
870: -- when the FTCI was rolled over, it's IGS_FI_ACC
890: IF (c_dai%NOTFOUND) THEN
891: CLOSE c_dai;
892: v_valid_dai := FALSE;
893: l_v_token1_val := v_ftci_fss_rec.start_dt_alias ||','||TO_CHAR(v_ftci_fss_rec.start_dai_sequence_number);
894: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_TYP_SDTA_DOSNT_EXST');
895: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
896: FND_FILE.PUT_LINE(FND_FILE.LOG, fnd_message.get);
897:
898: ELSE
891: CLOSE c_dai;
892: v_valid_dai := FALSE;
893: l_v_token1_val := v_ftci_fss_rec.start_dt_alias ||','||TO_CHAR(v_ftci_fss_rec.start_dai_sequence_number);
894: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_TYP_SDTA_DOSNT_EXST');
895: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
896: FND_FILE.PUT_LINE(FND_FILE.LOG, fnd_message.get);
897:
898: ELSE
899: CLOSE c_dai;
892: v_valid_dai := FALSE;
893: l_v_token1_val := v_ftci_fss_rec.start_dt_alias ||','||TO_CHAR(v_ftci_fss_rec.start_dai_sequence_number);
894: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_TYP_SDTA_DOSNT_EXST');
895: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
896: FND_FILE.PUT_LINE(FND_FILE.LOG, fnd_message.get);
897:
898: ELSE
899: CLOSE c_dai;
900: END IF;
909: CLOSE c_dai;
910: v_valid_dai := FALSE;
911:
912: l_v_token1_val := v_ftci_fss_rec.end_dt_alias ||','||TO_CHAR(v_ftci_fss_rec.end_dai_sequence_number);
913: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_TYP_EDTA_DOSNT_EXST'); --new message
914: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
915: fnd_file.put_line(fnd_file.log,fnd_message.Get);
916: ELSE
917: CLOSE c_dai;
910: v_valid_dai := FALSE;
911:
912: l_v_token1_val := v_ftci_fss_rec.end_dt_alias ||','||TO_CHAR(v_ftci_fss_rec.end_dai_sequence_number);
913: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_TYP_EDTA_DOSNT_EXST'); --new message
914: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
915: fnd_file.put_line(fnd_file.log,fnd_message.Get);
916: ELSE
917: CLOSE c_dai;
918: END IF;
911:
912: l_v_token1_val := v_ftci_fss_rec.end_dt_alias ||','||TO_CHAR(v_ftci_fss_rec.end_dai_sequence_number);
913: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_TYP_EDTA_DOSNT_EXST'); --new message
914: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
915: fnd_file.put_line(fnd_file.log,fnd_message.Get);
916: ELSE
917: CLOSE c_dai;
918: END IF;
919: IF v_ftci_fss_rec.retro_dt_alias IS NOT NULL THEN
927: IF (c_dai%NOTFOUND) THEN
928: CLOSE c_dai;
929: v_valid_dai := FALSE;
930: l_v_token1_val := v_ftci_fss_rec.retro_dt_alias ||','||TO_CHAR(v_ftci_fss_rec.retro_dai_sequence_number);
931: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_TYP_RDTA_DOSNT_EXST'); --new mwssage
932: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
933: fnd_file.put_line(fnd_file.log,fnd_message.Get);
934: ELSE
935: CLOSE c_dai;
928: CLOSE c_dai;
929: v_valid_dai := FALSE;
930: l_v_token1_val := v_ftci_fss_rec.retro_dt_alias ||','||TO_CHAR(v_ftci_fss_rec.retro_dai_sequence_number);
931: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_TYP_RDTA_DOSNT_EXST'); --new mwssage
932: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
933: fnd_file.put_line(fnd_file.log,fnd_message.Get);
934: ELSE
935: CLOSE c_dai;
936: END IF;
929: v_valid_dai := FALSE;
930: l_v_token1_val := v_ftci_fss_rec.retro_dt_alias ||','||TO_CHAR(v_ftci_fss_rec.retro_dai_sequence_number);
931: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_TYP_RDTA_DOSNT_EXST'); --new mwssage
932: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
933: fnd_file.put_line(fnd_file.log,fnd_message.Get);
934: ELSE
935: CLOSE c_dai;
936: END IF;
937: END IF;
957: v_ftci_fss_rec.rul_sequence_number,
958: v_fee_type_ci_status,
959: v_message_name) = FALSE THEN
960:
961: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET_STRING('IGS',v_message_name));
962:
963: v_process_next_ftci := TRUE;
964: ELSE
965: l_rowid := NULL; -- initialise l_rowid to null before passing into the TBH
999: X_ELM_RNG_ORDER_NAME => v_ftci_fss_rec.elm_rng_order_name,
1000: X_MAX_CHG_ELEMENTS => v_ftci_fss_rec.max_chg_elements
1001: );
1002: v_ftci_inserted_ind := TRUE;
1003: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET_STRING('IGS','IGS_FI_FEETYPE_CALINST_ROLLED'));
1004: END IF;
1005: END IF;
1006:
1007: IF (v_ftci_inserted_ind = TRUE OR v_ftci_exists_ind = TRUE ) THEN
1136: -- To show a message when there are no records available in fee type calendar instance table to rollover
1137: IF (v_insert_record = FALSE OR l_already_rolled) THEN
1138: IF p_fee_cat IS NOT NULL THEN
1139: IF NOT l_fcfl_exists_ind THEN
1140: fnd_file.put_line( fnd_file.LOG, fnd_message.get_string ('IGS', 'IGS_FI_NO_FEE_LIB_FOUND') );
1141: END IF;
1142: -- Removed logging of message IGS_FI_FTCI_NO_REC_FOUND in case the FTCI have already been rolled over
1143: -- as part of Bug 3038365
1144: END IF;
1160: RETURN FALSE;
1161:
1162: WHEN OTHERS THEN
1163: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1164: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FTCI_ERROR');
1165: fnd_message.set_token('FEE_TYPE',p_fee_type);
1166: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1167: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1168: fnd_file.put_line (fnd_file.log, fnd_message.get);
1161:
1162: WHEN OTHERS THEN
1163: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1164: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FTCI_ERROR');
1165: fnd_message.set_token('FEE_TYPE',p_fee_type);
1166: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1167: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1168: fnd_file.put_line (fnd_file.log, fnd_message.get);
1169:
1162: WHEN OTHERS THEN
1163: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1164: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FTCI_ERROR');
1165: fnd_message.set_token('FEE_TYPE',p_fee_type);
1166: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1167: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1168: fnd_file.put_line (fnd_file.log, fnd_message.get);
1169:
1170: END;
1163: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1164: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FTCI_ERROR');
1165: fnd_message.set_token('FEE_TYPE',p_fee_type);
1166: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1167: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1168: fnd_file.put_line (fnd_file.log, fnd_message.get);
1169:
1170: END;
1171: END finp_ins_roll_ftci;
1164: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FTCI_ERROR');
1165: fnd_message.set_token('FEE_TYPE',p_fee_type);
1166: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1167: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1168: fnd_file.put_line (fnd_file.log, fnd_message.get);
1169:
1170: END;
1171: END finp_ins_roll_ftci;
1172: --
1304: OPEN c_fcci(v_fcci_fss_rec.fee_cat);
1305: FETCH c_fcci INTO v_fee_cat;
1306: IF (c_fcci%FOUND) THEN
1307: CLOSE c_fcci;
1308: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET_STRING('IGS','IGS_FI_FEECAT_CALINST_ROLL'));
1309: v_fcci_exists_ind := TRUE;
1310: ELSE
1311: CLOSE c_fcci;
1312: -- Check for the existence of the start dai
1319: IF (c_dai%NOTFOUND) THEN
1320: CLOSE c_dai;
1321: v_process_next_fcci := TRUE;
1322: l_v_token1_val := v_fcci_fss_rec.start_dt_alias ||','||TO_CHAR(v_fcci_fss_rec.start_dai_sequence_number);
1323: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_CAT_SDTA_DOSNT_EXST'); --new mwssage
1324: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1325: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get);
1326: ELSE
1327: CLOSE c_dai;
1320: CLOSE c_dai;
1321: v_process_next_fcci := TRUE;
1322: l_v_token1_val := v_fcci_fss_rec.start_dt_alias ||','||TO_CHAR(v_fcci_fss_rec.start_dai_sequence_number);
1323: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_CAT_SDTA_DOSNT_EXST'); --new mwssage
1324: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1325: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get);
1326: ELSE
1327: CLOSE c_dai;
1328: END IF;
1321: v_process_next_fcci := TRUE;
1322: l_v_token1_val := v_fcci_fss_rec.start_dt_alias ||','||TO_CHAR(v_fcci_fss_rec.start_dai_sequence_number);
1323: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_CAT_SDTA_DOSNT_EXST'); --new mwssage
1324: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1325: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get);
1326: ELSE
1327: CLOSE c_dai;
1328: END IF;
1329: -- Check for the existence of the end dai
1336: IF (c_dai%NOTFOUND) THEN
1337: CLOSE c_dai;
1338: v_process_next_fcci := TRUE;
1339: l_v_token1_val := v_fcci_fss_rec.end_dt_alias ||','||TO_CHAR(v_fcci_fss_rec.end_dai_sequence_number);
1340: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_CAT_EDTA_DOSNT_EXST'); --new mwssage
1341: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1342: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get);
1343: ELSE
1344: CLOSE c_dai;
1337: CLOSE c_dai;
1338: v_process_next_fcci := TRUE;
1339: l_v_token1_val := v_fcci_fss_rec.end_dt_alias ||','||TO_CHAR(v_fcci_fss_rec.end_dai_sequence_number);
1340: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_CAT_EDTA_DOSNT_EXST'); --new mwssage
1341: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1342: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get);
1343: ELSE
1344: CLOSE c_dai;
1345: END IF;
1338: v_process_next_fcci := TRUE;
1339: l_v_token1_val := v_fcci_fss_rec.end_dt_alias ||','||TO_CHAR(v_fcci_fss_rec.end_dai_sequence_number);
1340: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_CAT_EDTA_DOSNT_EXST'); --new mwssage
1341: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1342: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get);
1343: ELSE
1344: CLOSE c_dai;
1345: END IF;
1346: IF v_fcci_fss_rec.retro_dt_alias IS NOT NULL THEN
1354: IF (c_dai%NOTFOUND) THEN
1355: CLOSE c_dai;
1356: v_process_next_fcci := TRUE;
1357: l_v_token1_val := v_fcci_fss_rec.retro_dt_alias ||','||TO_CHAR(v_fcci_fss_rec.retro_dai_sequence_number);
1358: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_CAT_RDTA_DOSNT_EXST'); --new mwssage
1359: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1360: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get);
1361:
1362: ELSE
1355: CLOSE c_dai;
1356: v_process_next_fcci := TRUE;
1357: l_v_token1_val := v_fcci_fss_rec.retro_dt_alias ||','||TO_CHAR(v_fcci_fss_rec.retro_dai_sequence_number);
1358: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_CAT_RDTA_DOSNT_EXST'); --new mwssage
1359: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1360: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get);
1361:
1362: ELSE
1363: CLOSE c_dai;
1356: v_process_next_fcci := TRUE;
1357: l_v_token1_val := v_fcci_fss_rec.retro_dt_alias ||','||TO_CHAR(v_fcci_fss_rec.retro_dai_sequence_number);
1358: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_CAT_RDTA_DOSNT_EXST'); --new mwssage
1359: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1360: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get);
1361:
1362: ELSE
1363: CLOSE c_dai;
1364: END IF;
1372: END IF;
1373: IF IGS_FI_VAL_FCCI.finp_val_fss_closed (
1374: v_fee_cat_ci_status,
1375: v_message_name) = FALSE THEN
1376: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET_STRING('IGS',v_message_name));
1377: v_process_next_fcci := TRUE;
1378: END IF;
1379: IF IGS_FI_VAL_FCCI.finp_val_fcci_active (
1380: v_fee_cat_ci_status,
1381: p_dest_cal_type,
1382: p_dest_sequence_number,
1383: v_message_name) = FALSE THEN
1384:
1385: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET_STRING('IGS',v_message_name));
1386: v_process_next_fcci := TRUE;
1387: END IF;
1388: END IF;
1389: IF (v_process_next_fcci = FALSE AND v_fcci_exists_ind = FALSE) THEN
1403: X_RETRO_DAI_SEQUENCE_NUMBER=>v_fcci_fss_rec.retro_dai_sequence_number,
1404: X_MODE=>'R'
1405: );
1406: v_fcci_inserted_ind := TRUE;
1407: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET_STRING('IGS','IGS_FI_FEECAT_CALINST_ROLLED'));
1408: END IF;
1409: END IF;
1410: IF (v_fcci_inserted_ind = TRUE OR v_fcci_exists_ind = TRUE) THEN
1411:
1447: RETURN TRUE;
1448: EXCEPTION
1449: WHEN OTHERS THEN
1450: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1451: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FCCI_ERROR');
1452: fnd_message.set_token('FEE_CAT',p_fee_cat);
1453: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1454: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1455: fnd_file.put_line (fnd_file.log, fnd_message.get);
1448: EXCEPTION
1449: WHEN OTHERS THEN
1450: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1451: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FCCI_ERROR');
1452: fnd_message.set_token('FEE_CAT',p_fee_cat);
1453: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1454: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1455: fnd_file.put_line (fnd_file.log, fnd_message.get);
1456: END;
1449: WHEN OTHERS THEN
1450: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1451: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FCCI_ERROR');
1452: fnd_message.set_token('FEE_CAT',p_fee_cat);
1453: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1454: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1455: fnd_file.put_line (fnd_file.log, fnd_message.get);
1456: END;
1457: END finp_ins_roll_fcci;
1450: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1451: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FCCI_ERROR');
1452: fnd_message.set_token('FEE_CAT',p_fee_cat);
1453: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1454: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1455: fnd_file.put_line (fnd_file.log, fnd_message.get);
1456: END;
1457: END finp_ins_roll_fcci;
1458: --
1451: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FCCI_ERROR');
1452: fnd_message.set_token('FEE_CAT',p_fee_cat);
1453: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1454: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1455: fnd_file.put_line (fnd_file.log, fnd_message.get);
1456: END;
1457: END finp_ins_roll_fcci;
1458: --
1459:
1577: IF (NVL(v_frtns_source_rec.fee_type, 'NULL') = NVL(v_fee_type, 'NULL') AND
1578: NVL(v_frtns_source_rec.fee_cat, 'NULL') = NVL(v_fee_cat, 'NULL')) THEN
1579: v_record_exists_ind := TRUE;
1580: ELSE
1581: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET_STRING('IGS','IGS_FI_FEE_RETN_SCH_CLASHES'));
1582: END IF;
1583: ELSE
1584: CLOSE c_frtns_dest;
1585: -- check the new schedule will be unique
1589: FETCH c_frtns_dest_u INTO v_sequence_number;
1590: IF (c_frtns_dest_u%FOUND) THEN
1591: CLOSE c_frtns_dest_u;
1592: v_valid_insert := FALSE;
1593: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET_STRING('IGS','IGS_FI_FEE_RETN_SCH_CLASHES'));
1594:
1595: ELSE
1596: CLOSE c_frtns_dest_u;
1597: -- Check for the existence of the IGS_CA_DA_INST
1608: l_v_token1_val := v_frtns_source_rec.dt_alias ||','||TO_CHAR(v_frtns_source_rec.dai_sequence_number);
1609: token2_val := ' RELATION_TYPE:' || p_relation_type ||
1610: ', SEQUENCE_NUMBER:' || TO_CHAR(v_frtns_source_rec.sequence_number)||
1611: ', SCHEDULE_NUMBER:' || TO_CHAR(v_frtns_source_rec.schedule_number);
1612: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_R_SCH_DTA_DOSNT_EXST'); --new mwssage
1613: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1614: FND_MESSAGE.SET_TOKEN('TOKEN2',token2_val);
1615: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET);
1616: ELSE
1609: token2_val := ' RELATION_TYPE:' || p_relation_type ||
1610: ', SEQUENCE_NUMBER:' || TO_CHAR(v_frtns_source_rec.sequence_number)||
1611: ', SCHEDULE_NUMBER:' || TO_CHAR(v_frtns_source_rec.schedule_number);
1612: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_R_SCH_DTA_DOSNT_EXST'); --new mwssage
1613: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1614: FND_MESSAGE.SET_TOKEN('TOKEN2',token2_val);
1615: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET);
1616: ELSE
1617: CLOSE c_dai;
1610: ', SEQUENCE_NUMBER:' || TO_CHAR(v_frtns_source_rec.sequence_number)||
1611: ', SCHEDULE_NUMBER:' || TO_CHAR(v_frtns_source_rec.schedule_number);
1612: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_R_SCH_DTA_DOSNT_EXST'); --new mwssage
1613: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1614: FND_MESSAGE.SET_TOKEN('TOKEN2',token2_val);
1615: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET);
1616: ELSE
1617: CLOSE c_dai;
1618: END IF;
1611: ', SCHEDULE_NUMBER:' || TO_CHAR(v_frtns_source_rec.schedule_number);
1612: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_R_SCH_DTA_DOSNT_EXST'); --new mwssage
1613: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1614: FND_MESSAGE.SET_TOKEN('TOKEN2',token2_val);
1615: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET);
1616: ELSE
1617: CLOSE c_dai;
1618: END IF;
1619: END IF;
1648: );
1649: v_record_inserted_ind := TRUE;
1650: ELSE
1651: IF (v_message_name= 'IGS_FI_FEE_RETN_SCH_FEECAT') THEN
1652: fnd_message.set_name('IGS', 'IGS_FI_FRETS_FTCI_FCFL_EXIST');
1653: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
1654: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
1655: fnd_file.put_line(fnd_file.log, fnd_message.get);
1656: ELSIF (v_message_name= 'IGS_FI_FEE_RETN_SCH_FEETYPE') THEN
1649: v_record_inserted_ind := TRUE;
1650: ELSE
1651: IF (v_message_name= 'IGS_FI_FEE_RETN_SCH_FEECAT') THEN
1652: fnd_message.set_name('IGS', 'IGS_FI_FRETS_FTCI_FCFL_EXIST');
1653: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
1654: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
1655: fnd_file.put_line(fnd_file.log, fnd_message.get);
1656: ELSIF (v_message_name= 'IGS_FI_FEE_RETN_SCH_FEETYPE') THEN
1657: fnd_message.set_name('IGS', 'IGS_FI_FRETS_FTCI_FCFL_EXIST');
1650: ELSE
1651: IF (v_message_name= 'IGS_FI_FEE_RETN_SCH_FEECAT') THEN
1652: fnd_message.set_name('IGS', 'IGS_FI_FRETS_FTCI_FCFL_EXIST');
1653: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
1654: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
1655: fnd_file.put_line(fnd_file.log, fnd_message.get);
1656: ELSIF (v_message_name= 'IGS_FI_FEE_RETN_SCH_FEETYPE') THEN
1657: fnd_message.set_name('IGS', 'IGS_FI_FRETS_FTCI_FCFL_EXIST');
1658: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
1651: IF (v_message_name= 'IGS_FI_FEE_RETN_SCH_FEECAT') THEN
1652: fnd_message.set_name('IGS', 'IGS_FI_FRETS_FTCI_FCFL_EXIST');
1653: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
1654: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
1655: fnd_file.put_line(fnd_file.log, fnd_message.get);
1656: ELSIF (v_message_name= 'IGS_FI_FEE_RETN_SCH_FEETYPE') THEN
1657: fnd_message.set_name('IGS', 'IGS_FI_FRETS_FTCI_FCFL_EXIST');
1658: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
1659: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
1653: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
1654: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
1655: fnd_file.put_line(fnd_file.log, fnd_message.get);
1656: ELSIF (v_message_name= 'IGS_FI_FEE_RETN_SCH_FEETYPE') THEN
1657: fnd_message.set_name('IGS', 'IGS_FI_FRETS_FTCI_FCFL_EXIST');
1658: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
1659: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
1660: fnd_file.put_line(fnd_file.log, fnd_message.get);
1661: END IF;
1654: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
1655: fnd_file.put_line(fnd_file.log, fnd_message.get);
1656: ELSIF (v_message_name= 'IGS_FI_FEE_RETN_SCH_FEETYPE') THEN
1657: fnd_message.set_name('IGS', 'IGS_FI_FRETS_FTCI_FCFL_EXIST');
1658: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
1659: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
1660: fnd_file.put_line(fnd_file.log, fnd_message.get);
1661: END IF;
1662: p_message_name := cst_warning;
1655: fnd_file.put_line(fnd_file.log, fnd_message.get);
1656: ELSIF (v_message_name= 'IGS_FI_FEE_RETN_SCH_FEETYPE') THEN
1657: fnd_message.set_name('IGS', 'IGS_FI_FRETS_FTCI_FCFL_EXIST');
1658: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
1659: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
1660: fnd_file.put_line(fnd_file.log, fnd_message.get);
1661: END IF;
1662: p_message_name := cst_warning;
1663: l_b_ftci_fcci_clash_ind := FALSE;
1656: ELSIF (v_message_name= 'IGS_FI_FEE_RETN_SCH_FEETYPE') THEN
1657: fnd_message.set_name('IGS', 'IGS_FI_FRETS_FTCI_FCFL_EXIST');
1658: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
1659: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
1660: fnd_file.put_line(fnd_file.log, fnd_message.get);
1661: END IF;
1662: p_message_name := cst_warning;
1663: l_b_ftci_fcci_clash_ind := FALSE;
1664: END IF;
1665: END IF;
1666: EXCEPTION
1667: WHEN OTHERS THEN
1668: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1669: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FRTNS_ERROR');
1670: fnd_message.set_token('FEE_CAT',p_fee_cat);
1671: fnd_message.set_token('FEE_TYPE',p_fee_type);
1672: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1673: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1666: EXCEPTION
1667: WHEN OTHERS THEN
1668: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1669: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FRTNS_ERROR');
1670: fnd_message.set_token('FEE_CAT',p_fee_cat);
1671: fnd_message.set_token('FEE_TYPE',p_fee_type);
1672: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1673: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1674: fnd_message.set_token('DT_ALIAS',v_frtns_source_rec.dt_alias);
1667: WHEN OTHERS THEN
1668: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1669: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FRTNS_ERROR');
1670: fnd_message.set_token('FEE_CAT',p_fee_cat);
1671: fnd_message.set_token('FEE_TYPE',p_fee_type);
1672: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1673: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1674: fnd_message.set_token('DT_ALIAS',v_frtns_source_rec.dt_alias);
1675: fnd_file.put_line (fnd_file.log, fnd_message.get);
1668: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1669: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FRTNS_ERROR');
1670: fnd_message.set_token('FEE_CAT',p_fee_cat);
1671: fnd_message.set_token('FEE_TYPE',p_fee_type);
1672: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1673: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1674: fnd_message.set_token('DT_ALIAS',v_frtns_source_rec.dt_alias);
1675: fnd_file.put_line (fnd_file.log, fnd_message.get);
1676: END;
1669: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FRTNS_ERROR');
1670: fnd_message.set_token('FEE_CAT',p_fee_cat);
1671: fnd_message.set_token('FEE_TYPE',p_fee_type);
1672: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1673: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1674: fnd_message.set_token('DT_ALIAS',v_frtns_source_rec.dt_alias);
1675: fnd_file.put_line (fnd_file.log, fnd_message.get);
1676: END;
1677: END IF;
1670: fnd_message.set_token('FEE_CAT',p_fee_cat);
1671: fnd_message.set_token('FEE_TYPE',p_fee_type);
1672: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1673: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1674: fnd_message.set_token('DT_ALIAS',v_frtns_source_rec.dt_alias);
1675: fnd_file.put_line (fnd_file.log, fnd_message.get);
1676: END;
1677: END IF;
1678: END IF;
1671: fnd_message.set_token('FEE_TYPE',p_fee_type);
1672: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1673: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1674: fnd_message.set_token('DT_ALIAS',v_frtns_source_rec.dt_alias);
1675: fnd_file.put_line (fnd_file.log, fnd_message.get);
1676: END;
1677: END IF;
1678: END IF;
1679: END LOOP;
1678: END IF;
1679: END LOOP;
1680: -- 2. Check IF records rolled over
1681: IF (v_record_exists_ind = TRUE) THEN
1682: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET_STRING('IGS','IGS_FI_FEE_RETN_SCH_ROLLED'));
1683: END IF;
1684: IF (v_record_inserted_ind = TRUE) THEN
1685: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET_STRING('IGS','IGS_FI_FEERET_SCH_ROLLED'));
1686: END IF;
1681: IF (v_record_exists_ind = TRUE) THEN
1682: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET_STRING('IGS','IGS_FI_FEE_RETN_SCH_ROLLED'));
1683: END IF;
1684: IF (v_record_inserted_ind = TRUE) THEN
1685: FND_FILE.PUT_LINE (FND_FILE.LOG, FND_MESSAGE.GET_STRING('IGS','IGS_FI_FEERET_SCH_ROLLED'));
1686: END IF;
1687: RETURN TRUE;
1688: END;
1689:
1816: -- the Charge Method has been defined at Fee Category Fee Liability level.
1817:
1818: IF v_fcfl_fss_rec.s_chg_method_type IS NOT NULL OR v_fcfl_fss_rec.rul_sequence_number IS NOT NULL then
1819: l_v_token1_val := IGS_FI_GEN_GL.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL') ;
1820: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_NO_ROLL_CHG_METHOD');
1821: FND_MESSAGE.SET_TOKEN('FTCI_FCFL',l_v_token1_val);
1822: fnd_file.put_line(fnd_file.log,fnd_message.Get);
1823: v_next_fcfl := TRUE;
1824: END IF;
1817:
1818: IF v_fcfl_fss_rec.s_chg_method_type IS NOT NULL OR v_fcfl_fss_rec.rul_sequence_number IS NOT NULL then
1819: l_v_token1_val := IGS_FI_GEN_GL.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL') ;
1820: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_NO_ROLL_CHG_METHOD');
1821: FND_MESSAGE.SET_TOKEN('FTCI_FCFL',l_v_token1_val);
1822: fnd_file.put_line(fnd_file.log,fnd_message.Get);
1823: v_next_fcfl := TRUE;
1824: END IF;
1825: -- Check for the existence of the IGS_FI_F_CAT_FEE_LBL
1818: IF v_fcfl_fss_rec.s_chg_method_type IS NOT NULL OR v_fcfl_fss_rec.rul_sequence_number IS NOT NULL then
1819: l_v_token1_val := IGS_FI_GEN_GL.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL') ;
1820: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_NO_ROLL_CHG_METHOD');
1821: FND_MESSAGE.SET_TOKEN('FTCI_FCFL',l_v_token1_val);
1822: fnd_file.put_line(fnd_file.log,fnd_message.Get);
1823: v_next_fcfl := TRUE;
1824: END IF;
1825: -- Check for the existence of the IGS_FI_F_CAT_FEE_LBL
1826: -- record under the destination calendar
1830: FETCH c_fcfl INTO v_fee_type;
1831:
1832: IF (c_fcfl%FOUND) THEN
1833: CLOSE c_fcfl;
1834: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_FEECAT_FEE_LIAB_ROLLED'));
1835: v_fcfl_exists_ind := TRUE;
1836: ELSE
1837: CLOSE c_fcfl;
1838: v_next_fcfl := FALSE;
1856: v_fee_liability_status,
1857: p_dest_cal_type,
1858: p_dest_sequence_number,
1859: v_message_name) = FALSE) THEN
1860: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS',v_message_name));
1861: -- process next IGS_FI_F_CAT_FEE_LBL
1862: v_next_fcfl := TRUE;
1863: END IF;
1864: END IF;
1869: p_fee_cat,
1870: v_fcfl_fss_rec.fee_type,
1871: v_fee_liability_status,
1872: v_message_name) = FALSE) THEN
1873: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS',v_message_name));
1874: -- process next IGS_FI_F_CAT_FEE_LBL
1875: v_next_fcfl := TRUE;
1876: END IF;
1877: END IF;
1889: CLOSE c_dai;
1890: v_valid_dai := FALSE;
1891:
1892: l_v_token1_val := v_fcfl_fss_rec.start_dt_alias ||','||TO_CHAR(v_fcfl_fss_rec.start_dai_sequence_number);
1893: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_CAT_F_LIA_DOSNT_EXST'); --new mwssage
1894: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1895: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get);
1896: ELSE
1897: CLOSE c_dai;
1890: v_valid_dai := FALSE;
1891:
1892: l_v_token1_val := v_fcfl_fss_rec.start_dt_alias ||','||TO_CHAR(v_fcfl_fss_rec.start_dai_sequence_number);
1893: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_CAT_F_LIA_DOSNT_EXST'); --new mwssage
1894: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1895: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get);
1896: ELSE
1897: CLOSE c_dai;
1898: END IF;
1891:
1892: l_v_token1_val := v_fcfl_fss_rec.start_dt_alias ||','||TO_CHAR(v_fcfl_fss_rec.start_dai_sequence_number);
1893: FND_MESSAGE.SET_NAME('IGS', 'IGS_FI_F_CAT_F_LIA_DOSNT_EXST'); --new mwssage
1894: FND_MESSAGE.SET_TOKEN('TOKEN1',l_v_token1_val);
1895: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get);
1896: ELSE
1897: CLOSE c_dai;
1898: END IF;
1899: END IF;
1916: X_MODE=>'R'
1917: );
1918:
1919: v_fcfl_inserted_ind := TRUE;
1920: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_FEECAT_FEELIAB_ROLLED'));
1921: EXCEPTION
1922: WHEN OTHERS THEN
1923: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1924: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FCFL_ERROR');
1920: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_FEECAT_FEELIAB_ROLLED'));
1921: EXCEPTION
1922: WHEN OTHERS THEN
1923: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1924: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FCFL_ERROR');
1925: fnd_message.set_token('FEE_CAT',p_fee_cat);
1926: fnd_message.set_token('FEE_TYPE',v_fcfl_fss_rec.fee_type);
1927: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1928: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1921: EXCEPTION
1922: WHEN OTHERS THEN
1923: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1924: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FCFL_ERROR');
1925: fnd_message.set_token('FEE_CAT',p_fee_cat);
1926: fnd_message.set_token('FEE_TYPE',v_fcfl_fss_rec.fee_type);
1927: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1928: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1929: fnd_file.put_line (fnd_file.log, fnd_message.get);
1922: WHEN OTHERS THEN
1923: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1924: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FCFL_ERROR');
1925: fnd_message.set_token('FEE_CAT',p_fee_cat);
1926: fnd_message.set_token('FEE_TYPE',v_fcfl_fss_rec.fee_type);
1927: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1928: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1929: fnd_file.put_line (fnd_file.log, fnd_message.get);
1930: END;
1923: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
1924: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FCFL_ERROR');
1925: fnd_message.set_token('FEE_CAT',p_fee_cat);
1926: fnd_message.set_token('FEE_TYPE',v_fcfl_fss_rec.fee_type);
1927: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1928: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1929: fnd_file.put_line (fnd_file.log, fnd_message.get);
1930: END;
1931: END IF;
1924: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FCFL_ERROR');
1925: fnd_message.set_token('FEE_CAT',p_fee_cat);
1926: fnd_message.set_token('FEE_TYPE',v_fcfl_fss_rec.fee_type);
1927: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1928: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1929: fnd_file.put_line (fnd_file.log, fnd_message.get);
1930: END;
1931: END IF;
1932: END IF;
1925: fnd_message.set_token('FEE_CAT',p_fee_cat);
1926: fnd_message.set_token('FEE_TYPE',v_fcfl_fss_rec.fee_type);
1927: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
1928: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
1929: fnd_file.put_line (fnd_file.log, fnd_message.get);
1930: END;
1931: END IF;
1932: END IF;
1933: END IF;
2217: );
2218: v_record_inserted_ind := TRUE;
2219: ELSE
2220: IF (v_message_name= 'IGS_FI_ASSRATES_NOT_DEFINED') THEN
2221: fnd_message.set_name('IGS', 'IGS_FI_FAR_FTCI_FCFL_EXIST');
2222: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
2223: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
2224: fnd_file.put_line(fnd_file.log, fnd_message.get);
2225: ELSIF (v_message_name= 'IGS_FI_ASSRATES_NOT_DFNED_FEE') THEN
2218: v_record_inserted_ind := TRUE;
2219: ELSE
2220: IF (v_message_name= 'IGS_FI_ASSRATES_NOT_DEFINED') THEN
2221: fnd_message.set_name('IGS', 'IGS_FI_FAR_FTCI_FCFL_EXIST');
2222: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
2223: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
2224: fnd_file.put_line(fnd_file.log, fnd_message.get);
2225: ELSIF (v_message_name= 'IGS_FI_ASSRATES_NOT_DFNED_FEE') THEN
2226: fnd_message.set_name('IGS', 'IGS_FI_FAR_FTCI_FCFL_EXIST');
2219: ELSE
2220: IF (v_message_name= 'IGS_FI_ASSRATES_NOT_DEFINED') THEN
2221: fnd_message.set_name('IGS', 'IGS_FI_FAR_FTCI_FCFL_EXIST');
2222: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
2223: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
2224: fnd_file.put_line(fnd_file.log, fnd_message.get);
2225: ELSIF (v_message_name= 'IGS_FI_ASSRATES_NOT_DFNED_FEE') THEN
2226: fnd_message.set_name('IGS', 'IGS_FI_FAR_FTCI_FCFL_EXIST');
2227: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
2220: IF (v_message_name= 'IGS_FI_ASSRATES_NOT_DEFINED') THEN
2221: fnd_message.set_name('IGS', 'IGS_FI_FAR_FTCI_FCFL_EXIST');
2222: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
2223: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
2224: fnd_file.put_line(fnd_file.log, fnd_message.get);
2225: ELSIF (v_message_name= 'IGS_FI_ASSRATES_NOT_DFNED_FEE') THEN
2226: fnd_message.set_name('IGS', 'IGS_FI_FAR_FTCI_FCFL_EXIST');
2227: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
2228: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
2222: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
2223: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
2224: fnd_file.put_line(fnd_file.log, fnd_message.get);
2225: ELSIF (v_message_name= 'IGS_FI_ASSRATES_NOT_DFNED_FEE') THEN
2226: fnd_message.set_name('IGS', 'IGS_FI_FAR_FTCI_FCFL_EXIST');
2227: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
2228: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
2229: fnd_file.put_line(fnd_file.log, fnd_message.get);
2230: END IF;
2223: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
2224: fnd_file.put_line(fnd_file.log, fnd_message.get);
2225: ELSIF (v_message_name= 'IGS_FI_ASSRATES_NOT_DFNED_FEE') THEN
2226: fnd_message.set_name('IGS', 'IGS_FI_FAR_FTCI_FCFL_EXIST');
2227: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
2228: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
2229: fnd_file.put_line(fnd_file.log, fnd_message.get);
2230: END IF;
2231: p_message_name := cst_warning;
2224: fnd_file.put_line(fnd_file.log, fnd_message.get);
2225: ELSIF (v_message_name= 'IGS_FI_ASSRATES_NOT_DFNED_FEE') THEN
2226: fnd_message.set_name('IGS', 'IGS_FI_FAR_FTCI_FCFL_EXIST');
2227: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
2228: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
2229: fnd_file.put_line(fnd_file.log, fnd_message.get);
2230: END IF;
2231: p_message_name := cst_warning;
2232: l_b_ftci_fcci_clash_ind := FALSE;
2225: ELSIF (v_message_name= 'IGS_FI_ASSRATES_NOT_DFNED_FEE') THEN
2226: fnd_message.set_name('IGS', 'IGS_FI_FAR_FTCI_FCFL_EXIST');
2227: fnd_message.set_token('SOURCE', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FTCI'));
2228: fnd_message.set_token('DESTINATION', igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX','FCFL'));
2229: fnd_file.put_line(fnd_file.log, fnd_message.get);
2230: END IF;
2231: p_message_name := cst_warning;
2232: l_b_ftci_fcci_clash_ind := FALSE;
2233: END IF;
2234: END IF;
2235: EXCEPTION
2236: WHEN OTHERS THEN
2237: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2238: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FAR_ERROR');
2239: fnd_message.set_token('FEE_CAT',v_far_source_rec.fee_cat);
2240: fnd_message.set_token('FEE_TYPE',p_fee_type);
2241: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2242: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2235: EXCEPTION
2236: WHEN OTHERS THEN
2237: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2238: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FAR_ERROR');
2239: fnd_message.set_token('FEE_CAT',v_far_source_rec.fee_cat);
2240: fnd_message.set_token('FEE_TYPE',p_fee_type);
2241: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2242: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2243: fnd_message.set_token('RATE_NUMBER',v_far_source_rec.rate_number);
2236: WHEN OTHERS THEN
2237: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2238: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FAR_ERROR');
2239: fnd_message.set_token('FEE_CAT',v_far_source_rec.fee_cat);
2240: fnd_message.set_token('FEE_TYPE',p_fee_type);
2241: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2242: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2243: fnd_message.set_token('RATE_NUMBER',v_far_source_rec.rate_number);
2244: fnd_file.put_line (fnd_file.log, fnd_message.get);
2237: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2238: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FAR_ERROR');
2239: fnd_message.set_token('FEE_CAT',v_far_source_rec.fee_cat);
2240: fnd_message.set_token('FEE_TYPE',p_fee_type);
2241: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2242: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2243: fnd_message.set_token('RATE_NUMBER',v_far_source_rec.rate_number);
2244: fnd_file.put_line (fnd_file.log, fnd_message.get);
2245: END;
2238: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_FAR_ERROR');
2239: fnd_message.set_token('FEE_CAT',v_far_source_rec.fee_cat);
2240: fnd_message.set_token('FEE_TYPE',p_fee_type);
2241: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2242: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2243: fnd_message.set_token('RATE_NUMBER',v_far_source_rec.rate_number);
2244: fnd_file.put_line (fnd_file.log, fnd_message.get);
2245: END;
2246: END IF;
2239: fnd_message.set_token('FEE_CAT',v_far_source_rec.fee_cat);
2240: fnd_message.set_token('FEE_TYPE',p_fee_type);
2241: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2242: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2243: fnd_message.set_token('RATE_NUMBER',v_far_source_rec.rate_number);
2244: fnd_file.put_line (fnd_file.log, fnd_message.get);
2245: END;
2246: END IF;
2247: END LOOP;
2240: fnd_message.set_token('FEE_TYPE',p_fee_type);
2241: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2242: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2243: fnd_message.set_token('RATE_NUMBER',v_far_source_rec.rate_number);
2244: fnd_file.put_line (fnd_file.log, fnd_message.get);
2245: END;
2246: END IF;
2247: END LOOP;
2248: -- 2. Check IF records rolled over
2246: END IF;
2247: END LOOP;
2248: -- 2. Check IF records rolled over
2249: IF (v_record_exists_ind = TRUE) THEN
2250: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_FEEASS_RATE_ROLLED'));
2251: END IF;
2252: IF (v_record_inserted_ind = TRUE) THEN
2253: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_FEEASS_RATES_ROLLED'));
2254: END IF;
2249: IF (v_record_exists_ind = TRUE) THEN
2250: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_FEEASS_RATE_ROLLED'));
2251: END IF;
2252: IF (v_record_inserted_ind = TRUE) THEN
2253: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_FEEASS_RATES_ROLLED'));
2254: END IF;
2255: RETURN TRUE;
2256: END;
2257: END finp_ins_roll_far;
2464: OPEN c_serr_exists;
2465: FETCH c_serr_exists INTO l_c_v_rates_exist;
2466:
2467: IF c_far_exists%NOTFOUND AND (c_err_exists%FOUND OR c_serr_exists%FOUND) THEN
2468: fnd_message.set_name('IGS', 'IGS_FI_ER_FAR_NOSETUP');
2469: fnd_file.put_line(fnd_file.log, fnd_message.get);
2470: p_message_name := cst_warning;
2471: CLOSE c_serr_exists;
2472: CLOSE c_err_exists;
2465: FETCH c_serr_exists INTO l_c_v_rates_exist;
2466:
2467: IF c_far_exists%NOTFOUND AND (c_err_exists%FOUND OR c_serr_exists%FOUND) THEN
2468: fnd_message.set_name('IGS', 'IGS_FI_ER_FAR_NOSETUP');
2469: fnd_file.put_line(fnd_file.log, fnd_message.get);
2470: p_message_name := cst_warning;
2471: CLOSE c_serr_exists;
2472: CLOSE c_err_exists;
2473: CLOSE c_far_exists;
2521: v_er_record_inserted_ind := TRUE;
2522: EXCEPTION
2523: WHEN OTHERS THEN
2524: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2525: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ER_ERROR');
2526: fnd_message.set_token('FEE_CAT',v_er_source_rec.fee_cat);
2527: fnd_message.set_token('FEE_TYPE',p_fee_type);
2528: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2529: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2522: EXCEPTION
2523: WHEN OTHERS THEN
2524: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2525: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ER_ERROR');
2526: fnd_message.set_token('FEE_CAT',v_er_source_rec.fee_cat);
2527: fnd_message.set_token('FEE_TYPE',p_fee_type);
2528: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2529: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2530: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2523: WHEN OTHERS THEN
2524: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2525: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ER_ERROR');
2526: fnd_message.set_token('FEE_CAT',v_er_source_rec.fee_cat);
2527: fnd_message.set_token('FEE_TYPE',p_fee_type);
2528: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2529: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2530: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2531: fnd_file.put_line (fnd_file.log, fnd_message.get);
2524: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2525: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ER_ERROR');
2526: fnd_message.set_token('FEE_CAT',v_er_source_rec.fee_cat);
2527: fnd_message.set_token('FEE_TYPE',p_fee_type);
2528: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2529: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2530: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2531: fnd_file.put_line (fnd_file.log, fnd_message.get);
2532: END;
2525: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ER_ERROR');
2526: fnd_message.set_token('FEE_CAT',v_er_source_rec.fee_cat);
2527: fnd_message.set_token('FEE_TYPE',p_fee_type);
2528: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2529: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2530: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2531: fnd_file.put_line (fnd_file.log, fnd_message.get);
2532: END;
2533: END IF;
2526: fnd_message.set_token('FEE_CAT',v_er_source_rec.fee_cat);
2527: fnd_message.set_token('FEE_TYPE',p_fee_type);
2528: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2529: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2530: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2531: fnd_file.put_line (fnd_file.log, fnd_message.get);
2532: END;
2533: END IF;
2534:
2527: fnd_message.set_token('FEE_TYPE',p_fee_type);
2528: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2529: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2530: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2531: fnd_file.put_line (fnd_file.log, fnd_message.get);
2532: END;
2533: END IF;
2534:
2535: --Added as a part of CPF build . Bug #3392088
2573: v_ser_record_inserted_ind := TRUE;
2574: EXCEPTION
2575: WHEN OTHERS THEN
2576: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2577: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_SUB_ER_ERROR');
2578: fnd_message.set_token('FEE_CAT',v_er_source_rec.fee_cat);
2579: fnd_message.set_token('FEE_TYPE',p_fee_type);
2580: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2581: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2574: EXCEPTION
2575: WHEN OTHERS THEN
2576: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2577: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_SUB_ER_ERROR');
2578: fnd_message.set_token('FEE_CAT',v_er_source_rec.fee_cat);
2579: fnd_message.set_token('FEE_TYPE',p_fee_type);
2580: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2581: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2582: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2575: WHEN OTHERS THEN
2576: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2577: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_SUB_ER_ERROR');
2578: fnd_message.set_token('FEE_CAT',v_er_source_rec.fee_cat);
2579: fnd_message.set_token('FEE_TYPE',p_fee_type);
2580: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2581: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2582: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2583: fnd_message.set_token('SUB_RANGE_NUMBER',v_ser_source_rec.sub_range_num);
2576: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2577: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_SUB_ER_ERROR');
2578: fnd_message.set_token('FEE_CAT',v_er_source_rec.fee_cat);
2579: fnd_message.set_token('FEE_TYPE',p_fee_type);
2580: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2581: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2582: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2583: fnd_message.set_token('SUB_RANGE_NUMBER',v_ser_source_rec.sub_range_num);
2584: fnd_file.put_line (fnd_file.log, fnd_message.get);
2577: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_SUB_ER_ERROR');
2578: fnd_message.set_token('FEE_CAT',v_er_source_rec.fee_cat);
2579: fnd_message.set_token('FEE_TYPE',p_fee_type);
2580: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2581: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2582: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2583: fnd_message.set_token('SUB_RANGE_NUMBER',v_ser_source_rec.sub_range_num);
2584: fnd_file.put_line (fnd_file.log, fnd_message.get);
2585: END;
2578: fnd_message.set_token('FEE_CAT',v_er_source_rec.fee_cat);
2579: fnd_message.set_token('FEE_TYPE',p_fee_type);
2580: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2581: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2582: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2583: fnd_message.set_token('SUB_RANGE_NUMBER',v_ser_source_rec.sub_range_num);
2584: fnd_file.put_line (fnd_file.log, fnd_message.get);
2585: END;
2586: END IF;
2579: fnd_message.set_token('FEE_TYPE',p_fee_type);
2580: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2581: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2582: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2583: fnd_message.set_token('SUB_RANGE_NUMBER',v_ser_source_rec.sub_range_num);
2584: fnd_file.put_line (fnd_file.log, fnd_message.get);
2585: END;
2586: END IF;
2587:
2580: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2581: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2582: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2583: fnd_message.set_token('SUB_RANGE_NUMBER',v_ser_source_rec.sub_range_num);
2584: fnd_file.put_line (fnd_file.log, fnd_message.get);
2585: END;
2586: END IF;
2587:
2588: IF l_sub_er_id IS NOT NULL THEN
2623: FETCH c_sert_far_id_to_rt_num INTO v_sert_rate_number;
2624: CLOSE c_sert_far_id_to_rt_num;
2625:
2626: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2627: fnd_message.set_name('IGS','IGS_FI_ROLL_SUB_ER_RT_ERROR');
2628: fnd_message.set_token('FEE_TYPE',p_fee_type);
2629: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2630: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2631: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2624: CLOSE c_sert_far_id_to_rt_num;
2625:
2626: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2627: fnd_message.set_name('IGS','IGS_FI_ROLL_SUB_ER_RT_ERROR');
2628: fnd_message.set_token('FEE_TYPE',p_fee_type);
2629: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2630: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2631: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2632: fnd_message.set_token('SUB_RANGE_NUMBER',v_ser_source_rec.sub_range_num);
2625:
2626: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2627: fnd_message.set_name('IGS','IGS_FI_ROLL_SUB_ER_RT_ERROR');
2628: fnd_message.set_token('FEE_TYPE',p_fee_type);
2629: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2630: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2631: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2632: fnd_message.set_token('SUB_RANGE_NUMBER',v_ser_source_rec.sub_range_num);
2633: fnd_message.set_token('RATE_NUMBER',v_sert_rate_number);
2626: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2627: fnd_message.set_name('IGS','IGS_FI_ROLL_SUB_ER_RT_ERROR');
2628: fnd_message.set_token('FEE_TYPE',p_fee_type);
2629: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2630: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2631: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2632: fnd_message.set_token('SUB_RANGE_NUMBER',v_ser_source_rec.sub_range_num);
2633: fnd_message.set_token('RATE_NUMBER',v_sert_rate_number);
2634: fnd_file.put_line (fnd_file.log, fnd_message.get);
2627: fnd_message.set_name('IGS','IGS_FI_ROLL_SUB_ER_RT_ERROR');
2628: fnd_message.set_token('FEE_TYPE',p_fee_type);
2629: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2630: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2631: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2632: fnd_message.set_token('SUB_RANGE_NUMBER',v_ser_source_rec.sub_range_num);
2633: fnd_message.set_token('RATE_NUMBER',v_sert_rate_number);
2634: fnd_file.put_line (fnd_file.log, fnd_message.get);
2635: END;
2628: fnd_message.set_token('FEE_TYPE',p_fee_type);
2629: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2630: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2631: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2632: fnd_message.set_token('SUB_RANGE_NUMBER',v_ser_source_rec.sub_range_num);
2633: fnd_message.set_token('RATE_NUMBER',v_sert_rate_number);
2634: fnd_file.put_line (fnd_file.log, fnd_message.get);
2635: END;
2636: END IF;
2629: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2630: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2631: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2632: fnd_message.set_token('SUB_RANGE_NUMBER',v_ser_source_rec.sub_range_num);
2633: fnd_message.set_token('RATE_NUMBER',v_sert_rate_number);
2634: fnd_file.put_line (fnd_file.log, fnd_message.get);
2635: END;
2636: END IF;
2637: END LOOP;
2630: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2631: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2632: fnd_message.set_token('SUB_RANGE_NUMBER',v_ser_source_rec.sub_range_num);
2633: fnd_message.set_token('RATE_NUMBER',v_sert_rate_number);
2634: fnd_file.put_line (fnd_file.log, fnd_message.get);
2635: END;
2636: END IF;
2637: END LOOP;
2638:
2680: v_err_record_inserted_ind := TRUE;
2681: EXCEPTION
2682: WHEN OTHERS THEN
2683: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2684: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ER_RT_ERROR');
2685: fnd_message.set_token('FEE_TYPE',p_fee_type);
2686: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2687: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2688: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2681: EXCEPTION
2682: WHEN OTHERS THEN
2683: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2684: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ER_RT_ERROR');
2685: fnd_message.set_token('FEE_TYPE',p_fee_type);
2686: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2687: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2688: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2689: fnd_message.set_token('RATE_NUMBER',v_err_source_rec.rate_number);
2682: WHEN OTHERS THEN
2683: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2684: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ER_RT_ERROR');
2685: fnd_message.set_token('FEE_TYPE',p_fee_type);
2686: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2687: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2688: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2689: fnd_message.set_token('RATE_NUMBER',v_err_source_rec.rate_number);
2690: fnd_file.put_line (fnd_file.log, fnd_message.get);
2683: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2684: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ER_RT_ERROR');
2685: fnd_message.set_token('FEE_TYPE',p_fee_type);
2686: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2687: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2688: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2689: fnd_message.set_token('RATE_NUMBER',v_err_source_rec.rate_number);
2690: fnd_file.put_line (fnd_file.log, fnd_message.get);
2691: END;
2684: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ER_RT_ERROR');
2685: fnd_message.set_token('FEE_TYPE',p_fee_type);
2686: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2687: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2688: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2689: fnd_message.set_token('RATE_NUMBER',v_err_source_rec.rate_number);
2690: fnd_file.put_line (fnd_file.log, fnd_message.get);
2691: END;
2692: END IF;
2685: fnd_message.set_token('FEE_TYPE',p_fee_type);
2686: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2687: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2688: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2689: fnd_message.set_token('RATE_NUMBER',v_err_source_rec.rate_number);
2690: fnd_file.put_line (fnd_file.log, fnd_message.get);
2691: END;
2692: END IF;
2693: END LOOP;
2686: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2687: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2688: fnd_message.set_token('RANGE_NUMBER',v_er_source_rec.range_number);
2689: fnd_message.set_token('RATE_NUMBER',v_err_source_rec.rate_number);
2690: fnd_file.put_line (fnd_file.log, fnd_message.get);
2691: END;
2692: END IF;
2693: END LOOP;
2694: END IF;
2694: END IF;
2695: END LOOP;
2696: -- 2. Check IF records rolled over
2697: IF (v_er_record_exists_ind = TRUE) THEN
2698: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_ELERNG_ROLLED'));
2699: END IF;
2700: IF (v_err_record_exists_ind = TRUE) THEN
2701: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_ELERNG_ALREADY_ROLLED'));
2702: END IF;
2697: IF (v_er_record_exists_ind = TRUE) THEN
2698: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_ELERNG_ROLLED'));
2699: END IF;
2700: IF (v_err_record_exists_ind = TRUE) THEN
2701: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_ELERNG_ALREADY_ROLLED'));
2702: END IF;
2703: IF (v_er_record_inserted_ind = TRUE) THEN
2704: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_ELEMENT_RANGE_ROLLED'));
2705: END IF;
2700: IF (v_err_record_exists_ind = TRUE) THEN
2701: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_ELERNG_ALREADY_ROLLED'));
2702: END IF;
2703: IF (v_er_record_inserted_ind = TRUE) THEN
2704: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_ELEMENT_RANGE_ROLLED'));
2705: END IF;
2706: IF (v_err_record_inserted_ind = TRUE) THEN
2707: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_ELERNG_RATES_ROLLED'));
2708: END IF;
2703: IF (v_er_record_inserted_ind = TRUE) THEN
2704: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_ELEMENT_RANGE_ROLLED'));
2705: END IF;
2706: IF (v_err_record_inserted_ind = TRUE) THEN
2707: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_ELERNG_RATES_ROLLED'));
2708: END IF;
2709:
2710: IF (v_ser_record_exists_ind = TRUE) THEN
2711: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_SER_ALREADY_ROLLED'));
2707: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_ELERNG_RATES_ROLLED'));
2708: END IF;
2709:
2710: IF (v_ser_record_exists_ind = TRUE) THEN
2711: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_SER_ALREADY_ROLLED'));
2712: END IF;
2713: IF (v_sert_record_exists_ind = TRUE) THEN
2714: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_SERT_ALREADY_ROLLED'));
2715: END IF;
2710: IF (v_ser_record_exists_ind = TRUE) THEN
2711: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_SER_ALREADY_ROLLED'));
2712: END IF;
2713: IF (v_sert_record_exists_ind = TRUE) THEN
2714: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_SERT_ALREADY_ROLLED'));
2715: END IF;
2716: IF (v_ser_record_inserted_ind = TRUE) THEN
2717: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_SER_ROLLED'));
2718: END IF;
2713: IF (v_sert_record_exists_ind = TRUE) THEN
2714: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_SERT_ALREADY_ROLLED'));
2715: END IF;
2716: IF (v_ser_record_inserted_ind = TRUE) THEN
2717: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_SER_ROLLED'));
2718: END IF;
2719: IF (v_sert_record_inserted_ind = TRUE) THEN
2720: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_SERT_ROLLED'));
2721: END IF;
2716: IF (v_ser_record_inserted_ind = TRUE) THEN
2717: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_SER_ROLLED'));
2718: END IF;
2719: IF (v_sert_record_inserted_ind = TRUE) THEN
2720: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_SERT_ROLLED'));
2721: END IF;
2722:
2723: RETURN TRUE;
2724: END;
2812: v_record_inserted_ind := TRUE;
2813: EXCEPTION
2814: WHEN OTHERS THEN
2815: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2816: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CTFT_ERROR');
2817: fnd_message.set_token('FEE_CAT',p_fee_cat);
2818: fnd_message.set_token('FEE_TYPE',p_fee_type);
2819: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2820: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2813: EXCEPTION
2814: WHEN OTHERS THEN
2815: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2816: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CTFT_ERROR');
2817: fnd_message.set_token('FEE_CAT',p_fee_cat);
2818: fnd_message.set_token('FEE_TYPE',p_fee_type);
2819: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2820: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2821: fnd_message.set_token('COURSE_TYPE',v_ctft_source_rec.course_type);
2814: WHEN OTHERS THEN
2815: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2816: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CTFT_ERROR');
2817: fnd_message.set_token('FEE_CAT',p_fee_cat);
2818: fnd_message.set_token('FEE_TYPE',p_fee_type);
2819: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2820: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2821: fnd_message.set_token('COURSE_TYPE',v_ctft_source_rec.course_type);
2822: fnd_file.put_line (fnd_file.log, fnd_message.get);
2815: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2816: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CTFT_ERROR');
2817: fnd_message.set_token('FEE_CAT',p_fee_cat);
2818: fnd_message.set_token('FEE_TYPE',p_fee_type);
2819: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2820: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2821: fnd_message.set_token('COURSE_TYPE',v_ctft_source_rec.course_type);
2822: fnd_file.put_line (fnd_file.log, fnd_message.get);
2823: END;
2816: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CTFT_ERROR');
2817: fnd_message.set_token('FEE_CAT',p_fee_cat);
2818: fnd_message.set_token('FEE_TYPE',p_fee_type);
2819: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2820: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2821: fnd_message.set_token('COURSE_TYPE',v_ctft_source_rec.course_type);
2822: fnd_file.put_line (fnd_file.log, fnd_message.get);
2823: END;
2824: END IF;
2817: fnd_message.set_token('FEE_CAT',p_fee_cat);
2818: fnd_message.set_token('FEE_TYPE',p_fee_type);
2819: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2820: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2821: fnd_message.set_token('COURSE_TYPE',v_ctft_source_rec.course_type);
2822: fnd_file.put_line (fnd_file.log, fnd_message.get);
2823: END;
2824: END IF;
2825: END LOOP;
2818: fnd_message.set_token('FEE_TYPE',p_fee_type);
2819: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2820: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2821: fnd_message.set_token('COURSE_TYPE',v_ctft_source_rec.course_type);
2822: fnd_file.put_line (fnd_file.log, fnd_message.get);
2823: END;
2824: END IF;
2825: END LOOP;
2826: -- 2. Check IF records rolled over
2824: END IF;
2825: END LOOP;
2826: -- 2. Check IF records rolled over
2827: IF (v_record_exists_ind = TRUE) THEN
2828: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_PRG_TYPE_FEETRG_ROLLED'));
2829: END IF;
2830: IF (v_record_inserted_ind = TRUE) THEN
2831: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_PRGTYPE_FEETRG_ROLLED'));
2832: END IF;
2827: IF (v_record_exists_ind = TRUE) THEN
2828: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_PRG_TYPE_FEETRG_ROLLED'));
2829: END IF;
2830: IF (v_record_inserted_ind = TRUE) THEN
2831: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_PRGTYPE_FEETRG_ROLLED'));
2832: END IF;
2833: RETURN TRUE;
2834: END;
2835: END finp_ins_roll_ctft;
2922: v_record_inserted_ind := TRUE;
2923: EXCEPTION
2924: WHEN OTHERS THEN
2925: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2926: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CGFT_ERROR');
2927: fnd_message.set_token('FEE_CAT',p_fee_cat);
2928: fnd_message.set_token('FEE_TYPE',p_fee_type);
2929: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2930: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2923: EXCEPTION
2924: WHEN OTHERS THEN
2925: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2926: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CGFT_ERROR');
2927: fnd_message.set_token('FEE_CAT',p_fee_cat);
2928: fnd_message.set_token('FEE_TYPE',p_fee_type);
2929: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2930: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2931: fnd_message.set_token('COURSE_GROUP_CD',v_cgft_source_rec.course_group_cd);
2924: WHEN OTHERS THEN
2925: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2926: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CGFT_ERROR');
2927: fnd_message.set_token('FEE_CAT',p_fee_cat);
2928: fnd_message.set_token('FEE_TYPE',p_fee_type);
2929: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2930: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2931: fnd_message.set_token('COURSE_GROUP_CD',v_cgft_source_rec.course_group_cd);
2932: fnd_file.put_line (fnd_file.log, fnd_message.get);
2925: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
2926: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CGFT_ERROR');
2927: fnd_message.set_token('FEE_CAT',p_fee_cat);
2928: fnd_message.set_token('FEE_TYPE',p_fee_type);
2929: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2930: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2931: fnd_message.set_token('COURSE_GROUP_CD',v_cgft_source_rec.course_group_cd);
2932: fnd_file.put_line (fnd_file.log, fnd_message.get);
2933: END;
2926: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CGFT_ERROR');
2927: fnd_message.set_token('FEE_CAT',p_fee_cat);
2928: fnd_message.set_token('FEE_TYPE',p_fee_type);
2929: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2930: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2931: fnd_message.set_token('COURSE_GROUP_CD',v_cgft_source_rec.course_group_cd);
2932: fnd_file.put_line (fnd_file.log, fnd_message.get);
2933: END;
2934: END IF;
2927: fnd_message.set_token('FEE_CAT',p_fee_cat);
2928: fnd_message.set_token('FEE_TYPE',p_fee_type);
2929: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2930: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2931: fnd_message.set_token('COURSE_GROUP_CD',v_cgft_source_rec.course_group_cd);
2932: fnd_file.put_line (fnd_file.log, fnd_message.get);
2933: END;
2934: END IF;
2935: END LOOP;
2928: fnd_message.set_token('FEE_TYPE',p_fee_type);
2929: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
2930: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
2931: fnd_message.set_token('COURSE_GROUP_CD',v_cgft_source_rec.course_group_cd);
2932: fnd_file.put_line (fnd_file.log, fnd_message.get);
2933: END;
2934: END IF;
2935: END LOOP;
2936: -- 2. Check IF records rolled over
2934: END IF;
2935: END LOOP;
2936: -- 2. Check IF records rolled over
2937: IF (v_record_exists_ind = TRUE) THEN
2938: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_PRG_GRP_FEETRG_ROLLED'));
2939: END IF;
2940: IF (v_record_inserted_ind = TRUE) THEN
2941: v_message_name := 'IGS_FI_PRGGRP_FEETRG_ROLLED';
2942: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_PRGGRP_FEETRG_ROLLED'));
2938: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_PRG_GRP_FEETRG_ROLLED'));
2939: END IF;
2940: IF (v_record_inserted_ind = TRUE) THEN
2941: v_message_name := 'IGS_FI_PRGGRP_FEETRG_ROLLED';
2942: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_PRGGRP_FEETRG_ROLLED'));
2943: END IF;
2944: RETURN TRUE;
2945: END;
2946: END finp_ins_roll_cgft;
3052: v_record_inserted_ind := TRUE;
3053: EXCEPTION
3054: WHEN OTHERS THEN
3055: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3056: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CFT_ERROR');
3057: fnd_message.set_token('FEE_CAT',p_fee_cat);
3058: fnd_message.set_token('FEE_TYPE',p_fee_type);
3059: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3060: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3053: EXCEPTION
3054: WHEN OTHERS THEN
3055: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3056: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CFT_ERROR');
3057: fnd_message.set_token('FEE_CAT',p_fee_cat);
3058: fnd_message.set_token('FEE_TYPE',p_fee_type);
3059: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3060: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3061: fnd_message.set_token('COURSE_CD',v_cft_source_rec.course_cd);
3054: WHEN OTHERS THEN
3055: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3056: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CFT_ERROR');
3057: fnd_message.set_token('FEE_CAT',p_fee_cat);
3058: fnd_message.set_token('FEE_TYPE',p_fee_type);
3059: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3060: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3061: fnd_message.set_token('COURSE_CD',v_cft_source_rec.course_cd);
3062: fnd_file.put_line (fnd_file.log, fnd_message.get);
3055: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3056: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CFT_ERROR');
3057: fnd_message.set_token('FEE_CAT',p_fee_cat);
3058: fnd_message.set_token('FEE_TYPE',p_fee_type);
3059: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3060: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3061: fnd_message.set_token('COURSE_CD',v_cft_source_rec.course_cd);
3062: fnd_file.put_line (fnd_file.log, fnd_message.get);
3063: END;
3056: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_CFT_ERROR');
3057: fnd_message.set_token('FEE_CAT',p_fee_cat);
3058: fnd_message.set_token('FEE_TYPE',p_fee_type);
3059: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3060: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3061: fnd_message.set_token('COURSE_CD',v_cft_source_rec.course_cd);
3062: fnd_file.put_line (fnd_file.log, fnd_message.get);
3063: END;
3064: END IF;
3057: fnd_message.set_token('FEE_CAT',p_fee_cat);
3058: fnd_message.set_token('FEE_TYPE',p_fee_type);
3059: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3060: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3061: fnd_message.set_token('COURSE_CD',v_cft_source_rec.course_cd);
3062: fnd_file.put_line (fnd_file.log, fnd_message.get);
3063: END;
3064: END IF;
3065: END LOOP;
3058: fnd_message.set_token('FEE_TYPE',p_fee_type);
3059: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3060: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3061: fnd_message.set_token('COURSE_CD',v_cft_source_rec.course_cd);
3062: fnd_file.put_line (fnd_file.log, fnd_message.get);
3063: END;
3064: END IF;
3065: END LOOP;
3066: -- 2. Check IF records rolled over
3064: END IF;
3065: END LOOP;
3066: -- 2. Check IF records rolled over
3067: IF (v_record_exists_ind = TRUE) THEN
3068: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_PRG_FEETRG_ROLLED'));
3069: END IF;
3070: IF (v_record_inserted_ind = TRUE) THEN
3071: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_PRGFEE_TRG_ROLLED'));
3072: END IF;
3067: IF (v_record_exists_ind = TRUE) THEN
3068: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_PRG_FEETRG_ROLLED'));
3069: END IF;
3070: IF (v_record_inserted_ind = TRUE) THEN
3071: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_PRGFEE_TRG_ROLLED'));
3072: END IF;
3073: RETURN TRUE;
3074: END;
3075: END finp_ins_roll_cft;
3164: IF (c_cur_dest_sgmnts%FOUND) THEN
3165: -- This means that rollover has already happened, no rollover needs to happen
3166: v_sgmnts_record_exists_ind := TRUE;
3167: IF (v_sgmnts_record_exists_ind = TRUE) THEN
3168: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_ANC_SGMNTS_ROLLED'));
3169: END IF;
3170: ELSE
3171: OPEN c_cur_dest_rates;
3172: FETCH c_cur_dest_rates INTO v_cur_dest_rates_rec;
3175: IF (c_cur_dest_rates%FOUND) THEN
3176: -- This means that rollover has already happened, no rollover needs to happen
3177: v_rates_record_exists_ind := TRUE;
3178: IF (v_rates_record_exists_ind = TRUE) THEN
3179: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_ANC_RATES_ROLLED'));
3180: END IF;
3181: ELSE
3182: -- Insert into the table when records exist in the source cursor of rate segments
3183: FOR v_cur_source_sgmnts_rec IN c_cur_source_sgmnts LOOP
3199: );
3200: EXCEPTION
3201: WHEN OTHERS THEN
3202: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3203: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ANC_ERROR');
3204: fnd_message.set_token('FEE_TYPE',p_fee_type);
3205: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3206: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3207: fnd_file.put_line (fnd_file.log, fnd_message.get);
3200: EXCEPTION
3201: WHEN OTHERS THEN
3202: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3203: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ANC_ERROR');
3204: fnd_message.set_token('FEE_TYPE',p_fee_type);
3205: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3206: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3207: fnd_file.put_line (fnd_file.log, fnd_message.get);
3208: END;
3201: WHEN OTHERS THEN
3202: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3203: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ANC_ERROR');
3204: fnd_message.set_token('FEE_TYPE',p_fee_type);
3205: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3206: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3207: fnd_file.put_line (fnd_file.log, fnd_message.get);
3208: END;
3209: END LOOP;
3202: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3203: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ANC_ERROR');
3204: fnd_message.set_token('FEE_TYPE',p_fee_type);
3205: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3206: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3207: fnd_file.put_line (fnd_file.log, fnd_message.get);
3208: END;
3209: END LOOP;
3210: -- Exit IF there is no record found in the cursor.
3203: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ANC_ERROR');
3204: fnd_message.set_token('FEE_TYPE',p_fee_type);
3205: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3206: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3207: fnd_file.put_line (fnd_file.log, fnd_message.get);
3208: END;
3209: END LOOP;
3210: -- Exit IF there is no record found in the cursor.
3211:
3211:
3212: IF (v_rt_sgmnts_flag = FALSE) THEN
3213: v_message_name:='IGS_FI_RT_SGMNTS_DS_NT_XS';
3214: p_message_name:=v_message_name;
3215: fnd_file.put_line (fnd_file.LOG, fnd_message.get_string ('IGS', p_message_name));
3216: END IF;
3217: -- Insert into the table when records exist in the source cursor of rates
3218: -- and only insert when segments are defined in the ancillary segments tables
3219: IF v_rt_sgmnts_flag THEN
3249: );
3250: EXCEPTION
3251: WHEN OTHERS THEN
3252: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3253: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ANC_RT_ERROR');
3254: fnd_message.set_token('FEE_TYPE',p_fee_type);
3255: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3256: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3257: fnd_file.put_line (fnd_file.log, fnd_message.get);
3250: EXCEPTION
3251: WHEN OTHERS THEN
3252: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3253: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ANC_RT_ERROR');
3254: fnd_message.set_token('FEE_TYPE',p_fee_type);
3255: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3256: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3257: fnd_file.put_line (fnd_file.log, fnd_message.get);
3258: END;
3251: WHEN OTHERS THEN
3252: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3253: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ANC_RT_ERROR');
3254: fnd_message.set_token('FEE_TYPE',p_fee_type);
3255: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3256: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3257: fnd_file.put_line (fnd_file.log, fnd_message.get);
3258: END;
3259: END LOOP;
3252: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3253: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ANC_RT_ERROR');
3254: fnd_message.set_token('FEE_TYPE',p_fee_type);
3255: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3256: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3257: fnd_file.put_line (fnd_file.log, fnd_message.get);
3258: END;
3259: END LOOP;
3260: -- Exit IF there is no record found in the cursor.
3253: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_ANC_RT_ERROR');
3254: fnd_message.set_token('FEE_TYPE',p_fee_type);
3255: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3256: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3257: fnd_file.put_line (fnd_file.log, fnd_message.get);
3258: END;
3259: END LOOP;
3260: -- Exit IF there is no record found in the cursor.
3261: IF (v_rates_flag = FALSE) THEN
3260: -- Exit IF there is no record found in the cursor.
3261: IF (v_rates_flag = FALSE) THEN
3262: v_message_name:='IGS_FI_ANC_RTS_DS_NT_XS';
3263: p_message_name:=v_message_name;
3264: fnd_file.put_line (fnd_file.LOG, fnd_message.get_string ('IGS', p_message_name));
3265: END IF;
3266: END IF; -- v_rt_sgmnts_flag IF close
3267: -- Close all open cursors.
3268: CLOSE c_cur_dest_rates;
3270: CLOSE c_cur_dest_sgmnts;
3271: END IF;
3272: -- Only when both the inserts are successful return the message of successful rollover
3273: IF (v_record_inserted_ind = TRUE) THEN
3274: FND_FILE.PUT_LINE (FND_FILE.LOG, Fnd_Message.Get_String('IGS','IGS_FI_ANC_ROLLS'));
3275: END IF;
3276: -- Return True when everything is successful
3277: RETURN TRUE;
3278: END;
3344: l_fee_type_accid:= null;
3345: EXCEPTION
3346: WHEN OTHERS THEN
3347: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3348: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_REVSEG_ERROR');
3349: fnd_message.set_token('FEE_TYPE',p_fee_type);
3350: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3351: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3352: fnd_file.put_line (fnd_file.log, fnd_message.get);
3345: EXCEPTION
3346: WHEN OTHERS THEN
3347: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3348: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_REVSEG_ERROR');
3349: fnd_message.set_token('FEE_TYPE',p_fee_type);
3350: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3351: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3352: fnd_file.put_line (fnd_file.log, fnd_message.get);
3353: END;
3346: WHEN OTHERS THEN
3347: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3348: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_REVSEG_ERROR');
3349: fnd_message.set_token('FEE_TYPE',p_fee_type);
3350: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3351: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3352: fnd_file.put_line (fnd_file.log, fnd_message.get);
3353: END;
3354: END LOOP;
3347: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3348: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_REVSEG_ERROR');
3349: fnd_message.set_token('FEE_TYPE',p_fee_type);
3350: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3351: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3352: fnd_file.put_line (fnd_file.log, fnd_message.get);
3353: END;
3354: END LOOP;
3355: CLOSE cur_roll_segs;
3348: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_REVSEG_ERROR');
3349: fnd_message.set_token('FEE_TYPE',p_fee_type);
3350: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3351: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3352: fnd_file.put_line (fnd_file.log, fnd_message.get);
3353: END;
3354: END LOOP;
3355: CLOSE cur_roll_segs;
3356: END IF;
3418: OPEN cur_ftci_accts ( p_v_fee_type, p_v_dest_cal_type, p_n_dest_sequence_number );
3419: FETCH cur_ftci_accts INTO l_rec_ftci_accts;
3420: IF ( cur_ftci_accts%FOUND )THEN
3421: CLOSE cur_ftci_accts;
3422: fnd_message.set_name ( 'IGS', 'IGS_FI_FTCI_ACCTS_SETUP_EXISTS' );
3423: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
3424: RETURN TRUE;
3425: END IF;
3426: CLOSE cur_ftci_accts;
3419: FETCH cur_ftci_accts INTO l_rec_ftci_accts;
3420: IF ( cur_ftci_accts%FOUND )THEN
3421: CLOSE cur_ftci_accts;
3422: fnd_message.set_name ( 'IGS', 'IGS_FI_FTCI_ACCTS_SETUP_EXISTS' );
3423: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
3424: RETURN TRUE;
3425: END IF;
3426: CLOSE cur_ftci_accts;
3427:
3507: );
3508: EXCEPTION
3509: WHEN OTHERS THEN
3510: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3511: fnd_message.set_name('IGS','IGS_FI_ROLL_FTCI_ACCTS_ERROR');
3512: fnd_message.set_token('FEE_TYPE',p_v_fee_type);
3513: fnd_message.set_token('FEE_CAL_TYPE',p_v_source_cal_type);
3514: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3515: fnd_file.put_line (fnd_file.log, fnd_message.get);
3508: EXCEPTION
3509: WHEN OTHERS THEN
3510: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3511: fnd_message.set_name('IGS','IGS_FI_ROLL_FTCI_ACCTS_ERROR');
3512: fnd_message.set_token('FEE_TYPE',p_v_fee_type);
3513: fnd_message.set_token('FEE_CAL_TYPE',p_v_source_cal_type);
3514: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3515: fnd_file.put_line (fnd_file.log, fnd_message.get);
3516: END;
3509: WHEN OTHERS THEN
3510: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3511: fnd_message.set_name('IGS','IGS_FI_ROLL_FTCI_ACCTS_ERROR');
3512: fnd_message.set_token('FEE_TYPE',p_v_fee_type);
3513: fnd_message.set_token('FEE_CAL_TYPE',p_v_source_cal_type);
3514: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3515: fnd_file.put_line (fnd_file.log, fnd_message.get);
3516: END;
3517:
3510: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3511: fnd_message.set_name('IGS','IGS_FI_ROLL_FTCI_ACCTS_ERROR');
3512: fnd_message.set_token('FEE_TYPE',p_v_fee_type);
3513: fnd_message.set_token('FEE_CAL_TYPE',p_v_source_cal_type);
3514: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3515: fnd_file.put_line (fnd_file.log, fnd_message.get);
3516: END;
3517:
3518: END LOOP;
3511: fnd_message.set_name('IGS','IGS_FI_ROLL_FTCI_ACCTS_ERROR');
3512: fnd_message.set_token('FEE_TYPE',p_v_fee_type);
3513: fnd_message.set_token('FEE_CAL_TYPE',p_v_source_cal_type);
3514: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3515: fnd_file.put_line (fnd_file.log, fnd_message.get);
3516: END;
3517:
3518: END LOOP;
3519:
3518: END LOOP;
3519:
3520: IF ( l_b_records_found ) THEN
3521: -- If Rollover is successful then log the same.
3522: fnd_message.set_name ( 'IGS', 'IGS_FI_ROLL_FTCI_ACCTS_SUCCESS' );
3523: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
3524: ELSE
3525: -- If No Accounting Information is defined at Source FTCI.
3526: fnd_message.set_name ( 'IGS', 'IGS_FI_FTCI_ACCTS_NO_SETUP' );
3519:
3520: IF ( l_b_records_found ) THEN
3521: -- If Rollover is successful then log the same.
3522: fnd_message.set_name ( 'IGS', 'IGS_FI_ROLL_FTCI_ACCTS_SUCCESS' );
3523: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
3524: ELSE
3525: -- If No Accounting Information is defined at Source FTCI.
3526: fnd_message.set_name ( 'IGS', 'IGS_FI_FTCI_ACCTS_NO_SETUP' );
3527: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
3522: fnd_message.set_name ( 'IGS', 'IGS_FI_ROLL_FTCI_ACCTS_SUCCESS' );
3523: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
3524: ELSE
3525: -- If No Accounting Information is defined at Source FTCI.
3526: fnd_message.set_name ( 'IGS', 'IGS_FI_FTCI_ACCTS_NO_SETUP' );
3527: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
3528: END IF;
3529:
3530: IF ( l_b_inactive_account ) THEN
3523: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
3524: ELSE
3525: -- If No Accounting Information is defined at Source FTCI.
3526: fnd_message.set_name ( 'IGS', 'IGS_FI_FTCI_ACCTS_NO_SETUP' );
3527: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
3528: END IF;
3529:
3530: IF ( l_b_inactive_account ) THEN
3531: fnd_file.put_line ( fnd_file.LOG, ' ' );
3528: END IF;
3529:
3530: IF ( l_b_inactive_account ) THEN
3531: fnd_file.put_line ( fnd_file.LOG, ' ' );
3532: fnd_message.set_name ( 'IGS', 'IGS_FI_FTCI_ACCTS_INVALID' );
3533: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
3534: FOR l_n_cntr IN tab_inactive_acc.FIRST..tab_inactive_acc.LAST LOOP
3535: log_parameters ( igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'SEQUENCE'),
3536: tab_inactive_acc(l_n_cntr));
3529:
3530: IF ( l_b_inactive_account ) THEN
3531: fnd_file.put_line ( fnd_file.LOG, ' ' );
3532: fnd_message.set_name ( 'IGS', 'IGS_FI_FTCI_ACCTS_INVALID' );
3533: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
3534: FOR l_n_cntr IN tab_inactive_acc.FIRST..tab_inactive_acc.LAST LOOP
3535: log_parameters ( igs_fi_gen_gl.get_lkp_meaning('IGS_FI_LOCKBOX', 'SEQUENCE'),
3536: tab_inactive_acc(l_n_cntr));
3537: END LOOP;
3627: l_b_record_inserted_ind := TRUE;
3628: EXCEPTION
3629: WHEN OTHERS THEN
3630: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3631: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_TRG_GRP_ERROR');
3632: fnd_message.set_token('FEE_CAT',p_fee_cat);
3633: fnd_message.set_token('FEE_TYPE',p_fee_type);
3634: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3635: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3628: EXCEPTION
3629: WHEN OTHERS THEN
3630: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3631: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_TRG_GRP_ERROR');
3632: fnd_message.set_token('FEE_CAT',p_fee_cat);
3633: fnd_message.set_token('FEE_TYPE',p_fee_type);
3634: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3635: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3636: fnd_message.set_token('FEE_TRIGGER_GROUP_NUMBER',l_trg_grp_source_rec.fee_trigger_group_number);
3629: WHEN OTHERS THEN
3630: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3631: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_TRG_GRP_ERROR');
3632: fnd_message.set_token('FEE_CAT',p_fee_cat);
3633: fnd_message.set_token('FEE_TYPE',p_fee_type);
3634: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3635: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3636: fnd_message.set_token('FEE_TRIGGER_GROUP_NUMBER',l_trg_grp_source_rec.fee_trigger_group_number);
3637: fnd_file.put_line (fnd_file.log, fnd_message.get);
3630: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3631: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_TRG_GRP_ERROR');
3632: fnd_message.set_token('FEE_CAT',p_fee_cat);
3633: fnd_message.set_token('FEE_TYPE',p_fee_type);
3634: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3635: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3636: fnd_message.set_token('FEE_TRIGGER_GROUP_NUMBER',l_trg_grp_source_rec.fee_trigger_group_number);
3637: fnd_file.put_line (fnd_file.log, fnd_message.get);
3638: END;
3631: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_TRG_GRP_ERROR');
3632: fnd_message.set_token('FEE_CAT',p_fee_cat);
3633: fnd_message.set_token('FEE_TYPE',p_fee_type);
3634: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3635: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3636: fnd_message.set_token('FEE_TRIGGER_GROUP_NUMBER',l_trg_grp_source_rec.fee_trigger_group_number);
3637: fnd_file.put_line (fnd_file.log, fnd_message.get);
3638: END;
3639: END IF;
3632: fnd_message.set_token('FEE_CAT',p_fee_cat);
3633: fnd_message.set_token('FEE_TYPE',p_fee_type);
3634: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3635: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3636: fnd_message.set_token('FEE_TRIGGER_GROUP_NUMBER',l_trg_grp_source_rec.fee_trigger_group_number);
3637: fnd_file.put_line (fnd_file.log, fnd_message.get);
3638: END;
3639: END IF;
3640: END LOOP;
3633: fnd_message.set_token('FEE_TYPE',p_fee_type);
3634: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3635: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3636: fnd_message.set_token('FEE_TRIGGER_GROUP_NUMBER',l_trg_grp_source_rec.fee_trigger_group_number);
3637: fnd_file.put_line (fnd_file.log, fnd_message.get);
3638: END;
3639: END IF;
3640: END LOOP;
3641:
3640: END LOOP;
3641:
3642: IF (l_b_record_exists_ind = TRUE) THEN
3643: -- Display message that the Fee Trigger Group record already exist
3644: fnd_message.set_name('IGS','IGS_FI_TRG_GRP_EXISTS');
3645: fnd_file.put_line (fnd_file.log, fnd_message.get);
3646: END IF;
3647: IF (l_b_record_inserted_ind = TRUE) THEN
3648: -- Display message that the Fee Trigger Group record have been successfully rolled over
3641:
3642: IF (l_b_record_exists_ind = TRUE) THEN
3643: -- Display message that the Fee Trigger Group record already exist
3644: fnd_message.set_name('IGS','IGS_FI_TRG_GRP_EXISTS');
3645: fnd_file.put_line (fnd_file.log, fnd_message.get);
3646: END IF;
3647: IF (l_b_record_inserted_ind = TRUE) THEN
3648: -- Display message that the Fee Trigger Group record have been successfully rolled over
3649: fnd_message.set_name('IGS','IGS_FI_TRG_GRP_ROLLED');
3645: fnd_file.put_line (fnd_file.log, fnd_message.get);
3646: END IF;
3647: IF (l_b_record_inserted_ind = TRUE) THEN
3648: -- Display message that the Fee Trigger Group record have been successfully rolled over
3649: fnd_message.set_name('IGS','IGS_FI_TRG_GRP_ROLLED');
3650: fnd_file.put_line (fnd_file.log, fnd_message.get);
3651: END IF;
3652: RETURN TRUE;
3653:
3646: END IF;
3647: IF (l_b_record_inserted_ind = TRUE) THEN
3648: -- Display message that the Fee Trigger Group record have been successfully rolled over
3649: fnd_message.set_name('IGS','IGS_FI_TRG_GRP_ROLLED');
3650: fnd_file.put_line (fnd_file.log, fnd_message.get);
3651: END IF;
3652: RETURN TRUE;
3653:
3654: END finp_ins_roll_trg_grp;
3764: OPEN cur_chk_version(l_uft_source_rec.unit_cd,l_uft_source_rec.version_number);
3765: FETCH cur_chk_version INTO l_v_chk_version;
3766: IF cur_chk_version%NOTFOUND THEN
3767: CLOSE cur_chk_version;
3768: fnd_message.set_name('IGS','IGS_PS_UNITVER_ST_ACTIVEPLANN');
3769: igs_ge_msg_stack.add;
3770: app_exception.raise_exception;
3771: END IF;
3772: CLOSE cur_chk_version;
3798: FETCH c_alt_cd INTO l_v_alt_code;
3799: CLOSE c_alt_cd;
3800: END IF;
3801:
3802: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_UFT_ERROR');
3803: fnd_message.set_token('UNIT_CD',l_uft_source_rec.unit_cd);
3804: IF (l_uft_source_rec.version_number IS NULL) THEN
3805: fnd_message.set_token('VER_NUM',IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE'));
3806: ELSE
3799: CLOSE c_alt_cd;
3800: END IF;
3801:
3802: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_UFT_ERROR');
3803: fnd_message.set_token('UNIT_CD',l_uft_source_rec.unit_cd);
3804: IF (l_uft_source_rec.version_number IS NULL) THEN
3805: fnd_message.set_token('VER_NUM',IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE'));
3806: ELSE
3807: fnd_message.set_token('VER_NUM',l_uft_source_rec.version_number);
3801:
3802: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_UFT_ERROR');
3803: fnd_message.set_token('UNIT_CD',l_uft_source_rec.unit_cd);
3804: IF (l_uft_source_rec.version_number IS NULL) THEN
3805: fnd_message.set_token('VER_NUM',IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE'));
3806: ELSE
3807: fnd_message.set_token('VER_NUM',l_uft_source_rec.version_number);
3808: END IF;
3809: fnd_message.set_token('CAL_TYPE',NVL(l_uft_source_rec.cal_type,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3803: fnd_message.set_token('UNIT_CD',l_uft_source_rec.unit_cd);
3804: IF (l_uft_source_rec.version_number IS NULL) THEN
3805: fnd_message.set_token('VER_NUM',IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE'));
3806: ELSE
3807: fnd_message.set_token('VER_NUM',l_uft_source_rec.version_number);
3808: END IF;
3809: fnd_message.set_token('CAL_TYPE',NVL(l_uft_source_rec.cal_type,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3810: fnd_message.set_token('ALT_CODE',NVL(l_v_alt_code,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3811: fnd_message.set_token('LOC_CD', NVL(l_uft_source_rec.location_cd,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3805: fnd_message.set_token('VER_NUM',IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE'));
3806: ELSE
3807: fnd_message.set_token('VER_NUM',l_uft_source_rec.version_number);
3808: END IF;
3809: fnd_message.set_token('CAL_TYPE',NVL(l_uft_source_rec.cal_type,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3810: fnd_message.set_token('ALT_CODE',NVL(l_v_alt_code,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3811: fnd_message.set_token('LOC_CD', NVL(l_uft_source_rec.location_cd,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3812: fnd_message.set_token('UNIT_CLASS', NVL(l_uft_source_rec.unit_class,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3813: fnd_message.set_token('CR_DATE',l_uft_source_rec.create_dt);
3806: ELSE
3807: fnd_message.set_token('VER_NUM',l_uft_source_rec.version_number);
3808: END IF;
3809: fnd_message.set_token('CAL_TYPE',NVL(l_uft_source_rec.cal_type,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3810: fnd_message.set_token('ALT_CODE',NVL(l_v_alt_code,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3811: fnd_message.set_token('LOC_CD', NVL(l_uft_source_rec.location_cd,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3812: fnd_message.set_token('UNIT_CLASS', NVL(l_uft_source_rec.unit_class,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3813: fnd_message.set_token('CR_DATE',l_uft_source_rec.create_dt);
3814: fnd_file.put_line (fnd_file.log, fnd_message.get);
3807: fnd_message.set_token('VER_NUM',l_uft_source_rec.version_number);
3808: END IF;
3809: fnd_message.set_token('CAL_TYPE',NVL(l_uft_source_rec.cal_type,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3810: fnd_message.set_token('ALT_CODE',NVL(l_v_alt_code,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3811: fnd_message.set_token('LOC_CD', NVL(l_uft_source_rec.location_cd,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3812: fnd_message.set_token('UNIT_CLASS', NVL(l_uft_source_rec.unit_class,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3813: fnd_message.set_token('CR_DATE',l_uft_source_rec.create_dt);
3814: fnd_file.put_line (fnd_file.log, fnd_message.get);
3815:
3808: END IF;
3809: fnd_message.set_token('CAL_TYPE',NVL(l_uft_source_rec.cal_type,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3810: fnd_message.set_token('ALT_CODE',NVL(l_v_alt_code,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3811: fnd_message.set_token('LOC_CD', NVL(l_uft_source_rec.location_cd,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3812: fnd_message.set_token('UNIT_CLASS', NVL(l_uft_source_rec.unit_class,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3813: fnd_message.set_token('CR_DATE',l_uft_source_rec.create_dt);
3814: fnd_file.put_line (fnd_file.log, fnd_message.get);
3815:
3816: END;
3809: fnd_message.set_token('CAL_TYPE',NVL(l_uft_source_rec.cal_type,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3810: fnd_message.set_token('ALT_CODE',NVL(l_v_alt_code,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3811: fnd_message.set_token('LOC_CD', NVL(l_uft_source_rec.location_cd,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3812: fnd_message.set_token('UNIT_CLASS', NVL(l_uft_source_rec.unit_class,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3813: fnd_message.set_token('CR_DATE',l_uft_source_rec.create_dt);
3814: fnd_file.put_line (fnd_file.log, fnd_message.get);
3815:
3816: END;
3817:
3810: fnd_message.set_token('ALT_CODE',NVL(l_v_alt_code,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3811: fnd_message.set_token('LOC_CD', NVL(l_uft_source_rec.location_cd,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3812: fnd_message.set_token('UNIT_CLASS', NVL(l_uft_source_rec.unit_class,IGS_FI_GEN_GL.GET_LKP_MEANING('IGS_FI_LOCKBOX','NULL_VALUE')));
3813: fnd_message.set_token('CR_DATE',l_uft_source_rec.create_dt);
3814: fnd_file.put_line (fnd_file.log, fnd_message.get);
3815:
3816: END;
3817:
3818: END IF;
3819: END LOOP;
3820:
3821: IF (l_b_record_exists_ind = TRUE) THEN
3822: -- Display message that the Unit Triggers already exist
3823: fnd_message.set_name('IGS','IGS_FI_UNIT_TRG_EXISTS');
3824: fnd_file.put_line (fnd_file.log, fnd_message.get);
3825: END IF;
3826: IF (l_b_record_inserted_ind = TRUE) THEN
3827: -- Display message that the Unit Fee Triggers have been successfully rolled over
3820:
3821: IF (l_b_record_exists_ind = TRUE) THEN
3822: -- Display message that the Unit Triggers already exist
3823: fnd_message.set_name('IGS','IGS_FI_UNIT_TRG_EXISTS');
3824: fnd_file.put_line (fnd_file.log, fnd_message.get);
3825: END IF;
3826: IF (l_b_record_inserted_ind = TRUE) THEN
3827: -- Display message that the Unit Fee Triggers have been successfully rolled over
3828: fnd_message.set_name('IGS','IGS_FI_UNIT_TRG_ROLLED');
3824: fnd_file.put_line (fnd_file.log, fnd_message.get);
3825: END IF;
3826: IF (l_b_record_inserted_ind = TRUE) THEN
3827: -- Display message that the Unit Fee Triggers have been successfully rolled over
3828: fnd_message.set_name('IGS','IGS_FI_UNIT_TRG_ROLLED');
3829: fnd_file.put_line (fnd_file.log, fnd_message.get);
3830: END IF;
3831:
3832: RETURN TRUE;
3825: END IF;
3826: IF (l_b_record_inserted_ind = TRUE) THEN
3827: -- Display message that the Unit Fee Triggers have been successfully rolled over
3828: fnd_message.set_name('IGS','IGS_FI_UNIT_TRG_ROLLED');
3829: fnd_file.put_line (fnd_file.log, fnd_message.get);
3830: END IF;
3831:
3832: RETURN TRUE;
3833:
3927: l_b_record_inserted_ind := TRUE;
3928: EXCEPTION
3929: WHEN OTHERS THEN
3930: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3931: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_USFT_ERROR');
3932: fnd_message.set_token('FEE_CAT',p_fee_cat);
3933: fnd_message.set_token('FEE_TYPE',p_fee_type);
3934: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3935: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3928: EXCEPTION
3929: WHEN OTHERS THEN
3930: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3931: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_USFT_ERROR');
3932: fnd_message.set_token('FEE_CAT',p_fee_cat);
3933: fnd_message.set_token('FEE_TYPE',p_fee_type);
3934: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3935: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3936: fnd_message.set_token('UNIT_SET_CD',l_usft_source_rec.unit_set_cd);
3929: WHEN OTHERS THEN
3930: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3931: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_USFT_ERROR');
3932: fnd_message.set_token('FEE_CAT',p_fee_cat);
3933: fnd_message.set_token('FEE_TYPE',p_fee_type);
3934: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3935: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3936: fnd_message.set_token('UNIT_SET_CD',l_usft_source_rec.unit_set_cd);
3937: fnd_message.set_token('VERSION_NUMBER',l_usft_source_rec.version_number);
3930: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
3931: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_USFT_ERROR');
3932: fnd_message.set_token('FEE_CAT',p_fee_cat);
3933: fnd_message.set_token('FEE_TYPE',p_fee_type);
3934: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3935: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3936: fnd_message.set_token('UNIT_SET_CD',l_usft_source_rec.unit_set_cd);
3937: fnd_message.set_token('VERSION_NUMBER',l_usft_source_rec.version_number);
3938: fnd_file.put_line (fnd_file.log, fnd_message.get);
3931: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_USFT_ERROR');
3932: fnd_message.set_token('FEE_CAT',p_fee_cat);
3933: fnd_message.set_token('FEE_TYPE',p_fee_type);
3934: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3935: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3936: fnd_message.set_token('UNIT_SET_CD',l_usft_source_rec.unit_set_cd);
3937: fnd_message.set_token('VERSION_NUMBER',l_usft_source_rec.version_number);
3938: fnd_file.put_line (fnd_file.log, fnd_message.get);
3939: END;
3932: fnd_message.set_token('FEE_CAT',p_fee_cat);
3933: fnd_message.set_token('FEE_TYPE',p_fee_type);
3934: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3935: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3936: fnd_message.set_token('UNIT_SET_CD',l_usft_source_rec.unit_set_cd);
3937: fnd_message.set_token('VERSION_NUMBER',l_usft_source_rec.version_number);
3938: fnd_file.put_line (fnd_file.log, fnd_message.get);
3939: END;
3940: END IF;
3933: fnd_message.set_token('FEE_TYPE',p_fee_type);
3934: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3935: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3936: fnd_message.set_token('UNIT_SET_CD',l_usft_source_rec.unit_set_cd);
3937: fnd_message.set_token('VERSION_NUMBER',l_usft_source_rec.version_number);
3938: fnd_file.put_line (fnd_file.log, fnd_message.get);
3939: END;
3940: END IF;
3941: END LOOP;
3934: fnd_message.set_token('FEE_CAL_TYPE',p_source_cal_type);
3935: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
3936: fnd_message.set_token('UNIT_SET_CD',l_usft_source_rec.unit_set_cd);
3937: fnd_message.set_token('VERSION_NUMBER',l_usft_source_rec.version_number);
3938: fnd_file.put_line (fnd_file.log, fnd_message.get);
3939: END;
3940: END IF;
3941: END LOOP;
3942:
3941: END LOOP;
3942:
3943: IF (l_b_record_exists_ind = TRUE) THEN
3944: -- Display message that the Unit Set Triggers already exist
3945: fnd_message.set_name('IGS','IGS_FI_USET_TRG_EXISTS');
3946: fnd_file.put_line (fnd_file.log, fnd_message.get);
3947: END IF;
3948: IF (l_b_record_inserted_ind = TRUE) THEN
3949: -- Display message that the Unit Set Fee Triggers have been successfully rolled over
3942:
3943: IF (l_b_record_exists_ind = TRUE) THEN
3944: -- Display message that the Unit Set Triggers already exist
3945: fnd_message.set_name('IGS','IGS_FI_USET_TRG_EXISTS');
3946: fnd_file.put_line (fnd_file.log, fnd_message.get);
3947: END IF;
3948: IF (l_b_record_inserted_ind = TRUE) THEN
3949: -- Display message that the Unit Set Fee Triggers have been successfully rolled over
3950: fnd_message.set_name('IGS','IGS_FI_USET_TRG_ROLLED');
3946: fnd_file.put_line (fnd_file.log, fnd_message.get);
3947: END IF;
3948: IF (l_b_record_inserted_ind = TRUE) THEN
3949: -- Display message that the Unit Set Fee Triggers have been successfully rolled over
3950: fnd_message.set_name('IGS','IGS_FI_USET_TRG_ROLLED');
3951: fnd_file.put_line (fnd_file.log, fnd_message.get);
3952: END IF;
3953: RETURN TRUE;
3954:
3947: END IF;
3948: IF (l_b_record_inserted_ind = TRUE) THEN
3949: -- Display message that the Unit Set Fee Triggers have been successfully rolled over
3950: fnd_message.set_name('IGS','IGS_FI_USET_TRG_ROLLED');
3951: fnd_file.put_line (fnd_file.log, fnd_message.get);
3952: END IF;
3953: RETURN TRUE;
3954:
3955: END finp_ins_roll_usft;
4119: rec_dist_tp.teach_ci_sequence_number);
4120: FETCH cur_roll_tp INTO l_rec_roll_tp;
4121: IF cur_roll_tp%NOTFOUND THEN
4122: l_b_prc_rollover := FALSE;
4123: fnd_message.set_name('IGS',
4124: 'IGS_FI_TPRS_NO_TP_ROLL');
4125: fnd_message.set_token('ALT_CD',
4126: l_v_teach_alt_cd);
4127: fnd_file.put_line(fnd_file.log,
4121: IF cur_roll_tp%NOTFOUND THEN
4122: l_b_prc_rollover := FALSE;
4123: fnd_message.set_name('IGS',
4124: 'IGS_FI_TPRS_NO_TP_ROLL');
4125: fnd_message.set_token('ALT_CD',
4126: l_v_teach_alt_cd);
4127: fnd_file.put_line(fnd_file.log,
4128: fnd_message.get);
4129: END IF;
4124: 'IGS_FI_TPRS_NO_TP_ROLL');
4125: fnd_message.set_token('ALT_CD',
4126: l_v_teach_alt_cd);
4127: fnd_file.put_line(fnd_file.log,
4128: fnd_message.get);
4129: END IF;
4130: CLOSE cur_roll_tp;
4131:
4132: IF l_b_prc_rollover THEN
4139: l_rec_roll_tp.sequence_number);
4140: FETCH cur_ret_schdl INTO l_rec_ret_schdl;
4141: IF cur_ret_schdl%FOUND THEN
4142: l_b_prc_rollover := FALSE;
4143: fnd_message.set_name('IGS',
4144: 'IGS_FI_TP_RET_SCHD_ROLLED');
4145: fnd_file.put_line(fnd_file.log,
4146: fnd_message.get);
4147: END IF;
4142: l_b_prc_rollover := FALSE;
4143: fnd_message.set_name('IGS',
4144: 'IGS_FI_TP_RET_SCHD_ROLLED');
4145: fnd_file.put_line(fnd_file.log,
4146: fnd_message.get);
4147: END IF;
4148: CLOSE cur_ret_schdl;
4149: END IF;
4150:
4160: IF cur_load_teach%NOTFOUND THEN
4161: l_b_prc_rollover := FALSE;
4162: l_v_dest_teach_alt_cd := igs_ca_gen_001.calp_get_alt_cd(l_rec_roll_tp.cal_type,
4163: l_rec_roll_tp.sequence_number);
4164: fnd_message.set_name('IGS',
4165: 'IGS_FI_TPRS_NO_TP_FTCI_REL');
4166: fnd_message.set_token('ALT_CD',
4167: l_v_teach_alt_cd);
4168: fnd_message.set_token('TEACH_ALT_CD',
4162: l_v_dest_teach_alt_cd := igs_ca_gen_001.calp_get_alt_cd(l_rec_roll_tp.cal_type,
4163: l_rec_roll_tp.sequence_number);
4164: fnd_message.set_name('IGS',
4165: 'IGS_FI_TPRS_NO_TP_FTCI_REL');
4166: fnd_message.set_token('ALT_CD',
4167: l_v_teach_alt_cd);
4168: fnd_message.set_token('TEACH_ALT_CD',
4169: l_v_dest_teach_alt_cd);
4170: fnd_message.set_token('FEE_ALT_CD',
4164: fnd_message.set_name('IGS',
4165: 'IGS_FI_TPRS_NO_TP_FTCI_REL');
4166: fnd_message.set_token('ALT_CD',
4167: l_v_teach_alt_cd);
4168: fnd_message.set_token('TEACH_ALT_CD',
4169: l_v_dest_teach_alt_cd);
4170: fnd_message.set_token('FEE_ALT_CD',
4171: l_v_fp_alt_cd);
4172: fnd_file.put_line(fnd_file.log,
4166: fnd_message.set_token('ALT_CD',
4167: l_v_teach_alt_cd);
4168: fnd_message.set_token('TEACH_ALT_CD',
4169: l_v_dest_teach_alt_cd);
4170: fnd_message.set_token('FEE_ALT_CD',
4171: l_v_fp_alt_cd);
4172: fnd_file.put_line(fnd_file.log,
4173: fnd_message.get);
4174: END IF;
4169: l_v_dest_teach_alt_cd);
4170: fnd_message.set_token('FEE_ALT_CD',
4171: l_v_fp_alt_cd);
4172: fnd_file.put_line(fnd_file.log,
4173: fnd_message.get);
4174: END IF;
4175: CLOSE cur_load_teach;
4176: END IF;
4177:
4194: FETCH cur_dai_exist INTO l_rec_dai;
4195: IF cur_dai_exist%NOTFOUND THEN
4196: CLOSE cur_dai_exist;
4197: l_b_prc_rollover := FALSE;
4198: fnd_message.set_name('IGS',
4199: 'IGS_FI_TPRS_NO_DT_ALIAS_ROLL');
4200: fnd_message.set_token('ALT_CD',
4201: l_v_teach_alt_cd);
4202: fnd_message.set_token('DATE_ALIAS',
4196: CLOSE cur_dai_exist;
4197: l_b_prc_rollover := FALSE;
4198: fnd_message.set_name('IGS',
4199: 'IGS_FI_TPRS_NO_DT_ALIAS_ROLL');
4200: fnd_message.set_token('ALT_CD',
4201: l_v_teach_alt_cd);
4202: fnd_message.set_token('DATE_ALIAS',
4203: rec_ret_schd.dt_alias);
4204: fnd_file.put_line(fnd_file.log,
4198: fnd_message.set_name('IGS',
4199: 'IGS_FI_TPRS_NO_DT_ALIAS_ROLL');
4200: fnd_message.set_token('ALT_CD',
4201: l_v_teach_alt_cd);
4202: fnd_message.set_token('DATE_ALIAS',
4203: rec_ret_schd.dt_alias);
4204: fnd_file.put_line(fnd_file.log,
4205: fnd_message.get);
4206: EXIT;
4201: l_v_teach_alt_cd);
4202: fnd_message.set_token('DATE_ALIAS',
4203: rec_ret_schd.dt_alias);
4204: fnd_file.put_line(fnd_file.log,
4205: fnd_message.get);
4206: EXIT;
4207: END IF;
4208: CLOSE cur_dai_exist;
4209:
4231: WHEN OTHERS THEN
4232: ROLLBACK TO SP_ROLL_TP;
4233: l_b_prc_rollover := FALSE;
4234: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
4235: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_TPRS_ERROR');
4236: fnd_message.set_token('FEE_TYPE',p_v_fee_type);
4237: fnd_message.set_token('FEE_CAL_TYPE',p_v_source_cal_type);
4238: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
4239: fnd_message.set_token('TEACH_CAL_TYPE',rec_dist_tp.teach_cal_type);
4232: ROLLBACK TO SP_ROLL_TP;
4233: l_b_prc_rollover := FALSE;
4234: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
4235: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_TPRS_ERROR');
4236: fnd_message.set_token('FEE_TYPE',p_v_fee_type);
4237: fnd_message.set_token('FEE_CAL_TYPE',p_v_source_cal_type);
4238: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
4239: fnd_message.set_token('TEACH_CAL_TYPE',rec_dist_tp.teach_cal_type);
4240: fnd_message.set_token('TEACH_CI_ALT_CODE',l_v_teach_alt_cd);
4233: l_b_prc_rollover := FALSE;
4234: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
4235: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_TPRS_ERROR');
4236: fnd_message.set_token('FEE_TYPE',p_v_fee_type);
4237: fnd_message.set_token('FEE_CAL_TYPE',p_v_source_cal_type);
4238: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
4239: fnd_message.set_token('TEACH_CAL_TYPE',rec_dist_tp.teach_cal_type);
4240: fnd_message.set_token('TEACH_CI_ALT_CODE',l_v_teach_alt_cd);
4241: fnd_message.set_token('DT_ALIAS',l_rec_dai.dt_alias);
4234: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
4235: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_TPRS_ERROR');
4236: fnd_message.set_token('FEE_TYPE',p_v_fee_type);
4237: fnd_message.set_token('FEE_CAL_TYPE',p_v_source_cal_type);
4238: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
4239: fnd_message.set_token('TEACH_CAL_TYPE',rec_dist_tp.teach_cal_type);
4240: fnd_message.set_token('TEACH_CI_ALT_CODE',l_v_teach_alt_cd);
4241: fnd_message.set_token('DT_ALIAS',l_rec_dai.dt_alias);
4242: fnd_file.put_line (fnd_file.log, fnd_message.get);
4235: fnd_message.set_name('IGS','IGS_FI_ROLLOVER_TPRS_ERROR');
4236: fnd_message.set_token('FEE_TYPE',p_v_fee_type);
4237: fnd_message.set_token('FEE_CAL_TYPE',p_v_source_cal_type);
4238: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
4239: fnd_message.set_token('TEACH_CAL_TYPE',rec_dist_tp.teach_cal_type);
4240: fnd_message.set_token('TEACH_CI_ALT_CODE',l_v_teach_alt_cd);
4241: fnd_message.set_token('DT_ALIAS',l_rec_dai.dt_alias);
4242: fnd_file.put_line (fnd_file.log, fnd_message.get);
4243: END;
4236: fnd_message.set_token('FEE_TYPE',p_v_fee_type);
4237: fnd_message.set_token('FEE_CAL_TYPE',p_v_source_cal_type);
4238: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
4239: fnd_message.set_token('TEACH_CAL_TYPE',rec_dist_tp.teach_cal_type);
4240: fnd_message.set_token('TEACH_CI_ALT_CODE',l_v_teach_alt_cd);
4241: fnd_message.set_token('DT_ALIAS',l_rec_dai.dt_alias);
4242: fnd_file.put_line (fnd_file.log, fnd_message.get);
4243: END;
4244:
4237: fnd_message.set_token('FEE_CAL_TYPE',p_v_source_cal_type);
4238: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
4239: fnd_message.set_token('TEACH_CAL_TYPE',rec_dist_tp.teach_cal_type);
4240: fnd_message.set_token('TEACH_CI_ALT_CODE',l_v_teach_alt_cd);
4241: fnd_message.set_token('DT_ALIAS',l_rec_dai.dt_alias);
4242: fnd_file.put_line (fnd_file.log, fnd_message.get);
4243: END;
4244:
4245:
4238: fnd_message.set_token('ALT_CODE',g_v_alternate_code);
4239: fnd_message.set_token('TEACH_CAL_TYPE',rec_dist_tp.teach_cal_type);
4240: fnd_message.set_token('TEACH_CI_ALT_CODE',l_v_teach_alt_cd);
4241: fnd_message.set_token('DT_ALIAS',l_rec_dai.dt_alias);
4242: fnd_file.put_line (fnd_file.log, fnd_message.get);
4243: END;
4244:
4245:
4246: -- If the Rollover validations have failed, then set
4245:
4246: -- If the Rollover validations have failed, then set
4247: -- the status to False else log the success message in the log file
4248: IF l_b_prc_rollover THEN
4249: fnd_message.set_name('IGS',
4250: 'IGS_FI_ROLL_TP_FTCI');
4251: fnd_file.put_line(fnd_file.log,
4252: fnd_message.get);
4253: END IF;
4248: IF l_b_prc_rollover THEN
4249: fnd_message.set_name('IGS',
4250: 'IGS_FI_ROLL_TP_FTCI');
4251: fnd_file.put_line(fnd_file.log,
4252: fnd_message.get);
4253: END IF;
4254: END LOOP;
4255:
4256:
4264: WHEN OTHERS THEN
4265: ROLLBACK TO SP_ROLLTP_MAIN;
4266: p_b_status := FALSE;
4267: fnd_file.put_line(fnd_file.log,
4268: fnd_message.get_string('IGS',
4269: 'IGS_GE_UNHANDLED_EXCEPTION')||':'||sqlerrm);
4270: END finp_ins_roll_tprs;
4271:
4272: END igs_fi_prc_fee_rollv;