#!/usr/bin/ksh
#whatpatch122 ()
#------------------------------------------------------------------------------#
#    Module Name:  whatpatch122                                                #
#                                                                              #
#    Purpose:      Patches Installed that Match a Search-String.               #
#                                                                              #
#    Maintenance                                                               #
#    Date          Author        Description                                   #
#    -----------   ------------  --------------------------------------------  #
#    20-Jul-2018   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  " # whatpatch122:         Oracle eBusiness Applied Patches #"
            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

            read PTCHNM?" Please Enter the Patch-Number/Partial-Number: "

            clear
        else
            PASSWD=$1
            clear
        fi

#------------------------------------------------------------------------------#
#  Initialize                                                                  #
#------------------------------------------------------------------------------#
        SPOOLNM=/tmp/whatpatch122_$$.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 #- What (whatpatch122)                                         -#
        prompt #---------------------------------------------------------------#

        COLUMN  datevalue       NOPRINT NEW_VALUE       DATEVAR
        COLUMN  timevalue       NOPRINT NEW_VALUE       TIMEVAR

        COLUMN  strdt  format A11       HEADING 'Start|Date'        WORD_WRAPPED
        COLUMN  snmbr  format 999       HEADING 'ADOP|Id'           WORD_WRAPPED
        COLUMN  pnmbr  format A9        HEADING 'Patch|Number'      WORD_WRAPPED
        COLUMN  stype  format A8        HEADING 'ADOP|Type'         WORD_WRAPPED
        COLUMN  stats  format A10       HEADING 'Patch|Status'      WORD_WRAPPED
        COLUMN  nname  format A10       HEADING 'Node Name'         WORD_WRAPPED
        COLUMN  stpdt  format A10       HEADING 'Stop|Date'         WORD_WRAPPED
        COLUMN  extim  format 999.99    HEADING 'Exec|Time|(Min)'   WORD_WRAPPED
        COLUMN  aoptn  format A8        HEADING 'ADOP|Option'       WORD_WRAPPED
        COLUMN  aucfg  format A4        HEADING 'AD|Auto|Cfg'       WORD_WRAPPED
        COLUMN  dfile  format A10       HEADING 'Patch|DriverFile'  WORD_WRAPPED


        TTITLE  CENTER  '${ORASID} (${HNAME}) E-Businesss 12.2 Patches'     -
                LEFT    DATEVAR                                     skip 1  -
                CENTER  'E-Business Suite'                                  -
                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,
		start_date					strdt,
		adop_session_id					snmbr,
		bug_number					pnmbr,
		session_type					stype,
       		DECODE(status,'N','Applied on other nodes',
                     'R','Running',
                     'H','Failed (Hard)',
                     'F','Failed (Jobs Skipped)',
                     'S','Success (Jobs Skipped)',
                     'Y','Success',
                     'C','Clone Complete') 			stats,
		node_name					nname,
		ROUND((end_date - start_date) * 24*60,2) 	extim,
		adpatch_options 				aoptn,
		autoconfig_status				aucfg
	FROM ad_adop_session_patches
	WHERE session_type IN ('ADPATCH','HOTPATCH','DOWNTIME','ONLINE')
	ORDER BY start_date, end_date, adop_session_id, bug_number;

END_FILE

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