CREATE FUNCTION [zr].[sb_split_too_long_strings] (
  @string NVARCHAR(MAX),
  @step INT = 65535
)
RETURNS @res TABLE ( [rn] INT IDENTITY(1,1), [text] NVARCHAR(MAX) )
AS
BEGIN
  DECLARE @len INT = LEN( @string )
  DECLARE @pos INT = 0
  WHILE @pos < @len
  BEGIN
    INSERT
    INTO
      @res
    VALUES
      ( SUBSTRING( @string, @pos, @step ) )
    ;
    SET @pos += @step
    ;
  END
  ;
  RETURN
END
GO
SELECT
  ss.[rn], ss.[text]
FROM (
  SELECT TOP 1 [definition] FROM sys.sql_modules WHERE LEN( [definition] ) > 65535
  ) t
  CROSS APPLY [zr].[sb_split_too_long_strings]( t.[definition], DEFAULT ) ss
ORDER BY
  1
;