diff --git a/CAD/CAD_PAC.SRC b/CAD/CAD_PAC.SRC
index 3a543b9e..e23c5223 100644
--- a/CAD/CAD_PAC.SRC
+++ b/CAD/CAD_PAC.SRC
@@ -35,7 +35,7 @@ AS
         THEN
             -- nieuwe legenda
             INSERT INTO cad_legenda (cad_legenda_omschrijving, cad_legenda_discreet)
-                VALUES (tomschrijving, 1)
+                VALUES (SUBSTR(tomschrijving, 1, 32), 1)
              RETURNING cad_legenda_key
                   INTO lkey;