USP_MKTRECORDSOURCE_EDITLOAD

CREATE procedure dbo.[USP_MKTRECORDSOURCE_EDITLOAD]
(
  @ID uniqueidentifier = null
)
as
  set nocount on;

  declare @TSLONG bigint;

  set @TSLONG = 0;

  select
    @TSLONG = isnull(max([TSLONG]),0)
  from dbo.[MKTRECORDSOURCE]
  where dbo.[UFN_MKTRECORDSOURCE_VALIDFORPRODUCT]([ID]) = 1;

  select
    [RS].[ID],
    [RS].[SELECTED],
    [RS].[NAME],
    [RS].[RECORDTYPE],
    [RS].[DESCRIPTION],
    [QV].[OBJECTNAME],
    [QV].[PRIMARYKEYFIELD],
    [QV].[PRIMARYKEYTYPENAME],
    [QV].[QUERYVIEWSPEC],
    [RS].[SEGMENTCOUNT],
    [RS].[LISTCOUNT],
    [RS].[MAILINGCOUNT],
    [RS].[EXPORTCOUNT],
    [RS].[QUERYCOUNT],
    [RS].[RECORDTYPEID],
    [CV].[ID] as [CONSOLIDATEDID],
    [CV].[DISPLAYNAME] as [CONSOLIDATEDNAME],
    [CV].[OBJECTNAME] as [CONSOLIDATEDOBJECTNAME],
    [CR].[NAME] as [CONSOLIDATEDRECORDTYPE],
    [CV].[PRIMARYKEYFIELD] as [CONSOLIDATEDPRIMARYKEYFIELD],
    [CV].[PRIMARYKEYTYPENAME] as [CONSOLIDATEDPRIMARYKEYTYPENAME],
    [CV].[QUERYVIEWSPEC] as [CONSOLIDATEDQUARYVIEWSPEC],
    @TSLONG as [TSLONG]
  from dbo.[UFN_MKTRECORDSOURCE_GETRECORDSOURCES]() as [RS]
  inner join dbo.[QUERYVIEWCATALOG] as [QV] on [QV].[ID] = [RS].[ID]
  left outer join dbo.[MKTCONSOLIDATEDQUERYVIEWSPEC] on [MKTCONSOLIDATEDQUERYVIEWSPEC].[ID] = [RS].[ID]
  left outer join dbo.[QUERYVIEWCATALOG] as [CV] on [CV].[ID] = [MKTCONSOLIDATEDQUERYVIEWSPEC].[CONSOLIDATEDQUERYVIEWCATALOGID]
  left outer join dbo.[RECORDTYPE] as [CR] on [CR].[ID] = [CV].[RECORDTYPEID]
  where (@ID is null or [RS].[ID] = @ID)
  and dbo.[UFN_MKTRECORDSOURCE_VALIDFORPRODUCT]([RS].[ID]) = 1
  -- these need to be in a predictable order for reasons having to do with export

  order by [QV].[DATEADDED] asc;

  return 0;