[Home] [Help]
17: dsridhar 19-JUN-2003 Create Version as part of UC203FD
18: Bug# 2669208
19: dsridhar 16-JUL-2003 Changed cursor cur_uc_defaults, added new cursor, added code to run the process
20: when maximum current cycle and maximum configured cycle are NULL
21: dsridhar 17-JUL-2003 Added code to display message after updating igs_uc_defaults
22: dsridhar 24-JUL-2003 Bug No: 3022067, part of change request for UCAS Application Calendar Mapping.
23: Removed calendar fields from the IGS_UC_CYC_DEFAULTS_PKG procedure calls.
24: jchakrab 20-Sep-2005 Modified for 4616246 - If a record with null current/conf cycle is found in
25: IGS_UC_DEFAULTS and no record exists for the current cycle in IGS_UC_TRANSACTIONS
21: dsridhar 17-JUL-2003 Added code to display message after updating igs_uc_defaults
22: dsridhar 24-JUL-2003 Bug No: 3022067, part of change request for UCAS Application Calendar Mapping.
23: Removed calendar fields from the IGS_UC_CYC_DEFAULTS_PKG procedure calls.
24: jchakrab 20-Sep-2005 Modified for 4616246 - If a record with null current/conf cycle is found in
25: IGS_UC_DEFAULTS and no record exists for the current cycle in IGS_UC_TRANSACTIONS
26: a empty record is inserted into IGS_UC_UCAS_CONTROL to be updated later by user
27: anwest 18-JAN-2006 Bug# 4950285 R12 Disable OSS Mandate
28: ***************************************************************/
29:
26: a empty record is inserted into IGS_UC_UCAS_CONTROL to be updated later by user
27: anwest 18-JAN-2006 Bug# 4950285 R12 Disable OSS Mandate
28: ***************************************************************/
29:
30: -- Cursor to check if any records exist in IGS_UC_DEFAULTS
31: CURSOR cur_uc_defaults IS
32: SELECT 'X'
33: FROM igs_uc_defaults;
34:
29:
30: -- Cursor to check if any records exist in IGS_UC_DEFAULTS
31: CURSOR cur_uc_defaults IS
32: SELECT 'X'
33: FROM igs_uc_defaults;
34:
35: -- Cursor to get the maximum current cycle and maximum configured cycle
36: CURSOR cur_max_cycles IS
37: SELECT MAX(current_cycle) current_cycle, MAX(configured_cycle) configured_cycle
34:
35: -- Cursor to get the maximum current cycle and maximum configured cycle
36: CURSOR cur_max_cycles IS
37: SELECT MAX(current_cycle) current_cycle, MAX(configured_cycle) configured_cycle
38: FROM igs_uc_defaults;
39:
40: -- Cursor to get the any cycles is null
41: -- Modified for 4589994 to exclude SWAS
42: CURSOR cur_null_cycles IS
39:
40: -- Cursor to get the any cycles is null
41: -- Modified for 4589994 to exclude SWAS
42: CURSOR cur_null_cycles IS
43: SELECT 'X' FROM igs_uc_defaults
44: WHERE (current_cycle IS NULL OR configured_cycle IS NULL)
45: AND system_code <> 'S';
46:
47: -- Cursor to obtain the Supported Cycle - 1
52: AND enabled_flag = 'Y'
53: AND NVL(closed_Ind, 'N') = 'N';
54:
55: -- Cursor to obtain the Next Cycle i.e. Supported Cycle + 1
56: CURSOR cur_next_cycle (p_current_cycle igs_uc_defaults.current_cycle%TYPE) IS
57: SELECT TO_NUMBER(lookup_code)
58: FROM igs_lookup_values
59: WHERE lookup_type = 'IGS_UC_SUP_CYCLE'
60: AND TO_NUMBER(lookup_code) = p_current_cycle + 1
62: AND NVL(closed_Ind, 'N') = 'N';
63:
64: -- Cursor to select the Current Cycle details from IGS_UC_CYC_DEFAULTS
65: -- Modified for UC315 - UCAS 2006 Support to exclude SWAS
66: CURSOR cur_uc_cyc_defaults (p_current_cycle igs_uc_defaults.current_cycle%TYPE) IS
67: SELECT ucd.*
68: FROM igs_uc_cyc_defaults ucd
69: WHERE ucas_cycle = p_current_cycle
70: AND ucd.system_code <> 'S';
78: AND ucas_cycle = p_ucas_cycle;
79:
80: -- Cursor to select current cycle details from IGS_UC_UCAS_CONTROL
81: -- Modified for UC315 - UCAS 2006 Support to include FTUG and exclude SWAS
82: CURSOR cur_uc_ucas_control (p_current_cycle igs_uc_defaults.current_cycle%TYPE) IS
83: SELECT uco.rowid, uco.*
84: FROM igs_uc_ucas_control uco
85: WHERE uco.system_code <> 'S'
86: AND ucas_cycle = p_current_cycle;
92: FROM igs_uc_ucas_control ucd
93: WHERE system_code = p_system_code
94: AND ucas_cycle = p_ucas_cycle;
95:
96: -- Cursor to select records from IGS_UC_DEFAULTS
97: -- Modified for UC315 - UCAS 2006 Support to exclude SWAS
98: CURSOR cur_defaults IS
99: SELECT ucd.rowid, ucd.*
100: FROM igs_uc_defaults ucd
96: -- Cursor to select records from IGS_UC_DEFAULTS
97: -- Modified for UC315 - UCAS 2006 Support to exclude SWAS
98: CURSOR cur_defaults IS
99: SELECT ucd.rowid, ucd.*
100: FROM igs_uc_defaults ucd
101: WHERE ucd.system_code <> 'S';
102:
103: l_max_cycles cur_max_cycles%ROWTYPE;
104: l_current_cycle igs_uc_defaults.current_cycle%TYPE;
100: FROM igs_uc_defaults ucd
101: WHERE ucd.system_code <> 'S';
102:
103: l_max_cycles cur_max_cycles%ROWTYPE;
104: l_current_cycle igs_uc_defaults.current_cycle%TYPE;
105: l_sup_cycle igs_uc_defaults.current_cycle%TYPE;
106: l_next_cycle igs_uc_defaults.current_cycle%TYPE;
107: l_rowid VARCHAR2(26);
108: l_exists VARCHAR2(1);
101: WHERE ucd.system_code <> 'S';
102:
103: l_max_cycles cur_max_cycles%ROWTYPE;
104: l_current_cycle igs_uc_defaults.current_cycle%TYPE;
105: l_sup_cycle igs_uc_defaults.current_cycle%TYPE;
106: l_next_cycle igs_uc_defaults.current_cycle%TYPE;
107: l_rowid VARCHAR2(26);
108: l_exists VARCHAR2(1);
109: l_curr_control_exists VARCHAR2(1);
102:
103: l_max_cycles cur_max_cycles%ROWTYPE;
104: l_current_cycle igs_uc_defaults.current_cycle%TYPE;
105: l_sup_cycle igs_uc_defaults.current_cycle%TYPE;
106: l_next_cycle igs_uc_defaults.current_cycle%TYPE;
107: l_rowid VARCHAR2(26);
108: l_exists VARCHAR2(1);
109: l_curr_control_exists VARCHAR2(1);
110: l_null_cycles VARCHAR2(1);
107: l_rowid VARCHAR2(26);
108: l_exists VARCHAR2(1);
109: l_curr_control_exists VARCHAR2(1);
110: l_null_cycles VARCHAR2(1);
111: l_curr_cycle igs_uc_defaults.current_cycle%TYPE;
112: l_conf_cycle igs_uc_defaults.configured_cycle%TYPE;
113: l_appno_first igs_uc_ucas_control.appno_first%TYPE;
114: l_appno_maximum igs_uc_ucas_control.appno_maximum%TYPE;
115:
108: l_exists VARCHAR2(1);
109: l_curr_control_exists VARCHAR2(1);
110: l_null_cycles VARCHAR2(1);
111: l_curr_cycle igs_uc_defaults.current_cycle%TYPE;
112: l_conf_cycle igs_uc_defaults.configured_cycle%TYPE;
113: l_appno_first igs_uc_ucas_control.appno_first%TYPE;
114: l_appno_maximum igs_uc_ucas_control.appno_maximum%TYPE;
115:
116: BEGIN
117:
118: --anwest 18-JAN-2006 Bug# 4950285 R12 Disable OSS Mandate
119: IGS_GE_GEN_003.SET_ORG_ID;
120:
121: -- Check if records exist in IGS_UC_DEFAULTS
122: l_exists := NULL;
123: retcode := 0;
124: OPEN cur_uc_defaults;
125: FETCH cur_uc_defaults INTO l_exists;
153: l_conf_cycle := NVL(l_max_cycles.configured_cycle,l_sup_cycle);
154:
155: FOR rec_cur_defaults IN cur_defaults LOOP
156: IF rec_cur_defaults.current_cycle IS NULL OR rec_cur_defaults.configured_cycle IS NULL THEN
157: igs_uc_defaults_pkg.update_row ( x_rowid => rec_cur_defaults.rowid,
158: x_current_inst_code => rec_cur_defaults.current_inst_code,
159: x_ucas_id_format => rec_cur_defaults.ucas_id_format,
160: x_test_app_no => rec_cur_defaults.test_app_no,
161: x_test_choice_no => rec_cur_defaults.test_choice_no,
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
365: FOR rec_cur_defaults IN cur_defaults
366: LOOP
367: igs_uc_defaults_pkg.update_row ( x_rowid => rec_cur_defaults.rowid,
368: x_current_inst_code => rec_cur_defaults.current_inst_code,
363:
364: -- Update the current_cycle to maximum supported cycle in IGS_UC_DEFAULTS
365: FOR rec_cur_defaults IN cur_defaults
366: LOOP
367: igs_uc_defaults_pkg.update_row ( x_rowid => rec_cur_defaults.rowid,
368: x_current_inst_code => rec_cur_defaults.current_inst_code,
369: x_ucas_id_format => rec_cur_defaults.ucas_id_format,
370: x_test_app_no => rec_cur_defaults.test_app_no,
371: x_test_choice_no => rec_cur_defaults.test_choice_no,