Files
DP44/DataPRO_sql/dbo.foo_DBExportGroups.UserDefinedFunction.sql
2026-04-17 14:55:32 -04:00

52 lines
3.4 KiB
Transact-SQL
Raw Blame History

This file contains invisible Unicode characters
This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[foo_DBExportGroups]') AND type in (N'FN', N'IF', N'TF', N'FS', N'FT'))
DROP FUNCTION [dbo].[foo_DBExportGroups]
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[foo_DBExportGroups]') AND type in (N'FN', N'IF', N'TF', N'FS', N'FT'))
BEGIN
execute dbo.sp_executesql @statement = N'CREATE FUNCTION [dbo].[foo_DBExportGroups]
(
)
RETURNS xml
AS
BEGIN
return isnull((select [SerialNumber]
,[TestObjectId]
,[LastModifiedBy]
,[LastModified]
,[Template]
,[TemplateId]
,[LocalOnly]
,[ParentObject]
,[SysBuilt]
,[Embedded]
,[OriginalTemplate]
,[OriginalSerialNumber]
,[dbo].[foo_DBExportGroupHardware]([TestObjectId])
,[dbo].[foo_DBExportGroupSensors]([TestObjectId])
,[dbo].[foo_DBExportGroupChannels]([TestObjectId])
from(select
tobj.TestObjectName as SerialNumber
,tobj.TestObjectId as TestObjectId
,tobj.[LastModifiedBy]
,tobj.[LastModified]
,tot.TemplateName as Template
,tot.TemplateId as TemplateId
,tobj.[LocalOnly]
,tobj.[ParentObject]
,tobj.[SysBuilt]
,tobj.[Embedded]
,tobj.[OrigTemplate] as OriginalTemplate
,tobj.[OrigSerialNumber] as OriginalSerialNumber
from [dbo].[TestObjects] tobj
inner join [dbo].[TestObjectTemplates] tot on tot.TemplateId = tobj.TemplateId) TestObject
for xml auto, elements, BINARY BASE64, root (''Groups'')), ''<Groups />'')
END
'
END
GO