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

BAMG#81378 Kostenplaats koppelen aan persoon

Browse Source 
svn path=/Website/trunk/; revision=63201
This commit is contained in:
Erik Groener
2024-01-17 10:53:20 +00:00
parent 8f57282b02
commit 6dba33efb6
23 changed files with 91 additions and 38 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
APPL/API/api_mldsoap.asp
View File

@@ -412,7 +412,7 @@ for (i = 0; i < meldingen.length; i++)
// Met "WEB_MLDUSE" autorisatie check maak ik deze melding aan. Dan kijk ik hier ook naar de FE setting "FE Defaultwaarde kosten klant aan".
var ins_srtdiscipline_kk = (ins_srtdisc_kk & 1) == 1;
var kpn_key = user.afdeling().prs_kostenplaats_key() || -1;
var kpn_key = user.prs_kostenplaats_key() || -1;
if (meld_kpn && meld_kpn != "")
{
var tempKpn = getKpn(meld_kpn);
@@ -727,4 +727,4 @@ else
Response.Write(xmlResp.xml)
}
%>
<% ASPPAGE_END(); %>
<% ASPPAGE_END(); %>

4
APPL/API/api_ressoap.asp
View File

@@ -184,7 +184,7 @@
if (resultcode == -1) { // nog steeds geen fouten
// Combinatievalidatie ruimte discipline!
if (!kpl_ksrt_validate(user.afdeling().prs_kostenplaats_key(), null, disc_key)) {
if (!kpl_ksrt_validate(user.prs_kostenplaats_key(), null, disc_key)) {
resultcode = 6;
resulttekst = "Illegal reservering (cost)";
}
@@ -207,7 +207,7 @@
fields.push({ dbs: "res_rsv_ruimte_van", typ: "datetime", val: vandate });
fields.push({ dbs: "res_rsv_ruimte_tot", typ: "datetime", val: totdate });
fields.push({ dbs: "res_rsv_ruimte_bezoekers", typ: "number", val: 1 }); // altijd 1
fields.push({ dbs: "prs_kostenplaats_key", typ: "key", val: user.afdeling().prs_kostenplaats_key() });
fields.push({ dbs: "prs_kostenplaats_key", typ: "key", val: user.prs_kostenplaats_key() });
fields.push({ dbs: "res_rsv_ruimte_host_key", typ: "key", val: user_key });
fields.push({ dbs: "res_rsv_ruimte_contact_key", typ: "key", val: user_key });
fields.push({ dbs: "res_rsv_ruimte_omschrijving", typ: "varchar", val: res_oms, len: 4000 });

2
APPL/API2/model_issues.inc
View File

@@ -749,7 +749,7 @@ function model_issues(mld_key, params)
var kpkey = (jsondata.account ? jsondata.account : -1);
if (stdm_info.kpnverplicht && kpkey < 0)
{ // Kostenplaats is verplicht, maar is niet meegegeven. Bepaal default kostenplaats.
kpkey = (user.afdeling().prs_kostenplaats_key() || -1); // User kostenplaats key
kpkey = (user.prs_kostenplaats_key() || -1); // User default kostenplaats key
}
if (stdm_info.kpnverplicht && kpkey < 0)
{ // Kon ook geen default kostenplaats vinden.

6
APPL/API2/model_prs_perslid.inc
View File

@@ -196,6 +196,12 @@ function model_prs_perslid(params)
"typ": "key",
"foreign": "prs_afdeling"
},
"costcentre": {
"dbs": "prs_kostenplaats_key",
"label": L("prs_kostenplaats"),
"typ": "key",
"foreign": "prs_kostenplaats"
},
"externalid": {
"dbs": "prs_perslid_externid",
"label": L("prs_perslid_externid"),

8
APPL/BES/bes_edit_bestelling.asp
View File

@@ -174,14 +174,14 @@ else // nieuwe bestelling. Defaults bepalen
+ " WHERE pk.prs_kostenplaats_key = k.prs_kostenplaats_key(+)"
+ " AND pk.prs_perslidkostenplaats_boeken = 1"
+ " AND pk.prs_perslid_key = " + user_key
+ " AND (k.prs_kostenplaats_key = " + (user.afdeling().prs_kostenplaats_key() || -1)
+ " AND (k.prs_kostenplaats_key = " + (user.prs_kostenplaats_key() || -1)
+ " OR pk.prs_kostenplaats_key IS NULL)";
oRs = Oracle.Execute(sql);
authForOwnAcoount = (!oRs.eof);
oRs.Close();
}
if (user.afdeling().prs_kostenplaats_key() && authForOwnAcoount) // Dus voor S(prs_dep_default_kpn) is 1 of 2.
bes_bestelling.kostenplaats_key = user.afdeling().prs_kostenplaats_key();
if (user.prs_kostenplaats_key() && authForOwnAcoount) // Dus voor S(prs_dep_default_kpn) is 1,2,4 of 5.
bes_bestelling.kostenplaats_key = user.prs_kostenplaats_key();
else
bes_bestelling.kostenplaats_key = -1;
}
@@ -305,7 +305,7 @@ oRs.Close();
var details_Items = new Array(); // voor details.inc
dis_key = <%=bes_bestelling.dis_key%>;
var hasAnyStaffels = <%=(hasAnyStaffels ? 1 : 0)%>
var user_kpkey = <%=user.afdeling().prs_kostenplaats_key() || -1%>;
var user_kpkey = <%=user.prs_kostenplaats_key() || -1%>;
var user_kpnaam = "<%=safe.jsstring(user.afdeling().kpn_naam())%>";
var inclBTW = <%=bes_bestelling.inclBTW%> == 1;
var maxartikel = <%=bes_disc_info.maxartikel%>;

2
APPL/MLD/mld.inc
View File

@@ -5963,7 +5963,7 @@ mld = {
if (stdm_info.kpnverplicht || params.kostenplaats_key)
{
var kostenplaats_key = params.kostenplaats_key || user.afdeling().prs_kostenplaats_key() || -1;
var kostenplaats_key = params.kostenplaats_key || user.prs_kostenplaats_key() || -1;
if (!user.checkAutorisation("WEB_MLDFOF", true))
// Ik maak zelf als FE met WEB_MLDUSE of ORDUSE rechten een nieuwe melding aan.
var ins_srtdiscipline_kk = (stdm_info.ins_srtdiscipline_kostenklant & 1) == 1;

8
APPL/MLD/mld_edit_melding.asp
View File

@@ -519,9 +519,11 @@ else
if (melder_obj)
{
if (multi)
mld_melding.kostenpl_key = user.afdeling().prs_kostenplaats_key();
mld_melding.kostenpl_key = user.prs_kostenplaats_key();
else if (/* TODO: overwegen kpnverplicht && */ mandaat_eigen_kp != 0 && mld_melding.mld_kk == 1)
mld_melding.kostenpl_key = melder_obj.afdeling().prs_kostenplaats_key() || -1;
{ // default kostenplaats
mld_melding.kostenpl_key = melder_obj.prs_kostenplaats_key() || -1;
}
if (mld_melding.show_bes)
{
var prs_info = new prs.prs_perslid(mld_melding.melder_key, { withAflever: true });
@@ -588,7 +590,7 @@ lcl.set_dialect(mld_melding.srtdisc_key, "MLD_SRTDISCIPLINE_KEY");
var alg_onrgoed_niveau = "<%=mld_melding.alg_onrgoed_niveau%>";
var perslidkey = <%=perslidkey%>;
var def_kenmerk_link_key = <%=def_kenmerk_link_key%>;
var user_kpkey = <%=user.afdeling().prs_kostenplaats_key() || -1%>;
var user_kpkey = <%=user.prs_kostenplaats_key() || -1%>;
var user_kpnaam = "<%=safe.jsstring(user.afdeling().kpn_naam())%>";
var user_kpmodule = "<%=user.afdeling().kpn_module()%>";
var user_afd_key = <%=user.prs_afdeling_key()%>;

2
APPL/MLD/mld_edit_melding_save.asp
View File

@@ -327,7 +327,7 @@ if (savemode)
var kpkey = getFParamInt("account", -1);
if (stdm_info.kpnverplicht && kpkey < 0)
{ // Kostenplaats is verplicht, maar is niet meegegeven. Bepaal default kostenplaats.
kpkey = (user.afdeling().prs_kostenplaats_key() || -1); // User kostenplaats key
kpkey = (user.prs_kostenplaats_key() || -1); // User kostenplaats key
if (kpkey < 0)
// We kunnen geen default kostenplaats bepalen. We kunnen de melding niet aanmaken.
// Alert geven en terug.

2
APPL/MLD/mld_edit_meldracht.asp
View File

@@ -174,7 +174,7 @@ var mld_ordernr = "";
FCLTkostenplaatsselector("account",
"sgAccount",
user_key,
{ kostenplaatsKey: user.afdeling().prs_kostenplaats_key()||-1,
{ kostenplaatsKey: user.prs_kostenplaats_key()||-1,
label: (urole == "fe")?L("lcl_mld_inf_Kostenplaats"):L("lcl_mld_inf_Kostenklant"),
extraParamField: "module",
filtercode: "AA", // Altijd nieuw dus alleen actieve

10
APPL/MLD/mld_edit_opdr.asp
View File

@@ -312,7 +312,7 @@ if (mld_opdr.kp_key == -1)
+ " WHERE pk.prs_kostenplaats_key = k.prs_kostenplaats_key"
+ " AND pk.prs_perslidkostenplaats_boeken = 1"
+ " AND pk.prs_perslid_key = " + user_key
+ ((S("prs_dep_default_kpn") == 1)
+ ( ((S("prs_dep_default_kpn") & 1) == 1)
? " UNION"
+ " SELECT k.prs_kostenplaats_key "
+ " FROM prs_perslid p"
@@ -329,6 +329,14 @@ if (mld_opdr.kp_key == -1)
+ " , prs_v_aanwezigkostenplaats k"
+ " WHERE a.prs_bedrijf_key = " + user.afdeling().prs_bedrijf_key()
+ " AND a.prs_kostenplaats_key = k.prs_kostenplaats_key"
: "")
+ ( ((S("prs_dep_default_kpn") & 4) == 4)
? " UNION"
+ " SELECT k.prs_kostenplaats_key"
+ " FROM prs_perslid p"
+ " , prs_v_aanwezigkostenplaats k"
+ " WHERE p.prs_kostenplaats_key = k.prs_kostenplaats_key"
+ " AND p.prs_perslid_key = " + user_key
: "");
oRs = Oracle.Execute(sql);
if (!oRs.eof)

2
APPL/PDA/melding.asp
View File

@@ -492,7 +492,7 @@ else
mld_info.mld_kk = (stdm_info.ins_srtdiscipline_kostenklant & 4) == 4? 1 : 0;
var mandaat_eigen_kp = S("prs_dep_default_kpn") || stdm_info.show_eigen_kp == 1; // voor alle vakgroepen gemandateerd op eigen kp
if (mandaat_eigen_kp != 0 && mld_info.mld_kk == 1)
mld_info.kostenpl_key = melder_obj.afdeling().prs_kostenplaats_key() || -1;
mld_info.kostenpl_key = melder_obj.prs_kostenplaats_key() || -1;
plaats_niveau = getQParamSafe("alg_type", "");

4
APPL/PDA/reservering.asp
View File

@@ -249,7 +249,7 @@ else
{
if (S("prs_dep_default_kpn") >= 1)
{
rsv.account = user.afdeling().prs_kostenplaats_key();
rsv.account = user.prs_kostenplaats_key();
}
}
@@ -294,7 +294,7 @@ else
if (rsv.kostenklant)
{
if (S("prs_dep_default_kpn") >= 1)
rsv.account = user.afdeling().prs_kostenplaats_key();
rsv.account = user.prs_kostenplaats_key();
if (rsv.account == -1)
{
var host_info = prs.prs_perslid(user_key, {withWP: true});

4
APPL/PRS/kpn_overview_list.asp
View File

@@ -152,7 +152,7 @@ var ora_date2 = dateto.endToSQL();
oRs = Oracle.Execute (sql_kpn);
kpn_keys = ""; // List of my kpn keys
if (S("prs_dep_default_kpn"))
kpn_keys = user.afdeling().prs_kostenplaats_key()||-1; // Die mag je dan in ieder geval
kpn_keys = user.prs_kostenplaats_key()||-1; // Die mag je dan in ieder geval
while (!oRs.eof)
{
@@ -604,4 +604,4 @@ var ora_date2 = dateto.endToSQL();
%>
</body>
</html>
<% ASPPAGE_END(); %>
<% ASPPAGE_END(); %>

2
APPL/PRS/kpn_show_mandate.asp
View File

@@ -67,7 +67,7 @@ else
var canWrite = (authparams.PRSwritelevel < 9) && kpn_kpnkey;
}
if (filtercode == "A" && !canWrite && kpn_kpnkey == user.afdeling().prs_kostenplaats_key())
if (filtercode == "A" && !canWrite && kpn_kpnkey == user.prs_kostenplaats_key())
{ // Geen FINMSU schrijfrechten? Misschien FACMAN voor ondermandateren
// WEB_FACMAN mag alleen ondermantering aanpassen voor specifieke kostenplaatsen (prs_kostenplaats_key > 0).
// Daarnaast mag je bij alleen WEB_FACMAN schrijfrechten, alleen de mandatering van je eigen kostenplaatsen aanpassen/verwijderen.

2
APPL/PRS/prs.inc
View File

@@ -29,7 +29,7 @@ prs =
prs_perslid_telefoonnr : prs.prs_perslid_telefoonnr(),
fac_profiel_key : prs.fac_profiel_key(),
prs_perslid_email : prs.prs_perslid_email(),
kostenplaats_key : prs.afdeling().prs_kostenplaats_key()||-1,
kostenplaats_key : prs.prs_kostenplaats_key()||-1,
kpn_string : prs.kpn_string(),
kpn_module : prs.afdeling().kpn_module(),
prs_perslid_mobiel : prs.prs_perslid_mobiel(),

11
APPL/PRS/prs_edit_perslid.asp
View File

@@ -19,6 +19,7 @@
<!-- #include file="../Shared/persoonselector.inc" -->
<!-- #include file="../Shared/selector.inc" -->
<!-- #include file="../Shared/afdelingselector.inc" -->
<!-- #include file="../Shared/kostenplaatsselector.inc" -->
<!-- #include file="../Shared/functieselector.inc" -->
<!-- #include file="../Shared/adresselector.inc" -->
<!-- #include file="../Shared/calendar.inc"-->
@@ -49,6 +50,7 @@ if (prs_key > -1)
sql = "SELECT p.prs_perslid_key, "
+ " prs_srtperslid_key, "
+ " p.prs_afdeling_key, "
+ " p.prs_kostenplaats_key, "
+ " prs_perslid_naam, "
+ " prs_perslid_geslacht, "
+ " prs_perslid_voorletters, "
@@ -92,6 +94,7 @@ if (prs_key > -1)
if (!oRs.eof) {
var prs_srtkey = oRs("prs_srtperslid_key").value;
var prs_afdkey = oRs("prs_afdeling_key").value;
var prs_kplkey = oRs("prs_kostenplaats_key").Value;
var prs_naam = oRs("prs_perslid_naam").value;
var prs_vltr = oRs("prs_perslid_voorletters").value;
var prs_vrnaam = oRs("prs_perslid_voornaam").value;
@@ -365,6 +368,14 @@ BLOCK_START("prsPerslid2", L("lcl_prs_organisatieblok"), {icon: "fa-address-card
filtercode: "B" // profiel is vooralsnog een redelijke eis, niet?
});
FCLTkostenplaatsselector("prs_kplkey",
"prs_kplkey",
user_key,
{ label: L("prs_kostenplaats"),
kostenplaatsKey: prs_kplkey,
filtercode: "A" // Laat alle kosenplaatsen zien, negeer mandatering.
});
manRWFIELD("prs_opp", "fldshort", L("lcl_prs_person_opp"), prs_opp, {maxlength: 10, datatype: "float", suppressEmpty: true});
manRWFIELD("prs_dnst", "fldshort", L("lcl_prs_person_dienstverband"), prs_dnst, {maxlength: 5, datatype: "float", suppressEmpty: true});

1
APPL/PRS/prs_edit_perslid_save.asp
View File

@@ -52,6 +52,7 @@ if (!isNew)
var fields = [ { dbs: "prs_srtperslid_key", typ: "key", frm: "prs_srtkey", track: L("lcl_prs_person_function"), foreign: "prs_srtperslid" },
{ dbs: "prs_perslid_key_verantw", typ: "key", frm: "prs_verantwkey", track: L("lcl_prs_person_verantw"), foreign: "prs_perslid" },
{ dbs: "prs_afdeling_key", typ: "key", frm: "prs_afdkey", track: L("lcl_prs_organisatie"), foreign: "prs_afdeling" },
{ dbs: "prs_kostenplaats_key", typ: "key", frm: "prs_kplkey", track: L("prs_kostenplaats"), foreign: "prs_kostenplaats" },
{ dbs: "prs_perslid_geslacht", typ: "number", frm: "prs_geslacht", track: L("lcl_prs_person_geslacht") },
{ dbs: "mld_adres_key", typ: "key", frm: "mld_adrkey", track: L("lcl_delivery_address"), foreign: "mld_adres" },
{ dbs: "prs_perslid_telefoonnr", typ: "varchar", frm: "prs_telnr", track: L("lcl_prs_person_phone") },

7
APPL/PRS/prs_perslid_list.inc
View File

@@ -205,7 +205,10 @@ function perslid_list(pautfunction, params)
+ " , p.prs_perslid_email"
+ " , p.prs_perslid_titel"
+ " , fp.fac_profiel_omschrijving"
+ " , kp.prs_kostenplaats_nr"
+ " , (SELECT kp.prs_kostenplaats_nr"
+ " FROM prs_kostenplaats kp"
+ " WHERE kp.prs_kostenplaats_key = COALESCE(p.prs_kostenplaats_key, d.prs_kostenplaats_key)"
+ " ) prs_kostenplaats_nr"
+ " , (SELECT prs_perslid_naam_friendly FROM prs_v_perslid_fullnames_all pf WHERE pf.prs_perslid_key = d.prs_perslid_key_verantw) prs_perslid_verantw"
+ (anyflex
? ", (SELECT LISTAGG("
@@ -247,9 +250,7 @@ function perslid_list(pautfunction, params)
+ " , prs_v_werkplek_gegevens wp"
+ " , alg_locatie l"
+ " , fac_profiel fp"
+ " , prs_kostenplaats kp"
+ " WHERE p.prs_afdeling_key = bm.prs_afdeling_key"
+ " AND d.prs_kostenplaats_key = kp.prs_kostenplaats_key(+)"
+ " AND d.prs_afdeling_key = p.prs_afdeling_key"
+ " AND srt_p.prs_srtperslid_key = p.prs_srtperslid_key"
+ " AND pf.prs_perslid_key = p.prs_perslid_key"

13
APPL/PRS/prs_show_perslid.asp
View File

@@ -59,8 +59,10 @@ var sql = "SELECT p.prs_perslid_key, "
+ " p.prs_perslid_timezone, "
+ " p.prs_perslid_lcid, "
+ " p.prs_perslid_mobiel, "
+ " k.prs_kostenplaats_nr, "
+ S("prs_kpn_string") + " kpl, "
+ " (SELECT " + S("prs_kpn_string")
+ " FROM prs_kostenplaats k"
+ " WHERE prs_kostenplaats_key = COALESCE(p.prs_kostenplaats_key, d.prs_kostenplaats_key)"
+ " ) kpl,"
+ S("prs_dep_string") + " afdeling, "
+ " p.prs_perslid_key_verantw, "
+ " f.fac_profiel_limiet, "
@@ -82,14 +84,12 @@ var sql = "SELECT p.prs_perslid_key, "
+ " prs_v_afdeling d, "
+ " prs_srtperslid sp, "
+ " fac_profiel f, "
+ " mld_adres a, "
+ " prs_kostenplaats k "
+ " mld_adres a "
+ " WHERE p.prs_perslid_key = " + prs_key
+ " AND p.prs_afdeling_key = d.prs_afdeling_key "
+ " AND p.prs_srtperslid_key = sp.prs_srtperslid_key "
+ " AND p.fac_profiel_key = f.fac_profiel_key(+)"
+ " AND p.mld_adres_key = a.mld_adres_key(+)"
+ " AND k.prs_kostenplaats_key(+) = d.prs_kostenplaats_key ";
+ " AND p.mld_adres_key = a.mld_adres_key(+)";
var oRs = Oracle.Execute(sql);
var prs_srtkey = oRs("prs_srtperslid_key").value;
@@ -119,7 +119,6 @@ var prs_tussen = oRs("prs_perslid_tussenvoegsel").value;
var prs_email = oRs("prs_perslid_email").value;
var prs_tz = oRs("prs_perslid_timezone").value;
var prs_lcid = oRs("prs_perslid_lcid").value;
var kpl_nr = oRs("prs_kostenplaats_nr").value;
var kpl = oRs("kpl").value;
var kpl_key = oRs("kpl_key").value;
var afdeling = oRs("afdeling").value;

5
APPL/RES/objects_list_tiny.asp
View File

@@ -74,7 +74,10 @@ FCLTHeader.Requires();
+ " AND rrd.res_rsv_ruimte_key = " + rsv_ruimte_key
+ " UNION ALL "
+ "SELECT 'C' AS res_type"
+ " , LTRIM (" + lcl.xsql("ra.res_artikel_omschrijving", "ra.res_artikel_key") + ")"
+ " , LTRIM ( CASE WHEN ra.res_artikel_vrije_omschrijving = 1"
+ " THEN rra.res_rsv_artikel_omschrijving"
+ " ELSE " + lcl.xsql("ra.res_artikel_omschrijving", "ra.res_artikel_key")
+ " END)"
+ " || CASE"
+ " WHEN " + lcl.xsql("ra.res_artikel_eenheid", "ra.res_artikel_key") + " IS NULL"
+ " THEN ''"

2
APPL/RES/res_edit_rsv_ruimte.asp
View File

@@ -164,7 +164,7 @@ FCLTHeader.Requires({ plugins: ["jQuery", "kenmerk"] });
// Setting "prs_default_kpn_empty": Costcentre always default empty.
var kp_key = -1;
if (S("prs_default_kpn_empty") == 0) { // Default *niet* leeg laten;
kp_key = (S("prs_dep_default_kpn") != 0 ? user.afdeling().prs_kostenplaats_key() || -1 : -1);
kp_key = (S("prs_dep_default_kpn") != 0 ? user.prs_kostenplaats_key() || -1 : -1);
}
var rrr = {

16
APPL/Shared/Suggest/kostenplaatsFilter.inc
View File

@@ -73,7 +73,7 @@ function getFiltClauseKostenplaats(pfiltcode, params)
+ " AND pk.prs_perslid_key = " + params.prs_key
+ AAfilter
// van eigen afdeling erbij (S("prs_dep_default_kpn") is setting en showeigenkp is waarde van database setting mld_disc_params_default_kpn)
+ (S("prs_dep_default_kpn") == 1 || params.showeigenkp == 1
+ ( (S("prs_dep_default_kpn") & 1) == 1 || params.showeigenkp == 1
? " UNION"
+ " SELECT k.prs_kostenplaats_key kpkey"
+ ", " + S("prs_kpn_string") + " kpstring"
@@ -104,6 +104,20 @@ function getFiltClauseKostenplaats(pfiltcode, params)
+ " AND a.prs_kostenplaats_key = k.prs_kostenplaats_key"
+ " AND a.prs_bedrijf_key = " + new Perslid(params.prs_key).afdeling().prs_bedrijf_key()
+ AAfilter
: "")
+ ( (S("prs_dep_default_kpn") & 4) == 4 && params.prs_key > 0 // je persoonlijke kostenplaats
? " UNION"
+ " SELECT k.prs_kostenplaats_key kpkey"
+ ", " + S("prs_kpn_string") + " kpstring"
+ ", (SELECT kg.prs_kostenplaatsgrp_oms FROM prs_kostenplaatsgrp kg WHERE kg.prs_kostenplaatsgrp_key = k.prs_kostenplaatsgrp_key) descr"
+ ", UPPER(" + S("prs_kpn_string") + ") upperkpstring"
+ params.extraInf
+ " FROM prs_perslid p"
+ ", prs_v_aanwezigkostenplaats k"
+ " WHERE UPPER(" + S("prs_kpn_string") + ") LIKE " + safe.quoted_sql_wild2((params.chars? params.chars : ""))
+ " AND p.prs_kostenplaats_key = k.prs_kosenplaats_key"
+ " AND p.prs_perslid_key = " + params.prs_key
+ AAfilter
: "");
}
break;

12
APPL/Shared/User.inc
View File

@@ -42,6 +42,7 @@ Perslid.prototype._require_prs_perslid = function __require_prs_perslid()
var sql = "SELECT p.prs_perslid_key"
+ " , p.prs_perslid_geslacht"
+ " , p.prs_afdeling_key"
+ " , p.prs_kostenplaats_key"
+ " , p.fac_profiel_key"
+ " , p.prs_perslid_telefoonnr"
+ " , p.prs_perslid_mobiel"
@@ -79,6 +80,7 @@ Perslid.prototype._require_prs_perslid = function __require_prs_perslid()
var oRs = Oracle.Execute(sql);
this._prs_afdeling_key = oRs("prs_afdeling_key").value;
this._prs_kostenplaats_key = oRs("prs_kostenplaats_key").Value;
//this._naam = oRs("naam").value; wordt on-demand afzonderlijk opgehaald
this._prs_perslid_geslacht = oRs("prs_perslid_geslacht").value;
this._prs_perslid_telefoonnr = oRs("prs_perslid_telefoonnr").value;
@@ -340,6 +342,12 @@ Perslid.prototype.prs_afdeling_key = function()
return this._prs_afdeling_key;
}
Perslid.prototype.prs_kostenplaats_key = function()
{
this._require_prs_perslid();
return this._prs_kostenplaats_key || this.afdeling().prs_kostenplaats_key();
}
Perslid.prototype.prs_srtperslid_key = function()
{
this._require_prs_perslid();
@@ -686,11 +694,11 @@ Perslid.prototype._require_kpn_string = function()
this._require_prs_perslid();
this._kpn_string =""; // toch geen - als er geen waarde is ??
this._kpn_budgethouderkey = -1;
if (this.afdeling().prs_kostenplaats_key())
if (this.prs_kostenplaats_key())
{
var oRs = Oracle.Execute("SELECT " + S("prs_kpn_string") +", k.prs_perslid_key"
+ " FROM prs_kostenplaats k"
+ " WHERE k.prs_kostenplaats_key = " + this.afdeling().prs_kostenplaats_key());
+ " WHERE k.prs_kostenplaats_key = " + this.prs_kostenplaats_key());
this._kpn_string = '' + oRs(0).value;
this._kpn_budgethouderkey = oRs(1).value;
oRs.close();