log1=t
satrun(CHKC)
if(:log1:) then
 goto QUIT
else
+ dcom(:cvl2:
endif