Is BC4J a viabl option for database with stored procedure (ref cursor) API?

Question

I'm about to begin a Web application development project. As foundation, we have a (Oracle) database of certain complexity that have a data access API developed with PL/SQL packages.
This API is designed to get data through stored procedures/functions that return REF CURSOR.
Personally I have been investigating about Oracle ADF/JSF, and a number of others J2EE technologies, and at this moment I am doubting if ADF BC are a viable option to my development team.
I think this because I have noticed that one of the great drawback in ADF BC is the lack of simplicity to get data through stored procedures/functions that returns REF CURSORS.
I have been looking for documentation and the only thing that I have found are two examples:
1.- One that really do not work (fails in get data from ref cursor): ADF BC StoredProcedure Sample application.
2.- And other published by Steve Muench in
http://radio.weblogs.com/0118231/stories/2003/03/03/gettingAViewObjectsResultRowsFromARefCursor.html. This sample works fine.
But, the problem with the approach of this last article is the amount (and complexity) of the code necessary to make so basic and recurrent operation as is "obtain data through a stored procedure (ref cursor)".
Below it is the code that I have constructed to call a function that returns a ref cursor (based on steve's article).
If this is the only way to make this (historically so basic and simple) task, then it is obvious that BC is not a viable technology to my (or I am in a mistake?), since we have about 50 stored procedures/functions to access the underlying data; that stored procedures/functions are key to development of the new application (and, still more, currently are used to anothers apps ).
By all this, I would like consult to Oracle's people:
1.- I really must reject BC as technology to implement this project ?
2.- It is possible to access stored procedures in a simpler way using BC?
3.- If the answer to 2 is NOT: in near future, the BC team has plans to give more support to the simple access to stored procedures?
4.- If the answer to 3 is NOT: what another technology you recommend to construct my data access/business tier and still be able to using the others characteristics of ADF?
Thank you very much for your guidelines.
Regards, RL.
** And the code!!!
** ###   I am forced to do this for each call to a procedure???? ###
package myrefcursor.model;
import java.math.BigDecimal;
import java.sql.CallableStatement;
import java.sql.ResultSet;
import java.sql.ResultSetMetaData;
import java.sql.SQLException;
import java.sql.Types;
import oracle.jbo.JboException;
import oracle.jbo.domain.NullValue;
import oracle.jbo.domain.Number;
import oracle.jbo.server.DBTransaction;
import oracle.jbo.server.ViewObjectImpl;
import oracle.jbo.server.ViewRowImpl;
import oracle.jbo.server.ViewRowSetImpl;
import oracle.jdbc.driver.OracleCallableStatement;
import oracle.jdbc.driver.OracleTypes;
public class TraePolizasViewImpl extends ViewObjectImpl {
    private static final String SQL = "begin ? := PKG_PRUEBA.trae_polizas(?);end;";
    private static final String COUNTSQL = "begin ? := PKG_PRUEBA.count_trae_polizas(?);end;";
    public TraePolizasViewImpl() {
    protected void executeQueryForCollection(Object qc,Object[] params,int numUserParams) {
        BigDecimal rut_contratante = null;
        Object[] theUserParam = null;
        System.out.println(params);
        System.out.println(params[0]);
        if (params != null)
            theUserParam = (Object[]) params[0];
        //if (theUserParam != null && theUserParam.length > 0 )
        if (! (theUserParam[1]   instanceof NullValue) )
            rut_contratante = (BigDecimal)theUserParam[1];
        storeNewResultSet(qc ,retrieveRefCursor(qc, rut_contratante));
        super.executeQueryForCollection(qc, params, numUserParams);
    protected void create() {
      getViewDef().setQuery(null);
      getViewDef().setSelectClause(null);
      setQuery(null);
    protected ViewRowImpl createRowFromResultSet(Object qc, ResultSet rs) {
      rs = getResultSet(qc);
      ViewRowImpl r = createNewRowForCollection(qc);
      try {
        populateAttributeForRow(r,0, nullOrNewNumber(rs.getBigDecimal(1)));
        populateAttributeForRow(r,1, rs.getString(2));
      catch (SQLException s) {
       throw new JboException(s);
      return r;
    protected boolean hasNextForCollection(Object qc) {
      ResultSet rs = getResultSet(qc);
      boolean nextOne = false;
      try {
        nextOne = rs.next();
        if (!nextOne) {
          setFetchCompleteForCollection(qc, true);
          rs.close();
      catch (SQLException s) {
       throw new JboException(s);
      return nextOne;
    protected void releaseUserDataForCollection(Object qc, Object rs) {
       ResultSet userDataRS = getResultSet(qc);
       if (userDataRS != null) {
        try {    userDataRS.close();    }
        catch (SQLException s) { ; }  
      super.releaseUserDataForCollection(qc, rs);
    public long getQueryHitCount(ViewRowSetImpl viewRowSet) {
      return viewRowSet.getRowCount();
    private ResultSet retrieveRefCursor(Object qc, BigDecimal rut_contratante) {
      CallableStatement st = null;
      try {
        st = getDBTransaction().createCallableStatement(SQL, DBTransaction.DEFAULT);
        st.registerOutParameter(1,OracleTypes.CURSOR);
        if (rut_contratante == null)
            st.setNull(2, Types.NUMERIC);
        else
            st.setBigDecimal(2, rut_contratante);
        st.execute();
        ResultSet rs = ((OracleCallableStatement)st).getCursor(1);
        rs.setFetchSize(getFetchSize());
        return rs ;
      catch (SQLException s) {
        throw new JboException(s);
      finally {try {st.close();} catch (SQLException s) {;}}
    private void storeNewResultSet(Object qc, ResultSet rs) {
      ResultSet existingRs = getResultSet(qc);
      if (existingRs != null) {
        try {existingRs.close();} catch (SQLException s) {;}  
      setUserDataForCollection(qc,rs);
      hasNextForCollection(qc); // Prime the pump with the first row.
    private ResultSet getResultSet(Object qc) {
        return (ResultSet)getUserDataForCollection(qc);
    private static Number nullOrNewNumber(BigDecimal b) {
         try {
           return b != null ? new Number(b) : null;
         catch (SQLException s) { ; }
         return null;
    public BigDecimal getprutcontratante() {
        return (BigDecimal)getNamedWhereClauseParam("prutcontratante");
    public void setprutcontratante(BigDecimal value) {
        setNamedWhereClauseParam("prutcontratante", value);
}

Answer 1

no?