<%@ language="javascript"%>
<% /*
     $Revision$
     $Id$

     Magazijn objecten in de projectenmodule
     Dat zijn objecten (die in real-life wel bestaan) die verwijderd zijn
     (binnen het project aangemaakte objecten die verwijderd worden worden echt verwijderd)
*/%>

<!-- #include file="../Shared/common.inc"-->
<!-- #include file="../Shared/resultset_table_v2.inc" -->
<!-- #include file="../CAD/FGII.inc" -->

<%
FCLTHeader.Requires({ plugins:[],
                      js: ["../cad/draganddrop.js"]
                    });

var scenario_key = getQParamInt("scenario_key"); // current scenario.
var pDiscs = getQParamIntArray("discs", []);
var TransitParams = "scenario_key=" + scenario_key + (pDiscs.length > 0? "&discs=" + pDiscs : "");
var outputmode = getQParamInt("outputmode", 0);
var showall = getQParamInt("showall", 0) == 1;
var doMove = getQParamInt("doMove", 0) == 1;


if (pDiscs.length > 0)
{
  sql = " SELECT prj_deel_key, prj_deel_omschrijving, "
      + "       "+ lcl.xsqla('ins_srtgroep_omschrijving','isg.ins_srtgroep_key') +","
      + "       ins_srtdeel_code||' - '||"+ lcl.xsql('ins_srtdeel_omschrijving','isd.ins_srtdeel_key') +" soort,"
      + "       prj_deel_verwijder"
      + "  FROM prj_deel pd, ins_srtgroep isg, ins_srtdeel isd"
      + " WHERE prj_deel_verwijder is not null"
      + "   AND pd.ins_srtdeel_key = isd.ins_srtdeel_key"
      + "   AND isd.ins_srtgroep_key = isg.ins_srtgroep_key"
      + "   AND isg.ins_discipline_key IN (" + pDiscs.join(",") +")"
      + " ORDER BY prj_deel_verwijder DESC"
}
else
{
  var sql = "SELECT * FROM DUAL WHERE 1 = 0";
} %>

<html>
  <head>
<%  FCLTHeader.Generate({ outputmode: outputmode }); %>
    <script type="text/javascript">

      $(function()
      {
        onLoad_prj5();
      });

      // Callback functie: er is iets gedropt op het plaatje
      function notifyDrop(SlnkEvent)
      {
        dwgX = SlnkEvent.dwgX;
        dwgY = SlnkEvent.dwgY;

        var data = { actie : 'domove'
                   , deel_key : dragElement.getAttribute("myKey")
                   , room_key : SlnkEvent.Key
                   , dwgX : dwgX
                   , dwgY : dwgY
                  };
        <% protectRequest.dataToken("data"); %>
        $.post("rap_prj5_save.asp",
               data,
               FcltCallback,
               "json");
        parent.myRefresh(); // Iets is  misschien veranderd. Pas plaatje aan
        dragend();
      }

      function drag_onMouseOut(dragElement, evt)
      {
         myHTML="<div style='color:red;font-family:Verdana;font-size:8pt;cursor:move;'>" + dragElement.innerText + "</div>"
         parent.EnableDragAndDrop(notifyDrop, myHTML);
      }

      function onLoad_prj5()
      {
<%      if (doMove)
        { %>
          parent.myRefresh(); // Iets is  misschien veranderd. Pas plaatje aan
<%      }
        else
        { // Geen initDragger als nog een pending refresh().
          // Zou risico op 'freed script' error geven
%>
          if (window.draginit) draginit();
<%      } %>
      }
    </script>
  </head>

  <body class="prjtabpage">
    <form name='u2'>
<%
      function DraggableName(oRs)
      {
        var nm = safe.html(oRs("prj_deel_omschrijving").value);
        return "<font color=red class='draggable' myKey=" + oRs("prj_deel_key").value + ">" + nm + "</font>";
      }

      var rst = new ResultsetTable({ keyColumn: "prj_deel_key",
                                     sql: sql,
                                     ID: "workTable",
                                     outputmode: outputmode,
                                     showAll: showall
                                   });

      rst.addColumn(new Column({caption: L("lcl_obj_sort"), content: "soort"}));
      rst.addColumn(new Column({caption: L("lcl_obj_identification") + " (" + L("lcl_obj_draggable") + ")", content: DraggableName}));
      rst.addColumn(new Column({caption: L("lcl_prj_put_in_objbuffer"), content: "prj_deel_verwijder", datatype: "datetime"}));

      var cnt = rst.processResultset();
%>
    </form>
  </body>
</html>
<% ASPPAGE_END(); %> 
