[Home] [Help]
76: p_out_until_date OUT NOCOPY DATE) IS
77:
78: BEGIN
79: SELECT effective_from,effective_until INTO p_out_from_date,p_out_until_date
80: FROM CZ_EFFECTIVITY_SETS WHERE effectivity_set_id=p_eff_set_id;
81:
82: EXCEPTION
83: WHEN NO_DATA_FOUND THEN
84: NULL;
156: DECODE(a.seq_nbr,p_seq,'C',p_seq-1,'L',p_seq+1,'R','N') as where_in_seq,
157: NVL(a.effectivity_set_id,NULL_VALUE) as effectivity_set_id,
158: DECODE(a.effectivity_set_id,NULL,a.effective_from,NULL_VALUE,a.effective_from,b.effective_from) as effective_from,
159: DECODE(a.effectivity_set_id,NULL,a.effective_until,NULL_VALUE,a.effective_until,b.effective_until) as effective_until
160: FROM CZ_RULES a,CZ_EFFECTIVITY_SETS b
161: WHERE a.rule_folder_id=p_rule_sequence_id
162: AND a.seq_nbr BETWEEN (p_seq-1) AND (p_seq+1)
163: AND a.deleted_flag='0'
164: AND b.effectivity_set_id(+)=a.effectivity_set_id
236:
237: IF p_out_left_set_id IS NOT NULL THEN
238: SELECT effective_from,effective_until INTO
239: p_out_left_eff_from,p_out_left_eff_to
240: FROM CZ_EFFECTIVITY_SETS WHERE effectivity_set_id=p_out_left_set_id;
241: END IF;
242:
243: EXCEPTION
244: WHEN NO_DATA_FOUND THEN
254:
255: IF p_out_right_set_id IS NOT NULL THEN
256: SELECT effective_from,effective_until INTO
257: p_out_right_eff_from,p_out_right_eff_to
258: FROM CZ_EFFECTIVITY_SETS WHERE effectivity_set_id=p_out_right_set_id;
259: END IF;
260:
261: EXCEPTION
262: WHEN NO_DATA_FOUND THEN
722: var_left_set_id INTEGER;
723: var_right_set_id INTEGER;
724: var_set_id INTEGER;
725: var_name CZ_RULES.name%TYPE;
726: var_eff_name CZ_EFFECTIVITY_SETS.name%TYPE;
727: var_rule_name CZ_RULES.name%TYPE;
728:
729: var_eff_from DATE;
730: var_eff_to DATE;
742: p_out_err:=0;
743:
744: SELECT CZ_XFR_RUN_INFOS_S.NEXTVAL INTO GLOBAL_RUN_ID FROM dual;
745:
746: UPDATE CZ_EFFECTIVITY_SETS
747: SET effective_from=p_new_start_date,
748: effective_until=p_new_end_date
749: WHERE effectivity_set_id=p_effectivity_set_id RETURNING name INTO var_eff_name;
750: