85 lines
3.6 KiB
Plaintext
85 lines
3.6 KiB
Plaintext
<%@ language = "JavaScript" %>
|
|
<% /*
|
|
$Revision$
|
|
$Id$
|
|
|
|
File: ins_my_objects.asp (formerly PersObjects\PersSearch.asp;6)
|
|
Description: Toont de geregistreerde persoonelijke bezittingen
|
|
van een user, en biedt de mogelijkheid om de gegevens daarvan aan
|
|
te passen indien het van een persoonlijk ("3") discipline is.
|
|
Het gaat dan bv over kentekenregistratie.
|
|
Parameters:
|
|
Context: Vanuit Portal of beter nog een frame van het persoonscherm
|
|
Note: Maakte gebruik van officieuze WEB_PRSOBJ-autorisatie (ja/nee)
|
|
|
|
TODO: bedenken wat te doen. Als we deze in een persoonframe stoppen
|
|
dan is er verder geen extra autorisatie meer nodig
|
|
|
|
*/ %>
|
|
<!-- #include file="../Shared/common.inc" -->
|
|
<!-- #include file="../Shared/iface.inc" -->
|
|
<!-- #include file="../Shared/resultset_table_v2.inc" -->
|
|
<html>
|
|
<head>
|
|
<% FCLTHeader.Generate(); %>
|
|
<script type="text/javascript">
|
|
function insEdit (row)
|
|
{
|
|
$(row).addClass('dirty');
|
|
var ins_key = row.getAttribute("ROWKEY");
|
|
var url = "appl/ins/ins_deel.asp?urole=fe&ins_key="+ ins_key;
|
|
FcltMgr.openDetail(url, "<%=L("lcl_spo_title")%>" );
|
|
}
|
|
</script>
|
|
</head>
|
|
|
|
<body id="listbody">
|
|
<div id="list">
|
|
<%
|
|
var sql,val;
|
|
var oRs;
|
|
|
|
// Het tweede deel van de query zijn de objecten die jij in je bezit hebt.
|
|
// het eerste deel zijn objectsoorten(!) met ins_discipline_min_level=3 die je nog *niet* hebt
|
|
// Dat wordt door de Akzo gebruikt om voor iedereen een dummy 'Auto' te hebben tbf kentekenrgistratie.
|
|
sql=" SELECT '-' ins_deel_omschrijving"
|
|
+ ", "+lcl.xsqla('sd.ins_srtdeel_omschrijving', 'sd.ins_srtdeel_key')
|
|
+ ", to_number(NULL) ins_deel_key,"
|
|
+ " D.ins_discipline_min_level auth, SD.ins_srtdeel_key"
|
|
+ " FROM ins_v_aanwezigsrtdeel SD, ins_srtgroep G, ins_discipline D"
|
|
+ " WHERE D.ins_discipline_min_level=3"
|
|
+ " AND D.ins_discipline_key=G.ins_discipline_key"
|
|
+ " AND SD.ins_srtgroep_key=G.ins_srtgroep_key"
|
|
+ " AND NOT EXISTS (SELECT DD.ins_srtdeel_key "
|
|
+ " FROM ins_v_aanwezigdeel DD"
|
|
+ " WHERE DD.ins_alg_ruimte_key="+user_key
|
|
+ " AND DD.ins_alg_ruimte_type='P'"
|
|
+ " AND DD.ins_srtdeel_key=SD.ins_srtdeel_key) "
|
|
+ " UNION ALL "
|
|
+ "SELECT D.ins_deel_omschrijving"
|
|
+ ", "+lcl.xsqla('sd.ins_srtdeel_omschrijving', 'sd.ins_srtdeel_key')
|
|
+ ", D.ins_deel_key,"
|
|
+ " di.ins_discipline_min_level auth, sd.ins_srtdeel_key"
|
|
+ " FROM ins_v_aanwezigdeel D,ins_v_aanwezigsrtdeel SD, ins_discipline DI"
|
|
+ " WHERE D.ins_srtdeel_key=SD.ins_srtdeel_key"
|
|
+ " AND D.ins_discipline_key = DI.ins_discipline_key"
|
|
+ " AND ins_alg_ruimte_type='P'"
|
|
+ " AND ins_alg_ruimte_key="+user_key;
|
|
|
|
var rst = new ResultsetTable({ keyColumn: "ins_deel_key",
|
|
sql: sql,
|
|
ID: "instable",
|
|
title: L("lcl_spo_header")
|
|
});
|
|
|
|
rst.addColumn(new Column({caption: L("lcl_objn2"), content: "ins_deel_omschrijving"}));
|
|
rst.addColumn(new Column({caption: L("lcl_objn1"), content: "ins_srtdeel_omschrijving"}));
|
|
|
|
rst.addAction({ action: "insEdit", caption: L("lcl_edit"), isDefault: true } );
|
|
|
|
var cnt = rst.processResultset();
|
|
%>
|
|
</div>
|
|
</body>
|
|
</html>
|