DBA Data[Home] [Help]

APPS.IGS_PS_PURGE_DEL_RECORD dependencies on FND_MESSAGE

Line 34: fnd_message.set_name ( 'IGS', 'IGS_PS_OFR_OPT_PURGE' );

30: -- Create a Savepoint for Rollback
31: SAVEPOINT igs_ps_ofr_opt_all ;
32:
33: fnd_file.put_line ( fnd_file.LOG, ' ' );
34: fnd_message.set_name ( 'IGS', 'IGS_PS_OFR_OPT_PURGE' );
35: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
36:
37: l_n_rec_count := 0;
38: FOR rec_del_recs IN c_del_recs LOOP

Line 35: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );

31: SAVEPOINT igs_ps_ofr_opt_all ;
32:
33: fnd_file.put_line ( fnd_file.LOG, ' ' );
34: fnd_message.set_name ( 'IGS', 'IGS_PS_OFR_OPT_PURGE' );
35: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
36:
37: l_n_rec_count := 0;
38: FOR rec_del_recs IN c_del_recs LOOP
39: l_b_purged := TRUE;

Line 175: fnd_message.set_name ( 'IGS', 'IGS_AD_TOT_REC_PRC' );

171:
172: END LOOP;
173:
174: -- Log the number of records processed.
175: fnd_message.set_name ( 'IGS', 'IGS_AD_TOT_REC_PRC' );
176: fnd_message.set_token ( 'RCOUNT', l_n_rec_count );
177: fnd_file.put_line ( fnd_file.LOG, ' ' );
178: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
179:

Line 176: fnd_message.set_token ( 'RCOUNT', l_n_rec_count );

172: END LOOP;
173:
174: -- Log the number of records processed.
175: fnd_message.set_name ( 'IGS', 'IGS_AD_TOT_REC_PRC' );
176: fnd_message.set_token ( 'RCOUNT', l_n_rec_count );
177: fnd_file.put_line ( fnd_file.LOG, ' ' );
178: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
179:
180: EXCEPTION /* This exception handling is at table level */

Line 178: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );

174: -- Log the number of records processed.
175: fnd_message.set_name ( 'IGS', 'IGS_AD_TOT_REC_PRC' );
176: fnd_message.set_token ( 'RCOUNT', l_n_rec_count );
177: fnd_file.put_line ( fnd_file.LOG, ' ' );
178: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
179:
180: EXCEPTION /* This exception handling is at table level */
181: WHEN OTHERS THEN
182: -- If any exception occurs, whole transaction should be rolled off.

Line 186: l_c_message := fnd_message.get ;

182: -- If any exception occurs, whole transaction should be rolled off.
183: ROLLBACK TO igs_ps_ofr_opt_all;
184:
185: -- We have to log message stacked by TBH, if any. Otherwise, we will log the generic unhandled exception.
186: l_c_message := fnd_message.get ;
187: IF ( l_c_message IS NOT NULL ) THEN
188: fnd_file.put_line ( fnd_file.LOG, l_c_message );
189: ELSE
190: fnd_message.set_name ( 'IGS', 'IGS_GE_UNHANDLED_EXP' );

Line 190: fnd_message.set_name ( 'IGS', 'IGS_GE_UNHANDLED_EXP' );

186: l_c_message := fnd_message.get ;
187: IF ( l_c_message IS NOT NULL ) THEN
188: fnd_file.put_line ( fnd_file.LOG, l_c_message );
189: ELSE
190: fnd_message.set_name ( 'IGS', 'IGS_GE_UNHANDLED_EXP' );
191: fnd_message.set_token ( 'NAME', 'purge_igs_ps_ofr_opt_all' );
192: fnd_file.put_line ( fnd_file.LOG, fnd_message.get || ' : ' || SQLERRM );
193: END IF;
194:

Line 191: fnd_message.set_token ( 'NAME', 'purge_igs_ps_ofr_opt_all' );

