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

FCLT#55409 Beter onderkennen als je een kenmerkdomein usrtab hebt zonder tabel te kiezen

Browse Source 
svn path=/Website/branches/v2018.2/; revision=39877
This commit is contained in:
Jos Groot Lipman
2018-11-20 09:17:19 +00:00
parent ef2dcda7a4
commit 2ed515ada4
1 changed files with 14 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
APPL/Shared/kenmerk_common.inc
View File

@@ -993,13 +993,14 @@ function listKenmerk(sql, module, key, props)
if (ktype == "R" || ((readonlyfield || maskeren) && ktype == "S")) // Referentie naar andere tabel (listboxje)
{
var wheres = [];
var dsql = "SELECT fac_kenmerkdomein_objectnaam"
+ ", fac_kenmerkdomein_kolomnaam"
+ ", fac_kenmerkdomein_kolomtxt"
+ ", fac_kenmerkdomein_xmlnode"
+ ", fac_kenmerkdomein_verval"
+ ", fac_usrtab_key"
+ " FROM fac_kenmerkdomein"
var dsql = "SELECT fac_kenmerkdomein_omschrijving"
+ " , fac_kenmerkdomein_objectnaam"
+ " , fac_kenmerkdomein_kolomnaam"
+ " , fac_kenmerkdomein_kolomtxt"
+ " , fac_kenmerkdomein_xmlnode"
+ " , fac_kenmerkdomein_verval"
+ " , fac_usrtab_key"
+ " FROM fac_kenmerkdomein"
+ " WHERE fac_kenmerkdomein_key = " + kdomein_key;
var oRs_d = Oracle.Execute(dsql);
var xmlnode = oRs_d("fac_kenmerkdomein_xmlnode").value;
@@ -1028,7 +1029,11 @@ function listKenmerk(sql, module, key, props)
flexkenmerkwaarde = String(vv);
}
if (oRs_d("fac_kenmerkdomein_objectnaam").Value == "FAC_USRDATA" && oRs_d("fac_usrtab_key").Value)
if (oRs_d("fac_kenmerkdomein_objectnaam").Value == "FAC_USRDATA" && !oRs_d("fac_usrtab_key").Value)
{
shared.internal_error("Missing usertable for '{0}' {1}".format(L("lcl_kenmerkdomein"), oRs_d("fac_kenmerkdomein_omschrijving").Value));
}
if (oRs_d("fac_kenmerkdomein_objectnaam").Value == "FAC_USRDATA")
{
// Deze kunnen we standaard localisen!
var fsql = "SELECT fac_usrdata_key"
@@ -1064,7 +1069,7 @@ function listKenmerk(sql, module, key, props)
: "NULL"
) + " x"
+ " FROM " + oRs_d("fac_kenmerkdomein_objectnaam").Value
+ " WHERE (" + vervalkolom + " IS NULL OR " + vervalkolom + " > SYSDATE)"
+ (vervalkolom?" WHERE (" + vervalkolom + " IS NULL OR " + vervalkolom + " > SYSDATE)":"")
+ (readonlyfield
? " AND " + oRs_d("fac_kenmerkdomein_kolomnaam").Value + " = " + safe.quoted_sql(flexkenmerkwaarde)
: "")