621: AS
622:
623: CURSOR c_oth_inst IS
624: SELECT rowid,a.*
625: FROM igs_ad_othinst_int a
626: WHERE interface_run_id = p_interface_run_id
627: AND status = '2';
628:
629: l_oth_inst_rec c_oth_inst%ROWTYPE;
673: END IF;
674:
675: l_error_text1 := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E678', 8405);
676:
677: UPDATE igs_ad_othinst_int a
678: SET status = '3',
679: error_code = 'E678',
680: error_text = l_error_text1
681: WHERE
687: AND b.institution_code = a.institution_cd );
688:
689: l_error_text1 := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E425', 8405);
690:
691: UPDATE igs_ad_othinst_int a
692: SET status = '3',
693: error_code = 'E425',
694: error_text = l_error_text1
695: WHERE interface_run_id = p_interface_run_id
723:
724: l_error_text := FND_MESSAGE.GET;
725: l_error_text1 := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E701', 8405);
726:
727: UPDATE igs_ad_othinst_int
728: SET status = cst_s_val_3,
729: error_code = cst_ec_val_E701,
730: error_text = NVL(l_error_text,l_error_text1)
731: WHERE rowid = l_oth_inst_rec.rowid;
757: END IF;
758:
759: IF l_type = 'E' THEN
760: ROLLBACK TO oth_inst_save;
761: UPDATE igs_ad_othinst_int
762: SET status = cst_s_val_3,
763: error_code = cst_ec_val_E322,
764: error_text = l_error_text
765: WHERE rowid = l_oth_inst_rec.rowid;
768: igs_ad_imp_001.logerrormessage(l_oth_inst_rec.interface_othinst_id,l_msg_data);
769: END IF;
770:
771: ELSIF l_type = 'S' THEN
772: UPDATE igs_ad_othinst_int
773: SET status = cst_s_val_4,
774: error_code =cst_ec_val_E702,
775: error_text = l_error_text
776: WHERE rowid = l_oth_inst_rec.rowid;
779: igs_ad_imp_001.logerrormessage(l_oth_inst_rec.interface_othinst_id,l_msg_data);
780: END IF;
781:
782: ELSIF l_type IS NULL THEN
783: UPDATE igs_ad_othinst_int
784: SET status = cst_s_val_1,
785: error_code = NULL,
786: error_text = NULL
787: WHERE rowid = l_oth_inst_rec.rowid;
799:
800: l_error_text := FND_MESSAGE.GET;
801: l_error_text1 := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E701', 8405);
802:
803: UPDATE igs_ad_othinst_int
804: SET status = cst_s_val_3,
805: error_code = cst_ec_val_E701,
806: error_text = NVL(l_error_text,l_error_text1)
807: WHERE rowid = l_oth_inst_rec.rowid;
845: END IF;
846:
847: ROLLBACK TO oth_inst_save;
848:
849: UPDATE igs_ad_othinst_int
850: SET status = cst_s_val_3,
851: error_code = l_error_code ,
852: error_text = l_error_text
853: WHERE rowid = l_oth_inst_rec.rowid;