187: IF ( l_c_message IS NOT NULL ) THEN
188: fnd_file.put_line ( fnd_file.LOG, l_c_message );
189: ELSE
190: fnd_message.set_name ( 'IGS', 'IGS_GE_UNHANDLED_EXP' );
191: fnd_message.set_token ( 'NAME', 'purge_igs_ps_ofr_opt_all' );
192: fnd_file.put_line ( fnd_file.LOG, fnd_message.get || ' : ' || SQLERRM );
193: END IF;
194:
195: END purge_igs_ps_ofr_opt_all; /* End Of Processing IGS_PS_OFR_OPT_ALL records */

Line 192: fnd_file.put_line ( fnd_file.LOG, fnd_message.get || ' : ' || SQLERRM );

188: fnd_file.put_line ( fnd_file.LOG, l_c_message );
189: ELSE
190: fnd_message.set_name ( 'IGS', 'IGS_GE_UNHANDLED_EXP' );
191: fnd_message.set_token ( 'NAME', 'purge_igs_ps_ofr_opt_all' );
192: fnd_file.put_line ( fnd_file.LOG, fnd_message.get || ' : ' || SQLERRM );
193: END IF;
194:
195: END purge_igs_ps_ofr_opt_all; /* End Of Processing IGS_PS_OFR_OPT_ALL records */
196:

Line 236: fnd_message.set_name ( 'IGS', 'IGS_PS_UOP_PURGE' );

232: -- Create a Savepoint for Rollback
233: SAVEPOINT igs_ps_unit_ofr_pat_all ;
234:
235: fnd_file.put_line ( fnd_file.LOG, ' ' );
236: fnd_message.set_name ( 'IGS', 'IGS_PS_UOP_PURGE' );
237: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
238:
239: l_n_rec_count := 0;
240: FOR rec_del_recs IN c_del_recs LOOP

Line 237: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );

233: SAVEPOINT igs_ps_unit_ofr_pat_all ;
234:
235: fnd_file.put_line ( fnd_file.LOG, ' ' );
236: fnd_message.set_name ( 'IGS', 'IGS_PS_UOP_PURGE' );
237: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
238:
239: l_n_rec_count := 0;
240: FOR rec_del_recs IN c_del_recs LOOP
241: l_b_purged := TRUE;

Line 325: fnd_message.set_name ( 'IGS', 'IGS_AD_TOT_REC_PRC' );

321:
322: END LOOP;
323:
324: -- Log the number of records processed.
325: fnd_message.set_name ( 'IGS', 'IGS_AD_TOT_REC_PRC' );
326: fnd_message.set_token ( 'RCOUNT', l_n_rec_count );
327: fnd_file.put_line ( fnd_file.LOG, ' ' );
328: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
329:

Line 326: fnd_message.set_token ( 'RCOUNT', l_n_rec_count );

322: END LOOP;
323:
324: -- Log the number of records processed.
325: fnd_message.set_name ( 'IGS', 'IGS_AD_TOT_REC_PRC' );
326: fnd_message.set_token ( 'RCOUNT', l_n_rec_count );
327: fnd_file.put_line ( fnd_file.LOG, ' ' );
328: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
329:
330: EXCEPTION /* This exception handling is at table level */

Line 328: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );

324: -- Log the number of records processed.
325: fnd_message.set_name ( 'IGS', 'IGS_AD_TOT_REC_PRC' );
326: fnd_message.set_token ( 'RCOUNT', l_n_rec_count );
327: fnd_file.put_line ( fnd_file.LOG, ' ' );
328: fnd_file.put_line ( fnd_file.LOG, fnd_message.get );
329:
330: EXCEPTION /* This exception handling is at table level */
331: WHEN OTHERS THEN
332: -- If any exception occurs, whole transaction should be rolled off.

Line 336: l_c_message := fnd_message.get ;

332: -- If any exception occurs, whole transaction should be rolled off.
333: ROLLBACK TO igs_ps_unit_ofr_pat_all;
334:
335: -- We have to log message stacked by TBH, if any. Otherwise, we will log the generic unhandled exception.
336: l_c_message := fnd_message.get ;
337: IF ( l_c_message IS NOT NULL ) THEN
338: fnd_file.put_line ( fnd_file.LOG, l_c_message );
339: ELSE
340: fnd_message.set_name ( 'IGS', 'IGS_GE_UNHANDLED_EXP' );

