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

MARX#39053 PRS_BEDRIJF: Notities of tracking?

Browse Source 
svn path=/Website/trunk/; revision=38061
This commit is contained in:
Erik Groener
2018-06-04 10:00:09 +00:00
parent 8444ca5147
commit b7c9790aae
1 changed files with 49 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

55
APPL/PRS/prs_edit_bedrijfadres_save.asp
View File

@@ -12,8 +12,9 @@ var JSON_Result = true;
%>
<!-- #include file="../Shared/common.inc" -->
<!-- #include file="../shared/save2db.inc" -->
<!-- #include file="../Shared/save2db.inc" -->
<!-- #include file="../Shared/json2.js" -->
<!-- #include file="../API2/api2.inc" -->
<%
var bedrijf_key = getQParamInt("bedrijf_key");
@@ -53,33 +54,75 @@ else
var protocol = getFParam("protocol");
var url = getFParam("prs_url");
var fields = [ { dbs: "prs_bedrijfadres_type", typ: "varchar", frm: "prs_type", track: L("lcl_prs_bedrijfadres_type") }
var fields = [ { dbs: "prs_bedrijfadres_type", typ: "varchar", frm: "prs_type" }
, { dbs: "mld_typeopdr_key", typ: "key", val: typeopdr, track: L("lcl_mld_typeopdr"), foreign: "mld_typeopdr" }
, { dbs: "alg_district_key", typ: "key", frm: "districtkey", track: L("lcl_district"), foreign: "alg_district" }
, { dbs: "alg_locatie_key", typ: "key", frm: "locatiekey", track: L("lcl_location"), foreign: "alg_locatie" }
, { dbs: "prs_bedrijfadres_url", typ: "varchar", val: protocol + url, track: L("lcl_prs_bedrijfadres_url") }
, { dbs: "prs_bedrijfadres_username", typ: "varchar", frm: "prs_username", track: L("lcl_prs_bedrijfadres_username") }
, { dbs: "prs_bedrijfadres_password", typ: "varchar", frm: "prs_password", track: L("lcl_prs_bedrijfadres_wachtwoord") }
, { dbs: "prs_bedrijfadres_authmethod", typ: "number", frm: "authmethod", track: L("lcl_prs_bedrijfadres_authmethod") }
, { dbs: "prs_bedrijfadres_authmethod", typ: "number", frm: "authmethod" }
, { dbs: "prs_bedrijfadres_ordermode", typ: "number", frm: "prs_ordermode", track: L("lcl_prs_companies_order_mode") }
, { dbs: "prs_bedrijfadres_soapversion", typ: "varchar", frm: "soapversion", track: L("lcl_prs_bedrijfadres_soapversion") }
, { dbs: "prs_bedrijfadres_soapaction", typ: "varchar", frm: "soapaction", track: L("lcl_prs_bedrijfadres_soapaction") }
, { dbs: "prs_bedrijfadres_certificate", typ: "varchar", frm: "prs_cert", track: L("lcl_prs_companies_order_certificate") }
, { dbs: "prs_bedrijfadres_xsl", typ: "varchar", frm: "prs_xsl", track: L("lcl_prs_companies_xsl") }
, { dbs: "prs_bedrijfadres_ext", typ: "varchar", frm: "prs_ext", track: L("lcl_prs_bedrijfadres_ext") }
, { dbs: "prs_bedrijfadres_lockuser_key", typ: "key", frm: "lockuser_key" }
, { dbs: "prs_bedrijfadres_lockuser_key", typ: "key", frm: "lockuser_key", track: L("lcl_prs_bedrijfadres_lockuser"), foreign: "prs_perslid" }
, { dbs: "prs_bedrijfadres_locksecret", typ: "varchar", frm: "locksecret", track: L("lcl_prs_bedrijfadres_locksecret") }
, { dbs: "prs_bedrijfadres_lockexpire" , typ: "number", frm: "lockexpire", track: L("lcl_prs_bedrijfadres_lockexpire") }
, { dbs: "prs_bedrijfadres_loglevel", typ: "number", frm: "loglevel", track: L("lcl_prs_bedrijfadres_loglevel") }
, { dbs: "prs_bedrijfadres_attachfile", typ: "varchar", frm: "bijlage", track: L("lcl_prs_bedrijfadres_bijlage") }
, { dbs: "prs_bedrijfadres_flexfiles" , typ: "number", frm: "flexfiles", track: L("lcl_puo_order_flexfiles") }
, { dbs: "prs_bedrijfadres_encoding", typ: "number", frm: "encoding", track: L("lcl_prs_bedrijfadres_encoding") }
, { dbs: "prs_bedrijfadres_flexfiles" , typ: "number", frm: "flexfiles" }
, { dbs: "prs_bedrijfadres_encoding", typ: "number", frm: "encoding" }
];
var isDeleted = false;
if (badr_key > 0)
{
var prsUpd = buildTrackingUpdate("prs_bedrijfadres", " prs_bedrijfadres_key = " + badr_key, fields);
// tracking van velden met listboxen zonder typ=key
// Eerst de oude waarden ophalen
var def = " (" + (S("puo_order_flexfiles")?L("lcl_Yes"):L("lcl_No")) + ")";
var sql_old = "WITH "
+ " kanaal (kan_chr, kan_txt)"
+ " AS ( SELECT 'B', " + safe.quoted_sql(L("lcl_prs_bedrijfadres_type_b"))+" FROM DUAL"
+ " UNION SELECT 'O', " + safe.quoted_sql(L("lcl_prs_bedrijfadres_type_o"))+" FROM DUAL"
+ " UNION SELECT 'C', " + safe.quoted_sql(L("lcl_prs_bedrijfadres_type_c"))+" FROM DUAL"
+ " UNION SELECT 'V', " + safe.quoted_sql(L("lcl_prs_bedrijfadres_type_v"))+" FROM DUAL"
+ " UNION SELECT 'N', " + safe.quoted_sql(L("lcl_prs_bedrijfadres_type_n"))+" FROM DUAL"
+ ")"
+ " , authmethod (aut_key, aut_txt, aut_nr)"
+ " AS ( " + api2.splitLOV2sql(L("lcl_prs_bedrijfadres_authmethodLOV"))
+ ")"
+ " , flexfiles (flx_key, flx_txt)"
+ " AS ( SELECT 0, " + safe.quoted_sql(L("lcl_default") + def) + " FROM DUAL"
+ " UNION SELECT 1, " + safe.quoted_sql(L("lcl_Yes")) + " FROM DUAL"
+ " UNION SELECT 2, " + safe.quoted_sql(L("lcl_No")) + " FROM DUAL"
+ ")"
+ " , encoding (enc_key, enc_txt)"
+ " AS ( SELECT 0, " + safe.quoted_sql(L("lcl_encoding_text_xml")) + " FROM DUAL"
+ " UNION SELECT 1, " + safe.quoted_sql(L("lcl_encoding_multipart_form")) + " FROM DUAL"
+ " UNION SELECT 2, " + safe.quoted_sql(L("lcl_encoding_application_json")) + " FROM DUAL"
+ ")"
+ "SELECT (select kan_txt from kanaal where kan_chr = prs_bedrijfadres_type) old_kan"
+ " , (select kan_txt from kanaal where kan_chr = " + safe.quoted_sql(getFParam("prs_type", "B")) + ") new_kan"
+ " , (select aut_txt from authmethod where aut_key = prs_bedrijfadres_authmethod) old_aut"
+ " , (select aut_txt from authmethod where aut_key = " + getFParamInt("authmethod", 0) + ") new_aut"
+ " , (select flx_txt from flexfiles where flx_key = prs_bedrijfadres_flexfiles) old_flx"
+ " , (select flx_txt from flexfiles where flx_key = " + getFParamInt("flexfiles", 0) + ") new_flx"
+ " , (select enc_txt from encoding where enc_key = prs_bedrijfadres_encoding) old_enc"
+ " , (select enc_txt from encoding where enc_key = " + getFParamInt("encoding", 0) + ") new_enc"
+ " FROM prs_bedrijfadres"
+ " WHERE prs_bedrijfadres_key = " + badr_key;
var oRs_old = Oracle.Execute(sql_old);
prsUpd.trackarray.push(L("lcl_prs_bedrijfadres_type") + ": " + buildTrackText("varchar", oRs_old("old_kan").Value, oRs_old("new_kan").Value, { nodiff: true }));
prsUpd.trackarray.push(L("lcl_prs_bedrijfadres_authmethod") + ": " + buildTrackText("varchar", oRs_old("old_aut").Value, oRs_old("new_aut").Value, { nodiff: true }));
prsUpd.trackarray.push(L("lcl_puo_order_flexfiles") + ": " + buildTrackText("varchar", oRs_old("old_flx").Value, oRs_old("new_flx").Value, { nodiff: true }));
prsUpd.trackarray.push(L("lcl_prs_bedrijfadres_encoding") + ": " + buildTrackText("varchar", oRs_old("old_enc").Value, oRs_old("new_enc").Value, { nodiff: true }));
oRs_old.Close();
var err = Oracle.Execute(prsUpd.sql, true);
if (err.friendlyMsg)
warning = err.friendlyMsg;