#!/bin/ksh
#
# Usage tcf_resp.ksh EnvFile Port Protocol
#
# where:
# 
#   EnvFile : Fully qualified environment file
#   Port    : TCF Listener port
#   Protocol: Protocol: TCP | SOCKETS | HTTP | HTTPS | SSL
#


EnvFile=$1
Port=$2
Protocol=$3

. $EnvFile                     # source environment file

ret_value=1

if (`jre oracle.apps.fnd.tcf.ServerControl STATUS $Port PROTOCOL=$Protocol | grep -i error >/dev/null`)
then
    ret_value=0
fi

echo "em_result=$ret_value"

