Update comp_wks.bas