Oracle | DBMS

Oracle DBMS_PICKLER Version 21c

General Information

Library Note

Morgan's Library Page Header

ACE Director Alum Daniel Morgan, founder of Morgan's Library, is scheduling complimentary technical Workshops on Database Security for the first 30 Oracle Database customers located anywhere in North America, EMEA, LATAM, or APAC that send an email to asra_us@oracle.com. Request a Workshop for your organization today.

Purpose Undocumented

Acronyms TDS: Type Descriptor Source

AUTHID DEFINER

Dependencies

ALL_OBJECTS	DBMS_PICKLER_LIB	TYPE$
ALL_TAB_COLUMNS	OBJ$	USER$
ATTRIBUTE$	OID$	_CURRENT_EDITION_OBJ
COLLECTION$	PRIVATE_JDBC

Documented No

First Available 8.1

Security Model Owned by SYS with EXECUTE granted to PUBLIC

Source {ORACLE_HOME}/rdbms/admin/prvtpckl.plb

Subprograms

Undocumented dbms_pickler.get_format(fdo OUT RAW) RETURN BINARY_INTEGER;

DECLARE

       o PLS_INTEGER;

       r RAW(128);

      BEGIN

        o := dbms_pickler.get_format(r);

        dbms_output.put_line('Returned Value: ' || TO_CHAR(o));

        dbms_output.put_line('FDO: ' || r);

      END;

      /

GET_TYPE_SHAPE

Undocumented

Overload 1 dbms_pickler.get_type_shape( schema IN VARCHAR2, typnam IN VARCHAR2, typoid OUT RAW, version OUT BINARY_INTEGER, tds OUT LONG_RAW, lds OUT LONG_RAW) RETURN BINARY_INTEGER;

DECLARE

       toid   RAW(128);

       vers   PLS_INTEGER;

       tdsval LONG RAW;

       ldsval LONG RAW;

       retVal PLS_INTEGER;

      BEGIN

        retVal := dbms_pickler.get_type_shape('OE', 'PURCHASEORDER_T', toid, vers, tdsval, ldsval);

        dbms_output.put_line('Returned Value: ' || TO_CHAR(retVal));

        dbms_output.put_line('TOID: ' || toid);

        dbms_output.put_line('Version: ' || TO_CHAR(vers));

        dbms_output.put_line('TDS: ' || tdsval);

        dbms_output.put_line('LDS: ' || ldsval);

      END;

      /

Overload 2 dbms_pickler.get_type_shape( schema IN VARCHAR2, typnam IN VARCHAR2, typoid OUT RAW, version OUT BINARY_INTEGER, tds OUT BLOB, lds OUT LONG_RAW) RETURN BINARY_INTEGER;

DECLARE

       toid   RAW(128);

       vers   PLS_INTEGER;

       tdsval BLOB;

       ldsval LONG RAW;

       retVal PLS_INTEGER;

      BEGIN

        retVal := dbms_pickler.get_type_shape('OE', 'PURCHASEORDER_T', toid, vers, tdsval, ldsval);

        dbms_output.put_line('Returned Value: ' || TO_CHAR(retVal));

        dbms_output.put_line('TOID: ' || toid);

        dbms_output.put_line('Version: ' || TO_CHAR(vers));

        dbms_output.put_line('TDS: Blobs Can Not Be Displayed');

        dbms_output.put_line('LDS: ' || ldsval);

      END;

      /

Overload 3 dbms_pickler.get_type_shape( fulltypename IN OUT VARCHAR2, typeoid OUT RAW, version OUT BINARY_INTEGER, tds OUT LONG_RAW, instantiable OUT VARCHAR2, supertype_owner OUT VARCHAR2, supertype_name OUT VARCHAR2, attr_rc OUT REF CURSOR, subtype_rc OUT REF CURSOR) RETURN BINARY_INTEGER;

DECLARE

       ftname   VARCHAR2(30) := 'OE.PURCHASEORDER_T';

       toid     RAW(128);

       vers     PLS_INTEGER;

       tdsval   LONG RAW;

       instan   VARCHAR2(128);

       st_owner VARCHAR2(30);

       st_name  VARCHAR2(30);

       attrc    SYS_REFCURSOR;

       subtrc   SYS_REFCURSOR;

       retVal   PLS_INTEGER;

      BEGIN

        retVal := dbms_pickler.get_type_shape(ftname, toid, vers, tdsval, instan, st_owner, st_name, attrc, subtrc);

        dbms_output.put_line('Returns: ' || TO_CHAR(retVal));

      END;

      /

Overload 4 dbms_pickler.get_type_shape( fulltypename IN OUT VARCHAR2, typeoid OUT RAW, version OUT BINARY_INTEGER, tds OUT BLOB, instantiable OUT VARCHAR2, supertype_owner OUT VARCHAR2, supertype_name OUT VARCHAR2, attr_rc OUT REF CURSOR, subtype_rc OUT REF CURSOR) RETURN BINARY_INTEGER;

DECLARE

       ftname   VARCHAR2(30) := 'OE.PURCHASEORDER_T';

       toid     RAW(128);

       vers     PLS_INTEGER;

       tdsval   BLOB;

       instan   VARCHAR2(128);

       st_owner VARCHAR2(30);

       st_name  VARCHAR2(30);

       attrc    SYS_REFCURSOR;

       subtrc   SYS_REFCURSOR;

       retVal   PLS_INTEGER;

      BEGIN

        retVal := dbms_pickler.get_type_shape(ftname, toid, vers, tdsval, instan, st_owner, st_name, attrc, subtrc);

        dbms_output.put_line('Returns: ' || TO_CHAR(retVal));

      END;

      /

UPDATE_THROUGH_REF

Undocumented dbms_pickler.update_through_ref( prf IN RAW, version IN BINARY_INTEGER, toid IN RAW, image IN LONG RAW); RETURN BINARY_INTEGER;

TBD