processLine()
	{
  		line="$@" # get all args
 
  # F1=$(echo $line | awk '{ print $1 }')
 
 	#echo $line
	#touch $line".sh"
	#echo  $line >> $line".sh"
 
	#echo "date_stamp="'`'"date +%Y%m%d.%H%M%S"'`'"  # used to date stamp all files for this run"  >> $line".sh"
 
	#fname="/home/jtest/"$line".sh"
	#fname="./"$line".sh"
 
	#echo $fname
	#pname ="cp /home/jtest/test.txt /home/rms_user/jtest/$fname
 #cp /home/jtest/test.txt $fname
#echo fname
 
}
 
### Main script stars here ###
# Store file name
FILE=""
 
# Make sure we get file name as command line argument
# Else read it from standard input device
 
if [ "$1" == "" ]; then
   FILE="/home/jtest/filenames.sh"
#echo "k.txt"
else
   FILE="$1"
#echo "1k.txt"
   # make sure file exist and readable
   if [ ! -f $FILE ]; then
	#echo "2k.txt"
  	echo "$FILE : does not exists"
  	exit 1
   elif [ ! -r $FILE ]; then
	#echo "3k.txt"
  	echo "$FILE: can not read"
  	exit 2
   fi
fi
# read $FILE using the file descriptors
 
# Set loop separator to end of line
BAKIFS=$IFS
echo $IFS
IFS=$(echo -en "\n\b")
exec 3<&0
exec 0<$FILE
while read line
do
	# use $line variable to process line in processLine() function
	processLine $line
	fname="./"$line".sh"
 
#pnmae="/home/jtest/"
#echo $pname
 
echo $fname	
 
cp /home/jtest/template.txt $fname
 
#echo /home/jtest/template.txt $fname
 
 
sed 's/ordprg/'$line".sh"'/g' $line".sh" > temp_file
 
mv temp_file $line".sh"
 
#echo "#filename" $line".sh" >> $line".sh"
 
done
exec 0<&3
 
# restore $IFS which was used to determine what the field separators are
BAKIFS=$ORIGIFS
exit 0