From e74d7af52445b751bdb181e596fb82e59d390dab Mon Sep 17 00:00:00 2001
From: Arthur Egberink <arthur.egberink@aareon.nl>
Date: Thu, 1 Dec 2016 15:23:14 +0000
Subject: [PATCH] PCHD#38105 -- Omzetten grootboekrekeningen.

svn path=/Customer/trunk/; revision=31777
---
 PCHX/pchx.sql | 31 ++++++++++++++++++++-----------
 1 file changed, 20 insertions(+), 11 deletions(-)

diff --git a/PCHX/pchx.sql b/PCHX/pchx.sql
index fa8344b5b..08f5f27ad 100644
--- a/PCHX/pchx.sql
+++ b/PCHX/pchx.sql
@@ -1,17 +1,22 @@
 -- Script containing customer generic configuration sql statements for all PCH accounts
--- (c) 2013 SG|facilitor
 -- $Revision$
 -- $Id$
 --
--- Support: +31 53 4800700
+
+DEFINE thisfile = 'PCHX.SQL'
+DEFINE dbuser   = '^PCHA|^PCHD|^PCHE|^PCHH|^PCHP|^PCHS|^PCHW|^PCHY'
+DEFINE custid   = 'PCHA|PCHD|PCHE|PCHH|PCHP|PCHS|PCHW|PCHY'
 
 SET ECHO ON
 SET DEFINE ON
-column fcltlogfile new_value fcltlogfile NOPRINT;
-select UPPER(USER) || '_PCHX' || '.lst' as fcltlogfile from dual;
-spool &fcltlogfile
+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 ------
 
 CREATE OR REPLACE PACKAGE PCHX
 AS
@@ -1227,7 +1232,7 @@ BEGIN
                                      fac_usrdata_parentkey,
                                      fac_usrdata_vervaldatum)
                 VALUES (rec.fac_usrtab_key,
-                        LPAD (rec.fac_usrdata_code, 5, '0'),
+                        LPAD (rec.fac_usrdata_code, 6, '0'),
                         rec.fac_usrdata_omschr,
                         rec.fac_usrdata_volgnr,
                         rec.fac_usrdata_prijs,
@@ -1236,7 +1241,7 @@ BEGIN
          ELSE
             UPDATE fac_usrdata
                SET fac_usrtab_key = rec.fac_usrtab_key,
-                   fac_usrdata_code = LPAD (rec.fac_usrdata_code, 5, '0'),
+                   fac_usrdata_code = LPAD (rec.fac_usrdata_code, 6, '0'),
                    fac_usrdata_omschr = rec.fac_usrdata_omschr,
                    fac_usrdata_volgnr = rec.fac_usrdata_volgnr,
                    fac_usrdata_prijs = rec.fac_usrdata_prijs,
@@ -2076,10 +2081,14 @@ AS
       AND choice.fac_gui_counter_refkey(+) = fgc.fac_gui_counter_key
       AND result.fac_gui_counter_refkey(+) = fgc.fac_gui_counter_key;
 
-BEGIN adm.systrackscriptId('$Id$', 0); END;
+------ payload end   ------
+
+SET DEFINE OFF
+BEGIN adm.systrackscriptId ('$Id$', 0); END;
 /
 
-
 COMMIT;
-
-SPOOL OFF
\ No newline at end of file
+SET ECHO OFF
+SPOOL OFF
+SET DEFINE ON
+PROMPT Logfile of this upgrade is: &fcltlogfile
\ No newline at end of file