!/usr/bin/ksh
#whatversion ()
#-------------------------------------------------------------------------#
#    Module Name:  whatversion   (c) Copyright May 2012                   #
#                                                                         #
#    Purpose:      Report on the Apps (Products Version and Patch-Level)  #
#                                                                         #
#    Maintenance                                                          #
#    Date          Author        Description                              #
#    -----------   ------------  ---------------------------------------  #
#    10-May-2012   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  " # whatversion:           Oracle Apps Product Version #"
            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

#-------------------------------------------------------------------------#
#  Initialize                                                             #
#-------------------------------------------------------------------------#
        SPOOLNM=/tmp/whatversion_$$.txt

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

        CONNECT  APPS/$PASSWD

        SPOOL ${SPOOLNM}

        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

        prompt #----------------------------------------------------------#
        prompt #- Oracle Apps Product Version              (whatversion) -#
        prompt #----------------------------------------------------------#

        COLUMN  datevalue       NOPRINT NEW_VALUE       DATEVAR
        COLUMN  timevalue       NOPRINT NEW_VALUE       TIMEVAR

        COLUMN appsn    FORMAT A8       HEADING  "App|Short|Name"
        COLUMN appnm    FORMAT A29      HEADING  "Description"
        COLUMN appst    FORMAT A9       HEADING  "App|Status"
        COLUMN appvr    FORMAT A7       HEADING  "App|Version"
        COLUMN apppl    FORMAT A11      HEADING  "App|Patch|Level"
        COLUMN appdt    FORMAT A11      HEADING  "Update|Date"

        TTITLE  CENTER  '${ORASID} (${HNAME}) eBusiness Product Version ' -
                LEFT    DATEVAR                                 skip 1    -
                CENTER  'eBusiness 12 eBusiness Product Patch-Levels'     -
                LEFT    TIMEVAR                                 skip 2

        alter session set NLS_DATE_FORMAT = 'DD-MON-YYYY HH24:MI:SS';

        SELECT  TO_CHAR(sysdate, 'DD-MON-YY')           datevalue,
                TO_CHAR(sysdate, 'HH24:MI:SS')          timevalue,
                decode(nvl(a.APPLICATION_short_name,'Not Found'),
                'SQLAP','AP','SQLGL','GL','OFA','FA',
                'Not Found','id '||to_char(fpi.application_id),
                a.APPLICATION_short_name)                       appsn,
                a.APPLICATION_name                              appnm,
                decode(fpi.status,'I','Installed','S','Shared',
                'N','Inactive',fpi.status)                      appst,
                fpi.product_version                             appvr,
                nvl(fpi.patch_level,'-- Not Available --')      apppl,
                to_char(fpi.last_update_date,'dd-Mon-RRRR')     appdt
        FROM    fnd_oracle_userid o,
                fnd_application_vl a,
                fnd_product_installations fpi
        WHERE   fpi.application_id      = a.application_id(+)
          AND   fpi.oracle_id           = o.oracle_id(+)
        ORDER BY 3,4;

END_FILE

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