124: OPEN cur_uc_defaults;
125: FETCH cur_uc_defaults INTO l_exists;
126: IF cur_uc_defaults%NOTFOUND THEN
127: CLOSE cur_uc_defaults;
128: fnd_message.set_name('IGS', 'IGS_UC_NO_SYSTEM_CONFIG');
129: fnd_file.put_line(fnd_file.log, fnd_message.get);
130: retcode := 2;
131: RETURN;
132: END IF;
125: FETCH cur_uc_defaults INTO l_exists;
126: IF cur_uc_defaults%NOTFOUND THEN
127: CLOSE cur_uc_defaults;
128: fnd_message.set_name('IGS', 'IGS_UC_NO_SYSTEM_CONFIG');
129: fnd_file.put_line(fnd_file.log, fnd_message.get);
130: retcode := 2;
131: RETURN;
132: END IF;
133: CLOSE cur_uc_defaults;
177: x_configured_cycle => l_conf_cycle,
178: x_prev_inst_left_date => rec_cur_defaults.prev_inst_left_date
179: );
180:
181: fnd_message.set_name('IGS', 'IGS_UC_CRNT_CYCLE_UPDTD');
182: fnd_message.set_token('SYSTEM_CODE', rec_cur_defaults.system_code);
183: fnd_message.set_token('CRNT_CYCLE', l_curr_cycle);
184: fnd_file.put_line(fnd_file.log, fnd_message.get);
185:
178: x_prev_inst_left_date => rec_cur_defaults.prev_inst_left_date
179: );
180:
181: fnd_message.set_name('IGS', 'IGS_UC_CRNT_CYCLE_UPDTD');
182: fnd_message.set_token('SYSTEM_CODE', rec_cur_defaults.system_code);
183: fnd_message.set_token('CRNT_CYCLE', l_curr_cycle);
184: fnd_file.put_line(fnd_file.log, fnd_message.get);
185:
186: --jchakrab - Modified for 4616246
179: );
180:
181: fnd_message.set_name('IGS', 'IGS_UC_CRNT_CYCLE_UPDTD');
182: fnd_message.set_token('SYSTEM_CODE', rec_cur_defaults.system_code);
183: fnd_message.set_token('CRNT_CYCLE', l_curr_cycle);
184: fnd_file.put_line(fnd_file.log, fnd_message.get);
185:
186: --jchakrab - Modified for 4616246
187: --Create a record in the IGS_UC_UCAS_CONTROL table if no record exists for l_curr_cycle
180:
181: fnd_message.set_name('IGS', 'IGS_UC_CRNT_CYCLE_UPDTD');
182: fnd_message.set_token('SYSTEM_CODE', rec_cur_defaults.system_code);
183: fnd_message.set_token('CRNT_CYCLE', l_curr_cycle);
184: fnd_file.put_line(fnd_file.log, fnd_message.get);
185:
186: --jchakrab - Modified for 4616246
187: --Create a record in the IGS_UC_UCAS_CONTROL table if no record exists for l_curr_cycle
188: l_curr_control_exists := NULL;
244: x_gttr_clear_toy_code => NULL,
245: x_transaction_toy_code => 'S'
246: );
247:
248: fnd_message.set_name('IGS', 'IGS_UC_REC_INSRT');
249: fnd_message.set_token('SYSTEM_CODE', rec_cur_defaults.system_code);
250: fnd_message.set_token('TNAME', 'IGS_UC_UCAS_CONTROL');
251: fnd_file.put_line(fnd_file.log, fnd_message.get);
252: END IF;
245: x_transaction_toy_code => 'S'
246: );
247:
248: fnd_message.set_name('IGS', 'IGS_UC_REC_INSRT');
249: fnd_message.set_token('SYSTEM_CODE', rec_cur_defaults.system_code);
250: fnd_message.set_token('TNAME', 'IGS_UC_UCAS_CONTROL');
251: fnd_file.put_line(fnd_file.log, fnd_message.get);
252: END IF;
253:
246: );
247:
248: fnd_message.set_name('IGS', 'IGS_UC_REC_INSRT');
249: fnd_message.set_token('SYSTEM_CODE', rec_cur_defaults.system_code);
250: fnd_message.set_token('TNAME', 'IGS_UC_UCAS_CONTROL');
251: fnd_file.put_line(fnd_file.log, fnd_message.get);
252: END IF;
253:
254: END IF;
247:
248: fnd_message.set_name('IGS', 'IGS_UC_REC_INSRT');
249: fnd_message.set_token('SYSTEM_CODE', rec_cur_defaults.system_code);
250: fnd_message.set_token('TNAME', 'IGS_UC_UCAS_CONTROL');
251: fnd_file.put_line(fnd_file.log, fnd_message.get);
252: END IF;
253:
254: END IF;
255: END LOOP;
271: FETCH cur_next_cycle INTO l_next_cycle;
272: -- If Current Cycle = Maximum of Supported Cycle
273: IF cur_next_cycle%NOTFOUND THEN
274: CLOSE cur_next_cycle;
275: fnd_message.set_name('IGS', 'IGS_UC_ALRDY_MAX_CYCLE');
276: fnd_file.put_line(fnd_file.log, fnd_message.get);
277: retcode := 2 ;
278: RETURN;
279: END IF;
272: -- If Current Cycle = Maximum of Supported Cycle
273: IF cur_next_cycle%NOTFOUND THEN
274: CLOSE cur_next_cycle;
275: fnd_message.set_name('IGS', 'IGS_UC_ALRDY_MAX_CYCLE');
276: fnd_file.put_line(fnd_file.log, fnd_message.get);
277: retcode := 2 ;
278: RETURN;
279: END IF;
280: CLOSE cur_next_cycle;
301: x_CVNAME_FLAG => rec_uc_cyc_defaults.cvname_flag,
302: x_MODE => 'R'
303: );
304:
305: fnd_message.set_name('IGS', 'IGS_UC_REC_INSRT');
306: fnd_message.set_token('TNAME', 'IGS_UC_CYC_DEFAULTS');
307: fnd_message.set_token('SYSTEM_CODE', rec_uc_cyc_defaults.system_code);
308: fnd_file.put_line(fnd_file.log, fnd_message.get);
309: END IF;
302: x_MODE => 'R'
303: );
304:
305: fnd_message.set_name('IGS', 'IGS_UC_REC_INSRT');
306: fnd_message.set_token('TNAME', 'IGS_UC_CYC_DEFAULTS');
307: fnd_message.set_token('SYSTEM_CODE', rec_uc_cyc_defaults.system_code);
308: fnd_file.put_line(fnd_file.log, fnd_message.get);
309: END IF;
310:
303: );
304:
305: fnd_message.set_name('IGS', 'IGS_UC_REC_INSRT');
306: fnd_message.set_token('TNAME', 'IGS_UC_CYC_DEFAULTS');
307: fnd_message.set_token('SYSTEM_CODE', rec_uc_cyc_defaults.system_code);
308: fnd_file.put_line(fnd_file.log, fnd_message.get);
309: END IF;
310:
311: END LOOP;
304:
305: fnd_message.set_name('IGS', 'IGS_UC_REC_INSRT');
306: fnd_message.set_token('TNAME', 'IGS_UC_CYC_DEFAULTS');
307: fnd_message.set_token('SYSTEM_CODE', rec_uc_cyc_defaults.system_code);
308: fnd_file.put_line(fnd_file.log, fnd_message.get);
309: END IF;
310:
311: END LOOP;
312:
353: x_gttr_clear_toy_code => NULL,
354: x_transaction_toy_code => 'S'
355: );
356:
357: fnd_message.set_name('IGS', 'IGS_UC_REC_INSRT');
358: fnd_message.set_token('SYSTEM_CODE', rec_cur_uc_ucas_control.system_code);
359: fnd_message.set_token('TNAME', 'IGS_UC_UCAS_CONTROL');
360: fnd_file.put_line(fnd_file.log, fnd_message.get);
361: END IF;
354: x_transaction_toy_code => 'S'
355: );
356:
357: fnd_message.set_name('IGS', 'IGS_UC_REC_INSRT');
358: fnd_message.set_token('SYSTEM_CODE', rec_cur_uc_ucas_control.system_code);
359: fnd_message.set_token('TNAME', 'IGS_UC_UCAS_CONTROL');
360: fnd_file.put_line(fnd_file.log, fnd_message.get);
361: END IF;
362: END LOOP;
355: );
356:
357: fnd_message.set_name('IGS', 'IGS_UC_REC_INSRT');
358: fnd_message.set_token('SYSTEM_CODE', rec_cur_uc_ucas_control.system_code);
359: fnd_message.set_token('TNAME', 'IGS_UC_UCAS_CONTROL');
360: fnd_file.put_line(fnd_file.log, fnd_message.get);
361: END IF;
362: END LOOP;
363:
356:
357: fnd_message.set_name('IGS', 'IGS_UC_REC_INSRT');
358: fnd_message.set_token('SYSTEM_CODE', rec_cur_uc_ucas_control.system_code);
359: fnd_message.set_token('TNAME', 'IGS_UC_UCAS_CONTROL');
360: fnd_file.put_line(fnd_file.log, fnd_message.get);
361: END IF;
362: END LOOP;
363:
364: -- Update the current_cycle to maximum supported cycle in IGS_UC_DEFAULTS
387: x_configured_cycle => rec_cur_defaults.configured_cycle,
388: x_prev_inst_left_date => rec_cur_defaults.prev_inst_left_date
389: );
390:
391: fnd_message.set_name('IGS', 'IGS_UC_CRNT_CYCLE_UPDTD');
392: fnd_message.set_token('SYSTEM_CODE', rec_cur_defaults.system_code);
393: fnd_message.set_token('CRNT_CYCLE', l_next_cycle);
394: fnd_file.put_line(fnd_file.log, fnd_message.get);
395: END LOOP;
388: x_prev_inst_left_date => rec_cur_defaults.prev_inst_left_date
389: );
390:
391: fnd_message.set_name('IGS', 'IGS_UC_CRNT_CYCLE_UPDTD');
392: fnd_message.set_token('SYSTEM_CODE', rec_cur_defaults.system_code);
393: fnd_message.set_token('CRNT_CYCLE', l_next_cycle);
394: fnd_file.put_line(fnd_file.log, fnd_message.get);
395: END LOOP;
396:
389: );
390:
391: fnd_message.set_name('IGS', 'IGS_UC_CRNT_CYCLE_UPDTD');
392: fnd_message.set_token('SYSTEM_CODE', rec_cur_defaults.system_code);
393: fnd_message.set_token('CRNT_CYCLE', l_next_cycle);
394: fnd_file.put_line(fnd_file.log, fnd_message.get);
395: END LOOP;
396:
397: END IF;
390:
391: fnd_message.set_name('IGS', 'IGS_UC_CRNT_CYCLE_UPDTD');
392: fnd_message.set_token('SYSTEM_CODE', rec_cur_defaults.system_code);
393: fnd_message.set_token('CRNT_CYCLE', l_next_cycle);
394: fnd_file.put_line(fnd_file.log, fnd_message.get);
395: END LOOP;
396:
397: END IF;
398:
399: EXCEPTION
400: WHEN OTHERS THEN
401: ROLLBACK;
402:
403: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
404: fnd_message.set_token('NAME','IGS_UC_START_NEW_CYCLE.START_NEW_CYCLE');
405: fnd_file.put_line(fnd_file.log, fnd_message.get);
406: fnd_file.put_line(fnd_file.log, sqlerrm);
407: errbuf := fnd_message.get ;
400: WHEN OTHERS THEN
401: ROLLBACK;
402:
403: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
404: fnd_message.set_token('NAME','IGS_UC_START_NEW_CYCLE.START_NEW_CYCLE');
405: fnd_file.put_line(fnd_file.log, fnd_message.get);
406: fnd_file.put_line(fnd_file.log, sqlerrm);
407: errbuf := fnd_message.get ;
408: retcode := 2;
401: ROLLBACK;
402:
403: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
404: fnd_message.set_token('NAME','IGS_UC_START_NEW_CYCLE.START_NEW_CYCLE');
405: fnd_file.put_line(fnd_file.log, fnd_message.get);
406: fnd_file.put_line(fnd_file.log, sqlerrm);
407: errbuf := fnd_message.get ;
408: retcode := 2;
409: igs_ge_msg_stack.conc_exception_hndl;
403: fnd_message.set_name('IGS','IGS_GE_UNHANDLED_EXP');
404: fnd_message.set_token('NAME','IGS_UC_START_NEW_CYCLE.START_NEW_CYCLE');
405: fnd_file.put_line(fnd_file.log, fnd_message.get);
406: fnd_file.put_line(fnd_file.log, sqlerrm);
407: errbuf := fnd_message.get ;
408: retcode := 2;
409: igs_ge_msg_stack.conc_exception_hndl;
410:
411: END start_new_cycle;