Back to OIM Explorer

dbo.QBM_FTSessionError_Split

Table FunctionSQL_TABLE_VALUED_FUNCTIONSandbox DB

Table Function.

Source: sandbox-db sys.sql_modules

Source size: 2.608 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_FCVStringToBit source text reference
  • references source dbo.QBM_FCVStringToDatetime source text reference
  • references source dbo.QBM_FCVStringToInt source text reference

Complete Source

SQL123 lines
1CREATE FUNCTION dbo.QBM_FTSessionError_Split(2  @string varchar(8000)3) RETURNS @SessionError TABLE(ErrorMessage varchar(2047) collate database_default,4ErrorSeverity int DEFAULT 0,5ErrorState int DEFAULT 0,6ErrorNumber int DEFAULT 0,7ProcedureName varchar(30) collate database_default,8ProcedureLine int DEFAULT 0,9MessageDate datetime,10GenProcID varchar(38) collate database_default,11RepeatCounter int DEFAULT 0,12IsReThrow BIT DEFAULT 0,13SourceCode varchar(max) collate database_default14)15AS16BEGIN17  DECLARE @zerlegt TABLE(ElementIndex int identity,18  Wert varchar(8000))19  DECLARE @ZerlegteElemente int20  DECLARE @SollElemente int = 1121  INSERT INTO @zerlegt(Wert)22  SELECT value AS wert23  FROM string_split(@string,24  CHAR(7),25  1) x26  ORDER BY x.ordinal27  SELECT @ZerlegteElemente = @@ROWCOUNT28  WHILE @ZerlegteElemente < @SollElemente29  BEGIN30    INSERT INTO @zerlegt(Wert)31    SELECT ''32    SELECT @ZerlegteElemente += 133  END34  INSERT INTO @SessionError(ErrorMessage,35  ErrorSeverity,36  ErrorState,37  ErrorNumber,38  ProcedureName,39  ProcedureLine,40  MessageDate,41  GenProcID,42  RepeatCounter,43  IsReThrow,44  SourceCode)45  SELECT46    p1.ErrorMessage,47    p2.ErrorSeverity,48    p3.ErrorState,49    p4.ErrorNumber,50    p5.ProcedureName,51    p6.ProcedureLine,52    p7.MessageDate,53    p8.GenProcID,54    p9.RepeatCounter,55    p10.IsReThrow,56    p11.SourceCode57  FROM(58  SELECT59    convert(varchar(2047),60    LEFT(z.Wert, 2047)) AS ErrorMessage61  FROM @zerlegt z62  WHERE63    z.ElementIndex = 1) AS p1 CROSS64  JOIN(65  SELECT66    dbo.QBM_FCVStringToInt(z.wert, 0) AS ErrorSeverity67  FROM @zerlegt z68  WHERE69    z.ElementIndex = 2) AS p2 CROSS70  JOIN(71  SELECT72    dbo.QBM_FCVStringToInt(z.wert, 0) AS ErrorState73  FROM @zerlegt z74  WHERE75    z.ElementIndex = 3) AS p3 CROSS76  JOIN(77  SELECT78    dbo.QBM_FCVStringToInt(z.wert, 0) AS ErrorNumber79  FROM @zerlegt z80  WHERE81    z.ElementIndex = 4) AS p4 CROSS82  JOIN(83  SELECT84    convert(varchar(30), z.wert) AS ProcedureName85  FROM @zerlegt z86  WHERE87    z.ElementIndex = 5) AS p5 CROSS88  JOIN(89  SELECT90    dbo.QBM_FCVStringToInt(z.wert, 0) AS ProcedureLine91  FROM @zerlegt z92  WHERE93    z.ElementIndex = 6) AS p6 CROSS94  JOIN(95  SELECT dbo.QBM_FCVStringToDatetime(z.wert) AS MessageDate96  FROM @zerlegt z97  WHERE98    z.ElementIndex = 7) AS p7 CROSS99  JOIN(100  SELECT101    convert(varchar(38), z.wert) AS GenProcID102  FROM @zerlegt z103  WHERE104    z.ElementIndex = 8) AS p8 CROSS105  JOIN(106  SELECT107    dbo.QBM_FCVStringToInt(z.wert, 0) AS RepeatCounter108  FROM @zerlegt z109  WHERE110    z.ElementIndex = 9) AS p9 CROSS111  JOIN(112  SELECT dbo.QBM_FCVStringToBit(z.wert) AS IsReThrow113  FROM @zerlegt z114  WHERE115    z.ElementIndex = 10) AS p10 CROSS116  JOIN(117  SELECT118    convert(varchar(8000), z.wert) AS SourceCode119  FROM @zerlegt z120  WHERE121    z.ElementIndex = 11) AS p11122  RETURN123END
Open raw exported source
SQL ยท Raw18 lines
1create function dbo.QBM_FTSessionError_Split(@string varchar(8000) ) returns @SessionError table ( ErrorMessage varchar(2047) collate database_default 2, ErrorSeverity int default 0 , ErrorState int default 0  , ErrorNumber int default 0 , ProcedureName varchar(30) collate database_default , ProcedureLine3 int default 0 , MessageDate datetime , GenProcID varchar(38) collate database_default , RepeatCounter int default 0  , IsReThrow bit default 0 , SourceCode4 varchar(max) collate database_default  ) as begin declare @zerlegt table (ElementIndex int identity , Wert varchar(8000) ) declare @ZerlegteElemente int5 declare @SollElemente int = 11 insert into @zerlegt (Wert) select value as wert from string_split(@string, CHAR(7) , 1   ) x order by x.ordinal select6 @ZerlegteElemente = @@ROWCOUNT while @ZerlegteElemente < @SollElemente begin insert into @zerlegt(Wert) select '' select @ZerlegteElemente += 1 end  insert7 into @SessionError(ErrorMessage, ErrorSeverity, ErrorState, ErrorNumber , ProcedureName, ProcedureLine, MessageDate , GenProcID, RepeatCounter, IsReThrow8, SourceCode ) select p1.ErrorMessage, p2.ErrorSeverity, p3.ErrorState, p4.ErrorNumber , p5.ProcedureName, p6.ProcedureLine, p7.MessageDate , p8.GenProcID9, p9.RepeatCounter, p10.IsReThrow, p11.SourceCode from ( select convert(varchar(2047), LEFT(z.Wert, 2047)) as ErrorMessage from @zerlegt z where z.ElementIndex10 = 1 ) as p1 cross join (select dbo.QBM_FCVStringToInt(z.wert, 0) as ErrorSeverity from @zerlegt z where z.ElementIndex = 2 ) as p2 cross join (select 11dbo.QBM_FCVStringToInt(z.wert, 0) as ErrorState from @zerlegt z where z.ElementIndex = 3 ) as p3 cross join (select dbo.QBM_FCVStringToInt(z.wert, 0) as12 ErrorNumber from @zerlegt z where z.ElementIndex = 4 ) as p4 cross join (select convert(varchar(30), z.wert) as ProcedureName from @zerlegt z where z.ElementIndex13 = 5 ) as p5 cross join (select dbo.QBM_FCVStringToInt(z.wert, 0) as ProcedureLine from @zerlegt z where z.ElementIndex = 6 ) as p6 cross join (select 14dbo.QBM_FCVStringToDatetime(z.wert) as MessageDate from @zerlegt z where z.ElementIndex = 7 ) as p7 cross join (select convert(varchar(38), z.wert) as 15GenProcID from @zerlegt z where z.ElementIndex = 8 ) as p8 cross join (select dbo.QBM_FCVStringToInt(z.wert, 0) as RepeatCounter from @zerlegt z where 16z.ElementIndex = 9 ) as p9 cross join (select dbo.QBM_FCVStringToBit(z.wert) as IsReThrow from @zerlegt z where z.ElementIndex = 10 ) as p10 cross join17 (select convert(varchar(8000), z.wert) as SourceCode from @zerlegt z where z.ElementIndex = 11 ) as p11 return end 18