rem 
rem $Header: L:\\\\model\\repman40\\api\\RCS\\ciueat.ops 1.1 1998/05/28 16:56:22 mfrobins Exp $ 
rem 
rem Copyright (c) Oracle Corporation 1991.  All Rights Reserved.

rem  NAME
rem    ciueat.ops             - Operation Package Specification
rem  DESCRIPTION
rem    This package is responsible for managing UE association
rem    type extensions to the CASE Repository.
rem  PUBLIC FUNCTION(S)
rem    
rem  NOTES
rem  MODIFIED    (MM/DD/YY)
rem    bferris    03/15/95 -  Added nls_name and nls_plural_name
Rem    aheath     02/14/95 -  Added to api release structure
rem    bferris    12/19/94 -  Creation


CREATE OR REPLACE PACKAGE cioue_association_type IS

--
--  Element type record
--

type rm_values is record
(
  id                       number(38)   ,
  short_name               varchar2(10)  ,
  name                     varchar2(27) ,
  plural_name              varchar2(27) ,
  nls_name                 varchar2(240),
  nls_plural_name          varchar2(240),
  part_of_reference        number       ,
  part_of_degree           varchar2(1)  ,
  use_of_reference         number       ,
  use_of_degree            varchar2(1)  ,
  is_for_matrix            varchar2(1)
);

type rm_indicators is record
(
  id                boolean not null default false,
  short_name        boolean not null default false,
  name              boolean not null default false,
  plural_name       boolean not null default false,
  nls_name          boolean not null default false,
  nls_plural_name   boolean not null default false,
  part_of_reference boolean not null default false,
  part_of_degree    boolean not null default false,
  use_of_reference  boolean not null default false,
  use_of_degree     boolean not null default false,
  is_for_matrix     boolean not null default false
);

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

--
--  Operations
--

procedure ins     (id IN number,
                   pl IN OUT data);
procedure upd     (id IN number,
                   pl IN OUT data);
procedure del     (id IN number);

procedure publish (id IN number);
procedure unpublish (id IN number);

procedure remap(id IN number, short_name IN varchar2);

--
--  Constant globals
--

ueat_fac constant varchar2(3) := 'CDA';

--
--  Exceptions
--

ueat_invalid_sn   exception;
  ueat_invalid_sn_code   constant number := 840;
ueat_miss_sn      exception;
  ueat_miss_sn_code      constant number := 841;
ueat_duplicate_sn exception;
  ueat_duplicate_sn_code constant number := 842;

ueat_miss_nm      exception;
  ueat_miss_nm_code      constant number := 843;
ueat_duplicate_nm   exception;
  ueat_duplicate_nm_code constant number := 844;

ueat_miss_pn      exception;
  ueat_miss_pn_code      constant number := 845;
ueat_duplicate_pn exception;
  ueat_duplicate_pn_code constant number := 846;

ueat_not_exist    exception;
  ueat_not_exist_code    constant number := 847;
ueat_not_user     exception;
  ueat_not_user_code     constant number := 848;
ueat_is_published exception;
  ueat_is_published_code constant number := 849;

ueat_invalid_por  exception;
  ueat_invalid_por_code  constant number := 850;
ueat_invalid_pod  exception;
  ueat_invalid_pod_code  constant number := 851;
ueat_invalid_uor  exception;
  ueat_invalid_uor_code  constant number := 852;
ueat_invalid_uod  exception;
  ueat_invalid_uod_code  constant number := 853;

ueat_data_exists  exception;
  ueat_data_exists_code  constant number := 854;
ueat_text_u_exists  exception;
  ueat_text_u_exists_code constant number := 855;
ueat_is_not_published  exception;
  ueat_is_not_published_code  constant number := 856;

ueat_is_not_user_type exception;
  ueat_is_not_user_type_code constant number := 857;

end cioue_association_type;
/