Oracle | DBMS

Oracle DBMS_PICKLER Version 26ai

General Information

Library Note

Morgan's Library Page Header

The best Oracle News for FY2026

Oracle Database 26ai will be available on generic Linux platforms in January and soon on AIX and Windows

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;

      /

      

      PL/SQL procedure successfully completed.

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;

      /

      

      PL/SQL procedure successfully completed.

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;

      /

      

      PL/SQL procedure successfully completed.

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;

      /

      

      PL/SQL procedure successfully completed.

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;

      /

      

      PL/SQL procedure successfully completed.

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