/*

es_trade_wrk_dlg.ado

!version 1.0.2   08mar2013

*/

capture program drop es_trade_wrk_dlg
program es_trade_wrk_dlg
	version 12
	syntax using,clsname(string)
	capture describe `using',varlist
	if _rc{
		.es_trade_dlg.trade_des_error.settrue
	}
	else{
		local dlg .`clsname'
		foreach item in firmid date rit rmt{
			local cblist_name ///
				`"``dlg'.trade.cb_trade`item'.contents'"'
			local i=1
			foreach var in `r(varlist)'{
				`dlg'.`cblist_name'[`i']= "`var'"
				local ++i
			}
		}
	}
end