Back to OIM Explorer

dbo.QBM_FSQProcedureDef

Scalar FunctionSQL_SCALAR_FUNCTIONSandbox DB

Scalar Function.

Source: sandbox-db sys.sql_modules

Source size: 894 characters

Interpretation

  • Database function. Usually supports views, validation, or calculated predicates; look at referenced-by entries for callers.

Relations

  • No extracted relations.

Typed Edges

  • references source dbo.QBM_FGISessionErrorRethrow source text reference
  • references source dbo.QBM_FSQStringAsLiteral source text reference
  • references source dbo.QBM_PSessionErrorAdd source text reference

Complete Source

SQL51 lines
1CREATE FUNCTION dbo.QBM_FSQProcedureDef(2  @ProcedureName varchar(30),3  @Parameters nvarchar(max),4  @UserDefinedBody nvarchar(max),5  @SourceName nvarchar(256) = N ''6) RETURNS nvarchar(max7)8AS9BEGIN10  DECLARE @erg nvarchar(max)11  SELECT12    @erg = CONCAT(N 'create or alter procedure dbo.',13    @ProcedureName,14  CASE15    WHEN @parameters > ' ' THEN16  ' (' + @Parameters + ') '17  ELSE N ''18  END,19  N '											20	as 21begin22	declare @ret int = 023	declare @Rethrow varchar(1000) = dbo.QBM_FGISessionErrorRethrow()2425SET XACT_ABORT OFF	2627BEGIN TRY28'29  ,30  @UserDefinedBody,31  N '32END TRY33BEGIN CATCH3435	exec QBM_PSessionErrorAdd default ',36  CASE37    WHEN @SourceName > ' ' THEN38  N '	,' + dbo.QBM_FSQStringAsLiteral(@SourceName, 1, 0)39  ELSE N ''40  END,41  N '42	43	RAISERROR (@Rethrow, 18, 1)  WITH NOWAIT4445END CATCH46	                                	        	47endLabel:48	return @ret49end')50  RETURN(@erg)51END
Open raw exported source
SQL ยท Raw28 lines
1   create   function dbo.QBM_FSQProcedureDef (@ProcedureName varchar(30) , @Parameters nvarchar(max) , @UserDefinedBody nvarchar(max) , @SourceName2 nvarchar(256) = N''  ) returns nvarchar(max) as begin declare @erg nvarchar(max) select @erg = concat( N'create or alter procedure dbo.' , @ProcedureName3 , case when @parameters > ' ' then ' ('+ @Parameters + ') ' else N'' end , N'											4	as 5begin6	declare @ret int = 07	declare @Rethrow varchar(1000) = dbo.QBM_FGISessionErrorRethrow()89SET XACT_ABORT OFF	1011BEGIN TRY12'13 , @UserDefinedBody , N'14END TRY15BEGIN CATCH1617	exec QBM_PSessionErrorAdd default ' , case when @SourceName > ' ' then N'	,' + dbo.QBM_FSQStringAsLiteral18(@SourceName, 1, 0) else N'' end , N'19	20	RAISERROR (@Rethrow, 18, 1)  WITH NOWAIT2122END CATCH23	                                	        	24endLabel:25	return @ret26end'27 )  return(@erg) end 28