FMHN#65858 ruimtenummer van 10 naar 20 posities

svn path=/Database/trunk/; revision=49818
2021-02-15 12:14:24 +00:00
parent a6997e633e
commit 225ff67884
6 changed files with 26 additions and 15 deletions
--- a/PRS/PRS_PAC.SRC
+++ b/PRS/PRS_PAC.SRC
@@ -1285,9 +1285,9 @@ AS
              v_errorhint := 'Ongeldige ruimte nr';
              v_alg_ruimte_nr := TRIM (v_alg_ruimte_nr);

-              IF LENGTH (v_alg_ruimte_nr) > 10
+              IF LENGTH (v_alg_ruimte_nr) > 20
              THEN
-                 v_alg_ruimte_nr := SUBSTR (v_alg_ruimte_nr, 1, 10);
+                 v_alg_ruimte_nr := SUBSTR (v_alg_ruimte_nr, 1, 20);
                 fac.imp_writelog (
                    p_import_key,
                    'W',