UFN_MKTSEGMENTLIST_GETRECORDSOURCEID

create function dbo.[UFN_MKTSEGMENTLIST_GETRECORDSOURCEID]
(
  @SEGMENTLISTID uniqueidentifier,
  @CURRENTAPPUSERID uniqueidentifier
)
returns uniqueidentifier
as
begin
  declare @RECORDSOURCEID uniqueidentifier;
  declare @ISSYSADMIN bit;

  select
    @ISSYSADMIN = [ISSYSADMIN]
  from dbo.[APPUSER]
  where [ID] = @CURRENTAPPUSERID;

  select
    @RECORDSOURCEID = [MKTLIST].[RECORDSOURCEID]
  from dbo.[MKTSEGMENTLIST]
  inner join dbo.[MKTLIST] on [MKTLIST].[ID] = [MKTSEGMENTLIST].[LISTID]
  where [MKTSEGMENTLIST].[ID] = @SEGMENTLISTID
  and (@ISSYSADMIN = 1 or dbo.[UFN_SECURITY_APPUSER_CANACCESS_QUERYVIEW](@CURRENTAPPUSERID, [MKTLIST].[RECORDSOURCEID]) = 1);

  return @RECORDSOURCEID;
end