#!/usr/bin/ksh
# whatdbadirectories ()
#------------------------------------------------------------------------------#
#    Module Name:  whatdbadirectories                                          #
#                                                                              #
#    Purpose:      Report on the DBA Unix/Linux Directories.                   #
#                  create or replace directory <directory_name> as '/tmp/tst'; #
#                                                                              #
#    Maintenance                                                               #
#    Date          Author        Description                                   #
#    -----------   ------------  --------------------------------------------- #
#    10-Oct-2009   M.Barone      Module design/creation                        #
#------------------------------------------------------------------------------#
{
        DIRNAM=$(dirname $0)
        ORASID=$(echo $CONTEXT_NAME | cut -f1 -d'_')
        HNAME=$(uname -n)
                
        clear
        echo
        echo  " #--------------------------------------------------------#"
        echo  " # whatdbadirectories:        Oracle Apps DBA Directories #"
        echo  " #--------------------------------------------------------#"
        echo
        echo  " Connecting as SYSDBA"
        sleep 2

        clear
        ORANAM=${ORASID}

#------------------------------------------------------------------------------#
#  SQL*Plus ("Here-Document")                                                  #
#------------------------------------------------------------------------------#
sqlplus  -s  /nolog  <<-END_FILE

        CONNECT  /  as  SYSDBA

        clear   BREAKS
        clear   BUFFER
        clear   COLUMNS
        clear   COMPUTES
        clear   SCREEN
        clear   SQL
        clear   TIMING

        set     feedback        off
        set     flush           on
        set     heading         on
        set     pause           off
        set     space           1
        set     termout         on
        set     verify          on
        set     linesize        80
        set     pagesize        999

        SPOOL /tmp/whatdbadirectories_$$.txt

        COLUMN  datevalue       NOPRINT NEW_VALUE       DATEVAR
        COLUMN  timevalue       NOPRINT NEW_VALUE       TIMEVAR

        COLUMN  downr   FORMAT  A8      Heading 'Owner'
        COLUMN  dname   FORMAT  A22     Heading 'Directory Name'
        COLUMN  dpath   FORMAT  A48     Heading 'Directory Path'

        TTITLE  CENTER  '[${ORANAM} (${HNAME}) Apps DBA Directories ]'      -
                LEFT    DATEVAR                                     skip 1  -
                LEFT    TIMEVAR                                     skip 2

       SELECT   TO_CHAR(sysdate, 'DD-MON-YY')           datevalue,
                TO_CHAR(sysdate, 'HH24:MI:SS')          timevalue,
                owner                   downr,
                directory_name          dname,
                directory_path          dpath
          FROM  dba_directories 
         ORDER  BY  1,2;
EXIT;

END_FILE
print
print "Please see /tmp/whatdbadirectories_$$.txt"
print
}