#!/bin/sh
#
#   get_icc
#
#  Usage:   get_icc
#
#  By: Angel Corbera, TSID1, Refinery Isla, Curacao, N.A.
#
#  Purpose: Create a Control Blocks database from ICC files
#           residing on each CP's host.
#  Database format:  
#           CP - CMPD - BLOCK - BLOCK_TYPE
#  Note: ECB blocks are included.
#
cd /opt/ac
# rm *.tmp PLANT.icc
CPS=`sort /etc/cplns`
cd /opt/fox/ciocfg/api
for x in $CPS
do
 echo "Retrieving data from ICC files for $x ... \c"
 iccprt -n \* -o /opt/ac/$x.tmp $x
 echo "Done!"
done
cd /opt/ac
for x in $CPS
do
 echo "Cleanup, make-up, .. for $x ... \c"
 sed -e '/^-END/d' $x.tmp > tmp1
 sed -e '/^END/d' tmp1 > tmp2
 awk ' BEGIN { a="'$x'" }
   $0~/^LIST OF / { b=$9 }
   $0~/^  NAME:/ { printf "%-7s %-13s %-13s %-8s\n",a,b,$2,$4 }
   ' tmp2 > tmp3
 cat tmp3 >> PLANT.icc
 echo "Done!"
done
echo "\nPLANT.icc is ready!\n"
rm tmp1 tmp2 *.tmp