USE [Vertragsverwaltung_20160404]
GO
/****** Object:  StoredProcedure [dbo].[pr_Applikationkontakt_SelectAll_bottomtable]    Script Date: 02.12.2016 09:08:54 ******/
DROP PROCEDURE [dbo].[pr_Applikationkontakt_SelectAll_bottomtable]
GO
/****** Object:  StoredProcedure [dbo].[pr_Applikationkontakt_SelectAll_bottomtable]    Script Date: 02.12.2016 09:08:54 ******/
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO

CREATE proc [dbo].[pr_Applikationkontakt_SelectAll_bottomtable] 
---------------------------------------------------------------------------------
-- Stored procedure that will select all rows from the table 'Applikationkontakt'
-- Returns: @iErrorCode int
---------------------------------------------------------------------------------
	@iErrorCode int OUTPUT,
	@Fokus int,
	@KeyValue int,
	@mitarbeiternr int
AS
SET NOCOUNT ON
-- SELECT all rows from the table.


SELECT     dbo.Vertragspartner.NameZ1 + ' ' + dbo.Vertragspartner.NameZ2 + ', ' + dbo.Vertragspartner.PLZ + ' ' + dbo.Vertragspartner.Ort AS Firma, 
                      dbo.Person.Name + ' ' + dbo.Person.Vorname AS Kontaktperson, dbo.Person.Telefon, dbo.Person.Telefax, dbo.Person.EMail, 
                      dbo.Kontakttyp.Bezeichnung AS Rolle, dbo.Applikationkontakt.Intern, dbo.Applikationkontakt.Bemerkung, dbo.Applikationkontakt.Aktiv, 
                      dbo.Applikationkontakt.Erstellt_am, dbo.Applikationkontakt.Mutiert_am, dbo.Applikationkontakt.Mutierer, dbo.Applikationkontakt.Mandantnr, 
                      dbo.Applikationkontakt.SecurityLevelNr, dbo.Applikationkontakt.PersonNr, dbo.Applikationkontakt.ApplikationkontaktNr
                      ,
                      dbo.Person.Internet as Internet, dbo.Person.Bemerkung as PersonBemerkung
FROM         dbo.Applikationkontakt INNER JOIN
                      dbo.Person ON dbo.Applikationkontakt.PersonNr = dbo.Person.PersonNr INNER JOIN
                      dbo.Vertragspartner ON dbo.Person.Vertragspartnernr = dbo.Vertragspartner.VertragspartnerNr INNER JOIN
                      dbo.Kontakttyp ON dbo.Applikationkontakt.KontakttypNr = dbo.Kontakttyp.KontakttypNr
where dbo.Applikationkontakt.SecurityLevelnrin (select SecurityLevelNr from dbo.Get_SecurityLevelTab(@mitarbeiternr)) and Applikationnr = @keyvalue
ORDER BY 
	[Applikationkontaktnr] ASC
-- Get the Error Code for the statement just executed.
SELECT @iErrorCode=@@ERROR




GO