79: p_unit_class IN VARCHAR2 )
80: RETURN NUMBER AS
81: BEGIN
82: DECLARE
83: v_uoo_id igs_ps_unit_ofr_opt.uoo_id%TYPE;
84: -- this cursor used when primary key is passed
85: CURSOR c_uoo IS
86: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
87: FROM IGS_PS_UNIT_OFR_OPT
82: DECLARE
83: v_uoo_id igs_ps_unit_ofr_opt.uoo_id%TYPE;
84: -- this cursor used when primary key is passed
85: CURSOR c_uoo IS
86: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
87: FROM IGS_PS_UNIT_OFR_OPT
88: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = p_unit_cd AND
89: IGS_PS_UNIT_OFR_OPT.version_number = p_version_number AND
90: IGS_PS_UNIT_OFR_OPT.cal_type = p_cal_type AND
83: v_uoo_id igs_ps_unit_ofr_opt.uoo_id%TYPE;
84: -- this cursor used when primary key is passed
85: CURSOR c_uoo IS
86: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
87: FROM IGS_PS_UNIT_OFR_OPT
88: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = p_unit_cd AND
89: IGS_PS_UNIT_OFR_OPT.version_number = p_version_number AND
90: IGS_PS_UNIT_OFR_OPT.cal_type = p_cal_type AND
91: IGS_PS_UNIT_OFR_OPT.ci_sequence_number = p_ci_sequence_number AND
84: -- this cursor used when primary key is passed
85: CURSOR c_uoo IS
86: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
87: FROM IGS_PS_UNIT_OFR_OPT
88: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = p_unit_cd AND
89: IGS_PS_UNIT_OFR_OPT.version_number = p_version_number AND
90: IGS_PS_UNIT_OFR_OPT.cal_type = p_cal_type AND
91: IGS_PS_UNIT_OFR_OPT.ci_sequence_number = p_ci_sequence_number AND
92: IGS_PS_UNIT_OFR_OPT.location_cd = p_location_cd AND
85: CURSOR c_uoo IS
86: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
87: FROM IGS_PS_UNIT_OFR_OPT
88: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = p_unit_cd AND
89: IGS_PS_UNIT_OFR_OPT.version_number = p_version_number AND
90: IGS_PS_UNIT_OFR_OPT.cal_type = p_cal_type AND
91: IGS_PS_UNIT_OFR_OPT.ci_sequence_number = p_ci_sequence_number AND
92: IGS_PS_UNIT_OFR_OPT.location_cd = p_location_cd AND
93: IGS_PS_UNIT_OFR_OPT.unit_class = p_unit_class;
86: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
87: FROM IGS_PS_UNIT_OFR_OPT
88: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = p_unit_cd AND
89: IGS_PS_UNIT_OFR_OPT.version_number = p_version_number AND
90: IGS_PS_UNIT_OFR_OPT.cal_type = p_cal_type AND
91: IGS_PS_UNIT_OFR_OPT.ci_sequence_number = p_ci_sequence_number AND
92: IGS_PS_UNIT_OFR_OPT.location_cd = p_location_cd AND
93: IGS_PS_UNIT_OFR_OPT.unit_class = p_unit_class;
94: BEGIN
87: FROM IGS_PS_UNIT_OFR_OPT
88: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = p_unit_cd AND
89: IGS_PS_UNIT_OFR_OPT.version_number = p_version_number AND
90: IGS_PS_UNIT_OFR_OPT.cal_type = p_cal_type AND
91: IGS_PS_UNIT_OFR_OPT.ci_sequence_number = p_ci_sequence_number AND
92: IGS_PS_UNIT_OFR_OPT.location_cd = p_location_cd AND
93: IGS_PS_UNIT_OFR_OPT.unit_class = p_unit_class;
94: BEGIN
95: -- This module returns the IGS_PS_UNIT offering option ID for the specified
88: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = p_unit_cd AND
89: IGS_PS_UNIT_OFR_OPT.version_number = p_version_number AND
90: IGS_PS_UNIT_OFR_OPT.cal_type = p_cal_type AND
91: IGS_PS_UNIT_OFR_OPT.ci_sequence_number = p_ci_sequence_number AND
92: IGS_PS_UNIT_OFR_OPT.location_cd = p_location_cd AND
93: IGS_PS_UNIT_OFR_OPT.unit_class = p_unit_class;
94: BEGIN
95: -- This module returns the IGS_PS_UNIT offering option ID for the specified
96: -- IGS_PS_UNIT offering option.
89: IGS_PS_UNIT_OFR_OPT.version_number = p_version_number AND
90: IGS_PS_UNIT_OFR_OPT.cal_type = p_cal_type AND
91: IGS_PS_UNIT_OFR_OPT.ci_sequence_number = p_ci_sequence_number AND
92: IGS_PS_UNIT_OFR_OPT.location_cd = p_location_cd AND
93: IGS_PS_UNIT_OFR_OPT.unit_class = p_unit_class;
94: BEGIN
95: -- This module returns the IGS_PS_UNIT offering option ID for the specified
96: -- IGS_PS_UNIT offering option.
97: OPEN c_uoo;
116: AS
117: BEGIN
118: DECLARE
119: lv_param_values VARCHAR2(1080);
120: gv_unit_offering_option_rec IGS_PS_UNIT_OFR_OPT%ROWTYPE;
121: -- this cursor used when primary key is passed
122: CURSOR c_unit_offering_option_prim(
123: cp_unit_cd IGS_PS_UNIT_OFR_OPT.unit_cd%TYPE,
124: cp_version_number IGS_PS_UNIT_OFR_OPT.version_number%TYPE,
119: lv_param_values VARCHAR2(1080);
120: gv_unit_offering_option_rec IGS_PS_UNIT_OFR_OPT%ROWTYPE;
121: -- this cursor used when primary key is passed
122: CURSOR c_unit_offering_option_prim(
123: cp_unit_cd IGS_PS_UNIT_OFR_OPT.unit_cd%TYPE,
124: cp_version_number IGS_PS_UNIT_OFR_OPT.version_number%TYPE,
125: cp_cal_type IGS_PS_UNIT_OFR_OPT.cal_type%TYPE,
126: cp_ci_sequence_number IGS_PS_UNIT_OFR_OPT.ci_sequence_number%TYPE,
127: cp_location_cd IGS_PS_UNIT_OFR_OPT.location_cd%TYPE,
120: gv_unit_offering_option_rec IGS_PS_UNIT_OFR_OPT%ROWTYPE;
121: -- this cursor used when primary key is passed
122: CURSOR c_unit_offering_option_prim(
123: cp_unit_cd IGS_PS_UNIT_OFR_OPT.unit_cd%TYPE,
124: cp_version_number IGS_PS_UNIT_OFR_OPT.version_number%TYPE,
125: cp_cal_type IGS_PS_UNIT_OFR_OPT.cal_type%TYPE,
126: cp_ci_sequence_number IGS_PS_UNIT_OFR_OPT.ci_sequence_number%TYPE,
127: cp_location_cd IGS_PS_UNIT_OFR_OPT.location_cd%TYPE,
128: cp_unit_class IGS_PS_UNIT_OFR_OPT.unit_class%TYPE) IS
121: -- this cursor used when primary key is passed
122: CURSOR c_unit_offering_option_prim(
123: cp_unit_cd IGS_PS_UNIT_OFR_OPT.unit_cd%TYPE,
124: cp_version_number IGS_PS_UNIT_OFR_OPT.version_number%TYPE,
125: cp_cal_type IGS_PS_UNIT_OFR_OPT.cal_type%TYPE,
126: cp_ci_sequence_number IGS_PS_UNIT_OFR_OPT.ci_sequence_number%TYPE,
127: cp_location_cd IGS_PS_UNIT_OFR_OPT.location_cd%TYPE,
128: cp_unit_class IGS_PS_UNIT_OFR_OPT.unit_class%TYPE) IS
129: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
122: CURSOR c_unit_offering_option_prim(
123: cp_unit_cd IGS_PS_UNIT_OFR_OPT.unit_cd%TYPE,
124: cp_version_number IGS_PS_UNIT_OFR_OPT.version_number%TYPE,
125: cp_cal_type IGS_PS_UNIT_OFR_OPT.cal_type%TYPE,
126: cp_ci_sequence_number IGS_PS_UNIT_OFR_OPT.ci_sequence_number%TYPE,
127: cp_location_cd IGS_PS_UNIT_OFR_OPT.location_cd%TYPE,
128: cp_unit_class IGS_PS_UNIT_OFR_OPT.unit_class%TYPE) IS
129: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
130: FROM IGS_PS_UNIT_OFR_OPT
123: cp_unit_cd IGS_PS_UNIT_OFR_OPT.unit_cd%TYPE,
124: cp_version_number IGS_PS_UNIT_OFR_OPT.version_number%TYPE,
125: cp_cal_type IGS_PS_UNIT_OFR_OPT.cal_type%TYPE,
126: cp_ci_sequence_number IGS_PS_UNIT_OFR_OPT.ci_sequence_number%TYPE,
127: cp_location_cd IGS_PS_UNIT_OFR_OPT.location_cd%TYPE,
128: cp_unit_class IGS_PS_UNIT_OFR_OPT.unit_class%TYPE) IS
129: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
130: FROM IGS_PS_UNIT_OFR_OPT
131: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = cp_unit_cd AND
124: cp_version_number IGS_PS_UNIT_OFR_OPT.version_number%TYPE,
125: cp_cal_type IGS_PS_UNIT_OFR_OPT.cal_type%TYPE,
126: cp_ci_sequence_number IGS_PS_UNIT_OFR_OPT.ci_sequence_number%TYPE,
127: cp_location_cd IGS_PS_UNIT_OFR_OPT.location_cd%TYPE,
128: cp_unit_class IGS_PS_UNIT_OFR_OPT.unit_class%TYPE) IS
129: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
130: FROM IGS_PS_UNIT_OFR_OPT
131: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = cp_unit_cd AND
132: IGS_PS_UNIT_OFR_OPT.version_number = cp_version_number AND
125: cp_cal_type IGS_PS_UNIT_OFR_OPT.cal_type%TYPE,
126: cp_ci_sequence_number IGS_PS_UNIT_OFR_OPT.ci_sequence_number%TYPE,
127: cp_location_cd IGS_PS_UNIT_OFR_OPT.location_cd%TYPE,
128: cp_unit_class IGS_PS_UNIT_OFR_OPT.unit_class%TYPE) IS
129: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
130: FROM IGS_PS_UNIT_OFR_OPT
131: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = cp_unit_cd AND
132: IGS_PS_UNIT_OFR_OPT.version_number = cp_version_number AND
133: IGS_PS_UNIT_OFR_OPT.cal_type= cp_cal_type AND
126: cp_ci_sequence_number IGS_PS_UNIT_OFR_OPT.ci_sequence_number%TYPE,
127: cp_location_cd IGS_PS_UNIT_OFR_OPT.location_cd%TYPE,
128: cp_unit_class IGS_PS_UNIT_OFR_OPT.unit_class%TYPE) IS
129: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
130: FROM IGS_PS_UNIT_OFR_OPT
131: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = cp_unit_cd AND
132: IGS_PS_UNIT_OFR_OPT.version_number = cp_version_number AND
133: IGS_PS_UNIT_OFR_OPT.cal_type= cp_cal_type AND
134: IGS_PS_UNIT_OFR_OPT.ci_sequence_number = cp_ci_sequence_number AND
127: cp_location_cd IGS_PS_UNIT_OFR_OPT.location_cd%TYPE,
128: cp_unit_class IGS_PS_UNIT_OFR_OPT.unit_class%TYPE) IS
129: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
130: FROM IGS_PS_UNIT_OFR_OPT
131: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = cp_unit_cd AND
132: IGS_PS_UNIT_OFR_OPT.version_number = cp_version_number AND
133: IGS_PS_UNIT_OFR_OPT.cal_type= cp_cal_type AND
134: IGS_PS_UNIT_OFR_OPT.ci_sequence_number = cp_ci_sequence_number AND
135: IGS_PS_UNIT_OFR_OPT.location_cd = cp_location_cd AND
128: cp_unit_class IGS_PS_UNIT_OFR_OPT.unit_class%TYPE) IS
129: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
130: FROM IGS_PS_UNIT_OFR_OPT
131: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = cp_unit_cd AND
132: IGS_PS_UNIT_OFR_OPT.version_number = cp_version_number AND
133: IGS_PS_UNIT_OFR_OPT.cal_type= cp_cal_type AND
134: IGS_PS_UNIT_OFR_OPT.ci_sequence_number = cp_ci_sequence_number AND
135: IGS_PS_UNIT_OFR_OPT.location_cd = cp_location_cd AND
136: IGS_PS_UNIT_OFR_OPT.unit_class = cp_unit_class;
129: SELECT IGS_PS_UNIT_OFR_OPT.uoo_id
130: FROM IGS_PS_UNIT_OFR_OPT
131: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = cp_unit_cd AND
132: IGS_PS_UNIT_OFR_OPT.version_number = cp_version_number AND
133: IGS_PS_UNIT_OFR_OPT.cal_type= cp_cal_type AND
134: IGS_PS_UNIT_OFR_OPT.ci_sequence_number = cp_ci_sequence_number AND
135: IGS_PS_UNIT_OFR_OPT.location_cd = cp_location_cd AND
136: IGS_PS_UNIT_OFR_OPT.unit_class = cp_unit_class;
137: -- this cursor is used when unique key is passed
130: FROM IGS_PS_UNIT_OFR_OPT
131: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = cp_unit_cd AND
132: IGS_PS_UNIT_OFR_OPT.version_number = cp_version_number AND
133: IGS_PS_UNIT_OFR_OPT.cal_type= cp_cal_type AND
134: IGS_PS_UNIT_OFR_OPT.ci_sequence_number = cp_ci_sequence_number AND
135: IGS_PS_UNIT_OFR_OPT.location_cd = cp_location_cd AND
136: IGS_PS_UNIT_OFR_OPT.unit_class = cp_unit_class;
137: -- this cursor is used when unique key is passed
138: CURSOR c_unit_offering_option_uniq(
131: WHERE IGS_PS_UNIT_OFR_OPT.unit_cd = cp_unit_cd AND
132: IGS_PS_UNIT_OFR_OPT.version_number = cp_version_number AND
133: IGS_PS_UNIT_OFR_OPT.cal_type= cp_cal_type AND
134: IGS_PS_UNIT_OFR_OPT.ci_sequence_number = cp_ci_sequence_number AND
135: IGS_PS_UNIT_OFR_OPT.location_cd = cp_location_cd AND
136: IGS_PS_UNIT_OFR_OPT.unit_class = cp_unit_class;
137: -- this cursor is used when unique key is passed
138: CURSOR c_unit_offering_option_uniq(
139: cp_uoo_id IGS_PS_UNIT_OFR_OPT.uoo_id%TYPE) IS
132: IGS_PS_UNIT_OFR_OPT.version_number = cp_version_number AND
133: IGS_PS_UNIT_OFR_OPT.cal_type= cp_cal_type AND
134: IGS_PS_UNIT_OFR_OPT.ci_sequence_number = cp_ci_sequence_number AND
135: IGS_PS_UNIT_OFR_OPT.location_cd = cp_location_cd AND
136: IGS_PS_UNIT_OFR_OPT.unit_class = cp_unit_class;
137: -- this cursor is used when unique key is passed
138: CURSOR c_unit_offering_option_uniq(
139: cp_uoo_id IGS_PS_UNIT_OFR_OPT.uoo_id%TYPE) IS
140: SELECT *
135: IGS_PS_UNIT_OFR_OPT.location_cd = cp_location_cd AND
136: IGS_PS_UNIT_OFR_OPT.unit_class = cp_unit_class;
137: -- this cursor is used when unique key is passed
138: CURSOR c_unit_offering_option_uniq(
139: cp_uoo_id IGS_PS_UNIT_OFR_OPT.uoo_id%TYPE) IS
140: SELECT *
141: FROM IGS_PS_UNIT_OFR_OPT
142: WHERE IGS_PS_UNIT_OFR_OPT.uoo_id = cp_uoo_id;
143: BEGIN
137: -- this cursor is used when unique key is passed
138: CURSOR c_unit_offering_option_uniq(
139: cp_uoo_id IGS_PS_UNIT_OFR_OPT.uoo_id%TYPE) IS
140: SELECT *
141: FROM IGS_PS_UNIT_OFR_OPT
142: WHERE IGS_PS_UNIT_OFR_OPT.uoo_id = cp_uoo_id;
143: BEGIN
144: -- This module returns IGS_PS_UNIT_OFR_OPT primary key
145: -- or unique key depending on the parameters
138: CURSOR c_unit_offering_option_uniq(
139: cp_uoo_id IGS_PS_UNIT_OFR_OPT.uoo_id%TYPE) IS
140: SELECT *
141: FROM IGS_PS_UNIT_OFR_OPT
142: WHERE IGS_PS_UNIT_OFR_OPT.uoo_id = cp_uoo_id;
143: BEGIN
144: -- This module returns IGS_PS_UNIT_OFR_OPT primary key
145: -- or unique key depending on the parameters
146: IF (p_unit_cd IS NOT NULL) THEN
140: SELECT *
141: FROM IGS_PS_UNIT_OFR_OPT
142: WHERE IGS_PS_UNIT_OFR_OPT.uoo_id = cp_uoo_id;
143: BEGIN
144: -- This module returns IGS_PS_UNIT_OFR_OPT primary key
145: -- or unique key depending on the parameters
146: IF (p_unit_cd IS NOT NULL) THEN
147: OPEN c_unit_offering_option_prim(p_unit_cd,
148: p_version_number,
297: p_source_sequence_number igs_ca_inst.sequence_number%type;
298: p_dest_cal_type igs_ca_inst.cal_type%type;
299: p_dest_sequence_number igs_ca_inst.sequence_number%type;
300: gv_check VARCHAR2(1);
301: gv_uoo_rec igs_ps_unit_ofr_opt%ROWTYPE;
302: gv_cal_instance_rec igs_ca_inst%ROWTYPE;
303: gv_start_dt igs_ca_inst.start_dt%TYPE;
304: gv_end_dt igs_ca_inst.end_dt%TYPE;
305: gv_uv_rec igs_ps_unit_ver%ROWTYPE;
341: uop.ci_end_dt,
342: uop.waitlist_allowed,
343: uop.max_students_per_waitlist,
344: uop.delete_flag
345: FROM igs_ps_unit_ofr_pat uop,
346: igs_ps_unit_ver uv
347: WHERE uop.cal_type = p_source_cal_type
348: AND uop.ci_sequence_number = p_source_sequence_number
349: AND uv.unit_cd = uop.unit_cd
352: AND uv.owner_org_unit_cd = NVL(p_org_unit,uv.owner_org_unit_cd)
353: AND uop.delete_flag = 'N';
354: gv_uop_rec gc_unit_offering_pattern%ROWTYPE;
355:
356: CURSOR gc_check_dest_uo_exists(cp_unit_cd igs_ps_unit_ofr.unit_cd%TYPE,
357: cp_version_number igs_ps_unit_ofr.version_number%TYPE,
358: cp_dest_cal_type igs_ps_unit_ofr.cal_type%TYPE) IS
359: SELECT 'x' FROM igs_ps_unit_ofr
360: WHERE unit_cd = cp_unit_cd
353: AND uop.delete_flag = 'N';
354: gv_uop_rec gc_unit_offering_pattern%ROWTYPE;
355:
356: CURSOR gc_check_dest_uo_exists(cp_unit_cd igs_ps_unit_ofr.unit_cd%TYPE,
357: cp_version_number igs_ps_unit_ofr.version_number%TYPE,
358: cp_dest_cal_type igs_ps_unit_ofr.cal_type%TYPE) IS
359: SELECT 'x' FROM igs_ps_unit_ofr
360: WHERE unit_cd = cp_unit_cd
361: AND version_number = cp_version_number
354: gv_uop_rec gc_unit_offering_pattern%ROWTYPE;
355:
356: CURSOR gc_check_dest_uo_exists(cp_unit_cd igs_ps_unit_ofr.unit_cd%TYPE,
357: cp_version_number igs_ps_unit_ofr.version_number%TYPE,
358: cp_dest_cal_type igs_ps_unit_ofr.cal_type%TYPE) IS
359: SELECT 'x' FROM igs_ps_unit_ofr
360: WHERE unit_cd = cp_unit_cd
361: AND version_number = cp_version_number
362: AND cal_type = cp_dest_cal_type;
355:
356: CURSOR gc_check_dest_uo_exists(cp_unit_cd igs_ps_unit_ofr.unit_cd%TYPE,
357: cp_version_number igs_ps_unit_ofr.version_number%TYPE,
358: cp_dest_cal_type igs_ps_unit_ofr.cal_type%TYPE) IS
359: SELECT 'x' FROM igs_ps_unit_ofr
360: WHERE unit_cd = cp_unit_cd
361: AND version_number = cp_version_number
362: AND cal_type = cp_dest_cal_type;
363: gv_uo_rec gc_check_dest_uo_exists%ROWTYPE;
361: AND version_number = cp_version_number
362: AND cal_type = cp_dest_cal_type;
363: gv_uo_rec gc_check_dest_uo_exists%ROWTYPE;
364:
365: CURSOR gc_check_uop_exists (cp_unit_cd igs_ps_unit_ofr_pat.unit_cd%TYPE,
366: cp_version_number igs_ps_unit_ofr_pat.version_number%TYPE) IS
367: SELECT 'x'
368: FROM igs_ps_unit_ofr_pat
369: WHERE unit_cd = cp_unit_cd
362: AND cal_type = cp_dest_cal_type;
363: gv_uo_rec gc_check_dest_uo_exists%ROWTYPE;
364:
365: CURSOR gc_check_uop_exists (cp_unit_cd igs_ps_unit_ofr_pat.unit_cd%TYPE,
366: cp_version_number igs_ps_unit_ofr_pat.version_number%TYPE) IS
367: SELECT 'x'
368: FROM igs_ps_unit_ofr_pat
369: WHERE unit_cd = cp_unit_cd
370: AND version_number = cp_version_number
364:
365: CURSOR gc_check_uop_exists (cp_unit_cd igs_ps_unit_ofr_pat.unit_cd%TYPE,
366: cp_version_number igs_ps_unit_ofr_pat.version_number%TYPE) IS
367: SELECT 'x'
368: FROM igs_ps_unit_ofr_pat
369: WHERE unit_cd = cp_unit_cd
370: AND version_number = cp_version_number
371: AND cal_type = p_dest_cal_type
372: AND ci_sequence_number = p_dest_sequence_number
496: igs_ge_gen_003.genp_ins_log ('USEC-ROLL' ,
497: ' ',
498: lv_out_date );
499:
500: -- selecting IGS_PS_UNIT_OFR_PAT records from IGS_PS_UNIT_OFR_PAT and IGS_PS_UNIT_VER
501: OPEN gc_unit_offering_pattern;
502: LOOP
503: FETCH gc_unit_offering_pattern INTO gv_uop_rec;
504: EXIT WHEN gc_unit_offering_pattern%NOTFOUND;
523: gv_uop_rec.version_number,
524: gv_message) = TRUE) THEN
525:
526: -- Check if the Destination Calender Type for this Unit_cd and Version number exists
527: -- in IGS_PS_UNIT_OFR
528: OPEN gc_check_dest_uo_exists(gv_uop_rec.unit_cd,
529: gv_uop_rec.version_number,
530: p_dest_cal_type);
531: FETCH gc_check_dest_uo_exists INTO gv_uo_rec;
539: gv_uop_rec.version_number);
540: FETCH gc_check_uop_exists INTO gv_check;
541: IF (gc_check_uop_exists%NOTFOUND) THEN
542:
543: igs_ps_unit_ofr_pat_pkg.Insert_Row(
544: x_rowid => x_rowid,
545: x_unit_cd => gv_uop_rec.unit_cd,
546: x_version_number => gv_uop_rec.version_number,
547: x_ci_sequence_number => p_dest_sequence_number,
566: END IF;
567: CLOSE gc_check_uop_exists;
568:
569: --Enhancement bug no 1800179
570: -- insert IGS_PS_UNIT_OFR_OPT and IGS_AS_UNITASS_ITEM records for
571: -- the IGS_PS_UNIT_OFR_PAT record
572: IF (igs_ps_gen_008.crsp_ins_uop_uoo( gv_uop_rec.unit_cd,
573: gv_uop_rec.version_number,
574: p_dest_cal_type,
567: CLOSE gc_check_uop_exists;
568:
569: --Enhancement bug no 1800179
570: -- insert IGS_PS_UNIT_OFR_OPT and IGS_AS_UNITASS_ITEM records for
571: -- the IGS_PS_UNIT_OFR_PAT record
572: IF (igs_ps_gen_008.crsp_ins_uop_uoo( gv_uop_rec.unit_cd,
573: gv_uop_rec.version_number,
574: p_dest_cal_type,
575: p_source_sequence_number,
681: v_total_all_uoo_uai_inserted := TRUE;
682: END IF;
683:
684: -- set uop indicate flag
685: -- if no IGS_PS_UNIT_OFR_PAT records were inserted
686: IF (gv_rec_inserted_cnt = 0) THEN
687: v_none_uop_recs_inserted := TRUE;
688: -- if all IGS_PS_UNIT_OFR_PAT records were inserted
689: ELSIF (gv_rec_inserted_cnt = gc_unit_offering_pattern%ROWCOUNT) THEN
684: -- set uop indicate flag
685: -- if no IGS_PS_UNIT_OFR_PAT records were inserted
686: IF (gv_rec_inserted_cnt = 0) THEN
687: v_none_uop_recs_inserted := TRUE;
688: -- if all IGS_PS_UNIT_OFR_PAT records were inserted
689: ELSIF (gv_rec_inserted_cnt = gc_unit_offering_pattern%ROWCOUNT) THEN
690: v_all_uop_recs_inserted := TRUE;
691: -- if some IGS_PS_UNIT_OFR_PAT records were inserted
692: ELSE
687: v_none_uop_recs_inserted := TRUE;
688: -- if all IGS_PS_UNIT_OFR_PAT records were inserted
689: ELSIF (gv_rec_inserted_cnt = gc_unit_offering_pattern%ROWCOUNT) THEN
690: v_all_uop_recs_inserted := TRUE;
691: -- if some IGS_PS_UNIT_OFR_PAT records were inserted
692: ELSE
693: v_some_uop_recs_inserted := TRUE;
694: END IF;
695: CLOSE gc_unit_offering_pattern;