_crcchkw.ado

是一个经济学管理应用软件 很难找的 但是经济学学生又必须用到

*! version 1.0.0  31aug1998
program define _crcchkw /* ivar wv touse */
	version 6.0
        args ivar v touse
        cap by `touse' `ivar': assert `v'==`v'[_n-1] if _n>1 & `touse'
        if _rc {
                noi di in red "weight must be constant within `ivar'"
                exit 199
        }
end