OraFAQ Forum: Oracle Fusion Apps & E-Business Suite » How to end a warning status a shell script concurrent pgm

Home » Applications » Oracle Fusion Apps & E-Business Suite » How to end a warning status a shell script concurrent pgm

Show: Today's Messages :: Polls :: Message Navigator
E-mail to friend

How to end a warning status a shell script concurrent pgm [message #461103]

Wed, 16 June 2010 10:06

ddarveau
Messages: 7
Registered: May 2010
Location: Montreal, Quebec, Canada

Junior Member

How to end a warning status a shell script concurrent pgm?

I use a dos shell (file.cmd) which it called a file.proc which is a shell script in unix format.

My concurrent and executable is define which a host program and the program is called is file.cmd

I uable to termine in Warning status in yellow color.

I able only to terminate in normal or error status.

Thanks

Report message to a moderator

Re: How to end a warning status a shell script concurrent pgm [message #461152 is a reply to message #461103]

Wed, 16 June 2010 15:23

vamsi kasina
Messages: 2112
Registered: October 2003
Location: Cincinnati, OH

Senior Member

Code: [Select all] [Show/ hide]

I able only to terminate in normal or error status.

How are you doing this?
What is the code?

By
Vamsi

Report message to a moderator

Re: How to end a warning status a shell script concurrent pgm [message #461333 is a reply to message #461152]

Thu, 17 June 2010 07:52

ddarveau
Messages: 7
Registered: May 2010
Location: Montreal, Quebec, Canada

Junior Member

my code of my prog pgm is :

#!/bin/sh
# Programme
# ---------
# LQ_MDFNDP05_FNDDOWNLOAD.prog
#
# Permet d'extraire les objects flex a partir de l'ecran de demande
#
# Prérequis
# Le soft Link suivant est requis :
# cd $LQ_TOP/bin
# ln -fs $FND_TOP/bin/fndcpesr LQ_MDFNDP05_FNDDOWNLOAD
# Parametres d'application
# -------------------------
# 1 Oracle username - password
# 2 Utilisateur
# 3 Utilisateur applications
# 4 Numero Conc. Request
#
# 5 Type d'objet flex "PGM"
# 6 Nom abrege de l'application
# 7 Nom de l'objet flex
#
#
#
# Parametres du programme
# -------------------------
#
# Historique des modification
# ---------------------------
# V01 20040521 VIENNEN Creation du fichier
# V02 20080229 JOCELYN COTE Ajouter le Code personnalisé
# V03 20080714 JOCELYN COTE Ajouter les annexes
# -----------------------------------------------------------------------------
#
c_SUCCESS=0
c_ERROR=1
c_WARNING=2
c_FATAL_ERROR=3
l_error_code=$c_SUCCESS

l_count=1
lq_host=`hostname`
l_actual_path=`pwd`
umask 002

# Nom des fichiers de log et erreur
fichier_log=$LQ_TOP/log/$4.log
fichier_err=$LQ_TOP/log/$4.err
sql_statement=$LQ_TOP/log/$4.sql

echo "NV DEBUT " 1>>$fichier_log

NLS_LANG='CANADIAN FRENCH_CANADA.WE8ISO8859P1';export NLS_LANG

case ${5} in
'ATTACH')
FNDLOAD ${1} 0 Y DOWNLOAD @FND:patch/115/import/afattach.lct \
$APPLCSF/$APPLOUT/o${4}.out FND_ATTACHMENT_FUNCTIONS \
FUNCTION_NAME="${7}"
;;
'FORM_CUSTOM')
FNDLOAD ${1} 0 Y DOWNLOAD @FND:patch/115/import/affrmcus.lct \
$APPLCSF/$APPLOUT/o${4}.out FND_FORM_CUSTOM_RULES \
FORM_NAME="${7}"
;;
'VALUE_SET')
FNDLOAD ${1} 0 Y DOWNLOAD @FND:patch/115/import/afffload.lct \
$APPLCSF/$APPLOUT/o${4}.out VALUE_SET \
FLEX_VALUE_SET_NAME="${7}"
;;
'VALUE_SET_VALUE')
FNDLOAD ${1} 0 Y DOWNLOAD @FND:patch/115/import/afffload.lct \
$APPLCSF/$APPLOUT/o${4}.out VALUE_SET \
FLEX_VALUE_SET_NAME="${7}"
;;
'LOOKUP')
FNDLOAD ${1} 0 Y DOWNLOAD @FND:patch/115/import/aflvmlu.lct \
$APPLCSF/$APPLOUT/o${4}.out FND_LOOKUP_TYPE \
VIEW_APPSNAME="${6}" \
LOOKUP_TYPE="${7}" \
SECURITY_GROUP="STANDARD"
;;
'PGM')
FNDLOAD ${1} 0 Y DOWNLOAD @FND:patch/115/import/afcpprog.lct $APPLCSF/$APPLOUT/o${4}.out \
PROGRAM CONCURRENT_PROGRAM_NAME="${7}" FLEX_VALUE_SET_NAME=" " FLEX_VALUE_RULE_NAME=" " APPLICATION_SHORT_NAME="${6}"
grep LQ_GL_CDC_* $APPLCSF/$APPLOUT/o${4}.out 1>/dev/null
if [[ $? -eq 0 ]] ; then
echo "ATTENTION : Jeu de valeurs sur la charte de compte" 1>>$fichier_log
ECHO ${c_WARNING} 1>>$fichier_log
exit ${c_WARNING}
else
echo "Aucun jeu de valeurs trouvé sur la charte de compte" 1>>$fichier_log
fi
;;
'PROFILE')
FNDLOAD ${1} 0 Y DOWNLOAD @FND:patch/115/import/afscprof.lct \
$APPLCSF/$APPLOUT/o${4}.out PROFILE \
PROFILE_NAME="${7}" \
APPLICATION_SHORT_NAME="${6}"
;;
'REQ_SET')
FNDLOAD ${1} 0 Y DOWNLOAD @FND:patch/115/import/afcprset.lct \
$APPLCSF/$APPLOUT/o${4}.out REQ_SET REQUEST_SET_NAME="${7}"
;;
'REQ_SET_LINK')
FNDLOAD ${1} 0 Y DOWNLOAD @FND:patch/115/import/afcprset.lct \
$APPLCSF/$APPLOUT/o${4}.out REQ_SET_LINKS REQUEST_SET_NAME="${7}"
;;
'MSG_US')
NLS_LANG="AMERICAN_AMERICA.WE8ISO8859P1";export NLS_LANG
FNDLOAD ${1} 0 Y DOWNLOAD @FND:patch/115/import/afmdmsg.lct \
$APPLCSF/$APPLOUT/o${4}.out FND_NEW_MESSAGES APPLICATION_SHORT_NAME="${6}" \
MESSAGE_NAME="${7}"
;;
'MSG_FRC')
NLS_LANG="CANADIAN FRENCH_CANADA.WE8ISO8859P1";export NLS_LANG
FNDLOAD ${1} 0 Y DOWNLOAD @FND:patch/115/import/afmdmsg.lct \
$APPLCSF/$APPLOUT/o${4}.out FND_NEW_MESSAGES APPLICATION_SHORT_NAME="${6}" \
MESSAGE_NAME="${7}"
;;
*)
echo "ERR Parametre : Type d'objet flex erronee"
exit ${ERROR}
;;
esac

