sp_MSinit_publication_access (Transact-SQL MetaData) Definition

Please note: that the following source code is provided and copyrighted by Microsoft and is for educational purpose only.
The meta data is from an SQL 2012 Server.

I have posted alot more, find the whole list here.

Goto Definition or MetaData

Definition:

sys.sp_MSinit_publication_access(nvarchar @publisher
, nvarchar @publisher_db
, nvarchar @publication
, nvarchar @initinfo
, bit @skip)

MetaData:

 CREATE PROCEDURE sys.sp_MSinit_publication_access   
(  
    @publisher sysname,  
    @publisher_db sysname = NULL,  
    @publication sysname = NULL,  
    @initinfo nvarchar(max),  
    @skip bit = 0  
)   
as  
begin  
    set nocount on  
    declare @publisher_id smallint  
            ,@retcode int  
            ,@publication_id int  
            ,@login sysname  
            ,@sid varbinary(85)  
            ,@itemstart bigint  
            ,@itemend bigint  
    --   
    --  sysadmin check  
    --   
    if (isnull(is_srvrolemember(N'sysadmin'),0) = 0)  
    begin  
        raiserror(21089,16,-1)   
        return (1)  
    end  
    --   
    --  initinfo should not be null  
    --   
    if (@initinfo is null or @initinfo = N'')  
        return 0  
    --   
    --  Check if publisher is a defined as a distribution publisher in the current database  
    --   
    exec @retcode = sys.sp_MSvalidate_distpublisher @publisher, @publisher_id OUTPUT  
    if @retcode <> 0  
        return(1)  
    --   
    --  validate publication  
    --   
    select @publication_id = publication_id   
    from dbo.MSpublications   
    where   
        publisher_id = @publisher_id and  
        publisher_db = @publisher_db and  
        publication = @publication  
    --   
    --  Publication does not exist  
    --   
    if @publication_id is null  
    begin  
        raiserror (20026, 16, -1, @publication)  
        return (1)  
    end  
    --   
    --  while there are items   
    --   
    select @itemstart = charindex(N'<item\>', @initinfo)  
    while (@itemstart > 0)  
    begin  
        select @itemend = charindex(N'</item\>', @initinfo, @itemstart)  
        select @login = substring(@initinfo, @itemstart + 7, @itemend - @itemstart - 7)  
        --   
        --  Check to see if the login exists - should have valid SID  
        --   
        select @sid = suser_sid(@login,0)  
        if (@sid is not null)  
        begin  
            --  Add login to the access list if it does not exist  
            if not exists (select * from dbo.MSpublication_access   
                                where publication_id = @publication_id and  
                                        sid = @sid)  
            begin  
                insert dbo.MSpublication_access (publication_id, login, sid)  
                    values (@publication_id,@login,@sid)  
                if  @@error <> 0  
                    return(1)  
            end  
        end  
        else  
        begin  
            --  Login does not have access  
            if @skip = 0  
            begin  
                raiserror(21048, 16, 1, @login, @@servername)   
                return (1)  
            end  
        end  
        --   
        --  get the start of next item  
        --   
        select @itemstart = charindex(N'<item\>', @initinfo, @itemend)  
    end --  while (@itemstart > 0)  
    --   
    --  all done  
    --   
    return 0  
end