Version 20180904
This commit is contained in:
794
Version 20180527Scripts/dbscript.sql
Normal file
794
Version 20180527Scripts/dbscript.sql
Normal file
@@ -0,0 +1,794 @@
|
||||
alter table behandlu alter column bemerkung varchar(2048)
|
||||
go
|
||||
DROP TABLE dbo.Gesetz
|
||||
GO
|
||||
|
||||
/****** Object: Table [dbo].[Behandlungsart] Script Date: 27.05.2018 08:38:07 ******/
|
||||
SET ANSI_NULLS ON
|
||||
GO
|
||||
SET QUOTED_IDENTIFIER ON
|
||||
GO
|
||||
SET ANSI_PADDING ON
|
||||
GO
|
||||
CREATE TABLE [dbo].[Behandlungsart](
|
||||
[nrbehandlungsart] [int] IDENTITY(1,1) NOT NULL,
|
||||
[Behandlungsart] [varchar](255) NULL,
|
||||
[erstellt_am] [datetime] NULL,
|
||||
[mutiert_am] [datetime] NULL,
|
||||
[mutierer] [int] NULL,
|
||||
[aktiv] [bit] NULL,
|
||||
CONSTRAINT [PK_Behandlungsart] PRIMARY KEY CLUSTERED
|
||||
(
|
||||
[nrbehandlungsart] ASC
|
||||
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
|
||||
) ON [PRIMARY]
|
||||
|
||||
GO
|
||||
SET ANSI_PADDING OFF
|
||||
GO
|
||||
/****** Object: Table [dbo].[Gesetz] Script Date: 27.05.2018 08:38:07 ******/
|
||||
SET ANSI_NULLS ON
|
||||
GO
|
||||
SET QUOTED_IDENTIFIER ON
|
||||
GO
|
||||
SET ANSI_PADDING ON
|
||||
GO
|
||||
CREATE TABLE [dbo].[Gesetz](
|
||||
[NrGesetz] [int] IDENTITY(1,1) NOT NULL,
|
||||
[Gesetz] [varchar](255) NULL,
|
||||
[erstellt_am] [datetime] NULL,
|
||||
[mutiert_am] [datetime] NULL,
|
||||
[mutierer] [int] NULL,
|
||||
[aktiv] [bit] NULL,
|
||||
CONSTRAINT [PK_Gesetz] PRIMARY KEY CLUSTERED
|
||||
(
|
||||
[NrGesetz] ASC
|
||||
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
|
||||
) ON [PRIMARY]
|
||||
|
||||
GO
|
||||
SET ANSI_PADDING OFF
|
||||
GO
|
||||
SET IDENTITY_INSERT [dbo].[Behandlungsart] ON
|
||||
|
||||
GO
|
||||
INSERT [dbo].[Behandlungsart] ([nrbehandlungsart], [Behandlungsart], [erstellt_am], [mutiert_am], [mutierer], [aktiv]) VALUES (1, N'', CAST(N'2018-05-27 00:00:00.000' AS DateTime), CAST(N'2018-05-27 00:00:00.000' AS DateTime), 1, 1)
|
||||
GO
|
||||
INSERT [dbo].[Behandlungsart] ([nrbehandlungsart], [Behandlungsart], [erstellt_am], [mutiert_am], [mutierer], [aktiv]) VALUES (2, N'ambulant', CAST(N'2018-05-27 00:00:00.000' AS DateTime), CAST(N'2018-05-27 00:00:00.000' AS DateTime), 1, 1)
|
||||
GO
|
||||
INSERT [dbo].[Behandlungsart] ([nrbehandlungsart], [Behandlungsart], [erstellt_am], [mutiert_am], [mutierer], [aktiv]) VALUES (3, N'stationär', CAST(N'2018-05-27 00:00:00.000' AS DateTime), CAST(N'2018-05-27 00:00:00.000' AS DateTime), 1, 1)
|
||||
GO
|
||||
SET IDENTITY_INSERT [dbo].[Behandlungsart] OFF
|
||||
GO
|
||||
SET IDENTITY_INSERT [dbo].[Gesetz] ON
|
||||
|
||||
GO
|
||||
INSERT [dbo].[Gesetz] ([NrGesetz], [Gesetz], [erstellt_am], [mutiert_am], [mutierer], [aktiv]) VALUES (1, N'', CAST(N'2018-05-27 00:00:00.000' AS DateTime), CAST(N'2018-05-27 00:00:00.000' AS DateTime), 1, 1)
|
||||
GO
|
||||
INSERT [dbo].[Gesetz] ([NrGesetz], [Gesetz], [erstellt_am], [mutiert_am], [mutierer], [aktiv]) VALUES (2, N'UVG', CAST(N'2018-05-27 00:00:00.000' AS DateTime), CAST(N'2018-05-27 00:00:00.000' AS DateTime), 1, 1)
|
||||
GO
|
||||
SET IDENTITY_INSERT [dbo].[Gesetz] OFF
|
||||
GO
|
||||
ALTER TABLE dbo.Behandlu ADD NrBehandlungsart INT
|
||||
GO
|
||||
UPDATE dbo.Behandlu SET NrBehandlungsart=0
|
||||
GO
|
||||
/****** Object: UserDefinedFunction [dbo].[get_Behandlungsart] Script Date: 27.05.2018 08:50:05 ******/
|
||||
DROP FUNCTION [dbo].[get_Behandlungsart]
|
||||
GO
|
||||
|
||||
/****** Object: UserDefinedFunction [dbo].[get_Behandlungsart] Script Date: 27.05.2018 08:50:05 ******/
|
||||
SET ANSI_NULLS ON
|
||||
GO
|
||||
|
||||
SET QUOTED_IDENTIFIER ON
|
||||
GO
|
||||
|
||||
-- =============================================
|
||||
-- Author: <Author,,Name>
|
||||
-- Create date: <Create Date, ,>
|
||||
-- Description: <Description, ,>
|
||||
-- =============================================
|
||||
CREATE FUNCTION [dbo].[get_Behandlungsart]
|
||||
(
|
||||
|
||||
@behandlungsnr INT
|
||||
)
|
||||
RETURNS VARCHAR(255)
|
||||
AS
|
||||
BEGIN
|
||||
|
||||
DECLARE @behandlungsart VARCHAR(255)
|
||||
DECLARE @nr INT
|
||||
SELECT @nr=ISNULL(NrBehandlungsart,0) FROM behandlu WHERE Nrbehandlung=@behandlungsnr
|
||||
IF @nr=0 BEGIN
|
||||
SET @behandlungsart=''
|
||||
END ELSE BEGIN
|
||||
SELECT @behandlungsart=behandlungsart FROM behandlungsart WHERE nrbehandlungsart=@nr
|
||||
END
|
||||
RETURN @behandlungsart
|
||||
|
||||
|
||||
END
|
||||
|
||||
GO
|
||||
|
||||
|
||||
/****** Object: StoredProcedure [dbo].[sp_get_fakturadata] Script Date: 27.05.2018 09:48:21 ******/
|
||||
DROP PROCEDURE [dbo].[sp_get_fakturadata]
|
||||
GO
|
||||
|
||||
/****** Object: StoredProcedure [dbo].[sp_get_fakturadata] Script Date: 27.05.2018 09:48:21 ******/
|
||||
SET ANSI_NULLS ON
|
||||
GO
|
||||
|
||||
SET QUOTED_IDENTIFIER ON
|
||||
GO
|
||||
|
||||
-- =============================================
|
||||
-- Author: <Author,,Name>
|
||||
-- Create date: <Create Date,,>
|
||||
-- Description: <Description,,>
|
||||
-- =============================================
|
||||
CREATE PROCEDURE [dbo].[sp_get_fakturadata]
|
||||
@behandlungsnr INT ,
|
||||
@typ INT ,
|
||||
@betrag FLOAT = 0 ,
|
||||
@rate INT = 0,
|
||||
@verbuchen INT = 0,
|
||||
@kopie INT = 0,
|
||||
@ifakturanr INT = 0
|
||||
AS
|
||||
BEGIN
|
||||
--INSERT __log (logeintrag) VALUES(@kopie)
|
||||
DECLARE @rgdatum DATETIME
|
||||
SET @rgdatum=GETDATE()
|
||||
IF @kopie = 1 BEGIN
|
||||
SELECT @rgdatum=datum FROM faktura WHERE Nrfaktura=@ifakturanr
|
||||
end
|
||||
DECLARE @type INT;
|
||||
DECLARE @Tabelle_ohne_datum TABLE
|
||||
(
|
||||
[Typ] [INT] NULL ,
|
||||
[SSO_Nummer] [VARCHAR](255) NULL ,
|
||||
[Bezd] [VARCHAR](255) NULL ,
|
||||
[Taxpunkte] [FLOAT] NULL ,
|
||||
[Menge] [FLOAT] NULL ,
|
||||
[Frankenprotaxpunkt] [FLOAT] NULL ,
|
||||
[Absolut] [INT] NULL ,
|
||||
[Leistungstotal] [FLOAT] NULL ,
|
||||
[NrBehandlung] INT
|
||||
);
|
||||
DECLARE @Tabelle_mit_datum TABLE
|
||||
(
|
||||
[Typ] [INT] NULL ,
|
||||
[Datum] [DATE] NULL ,
|
||||
[SSO_Nummer] [VARCHAR](255) NULL ,
|
||||
[Bezd] [VARCHAR](255) NULL ,
|
||||
[Taxpunkte] [FLOAT] NULL ,
|
||||
[Menge] [FLOAT] NULL ,
|
||||
[Frankenprotaxpunkt] [FLOAT] NULL ,
|
||||
[Absolut] [BIT] NULL ,
|
||||
[Leistungstotal] [FLOAT] NULL ,
|
||||
[nrbehandlu] INT
|
||||
);
|
||||
DECLARE @lr_tabelle_mit_Datum TABLE
|
||||
(
|
||||
pk INT NOT NULL
|
||||
IDENTITY(1, 1) ,
|
||||
[L_Datum] [DATE] NULL ,
|
||||
[L_SSO_Nummer] [VARCHAR](255) NULL ,
|
||||
[L_Bezd] [VARCHAR](255) NULL ,
|
||||
[L_Taxpunkte] [FLOAT] NULL ,
|
||||
[L_Menge] [FLOAT] NULL ,
|
||||
[L_Frankenprotaxpunkt] [FLOAT] NULL ,
|
||||
[L_Absolut] [BIT] NULL ,
|
||||
[L_Leistungstotal] [FLOAT] NULL ,
|
||||
[R_Datum] [DATE] NULL ,
|
||||
[R_SSO_Nummer] [VARCHAR](255) NULL ,
|
||||
[R_Bezd] [VARCHAR](255) NULL ,
|
||||
[R_Taxpunkte] [FLOAT] NULL ,
|
||||
[R_Menge] [FLOAT] NULL ,
|
||||
[R_Frankenprotaxpunkt] [FLOAT] NULL ,
|
||||
[R_Absolut] [BIT] NULL ,
|
||||
[R_Leistungstotal] [FLOAT] NULL ,
|
||||
PRIMARY KEY ( pk )
|
||||
);
|
||||
|
||||
DECLARE @lr_tabelle_dentotar TABLE
|
||||
(
|
||||
pk INT NOT NULL
|
||||
IDENTITY(1, 1) ,
|
||||
datum DATE NULL ,
|
||||
tarif VARCHAR(255) ,
|
||||
tarifziffer VARCHAR(255) NULL ,
|
||||
tariftext VARCHAR(255) NULL ,
|
||||
bezugsziffer VARCHAR(255) NULL ,
|
||||
si VARCHAR(255) NULL ,
|
||||
st VARCHAR(255) NULL ,
|
||||
anzahl INT NULL ,
|
||||
tpal_preis DECIMAL(10, 2) NULL ,
|
||||
f_al DECIMAL(10, 2) NULL ,
|
||||
tpw_al DECIMAL(10, 2) NULL ,
|
||||
f_tl DECIMAL(10, 2) NULL ,
|
||||
tpw_tl DECIMAL(10, 2) NULL ,
|
||||
a INT NULL ,
|
||||
v INT NULL ,
|
||||
p INT NULL ,
|
||||
m INT NULL ,
|
||||
betrag DECIMAL(10, 2) NULL PRIMARY KEY ( pk )
|
||||
);
|
||||
|
||||
|
||||
DECLARE @lr_tabelle_ohne_Datum TABLE
|
||||
(
|
||||
pk INT NOT NULL
|
||||
IDENTITY(1, 1) ,
|
||||
[L_SSO_Nummer] [VARCHAR](255) NULL ,
|
||||
[L_Bezd] [VARCHAR](255) NULL ,
|
||||
[L_Taxpunkte] [FLOAT] NULL ,
|
||||
[L_Menge] [FLOAT] NULL ,
|
||||
[L_Frankenprotaxpunkt] [FLOAT] NULL ,
|
||||
[L_Absolut] [BIT] NULL ,
|
||||
[L_Leistungstotal] [FLOAT] NULL ,
|
||||
[R_SSO_Nummer] [VARCHAR](255) NULL ,
|
||||
[R_Bezd] [VARCHAR](255) NULL ,
|
||||
[R_Taxpunkte] [FLOAT] NULL ,
|
||||
[R_Menge] [FLOAT] NULL ,
|
||||
[R_Frankenprotaxpunkt] [FLOAT] NULL ,
|
||||
[R_Absolut] [BIT] NULL ,
|
||||
[R_Leistungstotal] [FLOAT] NULL ,
|
||||
PRIMARY KEY ( pk )
|
||||
);
|
||||
|
||||
DECLARE @Nrbehandlung AS INT ,
|
||||
@Behandlungsbeginn AS DATE ,
|
||||
@Behandlungsende AS DATE ,
|
||||
@Patient AS VARCHAR(51) ,
|
||||
@Behandler AS VARCHAR(51) ,
|
||||
@Taxpunktwert AS FLOAT ,
|
||||
@Rabatt AS FLOAT ,
|
||||
@Total AS FLOAT ,
|
||||
@Rechnungsbemerkung AS VARCHAR(255) ,
|
||||
@Ratenzuschlag AS FLOAT ,
|
||||
@Andrucken_Taxpunkte AS BIT ,
|
||||
@Anzahlung AS FLOAT ,
|
||||
@ESTyp INT ,
|
||||
@Nrleistung AS INT ,
|
||||
@Datum AS DATE ,
|
||||
@SSO_Nummer AS VARCHAR(255) ,
|
||||
@Taxpunkte AS FLOAT ,
|
||||
@Menge AS FLOAT ,
|
||||
@Frankenprotaxpunkt AS FLOAT ,
|
||||
@Absolut AS BIT ,
|
||||
@Leistungstotal AS FLOAT ,
|
||||
@Bezd AS VARCHAR(255) ,
|
||||
@@AdressZeile1 AS VARCHAR(255) ,
|
||||
@AdressZeile2 AS VARCHAR(255) ,
|
||||
@AdressZeile3 AS VARCHAR(255) ,
|
||||
@AdressZeile4 AS VARCHAR(255) ,
|
||||
@AdressZeile5 AS VARCHAR(255) ,
|
||||
@Total_SSO AS FLOAT ,
|
||||
@Total_Medikamente AS FLOAT ,
|
||||
@Total_Labor AS FLOAT ,
|
||||
@RabattTotal AS FLOAT ,
|
||||
@Vorauszahlung AS FLOAT ,
|
||||
@TotalTextblock AS VARCHAR(1024) ,
|
||||
@TotalNumBlock AS VARCHAR(1024) ,
|
||||
@Anzahlraten INT ,
|
||||
@Ungeraterateamstart INT ,
|
||||
@i INT ,
|
||||
@franken VARCHAR(255) ,
|
||||
@rappen VARCHAR(255) ,
|
||||
@totalstring VARCHAR(255) ,
|
||||
@faelligkeit DATETIME ,
|
||||
@hauptfaktura VARCHAR(255);
|
||||
|
||||
|
||||
DECLARE @esdaten TABLE
|
||||
(
|
||||
[Vs_konto] [VARCHAR](20) NULL ,
|
||||
[Vs_belegart] [VARCHAR](2) NULL ,
|
||||
[Vs_teilnehmernummer] [VARCHAR](20) NULL ,
|
||||
[Vs_besrid] [VARCHAR](20) NULL ,
|
||||
[Bankzeile1] [VARCHAR](50) NULL ,
|
||||
[Bankzeile2] [VARCHAR](50) NULL ,
|
||||
[Bankzeile3] [VARCHAR](50) NULL ,
|
||||
[ZuGunstenVon1] [VARCHAR](50) NULL ,
|
||||
[ZuGunstenVon2] [VARCHAR](50) NULL ,
|
||||
[ZuGunstenVon3] [VARCHAR](50) NULL ,
|
||||
[ZuGunstenVon4] [VARCHAR](50) NULL ,
|
||||
[Total_Franken] FLOAT ,
|
||||
[Nur_Franken] INT ,
|
||||
[Nur_Rappen] VARCHAR(2) ,
|
||||
Referenzzeile1 VARCHAR(255) ,
|
||||
referenzzeile2 VARCHAR(255) ,
|
||||
fakturanr VARCHAR(255) ,
|
||||
rate INT ,
|
||||
zahlungsfrist INT ,
|
||||
faelligkeit DATETIME ,
|
||||
hauptfaktura VARCHAR(255)
|
||||
);
|
||||
|
||||
IF @typ = 1
|
||||
BEGIN-- Kontoinformationen / ES_Daten
|
||||
DECLARE @manr INT;
|
||||
DECLARE @totalbetrag FLOAT;
|
||||
DECLARE @rc INT;
|
||||
DECLARE @FAKTURANR INT;
|
||||
DECLARE @vz FLOAT;
|
||||
SELECT @vz = dbo.Get_Totale(5, @behandlungsnr);
|
||||
SET @vz = 0;
|
||||
SET @rc = 0;
|
||||
IF @kopie=1 Or @ifakturanr<>0 BEGIN
|
||||
SET @fakturanr=@ifakturanr
|
||||
END ELSE BEGIN
|
||||
SET @FAKTURANR = dbo.get_FakturaNr();
|
||||
END
|
||||
IF @betrag <> 0
|
||||
SET @totalbetrag = @betrag;
|
||||
SELECT @manr = Nrbehandler ,
|
||||
@totalbetrag = Total ,
|
||||
@Anzahlraten = Anzahlraten ,
|
||||
@Ungeraterateamstart = Ungeraterateamstart
|
||||
FROM Behandlu
|
||||
WHERE Nrbehandlung = @behandlungsnr;
|
||||
SET @totalbetrag = dbo.GetRoundedValue(@totalbetrag - @vz);
|
||||
SELECT @rc = COUNT(*)
|
||||
FROM dbo.VDKonti
|
||||
WHERE NrPrivat = @manr;
|
||||
PRINT @totalbetrag;
|
||||
IF @rc = 0
|
||||
SET @manr = 1;
|
||||
PRINT FLOOR(@totalbetrag);
|
||||
PRINT ( @totalbetrag - FLOOR(@totalbetrag) ) * 100;
|
||||
|
||||
|
||||
DECLARE @temp FLOAT;
|
||||
DECLARE @temp1 FLOAT;
|
||||
DECLARE @temp2 FLOAT;
|
||||
DECLARE @temp3 VARCHAR(255);
|
||||
DECLARE @tage_zahlungsfrist INT;
|
||||
SELECT @tage_zahlungsfrist = INHALT
|
||||
FROM dbo.OPTIONS
|
||||
WHERE NROPTION = 2000;
|
||||
|
||||
IF @Anzahlraten > 1
|
||||
BEGIN
|
||||
SET @temp = FLOOR(FLOOR(@totalbetrag) / @Anzahlraten); -- Rate ohne Nachkommastellen
|
||||
SET @temp1 = @temp * @Anzahlraten;
|
||||
SET @temp2 = @temp + ( @totalbetrag - @temp1 ); -- ungerate rate
|
||||
IF @rate <= 1
|
||||
BEGIN
|
||||
IF @Ungeraterateamstart = 1
|
||||
BEGIN
|
||||
SET @totalbetrag = @temp2;
|
||||
END;
|
||||
ELSE
|
||||
BEGIN
|
||||
SET @totalbetrag = @temp;
|
||||
END;
|
||||
SET @hauptfaktura = @FAKTURANR;
|
||||
SET @faelligkeit = DATEADD(dd,
|
||||
@tage_zahlungsfrist,
|
||||
GETDATE());
|
||||
SET @faelligkeit = DATEADD(dd,
|
||||
@tage_zahlungsfrist,
|
||||
@rgdatum);
|
||||
|
||||
END;
|
||||
ELSE
|
||||
BEGIN
|
||||
IF @Ungeraterateamstart = 1
|
||||
AND @rate = @Anzahlraten
|
||||
BEGIN
|
||||
SET @totalbetrag = @temp2;
|
||||
END;
|
||||
ELSE
|
||||
BEGIN
|
||||
SET @totalbetrag = @temp;
|
||||
END;
|
||||
SELECT TOP 1
|
||||
@hauptfaktura = Nrhauptfaktura
|
||||
FROM Faktura
|
||||
ORDER BY Nrfaktura DESC;
|
||||
SET @faelligkeit = DATEADD(dd,
|
||||
@tage_zahlungsfrist
|
||||
* @rate, GETDATE());
|
||||
SET @faelligkeit = DATEADD(dd,
|
||||
@tage_zahlungsfrist
|
||||
* @rate, @rgdatum);
|
||||
|
||||
END;
|
||||
|
||||
END;
|
||||
ELSE
|
||||
BEGIN
|
||||
SET @hauptfaktura = @FAKTURANR;
|
||||
SET @faelligkeit = DATEADD(dd, @tage_zahlungsfrist,
|
||||
GETDATE());
|
||||
SET @faelligkeit = DATEADD(dd, @tage_zahlungsfrist,
|
||||
@rgdatum);
|
||||
|
||||
END;
|
||||
SET @totalstring = CONVERT(NUMERIC(10, 2), @totalbetrag);
|
||||
SET @franken = SUBSTRING(@totalstring, 1,
|
||||
CHARINDEX('.', @totalstring) - 1);
|
||||
SET @rappen = SUBSTRING(@totalstring,
|
||||
CHARINDEX('.', @totalstring) + 1, 2);
|
||||
WHILE LEN(@rappen)<2 BEGIN
|
||||
SET @rappen='0'+LTRIM(RTRIM(STR(@rappen)))
|
||||
end
|
||||
|
||||
|
||||
|
||||
PRINT @franken;
|
||||
PRINT @rappen;
|
||||
PRINT @totalstring;
|
||||
INSERT @esdaten
|
||||
SELECT Vs_konto ,
|
||||
Vs_belegart ,
|
||||
Vs_teilnehmernummer ,
|
||||
Vs_besrid ,
|
||||
Bankzeile1 ,
|
||||
Bankzeile2 ,
|
||||
Bankzeile3 ,
|
||||
ZuGunstenVon1 ,
|
||||
ZuGunstenVon2 ,
|
||||
ZuGunstenVon3 ,
|
||||
ZuGunstenVon4 ,
|
||||
@totalbetrag ,
|
||||
@franken ,--FLOOR(@totalbetrag) ,
|
||||
@rappen ,--( @totalbetrag - FLOOR(@totalbetrag) ) * 100 ,
|
||||
' ' ,
|
||||
' ' ,
|
||||
@FAKTURANR ,
|
||||
@rate ,
|
||||
@tage_zahlungsfrist ,
|
||||
@faelligkeit ,
|
||||
@hauptfaktura
|
||||
FROM dbo.VDKonti
|
||||
WHERE NrPrivat = @manr;
|
||||
|
||||
|
||||
|
||||
|
||||
SELECT *
|
||||
FROM @esdaten;
|
||||
|
||||
|
||||
END;
|
||||
|
||||
DECLARE @mitdatum INT;
|
||||
SELECT @mitdatum = MitDatum
|
||||
FROM Behandlu
|
||||
WHERE Nrbehandlung = @behandlungsnr;
|
||||
|
||||
|
||||
IF @typ = 2
|
||||
BEGIN -- Empfängerdaten / Allg Behandlung / Totale
|
||||
DECLARE @absenderort AS VARCHAR(255)
|
||||
SELECT TOP 1 @absenderort = absenderort FROM absender
|
||||
SET @absenderort=@absenderort + ', '+CONVERT(VARCHAR(10),@rgdatum,104)
|
||||
SELECT 1 AS Typ ,
|
||||
@rgdatum AS Rechnungsdatum,
|
||||
@mitdatum AS MitDatum ,
|
||||
dbo.Behandlu.Nrbehandlung ,
|
||||
dbo.Behandlu.Behandlungsbeginn ,
|
||||
dbo.Behandlu.Behandlungsende ,
|
||||
dbo.PRIVAT.NAME + ' ' + dbo.PRIVAT.VORNAME AS Patient ,
|
||||
dbo.PRIVAT.NAME AS Patient_Name ,
|
||||
dbo.PRIVAT.VORNAME AS Patient_Vorname ,
|
||||
dbo.PRIVAT.STRASSE AS Patient_Strasse ,
|
||||
dbo.PRIVAT.PLZ AS Patient_PLZ ,
|
||||
dbo.PRIVAT.ORT AS Patient_Ort ,
|
||||
dbo.PRIVAT.Kanton AS Patient_Kanton ,
|
||||
dbo.PRIVAT.AHVNR AS Patient_AHVNr ,
|
||||
CASE WHEN dbo.PRIVAT.GESCHLECHT = 0 THEN 'M'
|
||||
ELSE 'W'
|
||||
END AS Patient_Geschlecht ,
|
||||
CONVERT(VARCHAR(10),dbo.PRIVAT.GEBDAT,104) AS Patient_Geburtsdatum ,
|
||||
dbo.PRIVAT.GLN AS Patient_GLNr ,
|
||||
privat_1.NAME + ' ' + privat_1.VORNAME AS Behandler ,
|
||||
dbo.Behandlu.Taxpunktwert ,
|
||||
dbo.Behandlu.Rabatt ,
|
||||
dbo.Behandlu.Total ,
|
||||
dbo.Behandlu.Rechnungsbemerkung ,
|
||||
dbo.Behandlu.Ratenzuschlag ,
|
||||
dbo.Behandlu.Andrucken_Taxpunkte ,
|
||||
dbo.Behandlu.Anzahlung ,
|
||||
dbo.Behandlu.Nrestyp ,
|
||||
dbo.Behandlu.Fallnummer ,
|
||||
dbo.Behandlu.Anzahlraten ,
|
||||
dbo.Behandlu.Unfalldatum,
|
||||
dbo.behandlu.Datum_Kostengutsprache,
|
||||
dbo.behandlu.Kostengutsprache_Nummer,
|
||||
dbo.behandlu.Behandlungsgrund,
|
||||
dbo.behandlu.Diagnose,
|
||||
dbo.behandlu.GLN_Liste,
|
||||
dbo.get_adresszeile(1, dbo.Behandlu.Nrbehandlung) AS AdressZeile1 ,
|
||||
dbo.get_adresszeile(2, dbo.Behandlu.Nrbehandlung) AS AdressZeile2 ,
|
||||
dbo.get_adresszeile(3, dbo.Behandlu.Nrbehandlung) AS AdressZeile3 ,
|
||||
dbo.get_adresszeile(4, dbo.Behandlu.Nrbehandlung) AS AdressZeile4 ,
|
||||
dbo.get_adresszeile(5, dbo.Behandlu.Nrbehandlung) AS AdressZeile5 ,
|
||||
dbo.Get_Dentotar_Parameter(11,
|
||||
dbo.Behandlu.Nrbehandlung) AS GLN_Empfaenger ,
|
||||
dbo.get_adresse(dbo.Behandlu.Nrbehandlung, 0) AS Empfaenger ,
|
||||
dbo.Get_Totale(1, dbo.Behandlu.Nrbehandlung) AS Total_SSO ,
|
||||
dbo.Get_Totale(2, dbo.Behandlu.Nrbehandlung) AS Total_Medikamente ,
|
||||
dbo.Get_Totale(3, dbo.Behandlu.Nrbehandlung) AS Total_Labor ,
|
||||
dbo.Get_Totale(4, dbo.Behandlu.Nrbehandlung) AS RabattTotal ,
|
||||
dbo.Get_Totale(5, dbo.Behandlu.Nrbehandlung) AS Vorauszahlung ,
|
||||
dbo.get_totalblock(1, dbo.Behandlu.Nrbehandlung) AS TotalTextblock ,
|
||||
dbo.get_totalblock(2, dbo.Behandlu.Nrbehandlung) AS TotalNumBlock ,
|
||||
dbo.Get_Dentotar_Parameter(1,
|
||||
dbo.Behandlu.Nrbehandlung) AS Rechnungstitel ,
|
||||
dbo.Get_Dentotar_Parameter(2,
|
||||
dbo.Behandlu.Nrbehandlung) AS Dokument_Identifikation ,
|
||||
dbo.Get_Dentotar_Parameter(3,
|
||||
dbo.Behandlu.Nrbehandlung) AS RG_Steller_GLN ,
|
||||
dbo.Get_Dentotar_Parameter(4,
|
||||
dbo.Behandlu.Nrbehandlung) AS RG_Steller_ZSR ,
|
||||
dbo.Get_Dentotar_Parameter(5,
|
||||
dbo.Behandlu.Nrbehandlung) AS RG_Steller_Name ,
|
||||
dbo.Get_Dentotar_Parameter(6,
|
||||
dbo.Behandlu.Nrbehandlung) AS RG_Steller_Adresse ,
|
||||
dbo.Get_Dentotar_Parameter(15,
|
||||
dbo.Behandlu.Nrbehandlung) AS RG_Steller_Tel ,
|
||||
dbo.Get_Dentotar_Parameter(16,
|
||||
dbo.Behandlu.Nrbehandlung) AS RG_Steller_Fax ,
|
||||
(SELECT ISNULL(GLN,'') FROM privat WHERE nrprivat=behandlu.Nrbehandler) AS Leistungserbringer_GSN,
|
||||
(SELECT ISNULL(ZSR,'') FROM privat WHERE nrprivat=behandlu.Nrbehandler) AS Leistungserbringer_ZSR,
|
||||
(SELECT name+' '+vorname FROM privat WHERE nrprivat=behandlu.Nrbehandler) AS Leistungserbringer_Name,
|
||||
--dbo.Get_Dentotar_Parameter(7,
|
||||
-- dbo.Behandlu.Nrbehandlung) AS Leistungserbringer_GSN ,
|
||||
--dbo.Get_Dentotar_Parameter(8,
|
||||
-- dbo.Behandlu.Nrbehandlung) AS Leistungserbringer_ZSR ,
|
||||
--dbo.Get_Dentotar_Parameter(9,
|
||||
-- dbo.Behandlu.Nrbehandlung) AS Leistungserbringer_Name ,
|
||||
dbo.Get_Dentotar_Parameter(10,
|
||||
dbo.Behandlu.Nrbehandlung) AS Leistungserbringer_Adresse ,
|
||||
dbo.Get_Dentotar_Parameter(12,
|
||||
dbo.Behandlu.Nrbehandlung) AS Verguetungsart ,
|
||||
--dbo.Get_Dentotar_Parameter(13,
|
||||
-- dbo.Behandlu.Nrbehandlung) AS Gesetz ,
|
||||
dbo.get_gesetz(dbo.Behandlu.Nrbehandlung) AS Gesetz,
|
||||
dbo.Get_Dentotar_Parameter(14,
|
||||
dbo.Behandlu.Nrbehandlung) AS Rolle_Ort ,
|
||||
dbo.Get_Dentotar_Parameter(17,
|
||||
dbo.Behandlu.Nrbehandlung) AS Leistungserbringer_Tel ,
|
||||
dbo.Get_Dentotar_Parameter(18,
|
||||
dbo.Behandlu.Nrbehandlung) AS Leistungserbringer_Fax,
|
||||
CASE WHEN @kopie=0 THEN 'nein' ELSE 'nein' END AS Kopie,
|
||||
@absenderort AS Absenderort_Datum,
|
||||
dbo.get_behandlungsart(dbo.behandlu.nrbehandlung) AS Behandlungsart
|
||||
INTO #tmp1
|
||||
FROM dbo.Behandlu
|
||||
INNER JOIN dbo.PRIVAT ON dbo.Behandlu.Nrpatient = dbo.PRIVAT.NRPRIVAT
|
||||
INNER JOIN dbo.PRIVAT AS privat_1 ON dbo.Behandlu.Nrbehandler = privat_1.NRPRIVAT
|
||||
|
||||
WHERE Behandlu.Nrbehandlung = @behandlungsnr;
|
||||
|
||||
SELECT *
|
||||
FROM #tmp1;
|
||||
END;
|
||||
|
||||
|
||||
IF @typ = 3
|
||||
OR @typ = 4
|
||||
BEGIN -- Leistungen
|
||||
|
||||
DECLARE @pk INT;
|
||||
IF @mitdatum = 1
|
||||
BEGIN -- Nach Datum
|
||||
|
||||
INSERT @Tabelle_mit_datum
|
||||
SELECT *
|
||||
FROM View_Leistungen_mit_Datum
|
||||
WHERE Nrbehandlung = @behandlungsnr
|
||||
ORDER BY Datum ,
|
||||
SSO_Nummer;
|
||||
SET @i = 1;
|
||||
DECLARE xc CURSOR
|
||||
FOR
|
||||
SELECT *
|
||||
FROM @Tabelle_mit_datum
|
||||
ORDER BY Datum ,
|
||||
[SSO_Nummer];
|
||||
OPEN xc;
|
||||
FETCH NEXT FROM xc INTO @type, @Datum, @SSO_Nummer,
|
||||
@Bezd, @Taxpunkte, @Menge, @Frankenprotaxpunkt,
|
||||
@Absolut, @Leistungstotal, @Nrbehandlung;
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF @i = 1
|
||||
BEGIN
|
||||
INSERT @lr_tabelle_mit_Datum
|
||||
( L_Datum ,
|
||||
L_SSO_Nummer ,
|
||||
L_Bezd ,
|
||||
L_Taxpunkte ,
|
||||
L_Menge ,
|
||||
L_Frankenprotaxpunkt ,
|
||||
L_Absolut ,
|
||||
L_Leistungstotal ,
|
||||
R_Datum ,
|
||||
R_SSO_Nummer ,
|
||||
R_Bezd ,
|
||||
R_Taxpunkte ,
|
||||
R_Menge ,
|
||||
R_Frankenprotaxpunkt ,
|
||||
R_Absolut ,
|
||||
R_Leistungstotal
|
||||
)
|
||||
VALUES ( @Datum , -- L_Datum - date
|
||||
@SSO_Nummer , -- L_SSO_Nummer - int
|
||||
@Bezd , -- L_Bezd - varchar(255)
|
||||
@Taxpunkte , -- L_Taxpunkte - float
|
||||
@Menge , -- L_Menge - float
|
||||
@Frankenprotaxpunkt , -- L_Frankenprotaxpunkt - float
|
||||
@Absolut , -- L_Absolut - bit
|
||||
@Leistungstotal , -- L_Leistungstotal - float
|
||||
NULL , -- R_Datum - date
|
||||
NULL , -- R_SSO_Nummer - int
|
||||
CONVERT(VARCHAR(255), '') , -- R_Bezd - varchar(255)
|
||||
NULL , -- R_Taxpunkte - float
|
||||
NULL , -- R_Menge - float
|
||||
NULL , -- R_Frankenprotaxpunkt - float
|
||||
NULL , -- R_Absolut - bit
|
||||
NULL -- R_Leistungstotal - float
|
||||
);
|
||||
|
||||
SET @i = @i + 1;
|
||||
END;
|
||||
ELSE
|
||||
BEGIN
|
||||
SELECT TOP 1
|
||||
@pk = pk
|
||||
FROM @lr_tabelle_mit_Datum
|
||||
ORDER BY pk DESC;
|
||||
UPDATE @lr_tabelle_mit_Datum
|
||||
SET R_Datum = @Datum ,
|
||||
R_SSO_Nummer = @SSO_Nummer ,
|
||||
R_Bezd = @Bezd ,
|
||||
R_Taxpunkte = @Taxpunkte ,
|
||||
R_Menge = @Menge ,
|
||||
R_Frankenprotaxpunkt = @Frankenprotaxpunkt ,
|
||||
R_Absolut = @Absolut ,
|
||||
R_Leistungstotal = @Leistungstotal
|
||||
WHERE pk = @pk;
|
||||
SET @i = 1;
|
||||
END;
|
||||
FETCH NEXT FROM xc INTO @type, @Datum,
|
||||
@SSO_Nummer, @Bezd, @Taxpunkte, @Menge,
|
||||
@Frankenprotaxpunkt, @Absolut,
|
||||
@Leistungstotal, @Nrbehandlung;
|
||||
END;
|
||||
CLOSE xc;
|
||||
DEALLOCATE xc;
|
||||
IF @typ = 4
|
||||
BEGIN
|
||||
PRINT 'a0';
|
||||
SELECT *
|
||||
FROM @lr_tabelle_mit_Datum;
|
||||
END;
|
||||
ELSE
|
||||
BEGIN
|
||||
SELECT *
|
||||
FROM @Tabelle_mit_datum;
|
||||
END;
|
||||
|
||||
END;
|
||||
ELSE
|
||||
BEGIN -- ohne Datum
|
||||
|
||||
INSERT @Tabelle_ohne_datum
|
||||
SELECT *
|
||||
FROM View_Leistungen_ohne_Datum
|
||||
WHERE Nrbehandlung = @behandlungsnr
|
||||
ORDER BY SSO_Nummer;
|
||||
SET @i = 1;
|
||||
|
||||
DECLARE xc CURSOR
|
||||
FOR
|
||||
SELECT *
|
||||
FROM @Tabelle_ohne_datum
|
||||
ORDER BY [SSO_Nummer];
|
||||
OPEN xc;
|
||||
FETCH NEXT FROM xc INTO @type, @SSO_Nummer, @Bezd,
|
||||
@Taxpunkte, @Menge, @Frankenprotaxpunkt, @Absolut,
|
||||
@Leistungstotal, @Nrbehandlung;
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
IF @i = 1
|
||||
BEGIN
|
||||
INSERT @lr_tabelle_ohne_Datum
|
||||
( L_SSO_Nummer ,
|
||||
L_Bezd ,
|
||||
L_Taxpunkte ,
|
||||
L_Menge ,
|
||||
L_Frankenprotaxpunkt ,
|
||||
L_Absolut ,
|
||||
L_Leistungstotal ,
|
||||
R_SSO_Nummer ,
|
||||
R_Bezd ,
|
||||
R_Taxpunkte ,
|
||||
R_Menge ,
|
||||
R_Frankenprotaxpunkt ,
|
||||
R_Absolut ,
|
||||
R_Leistungstotal
|
||||
)
|
||||
VALUES ( @SSO_Nummer , -- L_SSO_Nummer - int
|
||||
@Bezd , -- L_Bezd - varchar(255)
|
||||
@Taxpunkte , -- L_Taxpunkte - float
|
||||
@Menge , -- L_Menge - float
|
||||
@Frankenprotaxpunkt , -- L_Frankenprotaxpunkt - float
|
||||
@Absolut , -- L_Absolut - bit
|
||||
@Leistungstotal , -- L_Leistungstotal - float
|
||||
NULL , -- R_SSO_Nummer - int
|
||||
CONVERT(VARCHAR(255), '') , -- R_Bezd - varchar(255)
|
||||
NULL , -- R_Taxpunkte - float
|
||||
NULL , -- R_Menge - float
|
||||
NULL , -- R_Frankenprotaxpunkt - float
|
||||
NULL , -- R_Absolut - bit
|
||||
NULL -- R_Leistungstotal - float
|
||||
);
|
||||
SET @i = @i + 1;
|
||||
|
||||
END;
|
||||
ELSE
|
||||
BEGIN
|
||||
|
||||
SELECT TOP 1
|
||||
@pk = pk
|
||||
FROM @lr_tabelle_ohne_Datum
|
||||
ORDER BY pk DESC;
|
||||
PRINT @pk;
|
||||
UPDATE @lr_tabelle_ohne_Datum
|
||||
SET R_SSO_Nummer = @SSO_Nummer ,
|
||||
R_Bezd = @Bezd ,
|
||||
R_Taxpunkte = @Taxpunkte ,
|
||||
R_Menge = @Menge ,
|
||||
R_Frankenprotaxpunkt = @Frankenprotaxpunkt ,
|
||||
R_Absolut = @Absolut ,
|
||||
R_Leistungstotal = @Leistungstotal
|
||||
WHERE pk = @pk;
|
||||
SET @i = 1;
|
||||
END;
|
||||
FETCH NEXT FROM xc INTO @type, @SSO_Nummer,
|
||||
@Bezd, @Taxpunkte, @Menge,
|
||||
@Frankenprotaxpunkt, @Absolut,
|
||||
@Leistungstotal, @Nrbehandlung;
|
||||
END;
|
||||
CLOSE xc;
|
||||
DEALLOCATE xc;
|
||||
IF @typ = 4
|
||||
BEGIN
|
||||
SELECT '' AS Datum ,
|
||||
*
|
||||
FROM @lr_tabelle_ohne_Datum;
|
||||
END;
|
||||
ELSE
|
||||
BEGIN
|
||||
SELECT '' AS Datum ,
|
||||
*
|
||||
FROM @Tabelle_ohne_datum;
|
||||
END;
|
||||
|
||||
END;
|
||||
END;
|
||||
|
||||
IF @typ = 5
|
||||
BEGIN
|
||||
SELECT *
|
||||
FROM View_Leistungen_Dentotar
|
||||
WHERE Nrbehandlung = @behandlungsnr;
|
||||
END;
|
||||
|
||||
|
||||
|
||||
END;
|
||||
|
||||
GO
|
||||
|
||||
|
||||
Reference in New Issue
Block a user