if $1 = q goto quicker
echo "	==>	this procedure will only work if-"
echo "	==>	correct incremental dump tape is used"; date
echo "	==>	correct file systems are mounted";/etc/mount
echo "	==>	files systems are in good shape";/etc/check-mounted
echo "	==>	no other users on the system";who
echo "	==>	no other processes active"; ps xazcp
echo "	==>	switch register set to nonzero - we want to log all tape errors"
:
: dump all files modified in last 36 hours
:
: quicker
cd /incdumps
echo " *****  dump commences  *****";date ;date >$$$
itp n1s36 /
:
: output names of files dumped - re-read tape to ensure its readable
:
echo " *****  re-read tape *****"
e - $$$
g/^... ... .. 0/s/^Sun/SAT/
g/^... ... .. 0/s/^Mon/SUN/
g/^... ... .. 0/s/^Tue/MON/
g/^... ... .. 0/s/^Wed/TUE/
g/^... ... .. 0/s/^Thu/WED/
g/^... ... .. 0/s/^Fri/THU/
g/^... ... .. 0/s/^Sat/FRI/
s/ ...//
s/://
s/:.*//
s/ /-/gp
f
s/.*/itp lv1 >&;pack &/
w
q
sh $$$ ; rm $$$
find . -mtime +8 -a -exec rm {} ";"&
dd if=/dev/rht0 bs=8k of=/null
unload
