Oracle Forms (MOSC)

MOSC Banner

Using OLE2 library with Forms11g

edited Nov 26, 2014 10:01AM in Oracle Forms (MOSC) 3 commentsAnswered

Hello everyone.

I've got problem with using ole2 lib in forms in 11 version on Weblogic server.

I've got piece of code which works under oracle forms 6i:

  DECLARE
    c_procedura CONSTANT VARCHAR2(100) := 'fail';
    v_wbs OLE2.OBJ_TYPE;
    v_args OLE2.LIST_TYPE;
    v_jest BOOLEAN := FALSE;
  BEGIN
    p_app  := OLE2.CREATE_OBJ('Excel.Application');   
    OLE2.SET_PROPERTY(p_app, 'Visible', 'False');
    v_wbs := OLE2.GET_OBJ_PROPERTY(p_app,'Workbooks');
    v_args := OLE2.CREATE_ARGLIST;
    OLE2.ADD_ARG(v_args, p_name);
    OLE2.INVOKE(v_wbs,'Open',v_args);
    v_jest := TRUE;
    OLE2.DESTROY_ARGLIST(v_args);
    OLE2.RELEASE_OBJ(v_wbs);
    v_jest := FALSE;
       
  EXCEPTION
      WHEN OLE2.OLE_ERROR THEN
      msg_alert('EXCEPTIOn1');
        IF v_jest THEN
            OLE2.RELEASE_OBJ(v_wbs);
        END IF;
      WHEN OTHERS THEN
      msg_alert('EXCEPTIOn2');
        IF v_jest THEN
            OLE2.RELEASE_OBJ(v_wbs);
        END IF;
        frm_blad.zglos(p_procedura => c_procedura);   
    END;
  END;
Tagged:

Howdy, Stranger!

Log In

To view full details, sign in to My Oracle Support Community.

Register

Don't have a My Oracle Support Community account? Click here to get started.

Category Leaderboard

Top contributors this month

New to My Oracle Support Community? Visit our Welcome Center

MOSC Help Center