FSN#39331 Import lijst kunnen filteren op 'Ingelezen door'

svn path=/Website/branches/v2016.3/; revision=32666

APPL/IMP/imp_list.inc

@@ -91,6 +91,9 @@ function imp_list(params)
               + (import_date
                 ? " AND trunc(fi.fac_import_datum_gelezen) = " + import_date.toSQL(false)
                 : "")
+              + (params.prs_key > 0
+                ? " AND fi.prs_perslid_key = " + params.prs_key
+                : "")
 if (!params.historie)
 {
     sql += "AND COALESCE(fi.fac_import_key,-1) = "

APPL/IMP/imp_search.asp

@@ -19,6 +19,7 @@
 <!-- #include file="../Shared/iface.inc" -->
 <!-- #include file="../Shared/selector.inc" -->
 <!-- #include file="../Shared/calendar.inc" -->
+<!-- #include file="../Shared/persoonselector.inc" -->
 
 <%
 // "jquery-ui.js" als js toevoegen. Bij de meeste xxx_search.asp bestanden gebeurd dit al automatisch door de "kenmerk" plugin. Anders o.a. $.dialog() onbekend bij acties in overzicht
@@ -100,6 +101,11 @@ var startdate = new Date(new Date().getFullYear(), new Date().getMonth(), new Da
                         volgnr: 1,
                         timeField: false
                       });
+        FCLTpersoonselector("prs_key",
+                            "prs_key",
+                            { label: L("lcl_imp_import_by"),
+                              whenEmpty: L("lcl_search_generic")
+                            });
 
         RWCHECKBOXTR( "latestonly", "fldimphistorie", L("lcl_imp_nohistorie"), true);
     BLOCK_END();

APPL/IMP/imp_search_list.asp

@@ -32,7 +32,8 @@ imp_list ( { outputmode: outputmode,
              catonly: getQParamInt("catonly", 0) == 1,
              import_app_key: (import_app_key != -1? import_app_key : null),
              import_date: import_date,
-             historie: historie
+             historie: historie,
+             prs_key: getQParamInt("prs_key", -1)
            }
          );
 %>