create or replace
package ciogeneric_class as
-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-- File: ciogec.pkh
-- Auth: RM3 Generated
-- Date: 22nd Sep 1999, 07:19:16pm
-- Cont: Element Type Interface (Specification) for
--         product      <CI>
--         element type <GENERIC_CLASS>
--         short name   <GEC>
-- Note: Generated from database schema SCHEMA4012_D
-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

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

type rm_values is record
(
  /* CLASSIFIER                */ abstract_flag             varchar2(1)  ,
  /* GENERIC_CLASS             */ active_flag               varchar2(1)  ,
  /* GENERIC_CLASS             */ analysis_type_flag        varchar2(1)  ,
  /* CLASSIFIER                */ author                    varchar2(100),
  /* GENERIC_CLASS             */ business_object_reference number(38)   ,
  /* ELEMENT                   */ changed_by                varchar2(30) ,
  /* GENERIC_CLASS             */ classifier_reference      number(38)   ,
  /* CLASSIFIER                */ classifier_subtype        varchar2(3)  ,
  /* CLASSIFIER                */ class_name                varchar2(100),
  /* ELEMENT                   */ created_by                varchar2(30) ,
  /* ELEMENT                   */ date_changed              date         ,
  /* ELEMENT                   */ date_created              date         ,
  /* CLASSIFIER                */ ejb_target_flag           varchar2(1)  ,
  /* ACCESS_CONTROLLED_ELEMENT */ element_type_name         varchar2(10) ,
  /* GENERIC_CLASS             */ embedable_validator       varchar2(10) ,
  /* CLASSIFIER                */ external_flag             varchar2(1)  ,
  /* CLASSIFIER                */ file_scope                varchar2(10) ,
  /* CLASSIFIER                */ icon_file_reference       number(38)   ,
  /* ELEMENT                   */ id                        number(38)   ,
  /* CLASSIFIER                */ implementation_target     varchar2(13) ,
  /* CIELEMENT                 */ irid                      number(38)   ,
  /* CIELEMENT                 */ ivid                      number(38)   ,
  /* GENERIC_CLASS             */ large_object_flag         varchar2(1)  ,
  /* CLASSIFIER                */ leaf_flag                 varchar2(1)  ,
  /* CLASSIFIER                */ name                      varchar2(100),
  /* ELEMENT                   */ number_of_times_modified  number(38)   ,
  /* CLASSIFIER                */ o8i_target_flag           varchar2(1)  ,
  /* GENERIC_CLASS             */ primitive_flag            varchar2(1)  ,
  /* CLASSIFIER                */ root_flag                 varchar2(1)  ,
  /* CLASSIFIER                */ system_element_flag       varchar2(1)  ,
  /* ELEMENT                   */ types                     number(38)   ,
  /* CLASSIFIER                */ visibroker_target_flag    varchar2(1)
);

type rm_indicators is record
(
  abstract_flag             boolean not null default false,
  active_flag               boolean not null default false,
  analysis_type_flag        boolean not null default false,
  author                    boolean not null default false,
  business_object_reference boolean not null default false,
  changed_by                boolean not null default false,
  classifier_reference      boolean not null default false,
  classifier_subtype        boolean not null default false,
  class_name                boolean not null default false,
  created_by                boolean not null default false,
  date_changed              boolean not null default false,
  date_created              boolean not null default false,
  ejb_target_flag           boolean not null default false,
  element_type_name         boolean not null default false,
  embedable_validator       boolean not null default false,
  external_flag             boolean not null default false,
  file_scope                boolean not null default false,
  icon_file_reference       boolean not null default false,
  id                        boolean not null default false,
  implementation_target     boolean not null default false,
  irid                      boolean not null default false,
  ivid                      boolean not null default false,
  large_object_flag         boolean not null default false,
  leaf_flag                 boolean not null default false,
  name                      boolean not null default false,
  number_of_times_modified  boolean not null default false,
  o8i_target_flag           boolean not null default false,
  primitive_flag            boolean not null default false,
  root_flag                 boolean not null default false,
  system_element_flag       boolean not null default false,
  types                     boolean not null default false,
  visibroker_target_flag    boolean not null default false
);

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


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

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

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

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

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

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


-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-- 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 check_out(i_irid number
                   ,i_ivid number
                   ,i_lock varchar2 default 'Y'
                   ,i_notes varchar2 default null
                   ,i_vlabel varchar2 default null
                   ,o_ivid out number
                   ,copy_deps_policy in varchar2 default 'Y');

procedure check_in(i_irid number
                  ,i_ivid number
                  ,i_notes varchar2 default null
                  ,i_vlabel varchar2 default null
                  ,o_ivid out number);

procedure copy_pac(i_irid in number
                  ,container_reference 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 ciogeneric_class;
/

REM End of ciogec.pkh