Back to OIM Explorer

dbo.QBM_FGIDBDataOrigin

Scalar FunctionSQL_SCALAR_FUNCTIONSandbox DB

Scalar Function.

Source: sandbox-db sys.sql_modules

Source size: 1.024 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_FCVStringToHash source text reference

Complete Source

SQL47 lines
1CREATE FUNCTION dbo.QBM_FGIDBDataOrigin(2) RETURNS int3AS4BEGIN5  DECLARE @erg int6  DECLARE @work nvarchar(max) = NULL7  IF EXISTS(8    SELECT TOP 1 19    FROM sys.objects pr10    WHERE11      pr.name = 'CCC_FGIDBDataOrigin' AND pr.type = 'FN')12  BEGIN13    SELECT @erg = dbo.CCC_FGIDBDataOrigin()14    GOTO EndLabel15  END16  IF SERVERPROPERTY('IsHadrEnabled') = 117  BEGIN18    SELECT19      TOP 1 @work = convert(nvarchar(64),20      ar.group_id)21    FROM sys.databases d22    LEFT23    OUTER24    JOIN sys.availability_replicas ar25      ON ar.replica_id = d.replica_id26    WHERE27      d.database_id = db_id()28    IF @work IS NOT NULL29    BEGIN30      SELECT31        @work = @work + rtrim(isnull(db_name(), N ''))32    END33  END34  IF @work IS NULL35  BEGIN36    SELECT @work = trim(@@servername)37    SELECT38      @work = @work + rtrim(isnull(db_name(), N ''))39    SELECT40      @work = @work + rtrim(isnull(convert(nvarchar(max), SERVERPROPERTY(N 'Collation')), N ''))41    SELECT42      @work = @work + rtrim(isnull(convert(nvarchar(max), SERVERPROPERTY(N 'MachineName')), N ''))43  END44  SELECT45    @erg = abs(convert(int, dbo.QBM_FCVStringToHash(@work))) EndLabel:46  RETURN(@erg)47END
Open raw exported source
SQL ยท Raw8 lines
1  create   function dbo.QBM_FGIDBDataOrigin() returns int as begin declare @erg int declare @work nvarchar(max) = null if exists (select top 1 12 from sys.objects pr where pr.name = 'CCC_FGIDBDataOrigin' and pr.type = 'FN' ) begin select @erg = dbo.CCC_FGIDBDataOrigin() goto EndLabel end if SERVERPROPERTY3 ('IsHadrEnabled') = 1 begin select top 1 @work = convert(nvarchar(64), ar.group_id ) from sys.databases d left outer join sys.availability_replicas ar4 on ar.replica_id = d.replica_id where d.database_id = db_id()  if @work is not null begin select @work = @work + rtrim(isnull(db_name(),N'')) end end 5if @work is null begin select @work = trim(@@servername)  select @work = @work + rtrim(isnull(db_name(),N'')) select @work = @work + rtrim(isnull(convert6(nvarchar(max),SERVERPROPERTY ( N'Collation' )),N'')) select @work = @work + rtrim(isnull(convert(nvarchar(max),SERVERPROPERTY ( N'MachineName' )),N'')7) end  select @erg = abs(convert(int, dbo.QBM_FCVStringToHash(@work)))  EndLabel: return(@erg) end 8