exit ${SUCCESS}

My code of my cmd program which is called by concurrent program

:: =============================================================================================
:: Programme
:: ---------
:: LQ_MDFNDP05_FNDDOWNLOAD.cmd - LQ FND Extraire les objets flex (Fichier .ldt)
::
:: Permet d'extraire les données flex (fndload)
::
:: Prérequis
:: Le fichier %FND_TOP%\bin\FNDCPESR.exe doit être copié avec le nom LQ_MDFNDP05_FNDDOWNLOAD.exe
:: dans le même répertoire que LQ_MDFNDP05_FNDDOWNLOAD.cmd
::
:: Parametres d'application
:: -------------------------
:: 1 Oracle username - password
:: 2 Utilisateur
:: 3 Utilisateur applications
:: 4 Numero Conc. Request
::
:: Parametres du programme
:: -------------------------
:: 5 Type d'objet flex "PGM"
:: 6 Nom abrege de l'application
:: 7 Nom de l'objet flex
::
:: History
:: VIENNEN 2007-11-07 Création du fichier de commandes
:: =============================================================================================

@SETLOCAL
@ECHO OFF
:: IL faut ajouter d:\cygwin\bin puisque l'appel au shell (sh) ne se fait pas sans cet ajout.
SET PATH=d:\cygwin\bin;%PATH%

:: Configure la date pour affichage
SET DATE_CMD=%DATE%

:: Configure l'heure pour affichage (HH:MM:SS)
SET TIME_CMD=%TIME:~0,8%

:: Assigne les variables de base
SET DTTM=%DATE_CMD% %TIME_CMD%
SET SUCCESS=0
SET ERROR=1
SET WARNING=255
SET FATAL_ERROR=3

:: Vérification du nombre arguments (doit avoir 7 arguments). Si plus de 7 parametres, affiche erreur et quitte
IF %7 == """" GOTO PARAM_ERR
IF NOT %8 == """" GOTO PARAM_ERR

:: ------------------------------------------------------------------------------------------------------------------------
:PARAM_OK
:: ------------------------------------------------------------------------------------------------------------------------
echo
echo --------------------------------------------
echo Execution %0 - %DTTM%
echo --------------------------------------------
echo Parametres Applications:
echo 1 Oracle username - password : APPS
echo 2 Utilisateur : %2
echo 3 Utilisateur applications : %3
echo 4 Numero Conc. Request : %4
echo Parametres Programme:
echo 5 Type d'objet flex : %~5
echo 6 Nom abrege de l'application : %~6
echo 7 Nom de l'objet flex : %~7
echo --------------------------------------------
echo .
echo .
GOTO Traitement

