331:
332: EXCEPTION
333: /* Added for bug2765486 to trap ORA -1720 */
334: /* BUG 2892989, Since APPLSYS owns WF queues, we don't use the owner condition
335: and use dba_queues that is faster than using dba_objects */
336:
337: WHEN no_grant_exist THEN
338: BEGIN
339: SELECT 1, owner into l_exists, l_queue_owner
336:
337: WHEN no_grant_exist THEN
338: BEGIN
339: SELECT 1, owner into l_exists, l_queue_owner
340: FROM dba_queues where name = p_object_name;
341:
342: EXCEPTION
343: WHEN OTHERS THEN
344: ad_apps_private.error_buf := 'create_grant('||