admin/Database
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

ASTE#37915 KRE timezone conversies

Browse Source 
svn path=/Database/trunk/; revision=33105
This commit is contained in:
Jos Groot Lipman
2017-03-09 16:22:18 +00:00
parent 779ad7de51
commit 9354705c92
4 changed files with 145 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
FAC/FAC_PACX.SRC
View File

@@ -336,13 +336,16 @@ AS
v_return VARCHAR2 (1000);
l_timezone VARCHAR2 (20);
v_utc TIMESTAMP;
user_ts TIMESTAMP;
BEGIN
IF p_date IS NOT NULL
THEN
createopentag (p_tag);
createxmltagvalue ('datum', TO_CHAR (p_date, 'dd-mm-yyyy'));
createxmltagvalue ('tijd', TO_CHAR (p_date, 'hh24:mi'));
-- veronderstel origineel CentralEuropeTime. Die heeft de goede zomer/wintertijd
user_ts := FROM_TZ (CAST (p_date AS TIMESTAMP), TO_CHAR (SYSTIMESTAMP, 'tzr')) AT TIME ZONE SESSIONTIMEZONE;
createxmltagvalue ('localdatum', TO_CHAR (user_ts, 'dd-mm-yyyy'));
createxmltagvalue ('localtijd', TO_CHAR (user_ts, 'hh24:mi'));
v_utc :=
SYS_EXTRACT_UTC (FROM_TZ (CAST (p_date AS TIMESTAMP), 'CET'));
createxmltagvalue ('utcdatum', TO_CHAR (v_utc, 'YYYYMMDD'));