151: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','c_org_unit%NOTFOUND');
152: END IF;
153:
154: lv_set_ant_data := 'N';
155: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
156: fnd_message.set_token('FIELD','ORG_UNIT_CD '||': '||p_interface.org_unit_cd );
157: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
158: END IF;
159: CLOSE c_org_unit;
152: END IF;
153:
154: lv_set_ant_data := 'N';
155: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
156: fnd_message.set_token('FIELD','ORG_UNIT_CD '||': '||p_interface.org_unit_cd );
157: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
158: END IF;
159: CLOSE c_org_unit;
160: END IF;
153:
154: lv_set_ant_data := 'N';
155: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
156: fnd_message.set_token('FIELD','ORG_UNIT_CD '||': '||p_interface.org_unit_cd );
157: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
158: END IF;
159: CLOSE c_org_unit;
160: END IF;
161:
168: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','c_prog_type%NOTFOUND');
169: END IF;
170:
171: lv_set_ant_data := 'N';
172: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
173: fnd_message.set_token('FIELD','PROGRAM_TYPE'||': '||p_interface.program_type);
174: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
175: END IF;
176: CLOSE c_prog_type;
169: END IF;
170:
171: lv_set_ant_data := 'N';
172: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
173: fnd_message.set_token('FIELD','PROGRAM_TYPE'||': '||p_interface.program_type);
174: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
175: END IF;
176: CLOSE c_prog_type;
177: END IF;
170:
171: lv_set_ant_data := 'N';
172: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
173: fnd_message.set_token('FIELD','PROGRAM_TYPE'||': '||p_interface.program_type);
174: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
175: END IF;
176: CLOSE c_prog_type;
177: END IF;
178:
185: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','c_prog_loc%NOTFOUND');
186: END IF;
187:
188: lv_set_ant_data := 'N';
189: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
190: fnd_message.set_token('FIELD','PROGRAM_LOCATION_CD'||': '||p_interface.program_location_cd);
191: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
192: END IF;
193: CLOSE c_prog_loc;
186: END IF;
187:
188: lv_set_ant_data := 'N';
189: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
190: fnd_message.set_token('FIELD','PROGRAM_LOCATION_CD'||': '||p_interface.program_location_cd);
191: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
192: END IF;
193: CLOSE c_prog_loc;
194: END IF;
187:
188: lv_set_ant_data := 'N';
189: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
190: fnd_message.set_token('FIELD','PROGRAM_LOCATION_CD'||': '||p_interface.program_location_cd);
191: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
192: END IF;
193: CLOSE c_prog_loc;
194: END IF;
195:
202: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','c_prog_cd%NOTFOUND');
203: END IF;
204:
205: lv_set_ant_data := 'N';
206: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
207: fnd_message.set_token('FIELD','PROGRAM_CD'||': '||p_interface.program_cd);
208: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
209: END IF;
210: CLOSE c_prog_cd;
203: END IF;
204:
205: lv_set_ant_data := 'N';
206: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
207: fnd_message.set_token('FIELD','PROGRAM_CD'||': '||p_interface.program_cd);
208: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
209: END IF;
210: CLOSE c_prog_cd;
211: END IF;
204:
205: lv_set_ant_data := 'N';
206: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
207: fnd_message.set_token('FIELD','PROGRAM_CD'||': '||p_interface.program_cd);
208: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
209: END IF;
210: CLOSE c_prog_cd;
211: END IF;
212:
219: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','c_class_stnd%NOTFOUND');
220: END IF;
221:
222: lv_set_ant_data := 'N';
223: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
224: fnd_message.set_token('FIELD','CLASS_STANDING'||': '||p_interface.class_standing);
225: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
226: END IF;
227: CLOSE c_class_stnd;
220: END IF;
221:
222: lv_set_ant_data := 'N';
223: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
224: fnd_message.set_token('FIELD','CLASS_STANDING'||': '||p_interface.class_standing);
225: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
226: END IF;
227: CLOSE c_class_stnd;
228: END IF;
221:
222: lv_set_ant_data := 'N';
223: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
224: fnd_message.set_token('FIELD','CLASS_STANDING'||': '||p_interface.class_standing);
225: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
226: END IF;
227: CLOSE c_class_stnd;
228: END IF;
229:
236: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','c_res_status%NOTFOUND');
237: END IF;
238:
239: lv_set_ant_data := 'N';
240: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
241: fnd_message.set_token('FIELD','RESIDENCY_STATUS_CODE'||': '||p_interface.residency_status_code);
242: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
243: END IF;
244: CLOSE c_res_status;
237: END IF;
238:
239: lv_set_ant_data := 'N';
240: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
241: fnd_message.set_token('FIELD','RESIDENCY_STATUS_CODE'||': '||p_interface.residency_status_code);
242: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
243: END IF;
244: CLOSE c_res_status;
245: END IF;
238:
239: lv_set_ant_data := 'N';
240: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
241: fnd_message.set_token('FIELD','RESIDENCY_STATUS_CODE'||': '||p_interface.residency_status_code);
242: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
243: END IF;
244: CLOSE c_res_status;
245: END IF;
246:
253: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','c_res_status%NOTFOUND');
254: END IF;
255:
256: lv_set_ant_data := 'N';
257: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
258: fnd_message.set_token('FIELD','HOUSING_STATUS_CODE'||': '||p_interface.housing_status_code);
259: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
260: END IF;
261: CLOSE c_res_status;
254: END IF;
255:
256: lv_set_ant_data := 'N';
257: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
258: fnd_message.set_token('FIELD','HOUSING_STATUS_CODE'||': '||p_interface.housing_status_code);
259: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
260: END IF;
261: CLOSE c_res_status;
262: END IF;
255:
256: lv_set_ant_data := 'N';
257: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
258: fnd_message.set_token('FIELD','HOUSING_STATUS_CODE'||': '||p_interface.housing_status_code);
259: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
260: END IF;
261: CLOSE c_res_status;
262: END IF;
263:
270: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','c_atten_type%NOTFOUND');
271: END IF;
272:
273: lv_set_ant_data := 'N';
274: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
275: fnd_message.set_token('FIELD','ATTENDANCE_TYPE'||': '||p_interface.attendance_type);
276: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
277: END IF;
278: CLOSE c_atten_type;
271: END IF;
272:
273: lv_set_ant_data := 'N';
274: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
275: fnd_message.set_token('FIELD','ATTENDANCE_TYPE'||': '||p_interface.attendance_type);
276: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
277: END IF;
278: CLOSE c_atten_type;
279: END IF;
272:
273: lv_set_ant_data := 'N';
274: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
275: fnd_message.set_token('FIELD','ATTENDANCE_TYPE'||': '||p_interface.attendance_type);
276: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
277: END IF;
278: CLOSE c_atten_type;
279: END IF;
280:
287: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','c_atten_mode%NOTFOUND');
288: END IF;
289:
290: lv_set_ant_data := 'N';
291: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
292: fnd_message.set_token('FIELD','ATTENDANCE_MODE'||': '||p_interface.attendance_mode);
293: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
294: END IF;
295: CLOSE c_atten_mode;
288: END IF;
289:
290: lv_set_ant_data := 'N';
291: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
292: fnd_message.set_token('FIELD','ATTENDANCE_MODE'||': '||p_interface.attendance_mode);
293: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
294: END IF;
295: CLOSE c_atten_mode;
296: END IF;
289:
290: lv_set_ant_data := 'N';
291: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
292: fnd_message.set_token('FIELD','ATTENDANCE_MODE'||': '||p_interface.attendance_mode);
293: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
294: END IF;
295: CLOSE c_atten_mode;
296: END IF;
297:
302: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','p_interface.months_enrolled_num NOT BETWEEN 1 AND 12');
303: END IF;
304:
305: lv_set_ant_data := 'N';
306: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
307: fnd_message.set_token('FIELD','MONTHS_ENROLLED_NUM'||': '||p_interface.months_enrolled_num);
308: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
309: END IF;
310: END IF;
303: END IF;
304:
305: lv_set_ant_data := 'N';
306: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
307: fnd_message.set_token('FIELD','MONTHS_ENROLLED_NUM'||': '||p_interface.months_enrolled_num);
308: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
309: END IF;
310: END IF;
311:
304:
305: lv_set_ant_data := 'N';
306: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
307: fnd_message.set_token('FIELD','MONTHS_ENROLLED_NUM'||': '||p_interface.months_enrolled_num);
308: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
309: END IF;
310: END IF;
311:
312: --validate credit point number
316: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','p_interface.credit_points_num < 0');
317: END IF;
318:
319: lv_set_ant_data := 'N';
320: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
321: fnd_message.set_token('FIELD','CREDIT_POINTS_NUM'||': '||p_interface.credit_points_num);
322: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
323: END IF;
324: END IF;
317: END IF;
318:
319: lv_set_ant_data := 'N';
320: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
321: fnd_message.set_token('FIELD','CREDIT_POINTS_NUM'||': '||p_interface.credit_points_num);
322: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
323: END IF;
324: END IF;
325:
318:
319: lv_set_ant_data := 'N';
320: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
321: fnd_message.set_token('FIELD','CREDIT_POINTS_NUM'||': '||p_interface.credit_points_num);
322: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
323: END IF;
324: END IF;
325:
326: --to check OSS attributes
386: x_months_enrolled_num => p_interface.months_enrolled_num,
387: x_credit_points_num => p_interface.credit_points_num
388: );
389:
390: fnd_message.set_name('IGS','IGS_AD_SUCC_IMP_OFR_RESP_REC');
391: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
392:
393: ELSIF p_interface.import_record_type = 'I' THEN
394: lv_rowid := NULL;
387: x_credit_points_num => p_interface.credit_points_num
388: );
389:
390: fnd_message.set_name('IGS','IGS_AD_SUCC_IMP_OFR_RESP_REC');
391: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
392:
393: ELSIF p_interface.import_record_type = 'I' THEN
394: lv_rowid := NULL;
395:
416: x_credit_points_num => p_interface.credit_points_num
417: );
418:
419:
420: fnd_message.set_name('IGS','IGS_AD_SUCC_IMP_OFR_RESP_REC');
421: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
422:
423: END IF;
424:
417: );
418:
419:
420: fnd_message.set_name('IGS','IGS_AD_SUCC_IMP_OFR_RESP_REC');
421: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
422:
423: END IF;
424:
425: IF p_delete_flag = 'Y' THEN
451: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
452: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','No data Imported');
453: END IF;
454:
455: fnd_message.set_name('IGS','IGS_EN_NO_DATA_IMP');
456: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
457:
458: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
459: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','updating in igf_aw_anticpt_ints');
452: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','No data Imported');
453: END IF;
454:
455: fnd_message.set_name('IGS','IGS_EN_NO_DATA_IMP');
456: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
457:
458: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
459: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.process_anti_data.debug','updating in igf_aw_anticpt_ints');
460: END IF;
469: END IF;
470:
471: EXCEPTION
472: WHEN OTHERS THEN
473: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
474: fnd_message.set_token('NAME','IGF_AW_ANTICIPATED_DATA.PROCESS_ANTI_DATA :' || SQLERRM);
475: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
476: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_aw_anticipated_data.process_anti_data.exception','sql error:'||SQLERRM);
477: END IF;
470:
471: EXCEPTION
472: WHEN OTHERS THEN
473: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
474: fnd_message.set_token('NAME','IGF_AW_ANTICIPATED_DATA.PROCESS_ANTI_DATA :' || SQLERRM);
475: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
476: fnd_log.string(fnd_log.level_exception,'igf.plsql.igf_aw_anticipated_data.process_anti_data.exception','sql error:'||SQLERRM);
477: END IF;
478: igs_ge_msg_stack.conc_exception_hndl;
623: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
624: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','l_chk_batch.batch_num IS NULL');
625: END IF;
626:
627: fnd_message.set_name('IGF','IGF_GR_BATCH_DOES_NOT_EXIST');
628: fnd_file.put_line(fnd_file.log,fnd_message.get);
629: RAISE param_exception;
630: END IF;
631:
624: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','l_chk_batch.batch_num IS NULL');
625: END IF;
626:
627: fnd_message.set_name('IGF','IGF_GR_BATCH_DOES_NOT_EXIST');
628: fnd_file.put_line(fnd_file.log,fnd_message.get);
629: RAISE param_exception;
630: END IF;
631:
632: fnd_file.put_line(fnd_file.log,'-------------------------------------------------------');
640: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
641: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','l_chk_interface.val IS NULL');
642: END IF;
643:
644: fnd_message.set_name('IGS','IGS_FI_NO_RECORD_AVAILABLE');
645: fnd_file.put_line(fnd_file.log,fnd_message.get);
646: RETURN;
647: END IF;
648:
641: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','l_chk_interface.val IS NULL');
642: END IF;
643:
644: fnd_message.set_name('IGS','IGS_FI_NO_RECORD_AVAILABLE');
645: fnd_file.put_line(fnd_file.log,fnd_message.get);
646: RETURN;
647: END IF;
648:
649:
656:
657: fnd_file.new_line(fnd_file.log,1);
658:
659: IF lv_person_number <> l_interface.person_number THEN
660: fnd_message.set_name('IGF','IGF_AW_PROC_STUD');
661: fnd_message.set_token('STDNT',l_interface.person_number);
662: fnd_file.put_line(fnd_file.log,fnd_message.get);
663:
664: --here call to the generic wrapper is being made to check the validity of the perosn and base record
657: fnd_file.new_line(fnd_file.log,1);
658:
659: IF lv_person_number <> l_interface.person_number THEN
660: fnd_message.set_name('IGF','IGF_AW_PROC_STUD');
661: fnd_message.set_token('STDNT',l_interface.person_number);
662: fnd_file.put_line(fnd_file.log,fnd_message.get);
663:
664: --here call to the generic wrapper is being made to check the validity of the perosn and base record
665: igf_ap_gen.check_person(l_interface.person_number,lv_ci_cal_type,ln_ci_sequence_number,ln_person_id,ln_base_id);
658:
659: IF lv_person_number <> l_interface.person_number THEN
660: fnd_message.set_name('IGF','IGF_AW_PROC_STUD');
661: fnd_message.set_token('STDNT',l_interface.person_number);
662: fnd_file.put_line(fnd_file.log,fnd_message.get);
663:
664: --here call to the generic wrapper is being made to check the validity of the perosn and base record
665: igf_ap_gen.check_person(l_interface.person_number,lv_ci_cal_type,ln_ci_sequence_number,ln_person_id,ln_base_id);
666: END IF;
671: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
672: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','ln_person_id IS NULL');
673: END IF;
674:
675: fnd_message.set_name('IGF','IGF_AP_PE_NOT_EXIST');
676: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
677: ELSE
678: IF ln_base_id IS NULL THEN
679: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
672: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','ln_person_id IS NULL');
673: END IF;
674:
675: fnd_message.set_name('IGF','IGF_AP_PE_NOT_EXIST');
676: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
677: ELSE
678: IF ln_base_id IS NULL THEN
679: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
680: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','ln_base_id IS NULL');
679: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
680: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','ln_base_id IS NULL');
681: END IF;
682:
683: fnd_message.set_name('IGF','IGF_AP_FABASE_NOT_FOUND');
684: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
685: ELSE
686: l_get_cal_typ_seq_num := NULL;
687:
680: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','ln_base_id IS NULL');
681: END IF;
682:
683: fnd_message.set_name('IGF','IGF_AP_FABASE_NOT_FOUND');
684: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
685: ELSE
686: l_get_cal_typ_seq_num := NULL;
687:
688: OPEN c_get_cal_typ_seq_num(l_interface.ld_alternate_code,
692:
693: FETCH c_get_cal_typ_seq_num INTO l_get_cal_typ_seq_num;
694: CLOSE c_get_cal_typ_seq_num;
695:
696: fnd_message.set_name('IGF','IGF_AW_PROC_TERM');
697: fnd_message.set_token('TERM',l_interface.ld_alternate_code);
698: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
699:
700:
693: FETCH c_get_cal_typ_seq_num INTO l_get_cal_typ_seq_num;
694: CLOSE c_get_cal_typ_seq_num;
695:
696: fnd_message.set_name('IGF','IGF_AW_PROC_TERM');
697: fnd_message.set_token('TERM',l_interface.ld_alternate_code);
698: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
699:
700:
701: IF l_get_cal_typ_seq_num.ld_cal_type IS NULL OR l_get_cal_typ_seq_num.ld_sequence_number IS NULL THEN
694: CLOSE c_get_cal_typ_seq_num;
695:
696: fnd_message.set_name('IGF','IGF_AW_PROC_TERM');
697: fnd_message.set_token('TERM',l_interface.ld_alternate_code);
698: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
699:
700:
701: IF l_get_cal_typ_seq_num.ld_cal_type IS NULL OR l_get_cal_typ_seq_num.ld_sequence_number IS NULL THEN
702: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
702: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
703: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','l_get_cal_typ_seq_num IS NULL');
704: END IF;
705:
706: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
707: fnd_message.set_token('FIELD','LD_ALTERNATE_CODE'||': '||l_interface.ld_alternate_code);
708: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
709:
710: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
703: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','l_get_cal_typ_seq_num IS NULL');
704: END IF;
705:
706: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
707: fnd_message.set_token('FIELD','LD_ALTERNATE_CODE'||': '||l_interface.ld_alternate_code);
708: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
709:
710: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
711: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','updating in igf_aw_anticpt_ints');
704: END IF;
705:
706: fnd_message.set_name('IGF','IGF_AP_INV_FLD_VAL');
707: fnd_message.set_token('FIELD','LD_ALTERNATE_CODE'||': '||l_interface.ld_alternate_code);
708: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
709:
710: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
711: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','updating in igf_aw_anticpt_ints');
712: END IF;
735: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
736: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','No anticipated data for record type=U');
737: END IF;
738:
739: fnd_message.set_name('IGF','IGF_AW_IMP_ANT_AVAL');
740: fnd_message.set_token('REC_TYPE',l_interface.import_record_type);
741: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
742:
743: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
736: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','No anticipated data for record type=U');
737: END IF;
738:
739: fnd_message.set_name('IGF','IGF_AW_IMP_ANT_AVAL');
740: fnd_message.set_token('REC_TYPE',l_interface.import_record_type);
741: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
742:
743: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
744: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','updating in igf_aw_anticpt_ints');
737: END IF;
738:
739: fnd_message.set_name('IGF','IGF_AW_IMP_ANT_AVAL');
740: fnd_message.set_token('REC_TYPE',l_interface.import_record_type);
741: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
742:
743: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
744: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','updating in igf_aw_anticpt_ints');
745: END IF;
764: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
765: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','anticipated data available for record type=I');
766: END IF;
767:
768: fnd_message.set_name('IGF','IGF_AW_IMP_ANT_NOT_AVAL');
769: fnd_message.set_token('REC_TYPE',l_interface.import_record_type);
770: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
771:
772: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
765: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','anticipated data available for record type=I');
766: END IF;
767:
768: fnd_message.set_name('IGF','IGF_AW_IMP_ANT_NOT_AVAL');
769: fnd_message.set_token('REC_TYPE',l_interface.import_record_type);
770: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
771:
772: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
773: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','updating in igf_aw_anticpt_ints');
766: END IF;
767:
768: fnd_message.set_name('IGF','IGF_AW_IMP_ANT_NOT_AVAL');
769: fnd_message.set_token('REC_TYPE',l_interface.import_record_type);
770: fnd_file.put_line(fnd_file.log,RPAD(' ',5)||fnd_message.get);
771:
772: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
773: fnd_log.string(fnd_log.level_statement,'igf.plsql.igf_aw_anticipated_data.main.debug','updating in igf_aw_anticpt_ints');
774: END IF;
799:
800: EXCEPTION
801: WHEN param_exception THEN
802: retcode:=2;
803: fnd_message.set_name('IGF','IGF_AW_PARAM_ERR');
804: igs_ge_msg_stack.add;
805: errbuf := fnd_message.get;
806:
807: WHEN app_exception.record_lock_exception THEN
801: WHEN param_exception THEN
802: retcode:=2;
803: fnd_message.set_name('IGF','IGF_AW_PARAM_ERR');
804: igs_ge_msg_stack.add;
805: errbuf := fnd_message.get;
806:
807: WHEN app_exception.record_lock_exception THEN
808: ROLLBACK;
809: retcode:=2;
806:
807: WHEN app_exception.record_lock_exception THEN
808: ROLLBACK;
809: retcode:=2;
810: fnd_message.set_name('IGF','IGF_GE_LOCK_ERROR');
811: igs_ge_msg_stack.add;
812: errbuf := fnd_message.get;
813:
814: WHEN OTHERS THEN
808: ROLLBACK;
809: retcode:=2;
810: fnd_message.set_name('IGF','IGF_GE_LOCK_ERROR');
811: igs_ge_msg_stack.add;
812: errbuf := fnd_message.get;
813:
814: WHEN OTHERS THEN
815: ROLLBACK;
816: retcode:=2;
813:
814: WHEN OTHERS THEN
815: ROLLBACK;
816: retcode:=2;
817: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXCEPTION');
818: igs_ge_msg_stack.add;
819: errbuf := fnd_message.get || SQLERRM;
820:
821: END main;
815: ROLLBACK;
816: retcode:=2;
817: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXCEPTION');
818: igs_ge_msg_stack.add;
819: errbuf := fnd_message.get || SQLERRM;
820:
821: END main;
822:
823: