Make list of all string variables in a data set

ds, has(type string)
di `r(varlist)'