SqlServer更新视图存储过程函数脚本

时间 2019-11-12
标签 sqlserver 更新视图存储过程函数脚本栏目 SqlServer 繁體版
原文原文链接
 
 --视图、存储过程、函数名称 
 
 DECLARE 
 @ 
 NAME 
 NVARCHAR(255); 
 
 --局部游标 
 
 DECLARE 
 @CUR  
 CURSOR 
 
 --自动修改未上状态为旷课 
 
 SET 
 @CUR= 
 CURSOR 
 SCROLL 
 DYNAMIC 
 FOR 
 
 SELECT 
 NAME 
 FROM 
 DBO.SYSOBJECTS  
 
      
 WHERE 
 NAME 
 NOT 
 IN 
 ( 
 'SYSCONSTRAINTS' 
 , 
 'SYSSEGMENTS' 
 ) 
 
          
 AND 
 
          
 ( 
 
              
 OBJECTPROPERTY(ID, N 
 'IsView' 
 ) = 1                
 --视图 
 
              
 OR 
 OBJECTPROPERTY(ID,N 
 'IsProcedure' 
 ) = 1         
 --存储过程 
 
              
 OR 
 OBJECTPROPERTY(ID,N 
 'IsScalarFunction' 
 ) = 1    
 --标量函数 
 
              
 OR 
 OBJECTPROPERTY(ID,N 
 'IsTableFunction' 
 ) = 1     
 --标题函数 
 
              
 OR 
 OBJECTPROPERTY(ID,N 
 'IsInlineFunction' 
 ) = 1    
 --内联函数 
 
          
 ); 

    
 
 OPEN 
 @CUR; 
 
 FETCH 
 NEXT 
 FROM 
 @CUR  
 INTO 
 @ 
 NAME 

    
 
 WHILE (@@FETCH_STATUS=0) 
 
 BEGIN 

    
 
      
 DECLARE 
 @OldText NVARCHAR( 
 MAX 
 ); 
 
      
 DECLARE 
 @NewText NVARCHAR( 
 MAX 
 ); 

    
 
      
 --读取建立脚本，当脚本超长时分红多条记录时合并 
 
      
 SELECT 
 @OldText=@OldText +  
 CHAR 
 (10) +  
 CHAR 
 (13) + RTRIM(TEXT)  
 FROM 
 SYSCOMMENTS  
 WHERE 
 ID = OBJECT_ID(@ 
 NAME 
 ); 

    
 
      
 --将建立脚本替换为更新脚本 
 
      
 SET 
 @NewText= 
 REPLACE 
 (@OldText,N 
 'CREATE VIEW' 
 ,N 
 'ALTER VIEW' 
 ); 
 
      
 SET 
 @NewText= 
 REPLACE 
 (@NewText,N 
 'CREATE PROCEDURE' 
 ,N 
 'ALTER PROCEDURE' 
 ); 
 
      
 SET 
 @NewText= 
 REPLACE 
 (@NewText,N 
 'CREATE FUNCTION' 
 ,N 
 'ALTER FUNCTION' 
 ); 
 
       
 
      
 BEGIN 
 TRY 
 
          
 EXEC 
 (@NewText); 
 
      
 END 
 TRY 
 
      
 BEGIN 
 CATCH 
 
          
 PRINT N 
 '---------------------------------------------------------------------------' 
 ; 
 
          
 PRINT @ 
 NAME 
 + N 
 ' : ' 
 + ERROR_MESSAGE(); 
 
          
 --PRINT @OldText; 
 
          
 PRINT N 
 '---------------------------------------------------------------------------' 
 ; 
 
      
 END 
 CATCH 

    
 
      
 FETCH 
 NEXT 
 FROM 
 @CUR  
 INTO 
 @ 
 NAME 

    
 
 END 

    
 
 CLOSE 
 @CUR; 
 
 DEALLOCATE 
 @CUR; 