#!/usr/bin/ksh
# whatsga ()
#------------------------------------------------------------------------------#
#    Module Name:  whatsga                                                     #
#                                                                              #
#    Purpose:      Report on the Database System Global Area (SGA).            #
#                                                                              #
#    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  " # whatsga:          Oracle Apps System Global Area (SGA) #"
	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/whatsga_$$.txt

        prompt ================================================================
        prompt == Automated SGA Memory Management -- Dynamic-Components      ==
        prompt ================================================================

        BREAK   ON  REPORT
        COMPUTE SUM LABEL 'Total'       OF csize      ON REPORT
        COMPUTE SUM LABEL 'Total'       OF msize      ON REPORT

        COLUMN  datevalue       NOPRINT NEW_VALUE       DATEVAR
        COLUMN  timevalue       NOPRINT NEW_VALUE       TIMEVAR
        COLUMN  cmpnt   FORMAT  A26          Heading 'Component'
        COLUMN  csize	FORMAT  999999999999 Heading 'Current|Size'
        COLUMN  msize	FORMAT  999999999999 Heading 'Minimum|Size'
        COLUMN  usize	FORMAT  999999999999 Heading 'User|Specified|Size'
        COLUMN  otype	FORMAT  A8           Heading 'Last|Operatn|Type'

        TTITLE	CENTER  'Oracle SGA Dynamic Views (sga_dynamic_components)' -
		LEFT    DATEVAR                                             -
                RIGHT   'Page:'         FORMAT 999 SQL.pno      skip 1	    -
                CENTER  'whatsga -- Sorted by Component'		    -
                LEFT    TIMEVAR					skip 1	

        SELECT  TO_CHAR(sysdate, 'DD-MON-YY')           datevalue,
                        TO_CHAR(sysdate, 'HH24:MI:SS')  timevalue,
			component		cmpnt,
			current_size		csize,
			min_size		msize,
			user_specified_size	usize,
			last_oper_type		otype
	FROM	v\$sga_dynamic_components
	ORDER  BY      component;


	prompt
	prompt

        prompt ================================================================
        prompt == Automated SGA Memory Management -- ReSize Operations       ==
        prompt ================================================================
        BREAK   ON  REPORT
        COMPUTE SUM LABEL 'Total'       OF csize      ON REPORT
        COMPUTE SUM LABEL 'Total'       OF msize      ON REPORT

        COLUMN  datevalue       NOPRINT NEW_VALUE       DATEVAR
        COLUMN  timevalue       NOPRINT NEW_VALUE       TIMEVAR
        COLUMN  cmpnt   FORMAT  A25          Heading 'Component' 	-
				             WORD_WRAPPED
        COLUMN  isize	FORMAT  999999999999 Heading 'Initial|Size'
        COLUMN  fsize	FORMAT  999999999999 Heading 'Final|Size'
        COLUMN  vstat	FORMAT  A9           Heading 'Status'
        COLUMN  odate	FORMAT  A9           Heading 'Last|Changed|Time'

        TTITLE	CENTER  'Oracle SGA Dynamiv Views (sga_resize_ops)'	-
		LEFT    DATEVAR                                         -
                RIGHT   'Page:'         FORMAT 999 SQL.pno      skip 1	-
                CENTER  'whatsga -- Sorted by Component'		-
                LEFT    TIMEVAR					skip 1	

        SELECT  TO_CHAR(sysdate, 'DD-MON-YY')           datevalue,
                        TO_CHAR(sysdate, 'HH24:MI:SS')  timevalue,
			component || ' (' ||
			parameter || ')'				cmpnt,
			initial_size					isize,
			final_size					fsize,
			status						vstat,
			TO_CHAR(end_time, 'DD-MON-YY HH24:MI:SS')	odate
	FROM	v\$sga_resize_ops
	ORDER  BY      component;

        EXIT;
END_FILE

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