#!/bin/sh
#@(#)Mig RPP (R) UTOV BATCH PROCEDURE
# * ------------------------------------------------------
# * IBM RATIONAL PROGRAMMING PATTERNS (RPP)
# *
# * ------------------------------------------------------
# * DETECTION OF OVERRIDES
# *
# * ------------------------------------------------------
# *
# Parameter control
. $MIGDIR/system/proc/BVPINIT.ini
echo ""
echo "---------------------------------------------------------"
BVPMSG 1004 "UTOV"
echo " =============="
BVPMSG 1047 "$BVPBASE"
BVPMSG 1005 "$PACDIR/config/$1"
BVPMSG 1006 "$PACTMP"
BVPMSG 1073 "$PACUSERS"
BVPMSG 1007 "$PACINPUT"
echo "---------------------------------------------------------"
echo ""
BVPPAUSE
BVPMKDIR
# ---------------------------------------------------------
. $MIGDIR/config/$1/PAC7AE.ini
. $PACDIR/config/$1/PAC7AN.ini
. $PACDIR/config/$1/PAC7AR.ini
PAC7MB=$PACINPUT
export PAC7MB
PAC7ET=ˋBVPENV PTUOVR PAC7ET $PACUSERS/UTOVET.txtˋ
export PAC7ET
PAC7OV=ˋBVPENV PTUOVR PAC7OV $PACUSERS/UTOVFILEˋ
export PAC7OV
PAC7PU=ˋBVPENV PTUOVR PAC7PU $PACTMP/WPUˋ
export PAC7PU
BVPMSG 1009 "BVPTUOVR"
rtspac BVPTUOVR
RETURN=$?
case $RETURN in
0)
;;
*)
BVPMSG 1012 "BVPTUOVR"
BVPMSG 1025
BVPERR
BVPRMTMP
exit $RETURN
;;
esac
# ---------------------------------------------------------
. $MIGDIR/config/$1/PAC7AE.ini
PAC7MB=$PACINPUT
export PAC7MB
PAC7WD=ˋBVPENV PACF PAC7WD $PACTMP/WPUˋ
export PAC7WD
PAC7MV=ˋBVPENV PACF PAC7MV $PACUSERS/UTOVMVˋ
export PAC7MV
PAC7GY=ˋBVPENV PACF PAC7GY $PACUSERS/UTOVGYˋ
export PAC7GY
BVPMSG 1009 "BVPACF"
rtspac BVPACF
RETURN=$?
case $RETURN in
0)
;;
*)
BVPMSG 1012 "BVPACF"
BVPMSG 1025
BVPERR
BVPRMTMP
exit $RETURN
;;
esac
# ---------------------------------------------------------
BVPMSG 1010
BVPRMTMP
exit $RETURN