--- dao/DelphiScanner/Main.pas	2016/06/27 12:18:07	3055
+++ dao/DelphiScanner/Main.pas	2016/06/28 12:39:35	3057
@@ -841,34 +841,7 @@
 
     if SpecialVersionSted = 'DBK' then
     begin
-      //FarveNormal := 'A9F5A9';  // her kan vi evt. overrule ini fil
       Sted := SpecialVersionSted;
-      // her skal vi også disable de knapper DBK ikke kan bruge
-      PanelValg2.Enabled := false;
-      PanelValg2.Font.Color := clInactiveCaption;
-      PanelValg3.Enabled := false;
-      PanelValg3.Font.Color := clInactiveCaption;
-      PanelValg5.Enabled := false;
-      PanelValg5.Font.Color := clInactiveCaption;
-      PanelValg6.Enabled := false;
-      PanelValg6.Font.Color := clInactiveCaption;
-
-
-     // her skal vi også disable de menupunkter DBK ikke kan bruge
-      menuNatxpressReturDAO1.Enabled := false;
-      menuNatxpressReturfraKunde1.Enabled := false;
-
-      menuPakkeshop1.Enabled := false;
-      menuPakkeshopRetur1.Enabled := false;
-
-      if SpecialVersionScanningtype = 'A' then
-      begin
-         Scanningtype := '1';
-      end
-      else
-      begin
-        Scanningtype := SpecialVersionScanningtype;
-      end;
     end;
 
     if (SpecialVersionSted = '01')
@@ -1840,6 +1813,7 @@
       for i := ListBox2.items.count-1 downto 0 do
         if pos(StregKode,ListBox2.items[i]) <> 0 then
         begin
+          wrkAntalSenere := 0;//initial Value
 
           // Ajourføring af tæller for manglende pakker (scanninger)
           wrkAntal := StaticTextManglendePakker.Caption;
@@ -4203,7 +4177,7 @@
   I: Integer;
   stregkode, modtagernavn, modtageradresse, kommentar : string;
   pakketype, tjekkodestatus : String;
-  pakketypeix, antalLiniefelter, antalFelterFundet, linienr : Integer;
+  antalLiniefelter, antalFelterFundet, linienr : Integer;
   //pakketyper : TStrings;
   pakketyper : TDictionary<String, Integer>;
   tmpAntal : Integer;