MINI MINI MANI MO

Rem
Rem $Header: ordim/src/server/sql/video/formats/ordvdfs.sql /main/6 2013/03/28 10:26:15 smavris Exp $
Rem
Rem ordvdfs.sql
Rem
Rem Copyright (c) 1998, 2013, Oracle and/or its affiliates. 
Rem All rights reserved. 
Rem
Rem    NAME
Rem      ordvdfs.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    smavris     03/26/13 - XbranchMerge smavris_bug-16473669 from
Rem                           st_ordim_12.1.0
Rem    smavris     03/15/13 - Common start and end scripts
Rem    fechen      06/21/04 - Remove deprecated formats 
Rem    smavris     04/11/01 - Update copyright
Rem    dmullen     08/06/99 - Fix temp log leak
Rem    wklee       06/24/99 - annotator implementation
Rem    rchatter    11/12/98 - changing plugin behavior for setProp and get meth
Rem    rchatter    09/05/98 - making changes for new plugin structure
Rem    rchatter    07/13/98 - replacing processVideoCommand interface 
Rem    alsrivas    06/23/98 - updating interfaces
Rem    alsrivas    05/22/98 - updating
Rem    alsrivas    05/14/98 - adding code
Rem    alsrivas    05/11/98 - ORD Video Default Format Specification
Rem    alsrivas    05/11/98 - Created
Rem

@@?/rdbms/admin/sqlsessstart.sql

CREATE OR REPLACE PACKAGE ORDX_DEFAULT_VIDEO 
authid current_user
AS

 
  --VIDEO ATTRIBUTES ACCESSORS
  FUNCTION  getAttribute(ctx IN OUT RAW,
                         obj IN ORDSYS.ORDVideo,
                         name IN VARCHAR2) RETURN VARCHAR2;

  PROCEDURE setProperties(ctx IN OUT RAW, 
                          obj IN OUT NOCOPY ORDSYS.ORDVideo,
                          setComments IN NUMBER := 0);
  FUNCTION checkProperties(ctx IN OUT RAW,obj IN OUT NOCOPY ORDSYS.ORDVideo) 
  RETURN NUMBER;

  -- must return name=value; name=value; ...  pairs
  PROCEDURE getAllAttributes(ctx IN OUT RAW, 
                             obj IN ORDSYS.ORDVideo,
                             attributes IN OUT NOCOPY CLOB);
 
  -- VIDEO PROCESSING METHODS
  FUNCTION  processCommand(
                                 ctx       IN OUT RAW,
                                 obj       IN OUT NOCOPY ORDSYS.ORDVideo,
                                 cmd       IN VARCHAR2,
                                 arguments IN VARCHAR2,
				 result OUT RAW)
             RETURN RAW;
  PRAGMA RESTRICT_REFERENCES(getAttribute, WNDS, WNPS, RNDS, RNPS);

END;
/
show errors;


@?/rdbms/admin/sqlsessend.sql