:: ------------------------------------------------------------------------------------------------------------------------
:PARAM_ERR
:: ------------------------------------------------------------------------------------------------------------------------
echo
echo --------------------------------------------
echo Execution %0 - %DTTM%
echo --------------------------------------------
echo Parametres Applications:
echo 1 Oracle username - password: APPS
echo 2 Utilisateur : %2
echo 3 Utilisateur applications : %3
echo 4 Numero Conc. Request : %4
echo Parametres Programme:
echo 5 Type d'objet flex : %~5
echo 6 Nom abrege de l'application : %~6
echo 7 Nom de l'objet flex : %~7
echo --------------------------------------------
echo .
echo *** ERREUR %0: Nombre arguments incorrect. ***
echo *** 8=%8 ***
echo .
echo .
SET RETCODE=%ERROR%
GOTO sortie

:: ------------------------------------------------------------------------------------------------------------------------
: Traitement
:: ------------------------------------------------------------------------------------------------------------------------

ECHO trace 1
set CYGWIN=notty server ntea nobinmode

ECHO trace 2

sh %LQ_TOP%\bin\LQ_MDFNDP05_FNDDOWNLOAD.prog %1 %2 %3 %4 %5 %6 %7

ECHO trace 3

IF %ERRORLEVEL% == 0 GOTO error0
IF %ERRORLEVEL% == 1 GOTO error1
IF %ERRORLEVEL% == 2 GOTO error2
IF %ERRORLEVEL% == 3 GOTO error3

:: ------------------------------------------------------------------------------------------------------------------------
:error0
:: ------------------------------------------------------------------------------------------------------------------------
:: Affiche la sortie de la commande FTP
:: venant du fichier créé par le programme appelé

echo LQ FND Extraire les objets flex (Fichier .ldt) s'est exécuté avec succès.
echo ===========================================================================
echo Fichier de la Log:
type %LQ_TOP%\log\%4.log
echo ===========================================================================
SET RETCODE=%SUCCESS%
GOTO sortie

)

:: ------------------------------------------------------------------------------------------------------------------------
:error1
:: ------------------------------------------------------------------------------------------------------------------------
:: Affiche la sortie de la commande FTP
:: venant du fichier créé par le programme appelé

echo *** Erreur %ERRORLEVEL% durant l'exécution de la migration ***
echo ===========================================================================
echo ===========================================================================
echo Fichier de la Log:
echo %LQ_TOP%\log\%4.log
type %LQ_TOP%\log\%4.log
echo ---------------------------------------------------------------------------
echo .
echo Fichier des Erreurs:
echo %LQ_TOP%\log\%4.err
type %LQ_TOP%\log\%4.err
echo ===========================================================================
SET RETCODE=%ERROR%
GOTO sortie

:: ------------------------------------------------------------------------------------------------------------------------
:error2
:: ------------------------------------------------------------------------------------------------------------------------
:: Affiche les erreurs et la sortie de la commande
:: venant du fichier créé par le programme appelé

echo LQ FND Extraire les objets flex (Fichier .ldt) s'est exécuté avec un avertissement.
echo ===========================================================================
echo Fichier de la Log:
type %LQ_TOP%\log\%4.log
echo ===========================================================================
SET RETCODE=%WARNING%
GOTO sortie

:: ------------------------------------------------------------------------------------------------------------------------
:error3
:: ------------------------------------------------------------------------------------------------------------------------
:: Affiche les erreurs et la sortie de la commande
:: venant du fichier créé par le programme appelé

echo *** Fatal Error %ERRORLEVEL% durant l'exécution de la migration ***
echo ===========================================================================
echo Fichier de la Log:
type %LQ_TOP%\log\%4.log
echo ===========================================================================
SET RETCODE=%ERROR%
GOTO sortie

:: ------------------------------------------------------------------------------------------------------------------------
:sortie
:: ------------------------------------------------------------------------------------------------------------------------
SET SUCCESS=
SET WARNING=
SET ERROR=
echo Fin de LQ_MDFNDP05_FNDDOWNLOAD.cmd

echo test Nathalie
echo %RETCODE%

:: ------------------------------------------------------------------------------------------------------------------------
:end
:: ------------------------------------------------------------------------------------------------------------------------
exit %RETCODE%
ENDLOCAL

Report message to a moderator

Re: How to end a warning status a shell script concurrent pgm [message #461389 is a reply to message #461333]

Thu, 17 June 2010 11:28

vamsi kasina
Messages: 2112
Registered: October 2003
Location: Cincinnati, OH

Senior Member

Quote:

SET SUCCESS=0
SET ERROR=1
SET WARNING=255
SET FATAL_ERROR=3

I got two contradictory links.
Check link1 and link2.

From the Oracle Applications System Administrator's Guide - Configuration, there are only codes for 1 and 2.
Chapter: Defining Concurrent Programs and Requests
Section: Custom Concurrent Programs
Topic: Host Language Concurrent Programs
Subtopic: Success Codes

By
Vamsi

Report message to a moderator

Previous Topic:	how can i call item import program from back end
Next Topic:	RFQ Interface

Goto Forum:

-=] Back to Top [=-

[ Syndicate this forum (XML) ] [

]

Current Time: Thu Apr 17 02:12:27 CDT 2025