#!/bin/ksh
#  -*-awk-*- force emacs to awk mode
# ###############################################################################
#
#               CoCreate Software GmbH Confidential
#
# Description:  script to generate an icon index file
# Author:       Wolfgang Traetner
# Created:      Wed Sep 13 07:27:06 2000
# Modified:     
# Language:     ksh
#
# (C) Copyright 2000 CoCreate Software GmbH, all rights reserved.
#
###############################################################################

# script to generate an icon index file
#  1) store and name your icon files as described in sl_icon_create.html
#  2) change directory to {catalogdir}/slcatalog/icon
#  3) call script with
#      makeicon {classcode}
#
# result is written to {classcode}.IDX
# 
# filename = classcode(DOT)number
#                with number 001:    used for purpose PART
#                with number 002,003 used for purpose VIEW
#                with number 004,nnn used for purpose SML

if [ "${1}" != "" ]
then
  cd PART 
  for file in ${1}.001 ; do echo PART@${1}@PART/${file}@0>/tmp/_temp_.IDX ; done
  cd ..

  cd SML
  for file in ${1}.0?? ; do echo SML@${1}@SML/${file}@0>>/tmp/_temp_.IDX ; done
  cd ..

  cd VIEW
  for file in ${1}.002 ; do echo VIEW@${1}@VIEW/${file}@4@ans@2@anv@1@ebz@1@dsg@S>>/tmp/_temp_.IDX ; done
  for file in ${1}.003 ; do echo VIEW@${1}@VIEW/${file}@4@ans@4@anv@1@ebz@1@dsg@S>>/tmp/_temp_.IDX ; done
  cd ..

  cat /tmp/_temp_.IDX |sort >${1}.IDX
  rm  /tmp/_temp_.IDX
  echo ""
  ls  -oaL ${1}.IDX
else
  echo ======================================
  echo . 
  echo  call this script with ${0} classcode
  echo .
  echo  where classcode is e.g.  D00076-1
  echo .
fi