create or replace
package rmoactivity as
-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
-- File: rmoac.pkh
-- Auth: RM3 Generated
-- Date: 22nd Sep 1999, 10:43:40pm
-- Cont: Element Type Interface (Specification) for
--         product      <RM>
--         element type <ACTIVITY>
--         short name   <AC>
-- Note: Generated from database schema SCHEMA4012_D
-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

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

type rm_values is record
(
  /* ELEMENT  */ changed_by               varchar2(30) ,
  /* ACTIVITY */ close_end_time           date         ,
  /* ACTIVITY */ close_start_time         date         ,
  /* ELEMENT  */ created_by               varchar2(30) ,
  /* ELEMENT  */ date_changed             date         ,
  /* ELEMENT  */ date_created             date         ,
  /* ACTIVITY */ depth                    number(38)   ,
  /* ELEMENT  */ id                       number(38)   ,
  /* ACTIVITY */ label                    number(38)   ,
  /* ELEMENT  */ number_of_times_modified number(38)   ,
  /* ACTIVITY */ open_child               number(38)   ,
  /* ACTIVITY */ open_parent              number(38)   ,
  /* ACTIVITY */ open_time                date         ,
  /* ACTIVITY */ parent                   number(38)   ,
  /* ACTIVITY */ readonly                 varchar2(1)  ,
  /* ACTIVITY */ session_label            varchar2(240),
  /* ACTIVITY */ status                   number(38)   ,
  /* ELEMENT  */ types                    number(38)
);

type rm_indicators is record
(
  changed_by               boolean not null default false,
  close_end_time           boolean not null default false,
  close_start_time         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,
  depth                    boolean not null default false,
  id                       boolean not null default false,
  label                    boolean not null default false,
  number_of_times_modified boolean not null default false,
  open_child               boolean not null default false,
  open_parent              boolean not null default false,
  open_time                boolean not null default false,
  parent                   boolean not null default false,
  readonly                 boolean not null default false,
  session_label            boolean not null default false,
  status                   boolean not null default false,
  types                    boolean not null default false
);

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


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

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

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

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

--
-- validate
--
procedure validate
(
  id       in  number,
  vstatus  out varchar2,
  warnings out varchar2
);

--
-- current_activity
--
procedure current_activity
(
  curact out number
);

--
-- open
--
procedure open
(
  parent in  number,
  id     out number
);

--
-- current_label
--
procedure current_label
(
  label out number
);

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

--
-- close
--
procedure close
(
  id      in  number,
  vstatus out varchar2
);

--
-- new_label
--
procedure new_label
(
  label out number
);

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

--
-- upd
--
procedure upd
(
  id in     number,
  pl in out 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;

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

element_locked exception;
  element_locked_fac  constant varchar2(3) := 'RME';
  element_locked_code constant number      := 10;
failrb exception;
  failrb_fac  constant varchar2(3) := 'RME';
  failrb_code constant number      := 853;
init_fail exception;
  init_fail_fac  constant varchar2(3) := 'RME';
  init_fail_code constant number      := 854;
invalid_ref exception;
  invalid_ref_fac  constant varchar2(3) := 'RME';
  invalid_ref_code constant number      := 9;
no_current exception;
  no_current_fac  constant varchar2(3) := 'RME';
  no_current_code constant number      := 851;
not_current exception;
  not_current_fac  constant varchar2(3) := 'RME';
  not_current_code constant number      := 852;
open_txn exception;
  open_txn_fac  constant varchar2(3) := 'RME';
  open_txn_code constant number      := 803;
operation_failed exception;
  operation_failed_fac  constant varchar2(3) := 'RME';
  operation_failed_code constant number      := 11;

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

is_installed boolean := false;

end rmoactivity;
/

REM End of rmoac.pkh