Oracle Development
 
Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
User Name:
Password:
Remember me
Go Back   Dev Shed ForumsDatabasesOracle Development

Reply
Add This Thread To:
  Del.icio.us   Digg   Google   Spurl   Blink   Furl   Simpy   Y! MyWeb 
Thread Tools Search this Thread Rate Thread Display Modes
 
Unread Dev Shed Forums Sponsor:
  #1  
Old April 13th, 2005, 08:24 PM
nickcronin nickcronin is offline
Registered User
Dev Shed Newbie (0 - 499 posts)
 
Join Date: Aug 2004
Posts: 9 nickcronin User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: 40 m 6 sec
Reputation Power: 0
Arrow CLIENT_OLE2.INVOKE_OBJ Problem

Below is my procedure for writing a paragraph to a word document. This procedure worked fine in Forms5.... we have now moved to Forms9 and i have made necessary changes (ie CLIENT_OLE2 instead of OLE) but now the code wont work..... ?????

It seems to be dropping out at the CLIENT_OLE2.INVOKE_OBJ lines. It writes out the value in ‘arg_list’ to the word doc but then the whole thing just hangs.

ANY IDEAS AT ALL????

I have looked at the Oracle 'howto_ole' doc and it says to use a Word (VB) method called 'Text' which does not even exist when i go to MSDN to find it. What the hell is goin on there? I have even tried using some of the actual Word (VB) methods but i dont think Oracle likes em.

Im at the end of my teather with this one.

-------------------------------------

PROCEDURE ole_add_paragraph (lpara varchar2) IS
appl_id CLIENT_OLE2.OBJ_TYPE;
docs_id CLIENT_OLE2.OBJ_TYPE;
doc_id CLIENT_OLE2.OBJ_TYPE;
selection_id CLIENT_OLE2.OBJ_TYPE;
arg_list CLIENT_OLE2.LIST_TYPE;

BEGIN
default_value(null,'global.application_id');
IF :GLOBAL.application_id IS NULL THEN
erase('GLOBAL.application_id');
FGALPROC(13,'Start WORD before attempting to create a new document');
ELSE
-- Get the WORD Application and Documents Objects
appl_id := TO_NUMBER(NAME_IN('GLOBAL.application_id'));
docs_id := CLIENT_OLE2.GET_OBJ_PROPERTY(appl_id,'Documents');

-- Add some text to the document
selection_id := CLIENT_OLE2.GET_OBJ_PROPERTY(appl_id, 'Selection');
arg_list := CLIENT_OLE2.CREATE_ARGLIST;
CLIENT_OLE2.ADD_ARG(arg_list, lpara);
selection_id := CLIENT_OLE2.INVOKE_OBJ(selection_id, 'TypeText', arg_list);

CLIENT_OLE2.DESTROY_ARGLIST(arg_list);
selection_id := CLIENT_OLE2.GET_OBJ_PROPERTY(appl_id, 'Selection');
selection_id := CLIENT_OLE2.INVOKE_OBJ(selection_id, 'TypeParagraph');


END IF;

END;

Reply With Quote
Reply

Viewing: Dev Shed ForumsDatabasesOracle Development > CLIENT_OLE2.INVOKE_OBJ Problem


Thread Tools  Search this Thread 
Search this Thread:

Advanced Search
Display Modes  Rate This Thread 
Rate This Thread:


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
View Your Warnings | New Posts | Latest News | Latest Threads | Shoutbox
Forum Jump


Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
  
 





© 2003-2008 by Developer Shed. All rights reserved. DS Cluster 2 hosted by Hostway
Stay green...Green IT