spGetEmailList_Subscription_OptIn

        CREATE PROCEDURE [dbo].[spGetEmailList_Subscription_OptIn]
        ( @EmailListID int )
          AS
          SELECT 
          s.ID,
          s.UserID,
          s.BackOfficeSystemPeopleID,
          s.EmailAddress,
          s.FirstName,
          s.LastName,
          dbo.fnGetSystemIDFromPeopleID(s.BackOfficeSystemPeopleID) BackOfficeSystemID,
          dbo.fnGetRecordIDFromPeopleID(s.BackOfficeSystemPeopleID) BackOfficeRecordID
          FROM [dbo].EmailList_Subscription as s
          LEFT OUTER JOIN ClientUsers u on u.id = s.UserID
          LEFT OUTER JOIN EmailList_GlobalSubscription gs on s.EmailAddress = gs.EmailAddress
          WHERE s.EmailListID = @EmailListID
          AND s.[HasOpted]=1
          AND isnull(u.deleted,0) = 0
          AND isnull(gs.HasOpted,1) <> 0