Friday, June 21, 2013

What is the E-Business Suite XML-Publisher Version that you are Using:


#!/usr/bin/ksh
#whatxmlversion ()
#-----------------------------------------------------------------------#
#    Module Name:  whatxmlversion  (c) Copyright 2012                   #
#                                                                       #
#    Purpose:      Report on the eBusiness XML Publisher Version.       #
#                                                                       #
#                  PATCH BUG_NUMBER                                     #
#                  ----- ------------------------------                 #
#                  XDO.H 3263588                                        #
#                  4.5.0 3554613                                        #
#                  5.0.0 3822219                                        #
#                  5.0.1 4236958                                        #
#                  5.5.0 4206181                                        #
#                  5.6.0 4561451                                        #
#                  5.6.1 4905678                                        #
#                  5.6.2 5097966                                        #
#                  5.6.3 5472959                                        #
#                                                                       #
#    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)

        #---------------------------------------------------------------#
        #  TEST:  Number ($#) of arguments passed to this function?     #
        #---------------------------------------------------------------#
        if      [ $# = 0 ]
        then
            clear
            echo
            echo  " #--------------------------------------------------#"
            echo  " # whatxmlversion:     Oracle XML Publisher Version #"
            echo  " #--------------------------------------------------#"
            echo                                                              

            #-----------------------------------------------------------#
            #  Trap:  Set CNTL-C CNTL-D CNTL-\ Before Passwd 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 Passwd Protection #
            #-----------------------------------------------------------#
            trap        2
            trap        3

            clear
        else
            PASSWD=$1
            clear
        fi


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

#-----------------------------------------------------------------------#
#  SQL*Plus ("Here-Document")                                           #
#-----------------------------------------------------------------------#
sqlplus  -s  /nolog  <<-END_FILE

        CONNECT  APPS/$PASSWD
        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}
        clear   BREAKS
        clear   BUFFER
        clear   COLUMNS
        clear   COMPUTES
        clear   SCREEN
        clear   SQL
        clear   TIMING

        prompt #--------------------------------------------------------#
        prompt #- eBusiness Suite 12.1 (whatxmlversion)                -#
        prompt #--------------------------------------------------------#

        COLUMN  datevalue       NOPRINT NEW_VALUE       DATEVAR
        COLUMN  timevalue       NOPRINT NEW_VALUE       TIMEVAR

        COLUMN XML_Version FORMAT A40 HEADING 'E-Business Suite|XML-Version'
        TTITLE  CENTER '${ORASID} (${HNAME}) E-Business XML Publisher' -
                LEFT   DATEVAR                               skip 1    -
                CENTER 'Sorted by ProfileName'                         -
                LEFT   TIMEVAR                               skip 2

        SELECT  TO_CHAR(sysdate, 'DD-MON-YY')           datevalue,
                TO_CHAR(sysdate, 'HH24:MI:SS')          timevalue,
                DECODE (bug_number,
                        '3554613', '4.5.0',
                        '3263588', 'XDO.H',
                        '3822219', '5.0.0',
                        '4236958', '5.0.1',
                        '4206181', '5.5.0',
                        '4561451', '5.6.0',
                        '4905678', '5.6.1',
                        '5097966', '5.6.2',
                        '5472959', '5.6.3'
                   ) XML_Version, bug_number
          FROM ad_bugs
         WHERE bug_number IN
                ('3554613', '3263588', '3822219', '4236958', '4206181',
                 '4561451', '4905678', '5097966', '5472959');

EXIT;
END_FILE

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

No comments:

Post a Comment