OLE2 package (Developer 2000)

Hi!
I'm sorry for my poor English.
I have the following trouble :
I'm using a Form6.0(Developer 2000) OLE2 package and when I'm trying to paint a MS Excell cell's border , the following error has occured:  'ORA-305500'
 Where have i done mistakes?
-- PL/SQL--
When-button-pressed trigger
DECLARE
  application ole2.obj_type;
  workbooks ole2.obj_type;
  workbook ole2.obj_type;
  worksheets ole2.obj_type;
   worksheet ole2.obj_type;
args ole2.list_type;
cell ole2.obj_type;
border ole2.obj_type;
BEGIN
application:=OLE2.CREATE_OBJ('Excel.Application'); OLE2.Set_Property(application,'Visible', 'True'); workbooks:=OLE2.get_OBJ_property(application, 'Workbooks'); workbook:=OLE2.INVOKE_OBJ(workbooks,'Add'); worksheets:=OLE2.get_OBJ_property(workbook, 'Worksheets'); worksheet:=OLE2.INVOKE_OBJ(worksheets,'Add'); args:=OLE2.CREATE_ARGLIST;
OLE2.ADD_ARG(args, 'd5:j5');
cell:=OLE2.get_OBJ_property(worksheet, 'range', args); OLE2.Invoke(cell,'select');
OLE2.DESTROY_ARGLIST(args);
args:=OLE2.CREATE_ARGLIST;
OLE2.ADD_ARG(args,'xlEdgeBottom');
border:=OLE2.get_OBJ_property(cell, 'borders',args); --<<<<<<<< the trouble !!!!!

OLE2.DESTROY_ARGLIST(args);
OLE2.Set_Property(border,'LineStyle', 'xlContinuous');
OLE2.Set_Property(border,'Weight', 'xlThin');
. . .

Thanks in advance.
Alexander Received on Tue Aug 08 2000 - 00:00:00 CEST