FUNCTION file_open (FILE VARCHAR2)
  RETURN client_ole2.obj_type
IS
  arg_list    client_ole2.list_type;
  document    client_ole2.obj_type;
  documents   client_ole2.obj_type;
BEGIN
  arg_list  := client_ole2.create_arglist;
  client_ole2.add_arg(arg_list, FILE);     
  documents := client_ole2.invoke_obj(appl_id, 'documents'); -- Here the browser dies
  document  := client_ole2.invoke_obj(documents, 'open', arg_list);
  client_ole2.destroy_arglist (arg_list);
  client_ole2.release_obj(documents);
  RETURN document;
END file_open;