很简单，不过需要看你的数据结构

code            name                GEindustrycode                tatalassets
600709        ST 生态                1                        1.7e+09
600762        S*ST 金荔                1                        3.4e+08
数据结构大概就是这样   上市和非上市公司分别在两个dta文件里

code            name                GEindustrycode                tatalassets
600709        ST 生态                1                        1.7e+09
600762        S*ST 金荔                1                        3.4e+08
数据结构大概就是这样   上市和非上市公司分别在两个dta文件里

one way is to use "joinby GEindustrycode" and then find the distance between "tatalassets" (you may need to rename tatalassets into tatalassets1, code into code1 in one of the data set) and then keep the 5 smallest for each code in data 1?

tempfile f2
use data2 /* 非上市公司 */
rename code code2
rename name name2
rename tatalassets tatalassets2
save `f2'
use data1  /* 上市公司 */
joinby GEindustrycode using `f2'
gen double dist = abs(tatalassets-tatalassets2)
sort code dist
by code : keep if _n<=5