| Data Types |
CREATE OR REPLACE TYPE lcr$_row_unit AS OBJECT (
column_name VARCHAR2(4000),
data sys.anydata,
lob_information NUMBER,
lob_offset NUMBER,
lob_operation_size NUMBER,
long_information NUMBER,
-- as we are adding a new attribute, create a constructor for
-- older type def to preserve backwards compatibility.
CONSTRUCTOR FUNCTION lcr$_row_unit(
column_name VARCHAR2,
data sys.anydata,
lob_information NUMBER,
lob_offset NUMBER,
lob_operation_size NUMBER)
RETURN SELF AS RESULT);
/
CREATE OR REPLACE TYPE BODY lcr$_row_unit AS
CONSTRUCTOR FUNCTION lcr$_row_unit(
column_name VARCHAR2,
data sys.anydata,
lob_information NUMBER,
lob_offset NUMBER,
lob_operation_size NUMBER)
RETURN SELF AS RESULT AS
BEGIN
SELF.column_name := column_name;
SELF.data := data;
SELF.lob_information := lob_information;
SELF.lob_offset := lob_offset;
SELF.lob_operation_size := lob_operation_size;
SELF.long_information := dbms_lcr.not_a_long;
RETURN;
END;
END lcr$_row_unit;
/
CREATE OR REPLACE TYPE lcr$_row_list AS TABLE OF sys.lcr$_row_unit;
/ |
