How to find dependent objects in oracle

Query to find out the dependent objects:
=============================

set lines 400
set pages 2000
set verify off
set termout on
set feedback on

col OWNER format a20
col NAME format a30
col TYPE format a20
col REFERENCED_TYPE format a20
col DEPENDENCY_TYPE format a10
col OBJECT_NAME format a30
col STATUS format a10
col REFERENCED_OWNER for a20
col REFERENCED_NAME for a20

SELECT X.OWNER,
       X.NAME,
       X.TYPE,
       Y.STATUS,
       X.REFERENCED_OWNER,
       X.REFERENCED_NAME,
       X.REFERENCED_TYPE,
       X.DEPENDENCY_TYPE
FROM DBA_DEPENDENCIES X,DBA_OBJECTS Y
WHERE X.OWNER=Y.OWNER
AND X.NAME=Y.OBJECT_NAME
AND X.REFERENCED_OWNER=UPPER('&OWNER')
AND X.REFERENCED_NAME=UPPER('&OBJECT_NAME')
order by X.TYPE;


INPUT: REFERENCED_OWNER and REFERENCED_NAME (these are the parent object details)

Query to find out the objects which is depend on:
======================================

set lines 400
set pages 2000
set verify off
set termout on
set feedback on
col OWNER format a20
col NAME format a30
col TYPE format a20
col REFERENCED_TYPE format a20
col DEPENDENCY_TYPE format a10
col OBJECT_NAME format a30
col STATUS format a10
col REFERENCED_OWNER for a20
col REFERENCED_NAME for a20
col REFERENCED_NAME for a30
set lines 300 pages 300
SELECT X.OWNER,
       X.NAME,
       X.TYPE,
       Y.STATUS,
       X.REFERENCED_OWNER,
       X.REFERENCED_NAME,
       X.REFERENCED_TYPE,
       X.DEPENDENCY_TYPE
FROM DBA_DEPENDENCIES X,DBA_OBJECTS Y
WHERE X.OWNER=Y.OWNER
AND X.NAME=Y.OBJECT_NAME
AND X.OWNER=UPPER('&owner')
AND X.NAME=UPPER('&NAME')

order by REFERENCED_OWNER;

INPUT: OWNER and NAME (these are the Child object details)