UBRH#66675 -- flags zetten voor API-user putorder en Hmail - Doen we via mgt/mgt_generic.asp

svn path=/Customer/; revision=50943
This commit is contained in:
Jos Migo
2021-04-19 18:03:17 +00:00
parent eb4eb96d91
commit 5f2180b741

View File

@@ -1,41 +0,0 @@
--
-- $Id$
--
-- Flags 36 zetten voor api-key-gebruikers HMAIL en PUTORDER
DEFINE thisfile = 'UBRH#66675.SQL'
DEFINE dbuser = '^UBRH'
SET ECHO ON
SET DEFINE ON
COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
COLUMN fcltcusterr NEW_VALUE fcltcusterr NOPRINT;
WHENEVER SQLERROR CONTINUE;
SELECT adm.getscriptspoolfile('&thisfile') AS fcltlogfile FROM DUAL;
SPOOL &fcltlogfile
WHENEVER SQLERROR EXIT;
SELECT adm.checkscriptcust('&dbuser') AS fcltcusterr FROM DUAL;
WHENEVER SQLERROR CONTINUE;
PROMPT &fcltcusterr
SET DEFINE OFF
------ payload begin ------
-- API-user tbv. Putorders-koppeling (84861)
-- API-user tbv. hMail-koppeling (55961)
UPDATE prs_perslid
SET prs_perslid_flags = 36
WHERE
prs_perslid_key in (55961,84861) ;
------ 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