[Home] [Help]
55: CURSOR c_terms(
56: cp_adplans_id igf_aw_awd_dist_plans.adplans_id%TYPE
57: ) IS
58: SELECT rowid row_id,terms.*
59: FROM igf_aw_dp_terms terms
60: WHERE adplans_id = cp_adplans_id
61: AND ld_perct_num IS NOT NULL;
62:
63: BEGIN
66:
67: IF p_method_code <> 'M' THEN
68:
69: FOR terms_rec IN c_terms(p_adplans_id) LOOP
70: igf_aw_dp_terms_pkg.update_row(
71: x_rowid => terms_rec.row_id,
72: x_adterms_id => terms_rec.adterms_id,
73: x_adplans_id => terms_rec.adplans_id,
74: x_ld_cal_type => terms_rec.ld_cal_type,
268: END check_plan_code;
269:
270: PROCEDURE delete_plan(
271: p_adplans_id igf_aw_awd_dist_plans.adplans_id%TYPE,
272: p_adterms_id igf_aw_dp_terms.adterms_id%TYPE
273: ) AS
274: ------------------------------------------------------------------
275: --Created by : veramach, Oracle India
276: --Date created: 1-NOV-2003
285: -------------------------------------------------------------------
286: -- Get all terms attached to a distribution plan
287: CURSOR c_terms(
288: cp_adplans_id igf_aw_awd_dist_plans.adplans_id%TYPE,
289: cp_adterms_id igf_aw_dp_terms.adterms_id%TYPE
290: ) IS
291: SELECT rowid row_id,terms.adterms_id adterms_id
292: FROM igf_aw_dp_terms terms
293: WHERE adplans_id = cp_adplans_id
288: cp_adplans_id igf_aw_awd_dist_plans.adplans_id%TYPE,
289: cp_adterms_id igf_aw_dp_terms.adterms_id%TYPE
290: ) IS
291: SELECT rowid row_id,terms.adterms_id adterms_id
292: FROM igf_aw_dp_terms terms
293: WHERE adplans_id = cp_adplans_id
294: AND adterms_id = NVL(cp_adterms_id,adterms_id);
295:
296: -- Get all teaching periods attahced with a term
294: AND adterms_id = NVL(cp_adterms_id,adterms_id);
295:
296: -- Get all teaching periods attahced with a term
297: CURSOR c_teach_periods(
298: cp_adterms_id igf_aw_dp_terms.adterms_id%TYPE
299: ) IS
300: SELECT rowid row_id
301: FROM igf_aw_dp_teach_prds
302: WHERE adterms_id = cp_adterms_id;
308: FOR l_teaching_periods_rec IN c_teach_periods(l_terms_rec.adterms_id) LOOP
309: igf_aw_dp_teach_prds_pkg.delete_row(x_rowid => l_teaching_periods_rec.row_id);
310: END LOOP;
311: IF p_adterms_id IS NULL THEN
312: igf_aw_dp_terms_pkg.delete_row(x_rowid => l_terms_rec.row_id);
313: END IF;
314: END LOOP;
315:
316: EXCEPTION