Invoke check spelling word from Webutil Package

Question

Hi,
I would like to check spell a long item from my form with MS Word.
I found an example on OTN to open word from my form with webutil.
Now I would like to Spell check the active document in Word with the method
ActiveDocument.CheckSpelling();
Select the complete text:
Selection.WholeStory();
Copy it in the buffer:
Selection.Copy();
Close document:
ActiveDocument.Close(0);
Close Word:
Quit();
I search the correct syntax from the the package CLIENT_OLE2 ?

Answer 1

Eric,
I hope the following code sample helps you.
Regards
Kavitha Prakash
Oracle Support
DECLARE
MyApplication client_ole2.OBJ_TYPE;
MyDocuments client_ole2.OBJ_TYPE;
MyDocument client_ole2.OBJ_TYPE;
MySelection client_ole2.OBJ_TYPE;
args client_ole2.LIST_TYPE;
BEGIN
MyApplication:=client_ole2.CREATE_OBJ('Word.Application');
client_ole2.SET_PROPERTY(MyApplication, 'Visible', 1);
MyDocuments:=client_ole2.GET_OBJ_PROPERTY(MyApplication, 'Documents');
args:=client_ole2.CREATE_ARGLIST;
client_ole2.ADD_ARG(args, 'c:\ABSTRACT.DOC');
Mydocument :=client_ole2.INVOKE_OBJ(MyDocuments,'Open',args);
client_ole2.DESTROY_ARGLIST(args);
client_ole2.INVOKE(MyDocument,'CheckSpelling');
MySelection:=client_ole2.GET_OBJ_PROPERTY(MyApplication, 'Selection');
client_ole2.INVOKE(mYSelection,'WholeStory');
client_ole2.INVOKE(MYSelection,'Copy');
client_ole2.INVOKE(MyDocument,'Close');
client_ole2.INVOKE(MyApplication,'Quit');
client_ole2.RELEASE_OBJ(MySelection);
client_ole2.RELEASE_OBJ(MyDocument);
client_ole2.RELEASE_OBJ(MyDocuments);
client_ole2.RELEASE_OBJ(MyApplication);
end;