Rem
Rem $Header: ordadfs.sql 21-jun-2004.08:46:31 fechen Exp $
Rem
Rem ordadfs.sql
Rem
Rem Copyright (c) 1998, 2004, Oracle. All rights reserved.  
Rem
Rem    NAME
Rem      ordadfs.sql - <one-line expansion of the name>
Rem
Rem    DESCRIPTION
Rem      <short description of component this file declares/defines>
Rem
Rem    NOTES
Rem      <other useful comments, qualifications, etc.>
Rem
Rem    MODIFIED   (MM/DD/YY)
Rem    fechen      06/21/04 - Remove deprecated methods 
Rem    smavris     04/11/01 - Update copyright
Rem    dmullen     07/23/99 - Fix temp lob leak
Rem    wklee       06/24/99 - annotator implementation
Rem    rchatter    11/16/98 - making ctx IN OUT
Rem    alsrivas    09/02/98 - fixing getAllAttributes
Rem    alsrivas    08/27/98 - adding NOCOPY stuff
Rem    alsrivas    06/11/98 - updating process
Rem    alsrivas    06/10/98 - updating getAllAttributes
Rem    alsrivas    05/25/98 - changing procesAudioCommand to processCommand
Rem    alsrivas    05/14/98 - adding code
Rem    alsrivas    05/11/98 - ORD Audio Default Format Specification
Rem    alsrivas    05/11/98 - Created
Rem

CREATE OR REPLACE PACKAGE ORDX_DEFAULT_AUDIO 
authid current_user
AS
 
  --AUDIO ATTRIBUTES ACCESSORS
  PROCEDURE setProperties(ctx IN OUT RAW, 
                          obj IN OUT NOCOPY ORDSYS.ORDAudio,
                          setComments IN NUMBER := 0);
  FUNCTION checkProperties(ctx IN OUT RAW, obj IN OUT NOCOPY ORDSYS.ORDAudio) 
                   RETURN NUMBER;

  FUNCTION  getAttribute(ctx IN OUT RAW,
                         obj IN ORDSYS.ORDAudio,
                         name IN VARCHAR2) RETURN VARCHAR2;
  -- must return name=value; name=value; ...  pairs
  PROCEDURE getAllAttributes(ctx IN OUT RAW,
                             obj IN ORDSYS.ORDAudio,
                             attributes IN OUT NOCOPY CLOB);
 
  -- AUDIO PROCESSING METHODS
  FUNCTION  processCommand(
                                 ctx       IN OUT RAW,
                                 obj       IN OUT NOCOPY ORDSYS.ORDAudio,
                                 cmd       IN VARCHAR2,
                                 arguments IN VARCHAR2,
                                 result OUT RAW)
             RETURN RAW;

  PRAGMA RESTRICT_REFERENCES(getAttribute, WNDS, WNPS, RNDS, RNPS);
 
END;
/
show errors;