USE [Vertragsverwaltung_20160404]
GO
/****** Object:  StoredProcedure [dbo].[sp_rpt_applikationsliste]    Script Date: 02.12.2016 09:08:53 ******/
DROP PROCEDURE [dbo].[sp_rpt_applikationsliste]
GO
/****** Object:  StoredProcedure [dbo].[sp_rpt_applikationsliste]    Script Date: 02.12.2016 09:08:55 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

-- =============================================
-- Author:		<Author,,Name>
-- Create date: <Create Date,,>
-- Description:	<Description,,>
-- =============================================
CREATE PROCEDURE [dbo].[sp_rpt_applikationsliste]
@sqlwhere varchar(1024)
AS
BEGIN
	SET NOCOUNT ON;
    declare @xsql varchar(2048)
    set @xsql = 'SELECT dbo.Applikation.ApplikationNr, dbo.Applikation.Bezeichnung, dbo.Applikation.ParentID, dbo.Applikation.ApplikationVerantwortungNr, '
    set @xsql = @xsql + ' dbo.Applikation.ApplikationKategorieNr, dbo.Applikation.Marktbereichnr, dbo.Applikation.Version, dbo.Applikation.AlsProdukt, dbo.Applikation.NurLizenz, '
    set @xsql = @xsql + ' dbo.Applikation.PrioWiederanlauf, dbo.Applikation.Kurzbeschreibung, dbo.Applikation.Inaktivseit, dbo.Applikation.RAS, dbo.Applikation.Datenbankname, '
    set @xsql = @xsql + ' dbo.Applikation.Anzahl_Installationen, dbo.Applikation.Test_Aufwand, dbo.Applikation.Test_Arbeitsplaetze, dbo.Applikation.Test_Abhaengigkeiten, '
    set @xsql = @xsql + ' dbo.Applikation.Test_Bemerkung, dbo.Applikation.TicketXPertVerwendung, dbo.Applikation.TicketXPert_WPIAnzeigen, dbo.Applikation.TicketXPert_Preis, '
    set @xsql = @xsql + ' dbo.Applikation.TicketXPert_Preis_Einmalig, dbo.Applikation.TicketXPert_AMAnzeigen, dbo.Applikation.TicketXPert_ApplikationKritikalitaetTypNr, '
    set @xsql = @xsql + ' dbo.Applikation.TicketXPert_ApplikationSMLTypNr, dbo.Applikation.Erstellt_am, dbo.Applikation.Mutiert_am, dbo.Applikation.Mutierer, dbo.Applikation.SecurityLevelNr, '
    set @xsql = @xsql + ' dbo.Applikation.RfcBoardNr, dbo.ApplikationKategorie.ApplikationKategorieNr AS Expr1, dbo.ApplikationKategorie.Bezeichnung AS Typ, '
    set @xsql = @xsql + ' dbo.ApplikationVerantwortung.ApplikationVerantwortungNr AS Expr2, dbo.ApplikationVerantwortung.Bezeichnung AS Verantwortung'
    set @xsql = @xsql + ' FROM         dbo.Applikation INNER JOIN'
    set @xsql = @xsql + ' dbo.ApplikationKategorie ON dbo.Applikation.ApplikationKategorieNr = dbo.ApplikationKategorie.ApplikationKategorieNr INNER JOIN'
    set @xsql = @xsql + ' dbo.ApplikationVerantwortung ON dbo.Applikation.ApplikationVerantwortungNr = dbo.ApplikationVerantwortung.ApplikationVerantwortungNr'
    set @xsql = @xsql + ' WHERE (dbo.ApplikationKategorie.Aktiv = 1) AND (dbo.ApplikationVerantwortung.Aktiv = 1) AND (dbo.Applikation.Aktiv = 1)'
    if @sqlwhere <> '' begin
       set @xsql = @xsql + ' and (' + @sqlwhere + ')'
    end
exec(@xsql)
END



GO