搞出来了，自己过来答一波：
gen tmp=.
forvalues i=1/_N{
local v=code[`i']
replace tmp=code_[`v'] if _n==`i'
}
不过感觉这样的代码有些丑，应该会有更优解，所以还是希望有大神能解决一下。

尔后建议请用 dataex (先 ssc install dataex 并见说明) 将原始 Stata 资料中具有”代表性”的一部分资料列出，以供有意回答者实验之用，并能提供具体操作指令。并请参考 http://www.jianshu.com/p/9870080fe769,  https://bbs.pinggu.org/thread-5048204-1-1.html, 与 https://bbs.pinggu.org/thread-5917273-1-1.html。

谢谢建议。数据如下：
input code_1 code_2 code_3 code_4 code_5 code_6  code base
1 2 3 4 5 6 3 56
2 4 2 2 2 9 1 2
end