MARX#55775 Import van fin_factuurregel_referentie (C30) niet meer op 10 tekens afkappen

svn path=/Database/branches/DB35/; revision=40291

FAC/FAC_PACF.SRC

@@ -14189,7 +14189,7 @@ BEGIN
                                 v_kostprijs,
                                 SUBSTR (v_btw, 1, 2),
                                 SUBSTR (v_debiteurnr, 1, 30),
-                                SUBSTR (v_locatie, 1, 10),
+                                SUBSTR (v_locatie, 1, 30),
                                 SUBSTR (v_afleverdatum, 1, 10),
                                 v_btw_bedrag,
                                 SUBSTR (v_docid, 1, 255),
@@ -14218,9 +14218,9 @@ BEGIN
                                 SUBSTR (v_kenmerk20, 1, 255),
                                 SUBSTR (v_boekmaand, 1, 7),
                                 SUBSTR (v_artikelcode, 1, 30),
-                                SUBSTR (v_factuurregelaantal, 1, 11),
+                                v_factuurregelaantal,
                                 SUBSTR (v_eenheid, 1, 30),
-                                SUBSTR (v_opdrachtregelid, 1, 10)
+                                v_opdrachtregelid
                             );
                  v_count := v_count + 1;
               END IF;

FAC/FAC_TAB.SRC

@@ -1452,7 +1452,7 @@ CREATE_TABLE(fac_imp_factuur, 0) /* Standaard tabel voor de factuur-import */
    kostprijs            VARCHAR2 (15),      -- stuksprijs (info)
    btw                  VARCHAR2 (2),       -- code: zie fin_btw_tabelwaarde_code
    debiteurnr           VARCHAR2 (30),
-   locatie              VARCHAR2 (10),      -- referentie
+   locatie              VARCHAR2 (30),      -- referentie
    afleverdatum         VARCHAR2 (10),       -- info
    btw_bedrag           VARCHAR2 (15),      -- regeltotaal btw
    docid                VARCHAR2 (255),     -- bestandsnaam

_UP/db35to35a.sql

@@ -0,0 +1,37 @@
+--
+-- $Id$
+--
+-- Aanpassingen voor DB35a
+
+DEFINE thisfile = 'DB35to35a.sql'
+DEFINE dbuser   = '*'
+
+SET ECHO ON
+SET DEFINE ON
+COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
+WHENEVER SQLERROR EXIT;
+SELECT adm.scriptspoolfile('&dbuser', '&thisfile') AS fcltlogfile FROM DUAL;
+WHENEVER SQLERROR CONTINUE;
+SPOOL &fcltlogfile
+SET DEFINE OFF
+
+------ payload begin ------
+
+--/////////////////////////////////////////////////////////////////////////////////////////// FCLT#55775
+
+ALTER TABLE fac_imp_factuur
+    MODIFY locatie VARCHAR2(30);
+
+--/////////////////////////////////////////////////////////////////////////////////////////// XXXX#12345
+
+------ payload end   ------
+
+SET DEFINE OFF
+BEGIN adm.systrackscriptId ('$Id$', 1); END;
+/
+
+COMMIT;
+SET ECHO OFF
+SPOOL OFF
+SET DEFINE ON
+PROMPT Logfile of this upgrade is: &fcltlogfile