From f3480468395736aa1702fb9f2423da2876c49321 Mon Sep 17 00:00:00 2001 From: Arthur Egberink Date: Wed, 24 Aug 2022 06:29:58 +0000 Subject: [PATCH] KFHT#71729 -- Melding inlezen vanuit Planon svn path=/Customer/trunk/; revision=56983 --- KFHT/kfht.sql | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/KFHT/kfht.sql b/KFHT/kfht.sql index e229dffab..cd18777ca 100644 --- a/KFHT/kfht.sql +++ b/KFHT/kfht.sql @@ -8,12 +8,19 @@ DEFINE dbuser = '^KFHT' SET ECHO ON SET DEFINE ON COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT; -WHENEVER SQLERROR EXIT; -SELECT adm.scriptspoolfile('&dbuser', '&thisfile') AS fcltlogfile FROM DUAL; +COLUMN fcltcusttxt NEW_VALUE fcltcusttxt NOPRINT; WHENEVER SQLERROR CONTINUE; +SELECT adm.getscriptspoolfile('&thisfile') AS fcltlogfile FROM DUAL; SPOOL &fcltlogfile +WHENEVER SQLERROR EXIT; +SELECT adm.checkscriptcust('&dbuser') AS fcltcusttxt FROM DUAL; +WHENEVER SQLERROR CONTINUE; +--------------------------------------- +PROMPT &fcltcusttxt +--------------------------------------- SET DEFINE OFF + ------ payload begin ------ CREATE OR REPLACE PACKAGE KFHT