From 864d3262e6eda8ae0c9f775d3dc5423962f67045 Mon Sep 17 00:00:00 2001
From: Erik Groener <erik.groener@aareon.nl>
Date: Tue, 14 May 2024 14:02:06 +0000
Subject: [PATCH] AAIT#83560 Karakters kenmerk Overeenkomstnummer ophogen

svn path=/Database/trunk/; revision=64641
---
 FAC/FAC_PACF.SRC | 6 +++---
 FAC/FAC_TAB.SRC  | 4 ++--
 PRS/PRS_TAB.SRC  | 2 +-
 _UP/DB47to48.src | 3 +++
 4 files changed, 9 insertions(+), 6 deletions(-)

diff --git a/FAC/FAC_PACF.SRC b/FAC/FAC_PACF.SRC
index 7b8f1d7e..ae0680d7 100644
--- a/FAC/FAC_PACF.SRC
+++ b/FAC/FAC_PACF.SRC
@@ -13185,7 +13185,7 @@ IS
    v_prs_bedrijf_uurloon            VARCHAR2 (256);                   -- N6,2
    v_prs_bedrijf_xsl                VARCHAR2 (256);                    --C256
    v_prs_bedrijf_mldorder_adres     VARCHAR2 (256);                    --C256
-   v_prs_overeenkomst_nr            VARCHAR2 (256);                    -- C20
+   v_prs_overeenkomst_nr            VARCHAR2 (256);                    -- C30
    v_prs_overeenkomst_datum         VARCHAR2 (256);                   -- DATE
    v_prs_bedrijf_email              VARCHAR2 (256);                   -- C100
    v_prs_bedrijf_opmerking          VARCHAR2 (512);                   -- C320
@@ -13756,10 +13756,10 @@ BEGIN
 
             v_errorhint := 'Overeenkomstnummer te lang';
             v_prs_overeenkomst_nr := TRIM (v_prs_overeenkomst_nr);
-            IF LENGTH (v_prs_overeenkomst_nr) > 20
+            IF LENGTH (v_prs_overeenkomst_nr) > 30
             THEN
                v_prs_overeenkomst_nr :=
-                                 SUBSTR (TRIM (v_prs_overeenkomst_nr), 1, 20);
+                                 SUBSTR (TRIM (v_prs_overeenkomst_nr), 1, 30);
                fac.imp_writelog
                               (p_import_key,
                                'W',
diff --git a/FAC/FAC_TAB.SRC b/FAC/FAC_TAB.SRC
index 1175c25a..3a527952 100644
--- a/FAC/FAC_TAB.SRC
+++ b/FAC/FAC_TAB.SRC
@@ -1373,7 +1373,7 @@ CREATE_TABLE(fac_imp_ext_bedrijf, 0)
    prs_bedrijf_huurder NUMBER (1),
    prs_bedrijf_ingids NUMBER (1),
    prs_bedrijf_uurloon NUMBER (6, 2),
-   prs_overeenkomst_nr VARCHAR2 (20),
+   prs_overeenkomst_nr VARCHAR2 (30),
    prs_overeenkomst_datum DATE,
    prs_bedrijf_email VARCHAR2 (100),
    prs_bedrijf_opmerking VARCHAR2 (320),
@@ -1698,7 +1698,7 @@ CREATE_TABLE(fac_code2label, 0)
 
 CREATE_TABLE(fac_imp_factuur, 0) /* Standaard tabel voor de factuur-import */
 (
-   leveranciernr        VARCHAR2 (20),      -- prs_bedrijf.overeenkomstnr
+   leveranciernr        VARCHAR2 (30),      -- prs_bedrijf.overeenkomstnr
    ordernr              VARCHAR2 (31),      -- de code van de BROC (optionally even prefixed although unsupported with standard import)
    factuurnr            VARCHAR2 (30),
    factuurdatum         VARCHAR2 (10),
diff --git a/PRS/PRS_TAB.SRC b/PRS/PRS_TAB.SRC
index acea7011..5541f9de 100644
--- a/PRS/PRS_TAB.SRC
+++ b/PRS/PRS_TAB.SRC
@@ -68,7 +68,7 @@ CREATE_TABLE(prs_bedrijf,0)
     prs_leverancier_nr
         VARCHAR2(50),
     prs_overeenkomst_nr
-        VARCHAR2(20),
+        VARCHAR2(30),
     prs_overeenkomst_datum
         DATE,
     prs_bedrijf_email
diff --git a/_UP/DB47to48.src b/_UP/DB47to48.src
index 177ac9a2..054f5e3c 100644
--- a/_UP/DB47to48.src
+++ b/_UP/DB47to48.src
@@ -191,6 +191,9 @@ DROP SEQUENCE bes_s_bes_grootheid_key;
 DROP TRIGGER bes_t_bes_grootheid_B_IU;
 DROP TABLE bes_grootheid;
 
+/////////////////////////////////////////////////////////////////////////////////////////// AAIT#83560
+ALTER TABLE prs_bedrijf MODIFY prs_overeenkomst_nr VARCHAR2(30);
+
 /////////////////////////////////////////////////////////////////////////////////////////// FCLT#00000