22:
23: BEGIN
24: -- marking event here
25: FOR l_dim IN l_dim_hier_csr LOOP
26: IF cn_mark_events_pkg.check_cls_hier(l_dim.head_hierarchy_id,l_dim.org_id) = 1 THEN
27: cn_mark_events_pkg.mark_event_cls_hier
28: ('CHANGE_CLS_HIER', l_dim.name,
29: :old.dim_hierarchy_id, l_dim.head_hierarchy_id,
30: NULL, l_dim.start_date, NULL, l_dim.end_date,l_dim.org_id);
23: BEGIN
24: -- marking event here
25: FOR l_dim IN l_dim_hier_csr LOOP
26: IF cn_mark_events_pkg.check_cls_hier(l_dim.head_hierarchy_id,l_dim.org_id) = 1 THEN
27: cn_mark_events_pkg.mark_event_cls_hier
28: ('CHANGE_CLS_HIER', l_dim.name,
29: :old.dim_hierarchy_id, l_dim.head_hierarchy_id,
30: NULL, l_dim.start_date, NULL, l_dim.end_date,l_dim.org_id);
31: ELSIF cn_mark_events_pkg.check_rev_hier(l_dim.head_hierarchy_id,l_dim.org_id) = 1 THEN
27: cn_mark_events_pkg.mark_event_cls_hier
28: ('CHANGE_CLS_HIER', l_dim.name,
29: :old.dim_hierarchy_id, l_dim.head_hierarchy_id,
30: NULL, l_dim.start_date, NULL, l_dim.end_date,l_dim.org_id);
31: ELSIF cn_mark_events_pkg.check_rev_hier(l_dim.head_hierarchy_id,l_dim.org_id) = 1 THEN
32: cn_mark_events_pkg.mark_event_rc_hier
33: ('CHANGE_RC_HIER', l_dim.name,
34: :old.dim_hierarchy_id, l_dim.head_hierarchy_id,
35: NULL, l_dim.start_date, NULL, l_dim.end_date,l_dim.org_id);
28: ('CHANGE_CLS_HIER', l_dim.name,
29: :old.dim_hierarchy_id, l_dim.head_hierarchy_id,
30: NULL, l_dim.start_date, NULL, l_dim.end_date,l_dim.org_id);
31: ELSIF cn_mark_events_pkg.check_rev_hier(l_dim.head_hierarchy_id,l_dim.org_id) = 1 THEN
32: cn_mark_events_pkg.mark_event_rc_hier
33: ('CHANGE_RC_HIER', l_dim.name,
34: :old.dim_hierarchy_id, l_dim.head_hierarchy_id,
35: NULL, l_dim.start_date, NULL, l_dim.end_date,l_dim.org_id);
36: END IF;