Line 340: fnd_message.set_name ( 'IGS', 'IGS_GE_UNHANDLED_EXP' );

336: l_c_message := fnd_message.get ;
337: IF ( l_c_message IS NOT NULL ) THEN
338: fnd_file.put_line ( fnd_file.LOG, l_c_message );
339: ELSE
340: fnd_message.set_name ( 'IGS', 'IGS_GE_UNHANDLED_EXP' );
341: fnd_message.set_token ( 'NAME', 'purge_igs_ps_unit_ofr_pat_all' );
342: fnd_file.put_line ( fnd_file.LOG, fnd_message.get || ' : ' || SQLERRM );
343: END IF;
344:

Line 341: fnd_message.set_token ( 'NAME', 'purge_igs_ps_unit_ofr_pat_all' );

337: IF ( l_c_message IS NOT NULL ) THEN
338: fnd_file.put_line ( fnd_file.LOG, l_c_message );
339: ELSE
340: fnd_message.set_name ( 'IGS', 'IGS_GE_UNHANDLED_EXP' );
341: fnd_message.set_token ( 'NAME', 'purge_igs_ps_unit_ofr_pat_all' );
342: fnd_file.put_line ( fnd_file.LOG, fnd_message.get || ' : ' || SQLERRM );
343: END IF;
344:
345: END purge_igs_ps_unit_ofr_pat_all; /* End Of Processing IGS_PS_UNIT_OFR_PAT_ALL records */

Line 342: fnd_file.put_line ( fnd_file.LOG, fnd_message.get || ' : ' || SQLERRM );

338: fnd_file.put_line ( fnd_file.LOG, l_c_message );
339: ELSE
340: fnd_message.set_name ( 'IGS', 'IGS_GE_UNHANDLED_EXP' );
341: fnd_message.set_token ( 'NAME', 'purge_igs_ps_unit_ofr_pat_all' );
342: fnd_file.put_line ( fnd_file.LOG, fnd_message.get || ' : ' || SQLERRM );
343: END IF;
344:
345: END purge_igs_ps_unit_ofr_pat_all; /* End Of Processing IGS_PS_UNIT_OFR_PAT_ALL records */
346:

Line 384: fnd_message.set_name ( 'IGS', 'IGS_GE_UNHANDLED_EXP' );

380:
381:
382: EXCEPTION /* This exception handling is at Module Level */
383: WHEN OTHERS THEN
384: fnd_message.set_name ( 'IGS', 'IGS_GE_UNHANDLED_EXP' );
385: fnd_message.set_token ( 'NAME', 'purge_ps_records' );
386: fnd_file.put_line ( fnd_file.LOG, fnd_message.get || ' : ' || SQLERRM );
387:
388: END purge_ps_records;

Line 385: fnd_message.set_token ( 'NAME', 'purge_ps_records' );

381:
382: EXCEPTION /* This exception handling is at Module Level */
383: WHEN OTHERS THEN
384: fnd_message.set_name ( 'IGS', 'IGS_GE_UNHANDLED_EXP' );
385: fnd_message.set_token ( 'NAME', 'purge_ps_records' );
386: fnd_file.put_line ( fnd_file.LOG, fnd_message.get || ' : ' || SQLERRM );
387:
388: END purge_ps_records;
389:

Line 386: fnd_file.put_line ( fnd_file.LOG, fnd_message.get || ' : ' || SQLERRM );

382: EXCEPTION /* This exception handling is at Module Level */
383: WHEN OTHERS THEN
384: fnd_message.set_name ( 'IGS', 'IGS_GE_UNHANDLED_EXP' );
385: fnd_message.set_token ( 'NAME', 'purge_ps_records' );
386: fnd_file.put_line ( fnd_file.LOG, fnd_message.get || ' : ' || SQLERRM );
387:
388: END purge_ps_records;
389:
390: END igs_ps_purge_del_record;