*! version 1.0.0  10/28/93                      STB16: zz3
program define stb_sel 
	version 3.1
	local answ "`1'"
	quietly count if insert=="`answ'"
	if _result(1)!=1 { 
		di in red "insert `answ' not found"
		exit
	}
	preserve
	quietly keep if insert=="`answ'"
	stb_list 1
	stb_dtl
end