Index: ProScan/UI/InfoLogScherm.pas
===================================================================
diff -u -r665 -r669
--- ProScan/UI/InfoLogScherm.pas	(.../InfoLogScherm.pas)	(revision 665)
+++ ProScan/UI/InfoLogScherm.pas	(.../InfoLogScherm.pas)	(revision 669)
@@ -79,7 +79,7 @@
 
   if fWaarschuwingModalResult = mrYes then begin
     fAgent := TAgent.Create(UiContext);
-    Response := fAgent.DnaCodeAfmelden(sgToeleveringData.Rows[sgToeleveringData.Row][2], UiContext.Toelevering, sgToeleveringData.Rows[sgToeleveringData.Row][1],'', -1,'');
+    Response := fAgent.DnaCodeAfmelden(sgToeleveringData.Rows[sgToeleveringData.Row][2], UiContext.Toelevering, sgToeleveringData.Rows[sgToeleveringData.Row][1], -1,'');
     fAgent.Free;
     try
       if Response.Header.Status <> '200' then begin