SET QUOTED_IDENTIFIER ON 
GO
SET ANSI_NULLS ON 
GO




/*
BIOS_from91
--#SourceFile C:\Develop\MX\SQL\ObjectDirectoryLstByObjectReport.sql (23.03.2007 15:25:56)
*/
ALTER    procedure ObjectDirectoryLstByObjectReport
	@ID BIDENT,
	@DirectoryTypeSysName string = null
as
begin

if rtrim(ltrim(@DirectoryTypeSysName)) = ''
	set @DirectoryTypeSysName = null

select	OD.*
from	ObjectDirectoryLst OD
where	OD.ObjectID = @ID and
	(@DirectoryTypeSysName is null or dbo.ObjectIs(OD.ID,@DirectoryTypeSysName) =  1 ) and (OD.ObjectTypeID <>  22891291 ) and (OD.ObjectTypeID <>  16956314 )

order by OD.ObjectTypeName,OD.Code

end




GO
SET QUOTED_IDENTIFIER OFF 
GO
SET ANSI_NULLS ON 
GO