capture program drop revert
program define revert
svyset , strata($oldstr)
end