ALTER PROCEDURE TransformProcess(@ME001 VARCHAR(10),@ProcessStr VARCHAR(60) OUTPUT)
--此过程用于模具管理系统中,将产品的工艺流程转为行输出.
AS
  SET @ProcessStr=''

  DECLARE PROCESS CURSOR
  FOR SELECT MF007  --MF001,MF003,MF006,
      FROM BOMME E,BOMMF F
      WHERE ME001=MF001 AND ME001=@ME001
      ORDER BY MF001,MF003

  DECLARE @PROCESS VARCHAR(16)

  OPEN PROCESS 
  FETCH NEXT FROM PROCESS INTO @PROCESS
  WHILE(@@FETCH_STATUS=0)
  BEGIN
    SET @ProcessStr=@ProcessStr+@PROCESS+'->'
--    print (@ProcessStr)

    FETCH NEXT FROM PROCESS INTO @PROCESS

  END
  CLOSE PROCESS
  DEALLOCATE PROCESS

GO


存储过程调用Open时:commandtext does not return a result set

存储过程没有结果返回,不能用open和ACTive   :=   true的方法。   
在运行器,用ExecProc;的方法就可以了。

posted on 2008-07-16 11:58  恩恩爸爸  阅读(2028)  评论(0)    收藏  举报