create or replace and compile java source named probastruct as
import java.sql.*;
import java.util.*;

public class GenericStruct implements java.sql.Struct 
{
   private Object[] attributes = null;
   private String typeName = null;

   public void setSQLTypeName(String name)
   {
      typeName = name;
   }

   GenericStruct() 
   { 
   }

   GenericStruct(String name, Object [] obj)
   {
      typeName = name;
      attributes = obj;
   }

   public String getSQLTypeName()
   {
      return typeName;
   }
   public Object [] getAttributes()
   {
      return attributes;
   }
   public Object [] getAttributes(Map map) 
   throws SQLException
   {
      return attributes;
   }
   public void setAttributes(Object [] objArray)
   {
      attributes = objArray;
   }
} 

create or replace and compile java source named adttabclass as
   
import java.sql.*;
import oracle.sql.*;
import oracle.jdbc.*;
import java.util.Date;

public class ADTTabClass
{
  public static STRUCT ADTTabFunc (NUMBER id[], STRUCT adt[], STRUCT adt2) 
  throws SQLException
  { 
    STRUCT st = adt2;
    id[0] = new NUMBER(id[0].intValue() + 1000);
    adt[0] = adt2;

    String rowType;
    GenericStruct gs;
    Object[] name = new Object[3];
    name[0] = new NUMBER(100);
    name[1] = new String("Hello");
    name[2] = new Date();
    rowType = "ADTTYP2(n1 number, n2 varchar2(30), n3 date)";
    gs = new GenericStruct(rowType, name);
   // st = (STRUCT) gs;   - не соответствую типы
    return st;
  }
}

declare
  a number;
  x ADTTYP2;
  y ADTTYP2;
  z ADTTYP2;
begin
  a := 5;
  x := ADTTYP2(11,'JAVA record in' ,'11-MAY-2001');
  y := ADTTYP2(80,'JAVA record OUT','18-MAY-2001');
  z := ADTTabFunc(a, x, y);
  dbms_output.put_line('n1 = ' || z.n1 || ', n2 = ' || z.n2 || ', n3 =' || z.n3);
end;

create or replace function ADTTabFunc (x IN OUT number, y IN OUT
ADTTYP2, z IN ADTTYP2)
return ADTTYP2 as language java
name 'ADTTabClass.ADTTabFunc(oracle.sql.NUMBER[],
oracle.sql.STRUCT[],
oracle.sql.STRUCT) return oracle.sql.STRUCT';

   public static ARRAY sortNumCaseList(oracle.sql.ARRAY list) throws SQLException, AccessControlException {
    Number[] n;
    n  = new Number[10];
    n[0]= (Number)5670;
    n[1]= (Number)5671;
    n[2]= (Number)5672;
    n[3]= (Number)5673;
    n[4]= (Number)5674;
    n[5]= (Number)5675;
    n[6]= (Number)5676;
    n[7]= (Number)5677;
    n[8]= (Number)5678;
    n[9]= (Number)5679;

    Connection conn = DriverManager.getConnection("jdbc:default:connection:");
    ArrayDescriptor arrayDescriptor = new ArrayDescriptor("NUMBERLIST",conn);
    ARRAY sorted = new ARRAY(arrayDescriptor,conn,((Object[])n));
    return sorted; 
    }