#!/usr/bin/ksh
# whatsob_periods ()
#------------------------------------------------------------------------------#
#    Module Name:  whatsob_periods                                             #
#                                                                              #
#    Purpose:      Report on the Set Of Books and Accounting-Period-Statuses.  #
#                                                                              #
#    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  " # whatsob_periods:  Oracle Apps Set Of Books Periods    #"
        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/whatsob_periods_$$.txt

       COLUMN  datevalue       NOPRINT NEW_VALUE       DATEVAR
       COLUMN  timevalue       NOPRINT NEW_VALUE       TIMEVAR

       COLUMN  c_stop       NOPRINT
       COLUMN  c_time       NOPRINT

       TTITLE  CENTER  'E-Business Suite Set Of Books - Periods'        -
               LEFT    DATEVAR                                          -
               RIGHT   'Page:'         FORMAT 999 SQL.pno       skip 1  -
               CENTER  'whatsob_periods -- Set Of Books - Periods'      -
               LEFT    TIMEVAR                                  skip 2

        COMPUTE SUM LABEL 'Total' OF ccount ON ccount

	COLUMN	pname	FORMAT  A20	HEADING 'GL Period Name|YY-MM'
	COLUMN	status	FORMAT  A20	HEADING 'GL Period Status'
	COLUMN	ccount	FORMAT  9999	HEADING 'GL Period Count'

        SELECT  TO_CHAR(sysdate, 'DD-MON-YY')   datevalue,
                TO_CHAR(sysdate, 'HH24:MI:SS')  timevalue,
		gps.period_name            pname,
		DECODE (gps.closing_status,
		'O', 'Open',
		'C', 'Closed',
		'F', 'Future',
		'N', 'Never')              status,
		count(gps.closing_status)  ccount
	FROM
		gl_period_statuses gps,
		gl_sets_of_books gsob
	WHERE
		gps.application_id = 101 and
		gsob.set_of_books_id = gps.set_of_books_id
	GROUP BY gps.period_name, gps.closing_status
	ORDER BY gps.period_name, gps.closing_status;

EXIT;

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