83: retcode := 0;
84:
85: -- Check If profile Country Code is set to GB. If not, then close form.
86: IF NOT igs_uc_utils.is_ucas_hesa_enabled THEN
87: fnd_message.set_name('IGS','IGS_UC_HE_NOT_ENABLED');
88: fnd_file.put_line( fnd_file.log, fnd_message.get());
89: retcode := 2;
90: RETURN;
91: END IF;
84:
85: -- Check If profile Country Code is set to GB. If not, then close form.
86: IF NOT igs_uc_utils.is_ucas_hesa_enabled THEN
87: fnd_message.set_name('IGS','IGS_UC_HE_NOT_ENABLED');
88: fnd_file.put_line( fnd_file.log, fnd_message.get());
89: retcode := 2;
90: RETURN;
91: END IF;
92:
117: ELSIF p_system_code = 'S' THEN
118: l_swas := 'Y';
119: END IF;
120:
121: fnd_message.set_name('IGS', 'IGS_UC_MV_INST_IMP');
122: fnd_message.set_token('IMPORT', 'INSERTING ');
123: fnd_message.set_token('INST', inst_int_rec.inst);
124: fnd_file.put_line( fnd_file.log, fnd_message.get());
125:
118: l_swas := 'Y';
119: END IF;
120:
121: fnd_message.set_name('IGS', 'IGS_UC_MV_INST_IMP');
122: fnd_message.set_token('IMPORT', 'INSERTING ');
123: fnd_message.set_token('INST', inst_int_rec.inst);
124: fnd_file.put_line( fnd_file.log, fnd_message.get());
125:
126: --Call the TBH of the Reference codes table to insert a new Degree Subject.
119: END IF;
120:
121: fnd_message.set_name('IGS', 'IGS_UC_MV_INST_IMP');
122: fnd_message.set_token('IMPORT', 'INSERTING ');
123: fnd_message.set_token('INST', inst_int_rec.inst);
124: fnd_file.put_line( fnd_file.log, fnd_message.get());
125:
126: --Call the TBH of the Reference codes table to insert a new Degree Subject.
127: igs_uc_com_inst_pkg.Insert_Row (
120:
121: fnd_message.set_name('IGS', 'IGS_UC_MV_INST_IMP');
122: fnd_message.set_token('IMPORT', 'INSERTING ');
123: fnd_message.set_token('INST', inst_int_rec.inst);
124: fnd_file.put_line( fnd_file.log, fnd_message.get());
125:
126: --Call the TBH of the Reference codes table to insert a new Degree Subject.
127: igs_uc_com_inst_pkg.Insert_Row (
128: x_rowid => l_rowid,
157: ELSIF p_system_code = 'S' THEN
158: l_swas := 'Y';
159: END IF;
160:
161: fnd_message.set_name('IGS', 'IGS_UC_MV_INST_IMP');
162: fnd_message.set_token('IMPORT', 'UPDATING ');
163: fnd_message.set_token('INST', instcodes_rec.inst);
164: fnd_file.put_line( fnd_file.log, fnd_message.get());
165:
158: l_swas := 'Y';
159: END IF;
160:
161: fnd_message.set_name('IGS', 'IGS_UC_MV_INST_IMP');
162: fnd_message.set_token('IMPORT', 'UPDATING ');
163: fnd_message.set_token('INST', instcodes_rec.inst);
164: fnd_file.put_line( fnd_file.log, fnd_message.get());
165:
166: --Call the TBH of the Reference codes table to update a new Degree Subject.
159: END IF;
160:
161: fnd_message.set_name('IGS', 'IGS_UC_MV_INST_IMP');
162: fnd_message.set_token('IMPORT', 'UPDATING ');
163: fnd_message.set_token('INST', instcodes_rec.inst);
164: fnd_file.put_line( fnd_file.log, fnd_message.get());
165:
166: --Call the TBH of the Reference codes table to update a new Degree Subject.
167: igs_uc_com_inst_pkg.Update_Row (
160:
161: fnd_message.set_name('IGS', 'IGS_UC_MV_INST_IMP');
162: fnd_message.set_token('IMPORT', 'UPDATING ');
163: fnd_message.set_token('INST', instcodes_rec.inst);
164: fnd_file.put_line( fnd_file.log, fnd_message.get());
165:
166: --Call the TBH of the Reference codes table to update a new Degree Subject.
167: igs_uc_com_inst_pkg.Update_Row (
168: x_rowid => l_rowid,
187: END LOOP;
188:
189: -- Print Number of records successfully transferred
190: FND_FILE.PUT_LINE( FND_FILE.LOG, ' ');
191: FND_MESSAGE.SET_NAME('IGS', 'IGS_UC_MV_LOAD_SUCCESS');
192: FND_MESSAGE.SET_TOKEN('CNT', l_success_cnt);
193: FND_FILE.PUT_LINE( FND_FILE.LOG, FND_MESSAGE.GET());
194:
195: -- commit the data;
188:
189: -- Print Number of records successfully transferred
190: FND_FILE.PUT_LINE( FND_FILE.LOG, ' ');
191: FND_MESSAGE.SET_NAME('IGS', 'IGS_UC_MV_LOAD_SUCCESS');
192: FND_MESSAGE.SET_TOKEN('CNT', l_success_cnt);
193: FND_FILE.PUT_LINE( FND_FILE.LOG, FND_MESSAGE.GET());
194:
195: -- commit the data;
196: COMMIT;
189: -- Print Number of records successfully transferred
190: FND_FILE.PUT_LINE( FND_FILE.LOG, ' ');
191: FND_MESSAGE.SET_NAME('IGS', 'IGS_UC_MV_LOAD_SUCCESS');
192: FND_MESSAGE.SET_TOKEN('CNT', l_success_cnt);
193: FND_FILE.PUT_LINE( FND_FILE.LOG, FND_MESSAGE.GET());
194:
195: -- commit the data;
196: COMMIT;
197: FND_FILE.PUT_LINE( FND_FILE.LOG, ' ');
199: EXCEPTION
200: WHEN app_exception.record_lock_exception THEN
201: ROLLBACK;
202: retcode := 2;
203: errbuf := fnd_message.get_string('IGF','IGF_GE_LOCK_ERROR');
204: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
205:
206: WHEN OTHERS THEN
207: ROLLBACK;
205:
206: WHEN OTHERS THEN
207: ROLLBACK;
208: RETCODE := 2;
209: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
210: FND_MESSAGE.SET_TOKEN('NAME','IGS_UC_MV_IMP_DEGSUBJ.IMP_DEGSUBJECT_CODES - '||SQLERRM);
211: ERRBUF := FND_MESSAGE.GET;
212: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
213:
206: WHEN OTHERS THEN
207: ROLLBACK;
208: RETCODE := 2;
209: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
210: FND_MESSAGE.SET_TOKEN('NAME','IGS_UC_MV_IMP_DEGSUBJ.IMP_DEGSUBJECT_CODES - '||SQLERRM);
211: ERRBUF := FND_MESSAGE.GET;
212: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
213:
214: END Import_Inst_codes;
207: ROLLBACK;
208: RETCODE := 2;
209: FND_MESSAGE.SET_NAME('IGS','IGS_GE_UNHANDLED_EXP');
210: FND_MESSAGE.SET_TOKEN('NAME','IGS_UC_MV_IMP_DEGSUBJ.IMP_DEGSUBJECT_CODES - '||SQLERRM);
211: ERRBUF := FND_MESSAGE.GET;
212: IGS_GE_MSG_STACK.CONC_EXCEPTION_HNDL;
213:
214: END Import_Inst_codes;
215: END igs_uc_mv_imp_inst;