create or replace
package ciomember_component as
-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-- File: ciomemcom.pkh
-- Auth: RM3 Generated
-- Date: 22nd Sep 1999, 07:52:49pm
-- Cont: Element Type Interface (Specification) for
--         product      <CI>
--         element type <MEMBER_COMPONENT>
--         short name   <MEMCOM>
-- Note: Generated from database schema SCHEMA4012_D
-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-- Properties
-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

type rm_values is record
(
  /* MEMBER_COMPONENT  */ association_end_reference      number(38)  ,
  /* MEMBER_COMPONENT  */ attribute_deriv_rule_reference number(38)  ,
  /* ELEMENT           */ changed_by                     varchar2(30),
  /* MEMBER_COMPONENT  */ classifier_attribute_reference number(38)  ,
  /* ELEMENT           */ created_by                     varchar2(30),
  /* MEMBER_COMPONENT  */ cross_object_rule_reference    number(38)  ,
  /* ELEMENT           */ date_changed                   date        ,
  /* ELEMENT           */ date_created                   date        ,
  /* INTERSECTION      */ element_type_name              varchar2(10),
  /* ELEMENT           */ id                             number(38)  ,
  /* MEMBER_COMPONENT  */ integrity_rule_reference       number(38)  ,
  /* CIELEMENT         */ irid                           number(38)  ,
  /* CIELEMENT         */ ivid                           number(38)  ,
  /* MEMBER_COMPONENT  */ member_component_in            varchar2(3) ,
  /* MEMBER_COMPONENT  */ member_component_of            varchar2(3) ,
  /* MEMBER_COMPONENT  */ method_reference               number(38)  ,
  /* MEMBER_COMPONENT  */ named_rule_reference           number(38)  ,
  /* ELEMENT           */ number_of_times_modified       number(38)  ,
  /* STRUCTURE_ELEMENT */ pac_reference                  number(38)  ,
  /* STRUCTURE_ELEMENT */ parent_ivid                    number(38)  ,
  /* MEMBER_COMPONENT  */ state_rule_reference           number(38)  ,
  /* ELEMENT           */ types                          number(38)
);

type rm_indicators is record
(
  association_end_reference      boolean not null default false,
  attribute_deriv_rule_reference boolean not null default false,
  changed_by                     boolean not null default false,
  classifier_attribute_reference boolean not null default false,
  created_by                     boolean not null default false,
  cross_object_rule_reference    boolean not null default false,
  date_changed                   boolean not null default false,
  date_created                   boolean not null default false,
  element_type_name              boolean not null default false,
  id                             boolean not null default false,
  integrity_rule_reference       boolean not null default false,
  irid                           boolean not null default false,
  ivid                           boolean not null default false,
  member_component_in            boolean not null default false,
  member_component_of            boolean not null default false,
  method_reference               boolean not null default false,
  named_rule_reference           boolean not null default false,
  number_of_times_modified       boolean not null default false,
  pac_reference                  boolean not null default false,
  parent_ivid                    boolean not null default false,
  state_rule_reference           boolean not null default false,
  types                          boolean not null default false
);

type data is record
(
 v rm_values,
 i rm_indicators
);


-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-- Operations
-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

--
-- upd
--
procedure upd
(
  id in     number,
  pl in out NOCOPY data
);

--
-- lck
--
procedure lck
(
  id in number
);

--
-- ins
--
procedure ins
(
  id in     number,
  pl in out NOCOPY data
);

--
-- sel
--
procedure sel
(
  id in     number,
  pl in out NOCOPY data
);

--
-- del
--
procedure del
(
  id in number
);


-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-- Constraints
-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

procedure constraint_check(rec in data,isins in boolean);
procedure traverse_to_root(cid IN number, eid IN number, is_requery IN boolean);
procedure check_traversals;
procedure check_references;
procedure copy_sac(i_irid in number
                  ,pl in out NOCOPY data
                  ,ensure_unique in varchar2 default 'Y'
                  ,deep in varchar2 default 'Y'
                  ,copy_deps_policy in varchar2 default 'Y');


-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-- Exceptions
-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

element_locked exception;
  element_locked_fac  constant varchar2(3) := 'RME';
  element_locked_code constant number      := 10;
invalid_ref exception;
  invalid_ref_fac  constant varchar2(3) := 'RME';
  invalid_ref_code constant number      := 9;
operation_failed exception;
  operation_failed_fac  constant varchar2(3) := 'RME';
  operation_failed_code constant number      := 11;

-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-- Globals
-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

is_installed boolean := false;

end ciomember_component;
/

REM End of ciomemcom.pkh