#!/usr/bin/ksh
# whatconcmgr ()
#-------------------------------------------------------------------------#
#    Module Name:  whatconcmgr  (c) Copyright 2012                        #
#                                                                         #
#    Purpose:      Report on the ConcRequest.                             #
#                                                                         #
#    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)
                
	clear
	echo
	echo  " #--------------------------------------------------------#"
	echo  " # whatconcmgr:     Oracle Apps Concurrent Manager (Info) #"
	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
	ORANAM=${ORASID}
	
#-------------------------------------------------------------------------#
#  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	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/whatconcmgr_$$.txt

        COLUMN  datevalue       NOPRINT NEW_VALUE       DATEVAR
        COLUMN  timevalue       NOPRINT NEW_VALUE       TIMEVAR

        COLUMN  c_stop       NOPRINT 
        COLUMN  c_time       NOPRINT

        COLUMN  mname   FORMAT A21    Heading 'ConcManager' -
        COLUMN  node1   FORMAT A8     Heading 'Primary|Node'
        COLUMN  mproc   FORMAT 99999  Heading 'Max|Procs'
        COLUMN  rproc   FORMAT 99999  Heading 'Runng|Procs'
        COLUMN  nproc   FORMAT 99999  Heading 'Min|Procs'
        COLUMN  tproc   FORMAT 99999  Heading 'Targt|Procs'
        COLUMN  mssec   FORMAT 9999   Heading 'Sleep|Secs'
        COLUMN  mcsiz   FORMAT 9999   Heading 'Cache|Size'
        COLUMN  enabl   FORMAT A4     Heading 'Enable|Flag'
        COLUMN  mdiag   FORMAT A4     Heading 'Diag|Flag'

        BREAK   ON mname       skip 1 ON node1 skip 0

        TTITLE  CENTER  'eBusiness Concurrent Manager (Definitions)' -
                LEFT    DATEVAR                                      -
                RIGHT   'Page:'         FORMAT 999 SQL.pno    skip 1 -
                CENTER  'whatconcmgr -- ConcManager Info'            -
                LEFT    TIMEVAR                               skip 2

        SELECT  TO_CHAR(sysdate, 'DD-MON-YY')   datevalue,
                TO_CHAR(sysdate, 'HH24:MI:SS')  timevalue,
                FTL.user_concurrent_queue_name          mname,
                FCO.node_name                           node1,
                FCO.max_processes                       mproc,
                FCO.running_processes                   rproc,
                FCO.min_processes                       nproc,
                FCO.target_processes                    tproc,
                FCO.sleep_seconds                       mssec,
                FCO.cache_size                          mcsiz,
                DECODE(FCO.enabled_flag, 'Y', 'Yes',
	               'N', 'No', FCO.enabled_flag)      enabl,
                DECODE(FCO.diagnostic_level, 'Y', 'Yes',
                      'N', 'No', FCO.diagnostic_level)  mdiag
          FROM  fnd_concurrent_queues    FCO,
                fnd_concurrent_queues_tl FTL
         WHERE  FCO.concurrent_queue_id = FTL.concurrent_queue_id;

EXIT;

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