Files
Facilitor/APPL/CAD/req_move3.asp
Peter Feij 02219a914c FCLT#63646 Graphics 2022 savepoint QA (Aiai) include volgorde
svn path=/Website/trunk/; revision=53388
2021-10-14 10:28:29 +00:00

99 lines
3.5 KiB
Plaintext

<%@ language="javascript"%>
<% /*
$Revision$
$Id$
File: CAD/req_move3.asp
Description: Plaats (niet verplaats) een persoon op een ruimte
Maak daartoe een werkplek en prs_perslid_werkplek aan
S("prs_werkplek_implicit")==1
Parameters: prs_key: een prs_perslid_key
room_key: alg_ruimte_key waarop gedropt
Context: Modal na droppen van een prs_perslid op de tekening
Result: true als daadwerkelijk iets verplaatst (dan moet je waarschijnlijk
ergens beeld refreshen)
Note: Zie req_move2.asp
*/ %>
<!--#include file="../Shared/common.inc"-->
<!--#include file="../Shared/WPFunctions.inc"-->
<!--#include file="../Shared/iface.inc"-->
<!--#include file="FGII.inc"-->
<%
FCLTHeader.Requires({plugins:["jQuery"], js: []})
var autfunction = "WEB_PRSBOF";
var authparams = user.checkAutorisation(autfunction);
// We hebben een prswp_key binnengekregen maar weten dat die 1-op-1 loopt met werkplek
var prs_key = getQParamInt("prs_key"); // perslidwerkplek_key
var room_key = getQParamInt( "room_key"); // Nieuwe ruimte
var TransitParams = "prs_key="+prs_key+"&room_key="+room_key;
// Mag ik schrijven in de doelruimte?
if (authparams.ALGwritelevel>-1)
{
var sql = "SELECT alg_ruimte_key FROM fac_v_my_rooms"
+ " WHERE prs_perslid_key="+user_key
+ " AND alg_ruimte_key = " + room_key
+ " AND niveau="+authparams.ALGwritelevel;
oRs = Oracle.Execute(sql);
user.auth_required_or_abort(!oRs.Eof);
oRs.Close();
}
%>
<html>
<head>
<% FCLTHeader.Generate(); %>
<script type="text/javascript">
function moveWPtoRoom( )
{
var data = { prswp_key : -1
, room_key : <%=room_key%>
, prs_key : <%=prs_key%>
, wp_key : -1
, domove : "placewp"
};
<% protectRequest.dataToken("data"); %>
$.post("req_move_save.asp",
data,
FcltCallbackClose,
"json");
}
</script>
</head>
<body class="modal" id="mod_req_move3">
<%
MODAL_START();
// Let op: alg_ruimte zoeken we met de doel-ruimte, niet herkomst. Beetje lui...
var sql = "SELECT " + S("prs_pers_string") + " naam, ar.alg_ruimte_nr"
+ " FROM prs_v_perslid_gegevens p, alg_ruimte ar"
+ " WHERE p.prs_perslid_key = " + prs_key
+ " AND ar.alg_ruimte_key = " + room_key;
oRs = Oracle.Execute(sql);
%>
<form name="u2" method="post">
<%
MODAL_BLOCK_START("req_move", L("lcl_workplace"), { icon: "fa-briefcase" });
%>
<tr><td class='label'><label><%=L("lcl_fg_domove")%></label></td><td><%=safe.html(oRs("naam").Value)%></td></tr>
<tr><td class='label'><label><%=L("lcl_fg_domovedest")%></label></td><td><%=safe.html(oRs("alg_ruimte_nr").Value)%></td></tr>
<%
MODAL_BLOCK_END();
SIMPLE_BLOCK_START();
CreateButtons([ { title: L("lcl_fg_verhuizing"), action: "moveWPtoRoom()", singlepress: true, id:"btn_res_submit", icon: "fa-fclt-save" },
{ title: L("lcl_cancel"), action: "FcltMgr.closeDetail(window, { cancel: true } )", icon: "fa-fclt-cancel"}
]);
SIMPLE_BLOCK_END();
%>
</form>
<% MODAL_END(); %>
</body>
</html>
<% ASPPAGE_END(); %>