bk3:=getbk('申万三级行业指数');
      re:=array();
      k:=0;
      for i:=0 to length(bk3)-1 do
      begin
          stock:= getbkbydate(bk3[i],today())[0];
          if not ifnil(stock) then
          begin
             sw2:=spec(StockSWIndustryIdLv2(),stock);
             sw1:=spec(StockSWIndustryIdLv1(),stock);
             re[k++]:=array('一级':sw1,'一级名称':stockname(sw1),'二级':sw2,'二级名称':stockname(sw2),'三级':bk3[i],'三级名称':stockname(bk3[i]));
          end
      end
      return re;
//返回结果