create procedure spAddDelDocument(
    @Mode       int,
    @ID         int,
    @UserID     int,
    @ExecManID  int,
    @TypeID     smallint,
    @NewOwnerID int,
    @DateDoc    datetime
) as
declare @ActionName varchar( 255 )
declare @Subject    varchar( 255 )
declare @Params     varchar( 1024 )
begin
    select @Subject = 'LIST_DOCUMENTS'
    select @Params =  'TypeID = ' || convert(varchar( 15 ), @TypeID) || 
                      ';  UserID = ' || convert(varchar( 15 ), @UserID) ||     
                      ';  ExecManID = ' || convert(varchar( 15 ), @ExecManID) ||     
                      ';  NewOwnerID = ' || convert(varchar( 15 ), @NewOwnerID) || 
                      ';  DateDoc = ' || convert(varchar( 255 ), @DateDoc,  104 )
    if @Mode =  1  begin
        -- добавить новый документ
        if (@TypeID is not null) and (@DateDoc is not null) and (@UserID is not null) begin
            insert into LIST_DOCUMENTS(TYPE_ID, NEW_OWNER_ID, DATE_DOC, USER_ID, IS_ACTIVE, EXEC_MAN_ID)
            values (@TypeID, @NewOwnerID, @DateDoc, @UserID,  1 , @ExecManID)
        
            select @ID = @@IDENTITY
            
            select @ActionName = 'Добавлен документ'
            execute spAddLogLine @ActionName, @UserID, @Subject, @Params, null, @ID
        
            return @ID
        end else begin
            select @ActionName = 'Ошибка создания документа. Не все параметры'
            execute spAddLogLine @ActionName, @UserID, @Subject, @Params, null, null
            return - 1 
        end
    end else 
    if @Mode =  3  begin
        -- удалить ссылки на документ
        delete from EQUIP_CHANGE_VALUES
        where DOC_ID = @ID
        
        delete from DOCS_LINES
        where DOC_ID = @ID
        -- удалить существующий документ
        delete from LIST_DOCUMENTS
        where ID = @ID
        
        select @ActionName = 'Удален документ'
        execute spAddLogLine @ActionName, @UserID, @Subject, @Params, null, @ID
        
        return  0 
    end
end