echo "REQUEST_ID=$REQUEST_ID"
echo "FILE_TYPE=$FILE_TYPE"
echo "RECIPIENT_LIST=$RECIPIENT_LIST"
echo "SUBJECT=$SUBJECT"
echo "REPLY_TO=$REPLY_TO"
echo "MODE=$MODE"
echo "OPTIONAL_TEXT=$OPTIONAL_TEXT"
echo "OPTIONAL_FILE_NAME=$OPTIONAL_FILE_NAME"
#
# Set the file name based on the file type, either 'out' or 'log'.
#
if [ $FILE_TYPE = "out" ]; then
  file_name=$APPLCSF/$APPLOUT/o$REQUEST_ID.out
else
  file_name=$APPLCSF/$APPLLOG/l$REQUEST_ID.req
fi
#
# E-mail the file as an 'Attachment' or 'Body Text'.
#
if [ -f $file_name ]; then
  if [ "$MODE" = "Attachment" ]; then
    (
cat <<!
From: $REPLY_TO
Subject: $SUBJECT
To: $RECIPIENT_LIST
Mime-Version:  1 . 0 
Content-Type: multipart/mixed; boundary="----=_Boundary.01282005"

This is a Mime message, which your mail program may not understand. Parts
of the message will appear as text. If the remainder appears as random
characters in the message body, instead of as attachments, then you'll
have to extract these parts and decode them manually.

------=_Boundary.01282005
Content-Type: text/plain; name="message.txt"; charset=US-ASCII
Content-Disposition: inline; filename="message.txt"
Content-Transfer-Encoding: 7bit

$OPTIONAL_TEXT

------=_Boundary.01282005
Content-Type: application/octet-stream; name="$OPTIONAL_FILE_NAME"
Content-Disposition: attachment; filename="$OPTIONAL_FILE_NAME"
Content-Transfer-Encoding: 7bit

!
cat $file_name

echo ------=_Boundary.01282005--
    ) | /usr/lib/sendmail -t
  else
    cat $file_name | mailx -r "$REPLY_TO" -s "$SUBJECT" "$RECIPIENT_LIST"
  fi
else
  echo "ERROR: $file_name file not found."
  exit  2 
fi

exit