*! version 1.0.2  18sep2024  hendri.adriaens@centerdata.nl
program define replacen
	version 17
	gettoken n 0 : 0
	gettoken vname : 0
	tempvar old
	quietly clonevar `old' = `vname'
	replace `0'
	quietly count if `vname' != `old'
	if r(N) != `n' {
		display as error "the conditions resulted in `r(N)' replacements instead of the requested `n' replacements"
		exit 31415
	}
end