#!/usr/bin/ksh
# whatoafpersonalization ()
#------------------------------------------------------------------------------#
#    Module Name:  whatoafpersonalization                                      #
#                                                                              #
#    Purpose:      Report on the OA-Framework Personalizations.                #
#                                                                              #
#    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)

        #----------------------------------------------------------------------#
        #  TEST:  Number ($#) of arguments passed to this function?            #
        #----------------------------------------------------------------------#
        if      [ $# = 0 ]
        then
            clear
            echo
            echo  " #--------------------------------------------------------#"
            echo  " # whatoafpersonalization:  OA-Framework Personalizations #"
            echo  " #--------------------------------------------------------#"
            echo

            #------------------------------------------------------------------#
            #  Trap:  Set CNTL-C CNTL-D CNTL-\ Before Password Protection      #
            #------------------------------------------------------------------#
            trap        "stty echo; return"     2
            trap        "stty echo; return"     3
            stty -echo

            read PASSWD?" Please Enter the Oracle APPS Passwd:  "

            stty echo
            echo
            #------------------------------------------------------------------#
            #  Trap:  Reset CNTL-C CNTL-D CNTL-\ After Password Protection     #
            #------------------------------------------------------------------#
            trap        2
            trap        3

            clear
        else
            PASSWD=$1
            clear
        fi

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

        CONNECT  APPS/$PASSWD

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

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

        SPOOL /tmp/whatoafpersonalization_$$.txt

        COLUMN  datevalue       NOPRINT NEW_VALUE       DATEVAR
        COLUMN  timevalue       NOPRINT NEW_VALUE       TIMEVAR
        COLUMN  pers_id         FORMAT  999999  Heading 'Prsnztn|ID'
        COLUMN  pers_form_doc   FORMAT  A121    Heading 'Personalization Doc.'

        TTITLE  CENTER  'Oracle eBusiness Suite  Report'                -
                LEFT    DATEVAR                                         -
                RIGHT   'Page:'         FORMAT 999 SQL.pno      skip 1  -
                CENTER  'whatoafpersonalization - Sorted Personalization Doc.' -
                LEFT    TIMEVAR                                 skip2

        SELECT  TO_CHAR(sysdate, 'DD-MON-YY')   datevalue,
                TO_CHAR(sysdate, 'HH24:MI:SS')  timevalue,
                PATH.PATH_DOCID PERS_ID,
                 jdr_mds_internal.getdocumentname(PATH.PATH_DOCID) PERS_FORM_DOC
          FROM  JDR_PATHS PATH
         WHERE  PATH.PATH_DOCID IN
                (SELECT DISTINCT COMP_DOCID FROM JDR_COMPONENTS
                  WHERE COMP_SEQ = 0 AND COMP_ELEMENT = 'customization'
                    AND  COMP_ID IS NULL)
         ORDER BY PERS_FORM_DOC;

        EXIT;

END_FILE

print
print "Please see /tmp/whatoafpersonalization_$$.txt"
print
}