*! version 1.0.0  10/15/93   STB-16:  dm15
program define browsew 
	version 3.1
	local varlist "req ex max(1) min(1)"
	parse "`*'"
	tempvar bsize fmt
	local fmt : format `1'
	local bsize = int(real(substr("`fmt'",2,length("`fmt'")-2)))
	global S_BSIZE = `bsize'
end