spLoadRecord_Email

                CREATE PROCEDURE [dbo].[spLoadRecord_Email]
                (                 
                    @PKID int
                )
                AS
                BEGIN
                      DECLARE @type as int
                      SELECT 


                        E.ID, 
                        E.EmailTemplateID, 
                        E.Name, 
                        E.Description, 
                        E.OwnerID, 
                        E.Deleted, 
                        E.Guid, 
                        E.Type, 
                    E.Status, 
                    E.ContentHTML, 
                        E.ContentText, 
                        E.FromAddress, 
                        E.FromDisplayName, 
                        E.Subject, 
                        E.Priority, 
                        E.ReplyAddress,          

                   E.ReturnReceipt, 
                        E.ReturnReceiptAddress, 
                        E.ForwardDSN, 
                        E.ForwardDSNAddress, 
                        E.SendAfterDate, 
                        E.CreateDate, 
                        E.ParentEmailID,


                    CONVERT(bit,ISNULL((SELECT Top 1 e.ID FROM dbo.Email e INNER JOIN dbo.EmailJob ej 
                        ON e.ID = ej.EmailID WHERE e.ParentEmailID = @PKID),0))  HasTestMessages,
                        E.CLIENTSITESID, 
                        E.AppealID, 


                    A.[DESCRIPTION] as AppealDescription,
                            E.EMAILADDRESSTYPEID,
                  E.IsExcludeInactiveRecipient,
                            isnull(E.InactiveRecipientFromMonths,0) as InactiveRecipientFromMonths,
                  E.AlternateSubject
                        FROM [dbo].[Email] E
                        LEFT JOIN dbo.BBNCAPPEALIDMAP B on B.ID = E.AppealID
                        LEFT JOIN dbo.APPEAL A on A.ID = B.AppealID 

                        WHERE E.[ID] = @PKID

                      SELECT
                            [dbo].[EmailList].[Name],
                            ch.[Name] ChapterName,
                            [dbo].[EmailList].[DataSourceID],

                            [dbo].[EmailList].[Description],
                            [dbo].[Email_EmailList].[ID],
                            [dbo].[Email_EmailList].[EmailListID],
                            [dbo].[Email_EmailList].[EmailID],
                                  [dbo].[Email_EmailList].[IsTest]
                            ,
                            [dbo].[EmailList].[Subscription]            
                      FROM [dbo].[EmailList] INNER JOIN [dbo].[Email_EmailList] 
                      ON [dbo].[EmailList].[ID] = [dbo].[Email_EmailList].[EmailListID]         


                      LEFT OUTER JOIN [dbo].[Chapters] ch on [EmailList].[ID] = ch.MemberEmailListID
                      WHERE [dbo].[EmailList].[Deleted] = 0 
                      AND [dbo].[Email_EmailList].[EmailID] = @PKID



                  SELECT @type = [Type] FROM [dbo].[Email] WHERE [dbo].[Email].[ID] = @PKID

                      select id, [status] as JobStatus 
                      from [dbo].EmailJob 
                      where EmailID = @PKID


   order by id asc
                END