#!/bin/ksh
#whatwfmaildate ()
#------------------------------------------------------------------------------#
#    Module Name:  whatwfmaildate      (c) Copyright May 2012                  #
#                                                                              #
#    Purpose:      Report on the WorkFlow Mail Dates for Desired Status:       #
#                    MAIL    Ready to Send eMail                               #
#                    SENT    Already Sent eMail                                #
#                    ERROR                                                     #
#    Maintenance                                                               #
#    Date          Author        Description                                   #
#    -----------   ------------  --------------------------------------------  #
#    01-Feb-2007   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  " # whatwfmaildate:           Oracle Apps WorFlow Services #"
	    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 MAILST?" Please Enter MAIL/SENT/ERROR:   "
	    clear
	else
	    PASSWD=$1
	    clear
	fi


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

#------------------------------------------------------------------------------#
#  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     pagesize        9000
	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 ${SPOOLNM}
        COLUMN  datevalue       NOPRINT NEW_VALUE       DATEVAR
        COLUMN  timevalue       NOPRINT NEW_VALUE       TIMEVAR

        COLUMN col1	NOPRINT NEW_VALUE       TIMEVAR

	COLUMN wfmail		FORMAT A38	HEADING	'WF Mail Date'
	COLUMN wfcntr		FORMAT 999,999	HEADING	'Count'

        TTITLE  CENTER '${ORASID} (${HNAME}) WF Notifications Status: $MAILST' -
								 skip 2

	SELECT	/* + PARALLEL (wf_notifications, 4) */
		distinct(TO_CHAR(begin_date, 'YYYY-MON-DD')) wfmail,
		count(*) wfcntr
	FROM	wf_notifications
	WHERE 	mail_status  LIKE  '%$MAILST%'
	GROUP BY mail_status, (TO_CHAR(begin_date, 'YYYY-MON-DD'))
	ORDER BY 1;


EXIT;
END_FILE

echo
}
