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

MARX#55971: Meerdere contactpersonen en rollen voor Mareon leveranciers/aannemers

Browse Source 
svn path=/Website/branches/v2019.1/; revision=43785
This commit is contained in:
Marcel Bourseau
2019-08-14 11:36:23 +00:00
parent 13fd82e219
commit 963944735e
1 changed files with 20 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
CUST/MARX/custfunctions.wsc
View File

@@ -62,7 +62,26 @@ var safe;
prs_contact_postsave = function (cps_key, pResult)
{
__Log("In prs_contact_postsave met cps_key: " + cps_key);
return true;
var l_returncode = '0';
var sql = "BEGIN UpsertAccount(" + cps_key + "); END;";
//var sql = "SELECT marx.UpsertAccount(" + cps_key + ") As Returncode FROM dual";
Oracle.Execute(sql);
var sql = "SELECT COALESCE(MAX(prs_kenmerklink_waarde),'0') returncode FROM prs_kenmerklink WHERE prs_link_key = " + cps_key + " AND prs_kenmerk_key= 33 AND prs_kenmerklink_niveau= 'C' AND prs_kenmerklink_verwijder IS NULL";
oRs = Oracle.Execute(sql);
var l_returncode = oRs("returncode").Value;
oRs.Close();
if (l_returncode == '0'){
return true;
}
else {
var sql = "DELETE prs_kenmerklink WHERE prs_link_key = " + cps_key + " AND prs_kenmerk_key= 33 AND prs_kenmerklink_niveau= 'C' AND prs_kenmerklink_verwijder IS NULL"
oRs = Oracle.Execute(sql);
pResult.errmsg = l_returncode;
return false;
}
}
xxx_postdelete = function (p_table, p_key_arr, presult)