#!/bin/sh
#@(#)VA Pac xxx xxx (R) MITH BATCH PROCEDURE
# * ------------------------------------------------------
# * VISUALAGE PACBASE
# *
# * ------------------------------------------------------
# * THESAURUS MIGRATION
# *
# * ------------------------------------------------------
# *
# Parameter control
. $PACDIR/system/proc/BVPINIT.ini
echo ""
echo "---------------------------------------------------------"
BVPMSG 1004 "MITH"
echo " =============="
BVPMSG 1047 "$BVPBASE"
BVPMSG 1005 "$PACDIR/config/$1"
BVPMSG 1006 "$PACTMP"
BVPMSG 1073 "$PACUSERS"
BVPMSG 1007 "$PACINPUT"
echo "---------------------------------------------------------"
echo ""
BVPPAUSE
BVPMKDIR
# ---------------------------------------------------------
. $PACDIR/config/$1/PAC7AE.ini
. $PACDIR/config/$1/PAC7AN.ini
. $PACDIR/config/$1/PAC7AR.ini
. $PACDIR/config/$1/PAC7AY.ini
. $PACDIR/config/$1/PACGGN.ini
. $PACDIR/config/$1/PACGGR.ini
. $PACDIR/config/$1/PACGGU.ini
PAC7BM=ˋBVPENV PACX PAC7BM $PACTMP/WBMˋ
export PAC7BM
PAC7CP=ˋBVPENV PACX PAC7CP /dev/nullˋ
export PAC7CP
PAC7DD=ˋBVPENV PACX PAC7DD $PACUSERS/PACXDD.txtˋ
export PAC7DD
PAC7ED=ˋBVPENV PACX PAC7ED $PACTMP/WEDˋ
export PAC7ED
PAC7EE=ˋBVPENV PACX PAC7EE $PACUSERS/PACXEE.txtˋ
export PAC7EE
PAC7EG=ˋBVPENV PACX PAC7EG $PACTMP/WEGˋ
export PAC7EG
PAC7EM=ˋBVPENV PACX PAC7EM $PACTMP/WEMˋ
export PAC7EM
PAC7EP=ˋBVPENV PACX PAC7EP $PACUSERS/PACXEP.txtˋ
export PAC7EP
PAC7EQ=ˋBVPENV PACX PAC7EQ $PACUSERS/PACXEQ.txtˋ
export PAC7EQ
PAC7ES=ˋBVPENV PACX PAC7ES /dev/nullˋ
export PAC7ES
PAC7EU=ˋBVPENV PACX PAC7EU $PACTMP/WEUˋ
export PAC7EU
PAC7EZ=ˋBVPENV PACX PAC7EZ $PACUSERS/PACXEZ.txtˋ
export PAC7EZ
PAC7GY=ˋBVPENV PACX PAC7GY $PACTMP/WGYˋ
export PAC7GY
PAC7IA=ˋBVPENV PACX PAC7IA $PACUSERS/PACXIA.txtˋ
export PAC7IA
PAC7MA=ˋBVPENV PACX PAC7MA /dev/nullˋ
export PAC7MA
PAC7MB=$PACINPUT
export PAC7MB
PAC7MM=ˋBVPENV PACX PAC7MM $PACTMP/WMMˋ
export PAC7MM
PAC7MJ=ˋBVPENV PACX PAC7MJ $PACTMP/WMJˋ
export PAC7MJ
PAC7MR=ˋBVPENV PACX PAC7MR $PACTMP/WMRˋ
export PAC7MR
PAC7MX=ˋBVPENV PACX PAC7MX $PACTMP/WMXˋ
export PAC7MX
PAC7RE=ˋBVPENV PACX PAC7RE $PACTMP/WREˋ
export PAC7RE
PAC7RM=ˋBVPENV PACX PAC7RM $PACTMP/WRMˋ
export PAC7RM
PAC7RQ=ˋBVPENV PACX PAC7RQ /dev/nullˋ
export PAC7RQ
PAC7TD=ˋBVPENV PACX PAC7TD $PACTMP/WTDˋ
export PAC7TD
PAC7TE=ˋBVPENV PACX PAC7TE $PACTMP/WTEˋ
export PAC7TE
PAC7UE=ˋBVPENV PACX PAC7UE $PACTMP/WUEˋ
export PAC7UE
PAC7WD=ˋBVPENV PACX PAC7WD $PACTMP/WWDˋ
export PAC7WD
SYSEXT=ˋBVPENV PACX SYSEXT $PACTMP/WSYˋ
export SYSEXT
BVPMSG 1009 "BVPACX"
rtspac BVPACX
RETURN=$?
case $RETURN in
0)
;;
4)
BVPMSG 1012 "BVPACX"
;;
8)
BVPMSG 1012 "BVPACX"
BVPMSG 1014
BVPERR
BVPRMTMP
exit $RETURN
;;
*)
BVPMSG 1012 "BVPACX"
BVPMSG 1025
BVPERR
BVPRMTMP
exit $RETURN
;;
esac
# ---------------------------------------------------------
PAC7GY=ˋBVPENV PACTH1 PAC7GY $PACTMP/WGYˋ
export PAC7GY
PAC7RQ=ˋBVPENV PACTH1 PAC7RQ $PACUSERS/MITHFILEˋ
export PAC7RQ
BVPMSG 1009 "BVPACTH1"
rtspac BVPACTH1
RETURN=$?
case $RETURN in
0)
;;
*)
BVPMSG 1012 "BVPACTH1"
BVPMSG 1025
BVPERR
BVPRMTMP
exit $RETURN
;;
esac
# ---------------------------------------------------------
BVPMSG 1010
BVPRMTMP
exit $RETURN