Stefan/Fuchs_Intranet
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

Move fis widgets SQL into scalar functions
Playwright Tests / test (push) Waiting to run
Details

Browse Source 
Add fis_wdg_* table functions for dashboard widgets and wire them into
FuchsDatabase.sqlproj; update the invoice list procs accordingly.

Co-authored-by: Copilot <223556219+Copilot@users.noreply.github.com>
This commit is contained in:
Stefan
2026-10-16 11:35:28 +02:00
co-authored by Copilot
parent a39ccb8bbc
commit 330c33e65d
20 changed files with 307 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Fuchs_Database/dbo/Functions/strings_encodeHTML.sql
+20 -7
View File
@@ -1,12 +1,25 @@
CREATE FUNCTION [dbo].[strings_encodeHTML](@inputText NVARCHAR(MAX))
CREATE FUNCTION [dbo].[strings_encodeHTML](@inputText NVARCHAR(MAX))
RETURNS NVARCHAR(MAX)
AS
BEGIN
DECLARE @encodedText NVARCHAR(MAX);
DECLARE @encodedText NVARCHAR(MAX) = N'';
-- Use FOR XML PATH to escape special characters
SET @encodedText = CAST((SELECT @inputText AS [p] FOR XML PATH(''), TYPE) as nvarchar(max));
IF DATALENGTH(@inputText) > 0
BEGIN
/* 1) Escape reserved HTML characters (& < >); FOR XML also entitizes CR as &#x0D; */
SET @encodedText = CAST((SELECT @inputText AS [p] FOR XML PATH(''), TYPE) AS NVARCHAR(MAX));
RETURN IIF(LEN(@encodedText) < 7, '', dbo.strings_replaceSpecialCharsInHTML(SUBSTRING(@encodedText, 4, LEN(@encodedText) -7)));
END;
/* 2) Remove the leading <p> and trailing </p> that FOR XML adds */
SET @encodedText = SUBSTRING(@encodedText, 4, LEN(@encodedText) - 7);
/* 3) Line breaks (CRLF, LF, lone CR) -> <br>; NBSP -> &nbsp; */
SET @encodedText = REPLACE(@encodedText, N'&#x0D;' + NCHAR(10), N'<br>');
SET @encodedText = REPLACE(@encodedText, NCHAR(13) + NCHAR(10), N'<br>');
SET @encodedText = REPLACE(@encodedText, NCHAR(10), N'<br>');
SET @encodedText = REPLACE(@encodedText, N'&#x0D;', N'<br>');
SET @encodedText = REPLACE(@encodedText, NCHAR(13), N'<br>');
SET @encodedText = REPLACE(@encodedText, NCHAR(160), N'&nbsp;');
END
RETURN @encodedText;
END;